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

[@ItemLimit_Portal]
{
#IF
#ACT
FormatStr "FLD_ItemLimit='%s'" 'ItemLimit'
Mov A2 %A9
ReadValueSQL "TBL_ItemLimit" %A9 "FLD_ItemName,FLD_ItemCost,FLD_ItemAmount" [@ItemLimit_Read]

[@ItemLimit_Read()]
#IF
#ACT
Mov A1 %ARG(1)
Mov D1 %ARG(2)
Mov D2 %ARG(3)

#IF
Equal D2 0
#ACT
break

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\System\LimitItem.txt] @Convert_LimitItem_0

#IF
CheckGold %D1
#ACT
give %A1 1
take  %D1
Dec D2 1
FormatStr "FLD_ItemAmount='%s'" %D2
UpdateValueSQL "TBL_ItemLimit" %A2 %A9

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\System\LimitItem.txt] @Convert_LimitItem_1


#ELSESAY
#INCLUDE [..\Convert_Def\QuestDiary\System\LimitItem.txt] @Convert_LimitItem_2

}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;