传奇回收脚本,如何实现装备回收实现奖励人民币脚本

传奇GM论坛

[@main]
你来到这里说明你已经获得绝世珍宝-1.80战神复古\
本服的荣誉装备是可以换取现金奖励的哦\
<人民币回收须知/@须知>　　　<请仔细阅读/SCOLOR=249>\
<回收狂龙血刃/@血刃>　　　<输入银行卡号/@@INPUTSTRING31>\
<回收狂龙神戒/@神戒>　　　<输入银行卡号/@@INPUTSTRING31>\
<回收狂龙神章/@神章>　　　<输入银行卡号/@@INPUTSTRING31>\
<回收狂龙凤袍/@凤袍>　　　<输入银行卡号/@@INPUTSTRING31>\
<回收狂龙龙袍/@龙袍>　　　<输入银行卡号/@@INPUTSTRING31>\
<回收荣誉套装/@套装>　　　<输入银行卡号/@@INPUTSTRING31>\
[@须知]
1、你需要输入正确的银行账号，因为账号错误本服概不负责\
2、你需要提供银行卡卡号的开户行、地址、以及持有人姓名\
3、请先先回收装备再输入银行卡号信息\
4、我们会在48小时之类把你应得得费用汇会您的卡号，请注意查收\
5、每次只能回收一样荣誉装备，直到你收到汇款才能再次回收，否则造成损失概不负责\
6、银行卡号格式:账户名+账户+开户行+开户名称
<返回/@main>
[@血刃]
#IF
CHECKITEM 狂龙血刃 1
#ACT
take 狂龙血刃 1
ADDNAMELIST ..\QUESTDIARY\变量\血刃.TXT
SENDMSG 0 恭喜[%s]成功回收≤狂龙血刃≥，获得人民币奖励100元！
SENDMSG 0 恭喜[%s]成功回收≤狂龙血刃≥，获得人民币奖励100元！
MESSAGEBOX 恭喜你回收成功，请输入您的银行卡号！
#ELSESAY
\
\
对不起，你没有狂龙血刃！
[@神戒]
#IF
CHECKITEM 狂龙神戒 1
#ACT
TAKE 狂龙神戒 1
ADDNAMELIST ..\QUESTDIARY\变量\神戒.TXT
SENDMSG 0 恭喜[%s]成功回收≤狂龙神戒≥，获得人民币奖励50元！
SENDMSG 0 恭喜[%s]成功回收≤狂龙神戒≥，获得人民币奖励50元！
MESSAGEBOX 恭喜你回收成功，请输入您的银行卡号！
#ELSESAY
\
\
对不起，你没有1.80战神复古！
[@龙袍]
#IF
CHECKITEM 狂龙龙袍 1
#ACT
TAKE 狂龙龙袍 1
ADDNAMELIST ..\QUESTDIARY\变量\龙袍.TXT
SENDMSG 0 恭喜[%s]成功回收≤狂龙龙袍≥，获得人民币奖励50元！
SENDMSG 0 恭喜[%s]成功回收≤狂龙龙袍≥，获得人民币奖励50元！
MESSAGEBOX 恭喜你回收成功，请输入您的银行卡号！
#ELSESAY
\
\
对不起，你没有狂龙龙袍！
[@凤袍]
#IF
CHECKITEM 狂龙凤袍 1
#ACT
TAKE 狂龙凤袍 1
ADDNAMELIST ..\QUESTDIARY\变量\凤袍.TXT
SENDMSG 0 恭喜[%s]成功回收≤狂龙凤袍≥，获得人民币奖励50元！
SENDMSG 0 恭喜[%s]成功回收≤狂龙凤袍≥，获得人民币奖励50元！
MESSAGEBOX 恭喜您回收成功，请输入您的银行卡号！
#ELSESAY
\
\
对不起，您没有狂龙凤袍！
[@神章]
#IF
CHECKITEM 狂龙神章 1
#ACT
TAKE 狂龙神章 1
ADDNAMELIST ..\QUESTDIARY\变量\神章.TXT
SENDMSG 0 恭喜[%s]成功回收≤狂龙神章≥，获得人民币奖励50元！
SENDMSG 0 恭喜[%s]成功回收≤狂龙神章≥，获得人民币奖励50元！
MESSAGEBOX 恭喜您回收成功，请输入您的银行卡号！
#ELSESAY
\
\
对不起，您没有狂龙神章！
[@套装]
#IF
CHECKITEM 狂龙血刃 1
CHECKITEM 狂龙神章 1
CHECKITEM 狂龙神戒 2
CHECKITEM 狂龙凤袍 1
#ACT
TAKE 狂龙血刃 1
TAKE 狂龙神章 1
TAKE 狂龙神戒 2
TAKE 狂龙凤袍 1
ADDNAMELIST ..\QUESTDIARY\变量\套装.TXT
SENDMSG 0 恭喜[%s]成功回收≤荣誉套装≥，获得人民币奖励350元！
SENDMSG 0 恭喜[%s]成功回收≤荣誉套装≥，获得人民币奖励350元！
MESSAGEBOX 恭喜您回收成功，请输入您的银行卡号！
#ELSEACT
GOTO @套装1
[@套装1]
#IF
CHECKITEM 狂龙血刃 1
CHECKITEM 狂龙神章 1
CHECKITEM 狂龙神戒 2
CHECKITEM 狂龙龙袍 1
#ACT
TAKE 狂龙血刃 1
TAKE 狂龙神章 1
TAKE 狂龙神戒 2
TAKE 狂龙龙袍 1
ADDNAMELIST ..\QUESTDIARY\变量\套装.TXT
SENDMSG 0 恭喜[%s]成功回收≤狂龙套装≥，获得人民币奖励50元！
SENDMSG 0 恭喜[%s]成功回收≤狂龙套装≥，获得人民币奖励50元！
MESSAGEBOX 恭喜您回收成功，请输入您的银行卡号！
#ELSESAY
\
\
对不起，你还没有凑齐一套！
[@CALLINPUTSTRING31]
#IF
#ACT
CALCVAR HUMAN 人民币 = <$STR(S31)>
SAVEVAR HUMAN 人民币 ..\QUESTDIARY\变量\人民币.TXT
#SAY
谢谢您对我们的支持！
#ELSESAY
对不起，您输入的字符错误!
本文来自：http://www.gm88.net

---