GOM引擎测试区返还元宝脚本(亲测可用)
[@MAIN]
#IF
CheckContainsText <$SERVERNAME> 测试
#act
GOTO @测试
BREAK
#IF
#act
CreateFile ..\QuestDiary\数据文件\测试区元宝\<$USERID>.txt
mov S$次数提取0
GetListString ..\QuestDiary\数据文件\测试区元宝\<$USERID>.txt 0 S$次数提取0
mov U49 <$STR(S$次数提取0)>
GOTO @开区
BREAK
[@测试]
#IF
#act
#SAY
\ \
<测试区回收元宝可回收换新区元宝,正式开区之后可在此处!/SCOLOR=151>\ \
<领取规则:/AUTOCOLOR=56><开区 账号以测试区账号相同,才可以领取!/AUTOCOLOR=250>\ \
<测试区我已经回收了:/AUTOCOLOR=242><$STR(U49)>\ \
<测试区回收回收元宝,开区以后可以领取测试区回收元宝的50%!/AUTOCOLOR=168>\ \
#ELSEACT
[@开区]
#IF
#act
#SAY
\ \
<测试区回收元宝可回收换新区元宝,正式开区之后可在此处!/SCOLOR=151>\ \
<领取规则:/AUTOCOLOR=56><开区 账号以测试区账号相同,才可以领取!/AUTOCOLOR=250>\ \
<测试区我已经回收了:/AUTOCOLOR=242><$STR(U49)> <我需要领取我记录元宝/@2>\ \
<测试区回收回收元宝,开区以后可以领取测试区回收元宝的50%!/AUTOCOLOR=168>\ \
[@2]
#if
checkaccountlist ..\QuestDiary\数据文件\测试区元宝帐号.txt
#ACT
mov S$次数提取0
GetListString ..\QuestDiary\数据文件\测试区元宝\<$USERID>.txt 0 S$次数提取0
mov U49 <$STR(S$次数提取0)>
DIV <$STR(U49)> 2
GAMEGOLD + <$STR(U49)>
CLEARNAMELIST ..\QuestDiary\数据文件\测试区元宝\<$USERID>.txt
delaccountlist ..\QuestDiary\数据文件\测试区元宝帐号.txt
MESSAGEBOX \ \ \ \取回的元宝数量:<$STR(U49)>
mov U49 0
#ELSEACT
MESSAGEBOX 对不起你测试区没有记录,或者已经领取元宝!
BREAK
**** Hidden Message *****
666666666666666666666 GOM引擎测试区返还元宝脚本(亲 66666666666666 666666 123123123123121231231 dasd阿萨德按时大多数 这个脚本用什么语言写的? :lol:lol:lol:lol:lol q'q'q'q 凄凄切切群 222222222222 请你当我手心里的宝 11111111111 测试区测试区测试区测试区测试区 感谢分享,辛苦 测试区返还元宝脚本(亲测可用) [修改] 每次每次每次每次每次
页:
[1]