;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

%100

;+20
;+19
;+21

;+22
;+23

+24
+26

[@main]
#IF
checkpkpoint 2

#SAY
#INCLUDE [..\Market_Def\00BuySell_Std.txt] @Convert_BuySellStd_PK

#ELSESAY
Hi, My name is {FCOLOR/10}<$NPCNAME>{FCOLOR/12}, how can I help you?\
<[ Buy ]/@buy> Bracelet\
<[ Sell ]/@sell> Bracelet\
<[ Repair ]/@Repair> Bracelet\
#IF
Check  [257]  1
Check  [258]  0
#SAY
<[ Test Quest ]/@TestQuest>\
#IF
#SAY
<[ Exit ]/@exit>\

[@buy]
#SAY
#INCLUDE [..\Market_Def\00BuySell_Std.txt] @Convert_BuySellStd_Buy

[@sell]
#SAY
#INCLUDE [..\Market_Def\00BuySell_Std.txt] @Convert_BuySellStd_Sell

[@repair]
#SAY
#INCLUDE [..\Market_Def\00BuySell_Std.txt] @Convert_BuySellStd_Rep

[~@repair]
#SAY
#INCLUDE [..\Market_Def\00BuySell_Std.txt] @Convert_BuySellStd_Rep1

[@TestQuest]
#IF
Check [257] 1
Check [258] 0
#ACT
FormatStr "FLD_QUEST ='Mary' and FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_StingQuests" %A9 "FLD_Stage" @MaryQuestStage
Break

[@MaryQuestStage()]
#IF
#ACT
Mov   D1   %ARG(1)

#IF
Equal  D1  0
#ACT
Goto @MaryQuest0
Break

#IF
Equal  D1  1
#ACT
Goto @MaryQuest1
Break

#IF
Equal  D1  2
#ACT
Goto @MaryQuest2
Break

#IF
Equal  D1  3
#ACT
Goto @MaryQuest3
Break

#IF
Equal  D1  4
#ACT
Goto @MaryQuest3
Break

#IF
Equal  D1  5
#ACT
Goto @MaryQuest3
Break

#IF
ELarge  D1  6
#ACT
Goto @MaryQuest3
Break


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Part 0
[@MaryQuest0]
#SAY
There is a great leader in the {FCOLOR/10}AntColony{FCOLOR/12}, a general\
who plans to lead these creatures in an attack on\
the village. You must seek out this maniac {FCOLOR/10}GeneralAnt{FCOLOR/12}\
and destroy him, or we are all doomed. You may find\
him in the {FCOLOR/10}AntColony(E){FCOLOR/12}\\
<[ Rest assured I will do my best to find him ]/@MaryQuest0_1>\
<[ No way, why should I care?]/@exit>\\
#ACT
Break

[@MaryQuest0_1]
#SAY
Excellent, may god be with you	\\
<[ Exit ]/@exit>\
#ACT
Mov  A0  %USERNAME
Mov  A1  "Mary"
Mov  D0  1
FormatStr "'%s','%s',%s" %A0 %A1 %D0
Mov A8 %A9
FormatStr "FLD_CHARACTER='%s' and FLD_QUEST='%s'" %A0 %A1
WriteValueSql "TBL_StingQuests" %A9 "FLD_CHARACTER,FLD_QUEST,FLD_STAGE" %A8

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Part 1
[@MaryQuest1]
#SAY
{FCOLOR/10}GeneralAnt{FCOLOR/12} is still alive??  Get to\
{FCOLOR/10}AntColony(E){FCOLOR/12} now before its too late!\\
<[ Please forgive me.. I shall not dally.. ]/@exit>\\
#ACT
Break

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Part 2
[@MaryQuest2]

#IF
#SAY
You have done well. Go to {FCOLOR/10}Julie(Helmets){FCOLOR/12}, she will give\
you your next assignment\\
<[ Exit ]/@exit>\
#ACT
Mov  A0  %USERNAME
Mov  A1  "Mary"
Mov  D0  3
FormatStr "FLD_STAGE=%s" %D0
Mov A8 %A9
FormatStr "FLD_CHARACTER='%s' and FLD_QUEST='%s'" %A0 %A1
UpdateValueSql "TBL_StingQuests" %A9 %A8
Break

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Part 3
[@MaryQuest3]
#SAY
I can no longer aid you in your quest, please go and\
see {FCOLOR/10}Julie(Helmets){FCOLOR/12}\\
<[ Exit ]/@exit>\
#ACT
Break


[Goods]
HardBracelet 200 1
DurableBrace 200 1
SilverBracelet 200 1
SoulIronBrace 200 1
ThinBracelet 200 1
LeatherGlove 200 1
IronSoulBand 200 1
LargeBracelet 200 1
TaoBracelet 200 1
ArisuBracelet 200 1
FighterBracelet 200 1
FlameTreeBand 200 1
MagicBracelet 200 1
LoyaltyBracelet 200 1
RippleBracelet 200 1
HardGlove 200 1
GoldenBracelet 200 1

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;