;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[@CALLMain]
{
#IF
Check  [151]  1
#SAY
You have already completed this quest.. Sorry\\
<[ Cya ]/@Exit>\\\
#ACT
Break

#IF
Check  [150]  0
#SAY
Welcome stranger, I am a powerful Enchanter\
I am able to Enchant a powerful Sword that you will\
be able to defeat many many monsters with.\\
<[ Wow, could you Enchant me one of those? ]/@DGS1>\
<[ Heard it all before, I have what you need ]/@DGSMain>\\\
#ELSEACT
Goto  @CheckOption



[@DGS1]
#SAY
Of course, my abilites are very good.\\
Just one thing, I need an artifact to be able\
to start the enchantment process...\
I need a {FCOLOR/10}DragonGatePiece{FCOLOR/12}, it is a very rare item\
And I know of only 1 place you could find it\\
<[ Where is that place? ]/@DGS2>\\\

[@DGS2]
#SAY
Well, its from the {FCOLOR/10}BoneLord{FCOLOR/12}\
The {FCOLOR/10}BoneLord{FCOLOR/12} Carries the {FCOLOR/10}DragonGatePiece{FCOLOR/12} with him\
at all times.\\
<[ Cool, thanks I will look for one now ]/@exit>\\\

[@DGSMain]
#IF
CheckItem DragonGatePiece 1
#SAY
So, you have one of the famed {FCOLOR/10}DragonGatePieces{FCOLOR/12}\
I am impressed, I wasnt sure any were left in the\
World.\\
Do you mind if I take that piece and start the process?\\
<[ Sure, lets get this started ]/@DGSMain1>\\\

[@DGSMain1]
#IF
CheckItem DragonGatePiece 1
#ACT
Take DragonGatePiece 1
Set [150]  1
Mov  A0  %USERNAME
Mov  A1  "DGS"
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
#SAY
Nice one, OK, I have the foundation of the\
{FCOLOR/10}DragonGateSword{FCOLOR/12}, now its time to start collecting\
The ingredients\\
The First thing I need is {FCOLOR/10}the DeathBook{FCOLOR/12}\
You can get this of the Ghoul who lives in the lowest\
Mine and waylays passersby, good luck.. and see me soon\\
<[ Cya ]/@Exit>\\\

[@CheckOption]
#SAY
Do you want to Check Quest Location or\
Exchange BossScrolls for Quest Items?\
<[ Quest Location ]/@DGSQuestLocation>\
<[ Exchange BIG Scrolls ]/@EXchangeScrolls>\

[@DGSQuestLocation]
#IF
Check [150] 1
#ACT
FormatStr "FLD_QUEST ='DGS' and FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_StingQuests" %A9 "FLD_Stage" @DGSQuestLocation1


[@DGSQuestLocation1()]
#ACT
mov D1 %ARG(1)

#IF
Equal D1  1
#ACT
Goto @DGSQuest1
Break

#IF
Equal D1  2
#ACT
Goto @DGSQuest2
Break

#IF
Equal D1  3
#ACT
Goto @DGSQuest3
Break

#IF
Equal D1  4
#ACT
Goto @DGSQuest4
Break

#IF
Equal D1  5
#ACT
Goto @DGSQuest5
Break

#IF
Equal D1  6
#ACT
Goto @DGSQuest6
Break

#IF
Equal D1  7
#ACT
Goto @DGSQuest7
Break

#IF
Equal D1  8
#ACT
Goto @DGSQuest8
Break

#IF
Equal D1  9
#ACT
Goto @DGSQuest9
Break

#IF
Equal D1  10
#ACT
Goto @DGSQuest10
Break

#IF
Equal D1  11
#ACT
Goto @DGSQuest11A
Break

#IF
Equal D1  12
#ACT
Goto @DGSQuest12A
Break

#IF
Equal D1  13
#ACT
Goto @DGSQuest13
Break

#IF
Equal D1  14
#ACT
Goto @DGSQuest14
Break

#IF
Equal D1  15
#ACT
Goto @DGSQuest15
Break

#IF
Equal D1  16
#ACT
Goto @DGSQuest16
Break

#IF
Equal D1  17
#ACT
Goto @DGSQuest17
Break

#IF
Equal D1  18
#ACT
Goto @DGSQuest18
Break

#IF
Equal D1  19
#ACT
Goto @DGSQuest19
Break

#IF
#SAY
How did you get here? Speak to {FCOLOR/10}Sting{FCOLOR/12} and tell\
Him {FCOLOR/10}~DGS Quest Bugged at SQL Read~{FCOLOR/12}\\\

[@DGSQuest1]
#SAY
Have you located the {FCOLOR/10}DeathBook{FCOLOR/12}?\
<[ Yes, here it is ]/@DGSQuest11>\
<[ No, where do I go again? ]/@DGSQuest12>\\\

[@DGSQuest12]
#SAY
The {FCOLOR/10}DeathBook{FCOLOR/12} can be obtained from killing\
The {FCOLOR/10}Ghoul{FCOLOR/12} in the Mines\\
<[ OK, Thanks ]/@exit>\\\

[@DGSQuest11]
#IF
CheckItem DeathBook  1
#ACT
Take DeathBook 5
Mov  A0  %USERNAME
Mov  A1  "DGS"
Mov  D0  2
FormatStr "FLD_STAGE=%s" %D0
Mov A8 %A9
FormatStr "FLD_CHARACTER='%s' and FLD_QUEST='%s'" %A0 %A1
UpdateValueSql "TBL_StingQuests" %A9 %A8
Break
#SAY
Thanks for that, ready for the next item?\
OK, the next item is a {FCOLOR/10}NumaGoldPlate{FCOLOR/12}, this can\
Only be obtained from the {FCOLOR/10}GreatNumaMonk{FCOLOR/12} in the\
{FCOLOR/10}Desert{FCOLOR/12}.. good luck\\
<[ Cya ]/@exit>\\



[@DGSQuest2]
#SAY
Have you located the {FCOLOR/10}NumaGoldPlate{FCOLOR/12}?\
<[ Yes, here it is ]/@DGSQuest21>\
<[ No, where do I go again? ]/@DGSQuest22>\\\

[@DGSQuest22]
#SAY
The {FCOLOR/10}NumaGoldPlate{FCOLOR/12} can be obtained from killing\
The {FCOLOR/10}GreatNumaMonk{FCOLOR/12} in the {FCOLOR/10}Desert{FCOLOR/12}\\
<[ OK, Thanks ]/@exit>\\\

[@DGSQuest21]
#IF
CheckItem NumaGoldPlate 1
#ACT
Take NumaGoldPlate 5
Mov  A0  %USERNAME
Mov  A1  "DGS"
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
#SAY
Thanks for that, ready for the next item?\
OK, the next item is an {FCOLOR/10}OmaKingHorn{FCOLOR/12}, this can\
Only be obtained from the {FCOLOR/10}OmaKing{FCOLOR/12} in\
{FCOLOR/10}OldBichon{FCOLOR/12}.. good luck\\
<[ Cya ]/@exit>\\


[@DGSQuest3]
#SAY
Have you located the {FCOLOR/10}OmaKingHorn{FCOLOR/12}?\
<[ Yes, here it is ]/@DGSQuest31>\
<[ No, where do I go again? ]/@DGSQuest32>\\\

[@DGSQuest32]
#SAY
The {FCOLOR/10}OmaKingHorn{FCOLOR/12} can be obtained from killing\
The {FCOLOR/10}OmaKing{FCOLOR/12} in {FCOLOR/10}OldBichon{FCOLOR/12}\\
<[ OK, Thanks ]/@exit>\\\

[@DGSQuest31]
#IF
CheckItem OmaKingHorn 1
#ACT
Take OmaKingHorn 5
Mov  A0  %USERNAME
Mov  A1  "DGS"
Mov  D0  4
FormatStr "FLD_STAGE=%s" %D0
Mov A8 %A9
FormatStr "FLD_CHARACTER='%s' and FLD_QUEST='%s'" %A0 %A1
UpdateValueSql "TBL_StingQuests" %A9 %A8
Break
#SAY
Thanks for that, ready for the next item?\
OK, the next item is a {FCOLOR/10}WoomaGoldPlate{FCOLOR/12}, this can\
Only be obtained from the {FCOLOR/10}WoomaTaurus{FCOLOR/12} in the\
{FCOLOR/10}WoomaTemple{FCOLOR/12}.. good luck\\
<[ Cya ]/@exit>\\



[@DGSQuest4]
#SAY
Have you located the {FCOLOR/10}WoomaGoldPlate{FCOLOR/12}?\
<[ Yes, here it is ]/@DGSQuest41>\
<[ No, where do I go again? ]/@DGSQuest42>\\\

[@DGSQuest42]
#SAY
The {FCOLOR/10}WoomaGoldPlate{FCOLOR/12} can be obtained from killing\
The {FCOLOR/10}WoomaTaurus{FCOLOR/12} in the {FCOLOR/10}WoomaTemple{FCOLOR/12}\\
<[ OK, Thanks ]/@exit>\\\

[@DGSQuest41]
#IF
CheckItem WoomaGoldPlate 1
#ACT
Take WoomaGoldPlate 5
Mov  A0  %USERNAME
Mov  A1  "DGS"
Mov  D0  5
FormatStr "FLD_STAGE=%s" %D0
Mov A8 %A9
FormatStr "FLD_CHARACTER='%s' and FLD_QUEST='%s'" %A0 %A1
UpdateValueSql "TBL_StingQuests" %A9 %A8
Break
#SAY
Thanks for that, ready for the next item?\
OK, the next item is a {FCOLOR/10}HammerOfWind{FCOLOR/12}, this can\
Only be obtained from the {FCOLOR/10}BoarKing{FCOLOR/12} in the\
{FCOLOR/10}StoneTemple{FCOLOR/12}.. good luck\\
<[ Cya ]/@exit>\\



[@DGSQuest5]
#SAY
Have you located the {FCOLOR/10}HammerOfWind{FCOLOR/12}?\
<[ Yes, here it is ]/@DGSQuest51>\
<[ No, where do I go again? ]/@DGSQuest52>\\\

[@DGSQuest52]
#SAY
The {FCOLOR/10}HammerOfWind{FCOLOR/12} can be obtained from killing\
The {FCOLOR/10}BoarKing{FCOLOR/12} in the {FCOLOR/10}StoneTemple{FCOLOR/12}\\
<[ OK, Thanks ]/@exit>\\\

[@DGSQuest51]
#IF
CheckItem HammerOfWind 1
#ACT
Take HammerOfWind 5
Mov  A0  %USERNAME
Mov  A1  "DGS"
Mov  D0  6
FormatStr "FLD_STAGE=%s" %D0
Mov A8 %A9
FormatStr "FLD_CHARACTER='%s' and FLD_QUEST='%s'" %A0 %A1
UpdateValueSql "TBL_StingQuests" %A9 %A8
Break
Give BoneWheel 1
#SAY
Thanks for that, ready for the next item?\
The Next item I have created for you.. \
Check you bag... .... \\
<[ Cya ]/@exit>\\



[@DGSQuest6]
#SAY
Have you located the {FCOLOR/10}BoneWheel{FCOLOR/12}?\
<[ Yes, here it is ]/@DGSQuest61>\\\

[@DGSQuest61]
#IF
CheckItem BoneWheel 1
#ACT
Take BoneWheel 5
Mov  A0  %USERNAME
Mov  A1  "DGS"
Mov  D0  7
FormatStr "FLD_STAGE=%s" %D0
Mov A8 %A9
FormatStr "FLD_CHARACTER='%s' and FLD_QUEST='%s'" %A0 %A1
UpdateValueSql "TBL_StingQuests" %A9 %A8
Break
#SAY
Thanks for that, ready for the next item?\
OK, the next item is a {FCOLOR/10}EvilCentiBell{FCOLOR/12}, this can\
Only be obtained from the {FCOLOR/10}EvilCentipede{FCOLOR/12} in the\
{FCOLOR/10}BugCave{FCOLOR/12}.. good luck\\
<[ Cya ]/@exit>\\



[@DGSQuest7]
#SAY
Have you located the {FCOLOR/10}EvilCentiBell{FCOLOR/12}?\
<[ Yes, here it is ]/@DGSQuest71>\
<[ No, where do I go again? ]/@DGSQuest72>\\\

[@DGSQuest72]
#SAY
The {FCOLOR/10}EvilCentiBell{FCOLOR/12} can be obtained from killing\
The {FCOLOR/10}EvilCentipede{FCOLOR/12} in the {FCOLOR/10}BugCave{FCOLOR/12}\\
<[ OK, Thanks ]/@exit>\\\

[@DGSQuest71]
#IF
CheckItem EvilCentiBell 1
#ACT
Take EvilCentiBell 1
Mov  A0  %USERNAME
Mov  A1  "DGS"
Mov  D0  8
FormatStr "FLD_STAGE=%s" %D0
Mov A8 %A9
FormatStr "FLD_CHARACTER='%s' and FLD_QUEST='%s'" %A0 %A1
UpdateValueSql "TBL_StingQuests" %A9 %A8
Break
#SAY
Thanks for that, ready for the next item?\
OK, the next item is a {FCOLOR/10}GreatDarkTooth{FCOLOR/12}, this can\
Only be obtained from the {FCOLOR/10}GreatDarkArachnid{FCOLOR/12} in the\
{FCOLOR/10}IllusionWoods{FCOLOR/12}.. good luck\\
<[ Cya ]/@exit>\\



[@DGSQuest8]
#SAY
Have you located the {FCOLOR/10}GreatDarkTooth{FCOLOR/12}?\
<[ Yes, here it is ]/@DGSQuest81>\
<[ No, where do I go again? ]/@DGSQuest82>\\\

[@DGSQuest82]
#SAY
The {FCOLOR/10}GreatDarkTooth{FCOLOR/12} can be obtained from killing\
The {FCOLOR/10}GreatDarkArachnid{FCOLOR/12} in the {FCOLOR/10}IllusionWoods{FCOLOR/12}\\
<[ OK, Thanks ]/@exit>\\\

[@DGSQuest81]
#IF
CheckItem GreatDarkTooth 1
#ACT
Take GreatDarkTooth 1
Mov  A0  %USERNAME
Mov  A1  "DGS"
Mov  D0  9
FormatStr "FLD_STAGE=%s" %D0
Mov A8 %A9
FormatStr "FLD_CHARACTER='%s' and FLD_QUEST='%s'" %A0 %A1
UpdateValueSql "TBL_StingQuests" %A9 %A8
Break
#SAY
Thanks for that, ready for the next item?\
OK, the next item is a {FCOLOR/10}ApeKingClaw{FCOLOR/12}, this can\
Only be obtained from the {FCOLOR/10}ApeKing{FCOLOR/12} in the\
{FCOLOR/10}RedMoonValley{FCOLOR/12}.. good luck\\
<[ Cya ]/@exit>\\



[@DGSQuest9]
#SAY
Have you located the {FCOLOR/10}ApeKingClaw{FCOLOR/12}?\
<[ Yes, here it is ]/@DGSQuest91>\
<[ No, where do I go again? ]/@DGSQuest92>\\\

[@DGSQuest92]
#SAY
The {FCOLOR/10}ApeKingClaw{FCOLOR/12} can be obtained from killing\
The {FCOLOR/10}ApeKing{FCOLOR/12} in the {FCOLOR/10}RedMoonValley{FCOLOR/12}\\
<[ OK, Thanks ]/@exit>\\\

[@DGSQuest91]
#IF
CheckItem ApeKingClaw 1
#ACT
Take ApeKingClaw 5
Mov  A0  %USERNAME
Mov  A1  "DGS"
Mov  D0  10
FormatStr "FLD_STAGE=%s" %D0
Mov A8 %A9
FormatStr "FLD_CHARACTER='%s' and FLD_QUEST='%s'" %A0 %A1
UpdateValueSql "TBL_StingQuests" %A9 %A8
Break
#SAY
Thanks for that, ready for the next item?\
OK, the next item is a {FCOLOR/10}OldMinoHammer{FCOLOR/12}, this can\
Only be obtained from the {FCOLOR/10}MinotaurKing{FCOLOR/12} in the\
{FCOLOR/10}PrajnaTemple{FCOLOR/12}.. good luck\\
<[ Cya ]/@exit>\\



[@DGSQuest10]
#SAY
Have you located the {FCOLOR/10}OldMinoHammer{FCOLOR/12}?\
<[ Yes, here it is ]/@DGSQuest101>\
<[ No, where do I go again? ]/@DGSQuest102>\\\

[@DGSQuest102]
#SAY
The {FCOLOR/10}OldMinoHammer{FCOLOR/12} can be obtained from killing\
The {FCOLOR/10}MinotaurKing{FCOLOR/12} in the {FCOLOR/10}PrajnaTemple{FCOLOR/12}\\
<[ OK, Thanks ]/@exit>\\\

[@DGSQuest101]
#IF
CheckItem OldMinoHammer 1
#ACT
Take OldMinoHammer 5
Mov  A0  %USERNAME
Mov  A1  "DGS"
Mov  D0  11
FormatStr "FLD_STAGE=%s" %D0
Mov A8 %A9
FormatStr "FLD_CHARACTER='%s' and FLD_QUEST='%s'" %A0 %A1
UpdateValueSql "TBL_StingQuests" %A9 %A8
Break
#SAY
Thanks for that, ready for the next item?\
OK, the next item is a {FCOLOR/10}ForgottenZumaPlate{FCOLOR/12}, this can\
Only be obtained from the {FCOLOR/10}ZumaTaurus{FCOLOR/12} in the\
{FCOLOR/10}ZumaTemple{FCOLOR/12}.. good luck\\
<[ Cya ]/@exit>\\



[@DGSQuest11A]
#SAY
Have you located the {FCOLOR/10}ForgottenZumaPlate{FCOLOR/12}?\
<[ Yes, here it is ]/@DGSQuest111>\
<[ No, where do I go again? ]/@DGSQuest112>\\\

[@DGSQuest112]
#SAY
The {FCOLOR/10}ForgottenZumaPlate{FCOLOR/12} can be obtained from killing\
The {FCOLOR/10}ZumaTaurus{FCOLOR/12} in the {FCOLOR/10}ZumaTemple{FCOLOR/12}\\
<[ OK, Thanks ]/@exit>\\\

[@DGSQuest111]
#IF
CheckItem ForgottenZumaPlate 1
#ACT
Take ForgottenZumaPlate 5
Mov  A0  %USERNAME
Mov  A1  "DGS"
Mov  D0  12
FormatStr "FLD_STAGE=%s" %D0
Mov A8 %A9
FormatStr "FLD_CHARACTER='%s' and FLD_QUEST='%s'" %A0 %A1
UpdateValueSql "TBL_StingQuests" %A9 %A8
Break
#SAY
Thanks for that, ready for the next item?\
OK, the next item is a {FCOLOR/10}BlackPalaceGoldBook{FCOLOR/12}, this can\
Only be obtained from the {FCOLOR/10}BlackKing{FCOLOR/12} in the\
{FCOLOR/10}BlackPalace{FCOLOR/12}.. good luck\\
<[ Cya ]/@exit>\\



[@DGSQuest12A]
#SAY
Have you located the {FCOLOR/10}BlackPalaceGoldBook{FCOLOR/12}?\
<[ Yes, here it is ]/@DGSQuest121>\
<[ No, where do I go again? ]/@DGSQuest122>\\\

[@DGSQuest122]
#SAY
The {FCOLOR/10}BlackPalaceGoldBook{FCOLOR/12} can be obtained from killing\
The {FCOLOR/10}BlackKing{FCOLOR/12} in the {FCOLOR/10}BlackPalace{FCOLOR/12}\\
<[ OK, Thanks ]/@exit>\\\

[@DGSQuest121]
#IF
CheckItem BlackPalaceGoldBook 1
#ACT
Take BlackPalaceGoldBook 5
Mov  A0  %USERNAME
Mov  A1  "DGS"
Mov  D0  13
FormatStr "FLD_STAGE=%s" %D0
Mov A8 %A9
FormatStr "FLD_CHARACTER='%s' and FLD_QUEST='%s'" %A0 %A1
UpdateValueSql "TBL_StingQuests" %A9 %A8
Break
#SAY
Thanks for that, ready for the next item?\
OK, the next item is a {FCOLOR/10}OldForbiddenFruit{FCOLOR/12}, this can\
Only be obtained from the {FCOLOR/10}ForbiddenKing{FCOLOR/12} in the\
{FCOLOR/10}ForbiddenTemple{FCOLOR/12}.. good luck\\
<[ Cya ]/@exit>\\



[@DGSQuest13]
#SAY
Have you located the {FCOLOR/10}OldForbiddenFruit{FCOLOR/12}?\
<[ Yes, here it is ]/@DGSQuest131>\
<[ No, where do I go again? ]/@DGSQuest132>\\\

[@DGSQuest132]
#SAY
The {FCOLOR/10}OldForbiddenFruit{FCOLOR/12} can be obtained from killing\
The {FCOLOR/10}ForbiddenKing{FCOLOR/12} in the {FCOLOR/10}ForbiddenTemple{FCOLOR/12}\\
<[ OK, Thanks ]/@exit>\\\

[@DGSQuest131]
#IF
CheckItem OldForbiddenFruit 1
#ACT
Take OldForbiddenFruit 5
Mov  A0  %USERNAME
Mov  A1  "DGS"
Mov  D0  14
FormatStr "FLD_STAGE=%s" %D0
Mov A8 %A9
FormatStr "FLD_CHARACTER='%s' and FLD_QUEST='%s'" %A0 %A1
UpdateValueSql "TBL_StingQuests" %A9 %A8
Break
#SAY
Thanks for that, ready for the next item?\
OK, the next item is a {FCOLOR/10}AncientHeart{FCOLOR/12}, this can\
Only be obtained from the {FCOLOR/10}AncientSoul{FCOLOR/12} in the\
{FCOLOR/10}AncientTemple{FCOLOR/12}.. good luck\\
<[ Cya ]/@exit>\\



[@DGSQuest14]
#SAY
Have you located the {FCOLOR/10}AncientHeart{FCOLOR/12}?\
<[ Yes, here it is ]/@DGSQuest141>\
<[ No, where do I go again? ]/@DGSQuest142>\\\

[@DGSQuest142]
#SAY
The {FCOLOR/10}AncientHeart{FCOLOR/12} can be obtained from killing\
The {FCOLOR/10}AncientSoul{FCOLOR/12} in the {FCOLOR/10}AncientTemple{FCOLOR/12}\\
<[ OK, Thanks ]/@exit>\\\

[@DGSQuest141]
#IF
CheckItem AncientHeart 1
#ACT
Take AncientHeart 5
Mov  A0  %USERNAME
Mov  A1  "DGS"
Mov  D0  15
FormatStr "FLD_STAGE=%s" %D0
Mov A8 %A9
FormatStr "FLD_CHARACTER='%s' and FLD_QUEST='%s'" %A0 %A1
UpdateValueSql "TBL_StingQuests" %A9 %A8
Break
#SAY
Thanks for that, ready for the next item?\
OK, the next item is a {FCOLOR/10}CalabashOfSpirit{FCOLOR/12}, this can\
Only be obtained from the {FCOLOR/10}RedMoonEvil{FCOLOR/12} in the\
{FCOLOR/10}RedMoonvalley{FCOLOR/12}.. good luck\\
<[ Cya ]/@exit>\\



[@DGSQuest15]
#SAY
Have you located the {FCOLOR/10}CalabashOfSpirit{FCOLOR/12}?\
<[ Yes, here it is ]/@DGSQuest151>\
<[ No, where do I go again? ]/@DGSQuest152>\\\

[@DGSQuest152]
#SAY
The {FCOLOR/10}CalabashOfSpirit{FCOLOR/12} can be obtained from killing\
The {FCOLOR/10}RedMoonEvil{FCOLOR/12} in the {FCOLOR/10}RedMoonvalley{FCOLOR/12}\\
<[ OK, Thanks ]/@exit>\\\

[@DGSQuest151]
#IF
CheckItem CalabashOfSpirit 1
#ACT
Take CalabashOfSpirit 5
Mov  A0  %USERNAME
Mov  A1  "DGS"
Mov  D0  16
FormatStr "FLD_STAGE=%s" %D0
Mov A8 %A9
FormatStr "FLD_CHARACTER='%s' and FLD_QUEST='%s'" %A0 %A1
UpdateValueSql "TBL_StingQuests" %A9 %A8
Break
#SAY
Thanks for that, ready for the next item?\
OK, the next item is a {FCOLOR/10}UnderworldBell{FCOLOR/12}, this can\
Only be obtained from the {FCOLOR/10}DemonicUnderlord{FCOLOR/12} in the\
{FCOLOR/10}DesertMine{FCOLOR/12}.. good luck\\
<[ Cya ]/@exit>\\



[@DGSQuest16]
#SAY
Have you located the {FCOLOR/10}UnderworldBell{FCOLOR/12}?\
<[ Yes, here it is ]/@DGSQuest161>\
<[ No, where do I go again? ]/@DGSQuest162>\\\

[@DGSQuest162]
#SAY
The {FCOLOR/10}UnderworldBell{FCOLOR/12} can be obtained from killing\
The {FCOLOR/10}DemonicUnderlord{FCOLOR/12} in the {FCOLOR/10}DesertMine{FCOLOR/12}\\
<[ OK, Thanks ]/@exit>\\\

[@DGSQuest161]
#IF
CheckItem UnderworldBell 1
#ACT
Take UnderworldBell 5
Mov  A0  %USERNAME
Mov  A1  "DGS"
Mov  D0  17
FormatStr "FLD_STAGE=%s" %D0
Mov A8 %A9
FormatStr "FLD_CHARACTER='%s' and FLD_QUEST='%s'" %A0 %A1
UpdateValueSql "TBL_StingQuests" %A9 %A8
Break
#SAY
Thanks for that, ready for the next item?\
OK, the next item is a {FCOLOR/10}FrozenSoul{FCOLOR/12}, this can\
Only be obtained from the {FCOLOR/10}DeadSoul{FCOLOR/12} in the\
{FCOLOR/10}SnowPalace{FCOLOR/12}.. good luck\\
<[ Cya ]/@exit>\\



[@DGSQuest17]
#SAY
Have you located the {FCOLOR/10}FrozenSoul{FCOLOR/12}?\
<[ Yes, here it is ]/@DGSQuest171>\
<[ No, where do I go again? ]/@DGSQuest172>\\\

[@DGSQuest172]
#SAY
The {FCOLOR/10}FrozenSoul{FCOLOR/12} can be obtained from killing\
The {FCOLOR/10}DeadSoul{FCOLOR/12} in the {FCOLOR/10}SnowPalace{FCOLOR/12}\\
<[ OK, Thanks ]/@exit>\\\

[@DGSQuest171]
#IF
CheckItem FrozenSoul 1
#ACT
Take FrozenSoul 5
Mov  A0  %USERNAME
Mov  A1  "DGS"
Mov  D0  18
FormatStr "FLD_STAGE=%s" %D0
Mov A8 %A9
FormatStr "FLD_CHARACTER='%s' and FLD_QUEST='%s'" %A0 %A1
UpdateValueSql "TBL_StingQuests" %A9 %A8
Break
#SAY
Thanks for that, ready for the next item?\
OK, the next item is a {FCOLOR/10}NecroBlood{FCOLOR/12}, this can\
Only be obtained from the {FCOLOR/10}DemonicNecro{FCOLOR/12} in the\
{FCOLOR/10}NecroIsland{FCOLOR/12}.. good luck\\
<[ Cya ]/@exit>\\



[@DGSQuest18]
#SAY
Have you located the {FCOLOR/10}NecroBlood{FCOLOR/12}?\
<[ Yes, here it is ]/@DGSQuest181>\
<[ No, where do I go again? ]/@DGSQuest182>\\\

[@DGSQuest182]
#SAY
The {FCOLOR/10}NecroBlood{FCOLOR/12} can be obtained from killing\
The {FCOLOR/10}DemonicNecro{FCOLOR/12} in the {FCOLOR/10}NecroIsland{FCOLOR/12}\\
<[ OK, Thanks ]/@exit>\\\

[@DGSQuest181]
#IF
CheckItem NecroBlood 1
#ACT
Take NecroBlood 5
Mov  A0  %USERNAME
Mov  A1  "DGS"
Mov  D0  19
FormatStr "FLD_STAGE=%s" %D0
Mov A8 %A9
FormatStr "FLD_CHARACTER='%s' and FLD_QUEST='%s'" %A0 %A1
UpdateValueSql "TBL_StingQuests" %A9 %A8
goto @DGSQuest19
Break


[@DGSQuest19]
#SAY
Thats it!!! You have collected them all!!\
Let me see if I can create this item for you\\
I can make 2 different types of Sword\
Do you wish to choose Heaven Or Hell?\\
<[ Heaven ]/@DGSQuestMake(DragonGateSword(Heaven))>\
<[ Hell ]/@DGSQuestMake(DragonGateSword(Hell))>\\\

[@DGSQuestMake()]
#IF
CHECK [151] 0
CHECK [150] 1
#ACT
Mov  A1  %ARG(1)
Give %A1  1
SET  [151]  1
SET  [150]  0
#SAY
Here is your <$OUTPUT(A1)>, use it wisely\\
<[ OMG WOW WOW OMG ]/@Exit>\\\

[@ExchangeScrolls]
#SAY
Which Item Would you Like to Exchange\\
<[ WoomaGoldPlate ]/@WoomaGoldPlateEX>\
<[ UnderworldBell ]/@UnderworldBellEX>\
<[ OmaKingHorn ]/@OmaKingHornEX>\
<[ OldMinoHammer ]/@OldMinoHammerEX>\
<[ OldForbiddenFruit ]/@OldForbiddenFruitEX>\
<[ HammerOfWind ]/@HammerOfWindEX>\
<[ FrozenSoul ]/@FrozenSoulEX>\
<[ ForgottenZumaPlate ]/@ForgottenZumaPlateEX>\
<[ BlackPalaceGoldBook ]/@BlackPalaceGoldBookEX>\
<[ AncientHeart ]/@AncientHeartEX>\\\\

[@WoomaGoldPlateEX]
#IF
CheckItem WoomaTaurusBIGSoulScroll 4
#ACT
Take WoomaTaurusBIGSoulScroll 4
Give WoomaGoldPlate 1
Break
#SAY
Here you Go

[@UnderworldBellEX]
#IF
CheckItem DemonicUnderlordBIGSoulScroll 4
#ACT
Take DemonicUnderlordBIGSoulScroll 4
Give UnderworldBell 1
Break
#SAY
Here you Go

[@OmaKingHornEX]
#IF
CheckItem OmaKingBIGSoulScroll 4
#ACT
Take OmaKingBIGSoulScroll 4
Give OmaKingHorn 1
Break
#SAY
Here you Go

[@OldMinoHammerEX]
#IF
CheckItem MinotaurKingBIGSoulScroll 4
#ACT
Take MinotaurKingBIGSoulScroll 4
Give OldMinoHammer 1
Break
#SAY
Here you Go

[@OldForbiddenFruitEX]
#IF
CheckItem ForbiddenKingBIGSoulScroll 4
#ACT
Take ForbiddenKingBIGSoulScroll 4
Give OldForbiddenFruit 1
Break
#SAY
Here you Go

[@HammerOfWindEX]
#IF
CheckItem BoarKingBIGSoulScroll 4
#ACT
Take BoarKingBIGSoulScroll 4
Give HammerOfWind 1
Break
#SAY
Here you Go

[@FrozenSoulEX]
#IF
CheckItem DeadSoulBIGSoulScroll 4
#ACT
Take DeadSoulBIGSoulScroll 4
Give FrozenSoul 1
Break
#SAY
Here you Go

[@ForgottenZumaPlateEX]
#IF
CheckItem ZumaTaurusBIGSoulScroll 4
#ACT
Take ZumaTaurusBIGSoulScroll 4
Give ForgottenZumaPlate 1
Break
#SAY
Here you Go

[@BlackPalaceGoldBookEX]
#IF
CheckItem BlackKingBIGSoulScroll 4
#ACT
Take BlackKingBIGSoulScroll 4
Give BlackPalaceGoldBook 1
Break
#SAY
Here you Go

[@AncientHeartEX]
#IF
CheckItem AncientSoulBIGSoulScroll 4
#ACT
Take AncientSoulBIGSoulScroll 4
Give AncientHeart 1
Break
#SAY
Here you Go
}

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