传奇sf晋升仿金庸SKY汇款(2012/8/10)功能

传奇一条龙发现了最新的sf开区中看了下SKY的引擎 发现金庸有个在线银行的功能 我也仿了下 用JS的引擎来搞 当然也随便搞的 我不知道有多少人会喜欢这脚本,如果人多的话 我再去完善~!!!

(@@InPutString @@InPutInteger)
[@main]
<确定汇款/@确定汇款> <取款业务/@取款业务>\

[@确定汇款]
①收款人姓名： <输入汇款金额/@@InPutString1>\
②汇款的金额：\
③提交汇款单 <取消汇款/@EXIT>\

[@InPutString1]
#IF
CHECKONLINE <$STR(S1)>
#say
①收款人姓名： <$STR(S1)>\
②汇款的金额： <输入汇款金额/@@InPutInteger1>\
③提交汇款单 <取消汇款/@EXIT>\
#ELSEACT
MessageBox 汇款失败的原因\1:当前输入的人物并不在本服务器上.\2:人物名字输入错误
CLOSE

[@InPutInteger1]
#IF
CHECKGAMEGOLD > <$STR(N1)>
#say
①收款人姓名： <$STR(S1)>\
②汇款的金额： <$STR(N1)> 元宝\
<③提交汇款单/@提交汇款单> <取消汇款/@EXIT>\
#ELSEACT
MessageBox 汇款失败的原因\1:您的元宝不足，请冲值后赚帐
CLOSE

[@提交汇款单]
#IF
#ACT
GMEXECUTE 调整元宝 <$STR(S1)> - 500
#act
AddTextList QuestDiary\银行记录\收款人名单.txt <$STR(S1)>
AddTextList QuestDiary\银行记录\汇款单\<$STR(S1)>.txt <$STR(N1)>
sendmsg 5 玩家【<$str(s1)>】注意了，你的朋友【%s】给你在银行汇了〖<$str(N1)>〗元宝，注意去银行查收.
close

[@取款业务]
#IF
CHECKNAMELIST QuestDiary\银行记录\收款人名单.txt
#ACT
break
MOV S11 <$USERNAME>
GetRandomName QuestDiary\银行记录\汇款单\<$str(S11)>.txt S0
mov S12 <$str(S0)>
#say
目前显示你有一笔汇款到账:\
汇款金额：<$str(S12)>元宝\
　　　　　　　　　　　　　　　　　　　　　　　　 <领取汇款/@确认领取>\

[@确认领取]
#if
#act
GAMEGOLD + <$str(S12)>
DelTextList QuestDiary\银行记录\收款人名单.txt <$USERNAME>
CLEARNAMELIST QuestDiary\银行记录\汇款单\<$str(S11)>.txt
sendmsg 0 [银行通知]玩家【%s】收到了【<$str(s13)>】的汇款，表示感谢.
sendmsg 7 [银行通知]你收到了〖<$str(s12)>〗元宝，你现在的元宝数量为<$GAMEGOLD>.
close


[@IsInFilterList]
#Act
MessageBox 输入数据中包含了非法字符.请重新编辑
Goto @Main
Break



现查出以下错误,如自己有能力的可以去修改 没能力的支持下 我尽快会搞好
1.只能领款1次 因为领款后 金额文本将全面清除~!!!
2.NPC界面没去美化

呵呵 就这些了 安装的具体步骤我也说下:
1.在这个脚本的NPC 同目录建立个 QuestDiary
2.在QuestDiary里建立个 银行记录 文件夹 和 收款人名单.txt 文本


了解更多游戏脚本、传奇一条龙技术文章、传奇服务端、传奇论坛登陆器等游戏工具，加入 红颜科技gm基地！

论坛一条龙

回个帖子支持一下！论坛基地

不错不错.,..我喜欢  传奇一条龙

拿分走人呵呵，楼下继续！传奇服务端

传奇服务端GM基地 ！ 朋友介绍来的，感觉很不错，希望越多越好！传奇论坛服务端

严重支持！中国gm基地

论坛的帖子越来越有深度了！

信楼主，得永生！

以后就跟楼主混了！

没人理我，好伤心啊！