|
|
功能：检测背包中是否有在列表中的物品，并返回物品名和数量
格式：CHECKBAGITEMS 物品列表.txt S0 P0
CHECKBAGITEMS 物品名字列表.txt 字符变量名(接收检测到的物品名字 空则不接收) 数值变量
[@KSHSB]
;第1套-----------------------------------------------------------------------------------
#if
CHECKBAGITEMS ..\QuestDiary\006回收系统\祖玛装备.txt S$装备名称 N$装备个数
#act
take <$STR(S$装备名称)> <$STR(N$装备个数)>
MOV N$回收元宝 2
MOV N$回收经验 20000
INC N$祖玛回收数量 <$STR(N$装备个数)>
DELAYGOTO 1 @KSHSB
break
#if
Large N$祖玛回收数量 0
#act
MUL N$回收元宝 <$STR(N$祖玛回收数量)>
MUL N$回收经验 <$STR(N$祖玛回收数量)>
Gamegold + <$STR(N$回收元宝)>
CHANGEEXP + <$STR(N$回收经验)>
Sendmsg 0 <$USERNAME>回收了<$STR(N$祖玛回收数量)>件祖玛装备，获得了元宝<$STR(N$回收元宝)>、经验<$STR(N$回收经验)> 0 250
DELAYGOTO 1 @KSHSB
MOV N$祖玛回收数量 0
MOV N$回收元宝 0
MOV N$回收经验 0
break
;第2套-----------------------------------------------------------------------------------
#if
CHECKBAGITEMS ..\QuestDiary\006回收系统\赤月装备.txt S$装备名称 N$装备个数
#act
take <$STR(S$装备名称)> <$STR(N$装备个数)>
MOV N$回收元宝 2
MOV N$回收经验 20000
INC N$赤月回收数量 <$STR(N$装备个数)>
DELAYGOTO 1 @KSHSB
break
#if
Large N$赤月回收数量 0
#act
MUL N$回收元宝 <$STR(N$赤月回收数量)>
MUL N$回收经验 <$STR(N$赤月回收数量)>
Gamegold + <$STR(N$回收元宝)>
CHANGEEXP + <$STR(N$回收经验)>
Sendmsg 0 <$USERNAME>回收了<$STR(N$赤月回收数量)>件赤月装备，获得了元宝<$STR(N$回收元宝)>、经验<$STR(N$回收经验)> 0 250
DELAYGOTO 1 @KSHSB
MOV N$赤月回收数量 0
MOV N$回收元宝 0
MOV N$回收经验 0
break
;-----------------------------------------------------------------------------------
#ELSEACT
goto @main
MESSAGEBOX 你回收了个寂寞！！！
break
|
|
