|
[@销毁物品开始]
#IF
#SAY
<Img|width=570|height=450|show=4|loadDelay=0|reset=0|bg=1|img=custom/tzmb.png|move=0|esc=1>
<Layout|x=548.0|y=-20.0|width=80|height=80|link=@exit>
<Button|x=569.0|y=0.0|pimg=public/1900000511.png|nimg=public/1900000510.png|link=@exit>
<BAGITEMS|x=15.0|y=23.0|selecttype=0|condition=*|count=40|select=<$STR(S0)>|iheight=68|reload=0|clickInterval=200|row=5|iwidth=68|showtips=1|link=@物品销毁勾选>
<Button|x=233.0|y=376.0|outline=2|size=18|color=255|nimg=custom/kptj/23.png|text=确认销毁|link=@确定物品销毁开始>
[@物品销毁勾选]
#IF
#ACT
GETVALIDSTRSUPER <$STR(S0)> , S$物品销毁选中ID N$物品销毁选中数量
GOTO @销毁物品开始
[@确定物品销毁开始]
#IF
#ACT
MESSAGEBOX \[销毁提示]:\请谨慎勾选销毁,物品一经销毁概不负责?\请问是否确定进行销毁? @确定进行销毁 @无
[@确定进行销毁]
#IF
#ACT
MOV N$物品销毁循环 0
WHILE N$物品销毁循环 < <$STR(N$物品销毁选中数量)>
INC N$物品销毁循环 1
GetItemNameByMakeIndex <$STR(S$物品销毁选中ID<$STR(N$物品销毁循环)>)> S$物品销毁选中名字
TAKE <$STR(S$物品销毁选中名字)> 999
MOV S$物品销毁选中名字
ENDWHILE
GOTO @销毁物品开始
BREAK |
|