[@DGS_Ghoul]
#IF
Random 30
Check [151] 0
#ACT
FormatStr "FLD_QUEST ='DGS' and FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_StingQuests" %A9 "FLD_Stage" @DGSQUest1


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

#IF
Equal D1  1
#ACT
Give DeathBook 1
#SAY
I have found the DeathBook.. \\
<[ Exit ]/@exit>\\

#IF
#ACT
break

[@DGS_GNM]
#IF
Random 30
Check [151] 0
#ACT
FormatStr "FLD_QUEST ='DGS' and FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_StingQuests" %A9 "FLD_Stage" @DGSQUest2


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

#IF
Equal D1  2
#ACT
Give NumaGoldPlate 1
#SAY
I have found the NumaGoldPlate.. \\
<[ Exit ]/@exit>\\

#IF
#ACT
break

[@DGS_OmaKing]
#IF
Random 30
Check [151] 0
#ACT
FormatStr "FLD_QUEST ='DGS' and FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_StingQuests" %A9 "FLD_Stage" @DGSQUest3


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

#IF
Equal D1  3
#ACT
Give OmaKingHorn 1
#SAY
I have found the OmaKingHorn.. \\
<[ Exit ]/@exit>\\

#IF
#ACT
break

[@DGS_WoomaTaurus]
#IF
Random 30
Check [151] 0
#ACT
FormatStr "FLD_QUEST ='DGS' and FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_StingQuests" %A9 "FLD_Stage" @DGSQUest4


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

#IF
Equal D1  4
#ACT
Give WoomaGoldPlate 1
#SAY
I have found the WoomaGoldPlate.. \\
<[ Exit ]/@exit>\\

#IF
#ACT
break

[@DGS_BoarKing]
#IF
Random 30
Check [151] 0
#ACT
FormatStr "FLD_QUEST ='DGS' and FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_StingQuests" %A9 "FLD_Stage" @DGSQUest5


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

#IF
Equal D1  5
#ACT
Give HammerOfWind 1
#SAY
I have found the HammerOfWind.. \\
<[ Exit ]/@exit>\\

#IF
#ACT
break

[@DGS_EvilCentipede]
#IF
Random 20
Check [151] 0
#ACT
FormatStr "FLD_QUEST ='DGS' and FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_StingQuests" %A9 "FLD_Stage" @DGSQUest7


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

#IF
Equal D1  7
#ACT
Give EvilCentiBell 1
#SAY
I have found the EvilCentiBell.. \\
<[ Exit ]/@exit>\\

#IF
#ACT
break

[@DGS_GreatDarkArachnid]
#IF
Random 30
Check [151] 0
#ACT
FormatStr "FLD_QUEST ='DGS' and FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_StingQuests" %A9 "FLD_Stage" @DGSQUest8


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

#IF
Equal D1  8
#ACT
Give GreatDarkTooth 1
#SAY
I have found the GreatDarkTooth.. \\
<[ Exit ]/@exit>\\

#IF
#ACT
break

[@DGS_ApeKing]
#IF
Random 30
Check [151] 0
#ACT
FormatStr "FLD_QUEST ='DGS' and FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_StingQuests" %A9 "FLD_Stage" @DGSQUest9


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

#IF
Equal D1  9
#ACT
Give ApeKingClaw 1
#SAY
I have found the ApeKingClaw.. \\
<[ Exit ]/@exit>\\

#IF
#ACT
break

[@DGS_MinotaurKing]
#IF
Random 30
Check [151] 0
#ACT
FormatStr "FLD_QUEST ='DGS' and FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_StingQuests" %A9 "FLD_Stage" @DGSQUest10


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

#IF
Equal D1  10
#ACT
Give OldMinoHammer 1
#SAY
I have found the OldMinoHammer.. \\
<[ Exit ]/@exit>\\

#IF
#ACT
break

[@DGS_ZumaTaurus]
#IF
Random 30
Check [151] 0
#ACT
FormatStr "FLD_QUEST ='DGS' and FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_StingQuests" %A9 "FLD_Stage" @DGSQUest11


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

#IF
Equal D1  11
#ACT
Give ForgottenZumaPlate 1
#SAY
I have found the ForgottenZumaPlate.. \\
<[ Exit ]/@exit>\\

#IF
#ACT
break

[@DGS_BlackKing]
#IF
Random 30
Check [151] 0
#ACT
FormatStr "FLD_QUEST ='DGS' and FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_StingQuests" %A9 "FLD_Stage" @DGSQUest12


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

#IF
Equal D1  12
#ACT
Give BlackPalaceGoldBook 1
#SAY
I have found the BlackPalaceGoldBook.. \\
<[ Exit ]/@exit>\\

#IF
#ACT
break

[@DGS_ForbiddenKing]
#IF
Random 30
Check [151] 0
#ACT
FormatStr "FLD_QUEST ='DGS' and FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_StingQuests" %A9 "FLD_Stage" @DGSQUest13


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

#IF
Equal D1  13
#ACT
Give OldForbiddenFruit 1
#SAY
I have found the OldForbiddenFruit.. \\
<[ Exit ]/@exit>\\

#IF
#ACT
break

[@DGS_AncientSoul]
#IF
Random 30
Check [151] 0
#ACT
FormatStr "FLD_QUEST ='DGS' and FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_StingQuests" %A9 "FLD_Stage" @DGSQUest14


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

#IF
Equal D1  14
#ACT
Give AncientHeart 1
#SAY
I have found the AncientHeart.. \\
<[ Exit ]/@exit>\\

#IF
#ACT
break

[@DGS_RedMoonEvil]
#IF
Random 20
Check [151] 0
#ACT
FormatStr "FLD_QUEST ='DGS' and FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_StingQuests" %A9 "FLD_Stage" @DGSQUest15


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

#IF
Equal D1  15
#ACT
Give CalabashOfSpirit 1
#SAY
I have found the CalabashOfSpirit.. \\
<[ Exit ]/@exit>\\

#IF
#ACT
break

[@DGS_DemonicUnderlord]
#IF
Random 20
Check [151] 0
#ACT
FormatStr "FLD_QUEST ='DGS' and FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_StingQuests" %A9 "FLD_Stage" @DGSQUest16


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

#IF
Equal D1  16
#ACT
Give UnderWorldBell 1
#SAY
I have found the UnderWorldBell.. \\
<[ Exit ]/@exit>\\

#IF
#ACT
break

[@DGS_DeadSoul]
#IF
Random 20
Check [151] 0
#ACT
FormatStr "FLD_QUEST ='DGS' and FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_StingQuests" %A9 "FLD_Stage" @DGSQUest17


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

#IF
Equal D1  17
#ACT
Give FrozenSoul 1
#SAY
I have found the FrozenSoul.. \\
<[ Exit ]/@exit>\\

#IF
#ACT
break

[@DGS_DemonicNecro]
#IF
Random 15
Check [151] 0
#ACT
FormatStr "FLD_QUEST ='DGS' and FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_StingQuests" %A9 "FLD_Stage" @DGSQUest18


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

#IF
Equal D1  18
#ACT
Give NecroBlood 1
#SAY
I have found the NecroBlood.. \\
<[ Exit ]/@exit>\\

#IF
#ACT
break

[@DGS_BoneLord]
#IF
Random 10
Check [151] 0
#ACT
Give DragonGatePiece
Break
