GEE引擎脚本-打孔

GM版***

(@ArmRemoveStone)
[@MAIN]
你好！我能把你的装备进行<打孔/SCOLOR=249>哦\
让你的装备更加出众，属性得到提升\
不过打孔是要付出代价的哦\
一孔需要10元宝 二孔需要20元宝  三孔需要30元宝\
<注意：只有名牌以上装备可以打孔100%成功/SCOLOR=58>\
<装备打孔/@XLZB>      <卸除宝石/@ArmRemoveStone>
\
<离开/@exit>\


[@XLZB]
#if
#ACT
OPENUPGRADEDLG 装备打孔


[@UpgradeDlgItem]
#IF
NOT CHECKTEXTLIST ..\QuestDiary\打孔\可打孔装备.txt <$DLGITEM.NAME>
#ACT
RECLAIMITEM
MESSAGEBOX 你放的装备不在打孔装备列表内!
BREAK


#if
#act
mov S94 <$DLGITEM.STDMODE>
mov S93 <$DLGITEM.NAME>
mov S92 <$USERNAME>


#if
CHECKGAMEGOLD > 9
CheckFluteCount  -1  = 0
#act
GAMEGOLD - 10
SETFLUTECOUNT  -1  1
RECLAIMITEM
SENDMSG 6 你的装备强化成功!.
SendCenterMsg 180 249 恭喜<$USERNAME>的<$STR(S93)>成功获得一孔装备 1 5
break

#if
CHECKGAMEGOLD > 19
CheckFluteCount  -1  = 1
#act
GAMEGOLD - 20
SETFLUTECOUNT  -1  2
RECLAIMITEM
SENDMSG 6 你的装备强化成功!.
SendCenterMsg 180 249 恭喜<$USERNAME>的<$STR(S93)>成功获得二孔装备 1 5
break

#if
CHECKGAMEGOLD > 29
CheckFluteCount  -1  = 2
#act
GAMEGOLD - 30
SETFLUTECOUNT  -1  3
RECLAIMITEM
SENDMSG 6 你的装备强化成功!.
SendCenterMsg 180 249 恭喜<$USERNAME>的<$STR(S93)>成功获得三孔装备 1 5
break

15038***

<卸除宝石/@ArmRemoveStone>          这个呢