|
[@银行系统]
{
#If
CheckLevelEx > 0
#Act
Mov m11 0
Mov m12 0
Mov m14 0
Mov m15 0
#Say
‘<$USERNAME>’您好！<Color=clLime 欢迎使用‘><$GLOBAL(游戏名称)><Color=clLime ’银行系统>！\
<COLOR=clRed 本银行详细功能介绍：>\ \
<COLOR=clAqua 元宝兑心意币：600元宝=1心意币=1人民币>\ \
<元宝兑换心意币/@元宝兑换心意币> <心意币兑换元宝/@心意币兑换元宝> \ \
<心意币兑换人民币/@心意币兑换人民币> <点击充值元宝/@充值元宝>\ \
[@元宝兑换心意币]
‘<$USERNAME>’您好！<Color=clLime 欢迎使用‘><$GLOBAL(游戏名称)><Color=clLime ’银行系统>！\
<COLOR=clAqua 元宝兑换心意币比率：300/1(元宝/心意币)> <COLOR=clLime 您当前心意币：><$GAMEPOINT>个\ \
<COLOR=clRed 重要说明：>必须<Color=clRed 5300元宝>以上才能兑换，如:<Color=clRed 5300元宝>只能用<Color=clRed 300元宝>\
兑换、余下的<Color=clRed 5000>必须预留在包裹，已此类推！ \ \
元宝换心意币 → <增加1个/@XYB_1> <增加10个/@XYB_2>\
元宝换心意币 → <增加100个/@XYB_3> <增加1000个/@XYB_4>\
<返回首页/@Main> <关闭/@exit> \
[@心意币兑换元宝]
‘<$USERNAME>’您好！<Color=clLime 欢迎使用‘><$GLOBAL(游戏名称)><Color=clLime ’银行系统>！\ \
<COLOR=clAqua 心意币兑换元宝比率：1/300(心意币/元宝)> <COLOR=clLime 您当前心意币：><$GAMEPOINT>个\ \
心意币兑换元宝 → <增加300个/@YB_1> <增加3000个/@YB_2>\
心意币兑换元宝 → <增加30000个/@YB_3> <增加300000个/@YB_4>\
<返回首页/@Main> <关闭/@exit> \
[@YB_1]
#If
CheckGamePoint > 0
#Act
GamePoint - 1
GameGold + 600
Goto @心意币兑换元宝
Break
#ElseSay
你的心意币不够！\ \
[@YB_2]
#If
CheckGamePoint > 9
#Act
GamePoint - 10
GameGold + 6000
Goto @心意币兑换元宝
Break
#ElseSay
你的心意币不够！\ \
[@YB_3]
#If
CheckGamePoint > 99
#Act
GamePoint - 100
GameGold + 60000
Goto @心意币兑换元宝
Break
#ElseSay
你的心意币不够！\ \
[@YB_4]
#If
CheckGamePoint > 999
#Act
GamePoint - 1000
GameGold + 600000
Goto @心意币兑换元宝
Break
#ElseSay
你的心意币不够！\ \
[@XYB_1]
#If
CheckGameGold > 599
#Act
GameGold - 600
GamePoint + 1
SendmSG 0 恭喜‘%s’兑换心意币成功！
Goto @元宝兑换心意币
Break
#ElseSay
你的元宝不够！\ \
[@XYB_2]
#If
CheckGameGold > 5999
#Act
GameGold - 6000
GamePoint + 10
SendmSG 0 恭喜‘%s’兑换心意币成功！
Goto @元宝兑换心意币
Break
#ElseSay
你的元宝不够！\ \
[@XYB_3]
#If
CheckGameGold > 59999
#Act
GameGold - 60000
GamePoint + 100
SendmSG 0 恭喜‘%s’兑换心意币成功！
Goto @元宝兑换心意币
Break
#ElseSay
你的元宝不够！\ \
[@XYB_4]
#If
CheckGameGold > 599999
#Act
GameGold - 600000
GamePoint + 1000
SendmSG 0 恭喜‘%s’兑换心意币成功！
Goto @元宝兑换心意币
Break
#ElseSay
你的元宝不够！\ \
[@心意币兑换人民币]
#If
CHECKVAR HUMAN 兑换数量 < 1
#Act
Mov S1
Mov S2
Mov S3
Mov M4 0
LoadVar HUMAN 兑换数量 ..\QuestDiary\数据文件\元宝换RMB.txt
LoadVar HUMAN 银行类型 ..\QuestDiary\数据文件\元宝换RMB.txt
LoadVar HUMAN 银行账号 ..\QuestDiary\数据文件\元宝换RMB.txt
LoadVar HUMAN 账户名称 ..\QuestDiary\数据文件\元宝换RMB.txt
LoadVar HUMAN 提交时间 ..\QuestDiary\数据文件\元宝换RMB.txt
#Say
为回馈广大玩家对本服务器的喜爱，本服特别推出心意币兑换人民币活动！ \
需要兑换的玩家必须自带银行卡，兑换的人民币将直接打到你的银行账户。 \
给您转账时需要提供给我们信息如下：(以下为样式)\
<COLOR=cLlime 兑换比率：1心意币=1人民币>(<Color=cLlime 兑换范围：100-1000>)\
银行类型：建设银行 (只支持建设银行) \
银行帐号：8888888888888888888 \
账户名称：XXX \
<输入银行类型/@银行类型> <输入银行帐号/@银行帐号> <输入账户名称/@账户名称> \
<请输入您需要兑换的人民币数量> <返回首页/@银行系统>\
#ElseSay
你已经提交过了！！提交信息如下：\ \
银行类型：<$HUMAN(银行类型)> \
银行账号：<$HUMAN(银行账号)> \
账户名称：<$HUMAN(账户名称)> \
兑换数量：<$HUMAN(兑换数量)>元 \
提交时间：<$HUMAN(提交时间)> \ \
您的款项<$HUMAN(兑换数量)>元将于<Color=$249 1-2个工作日内>打到您的账上... <返回/@银行系统>\ \
[@兑换人民币]
#If
CHECKVAR HUMAN 兑换数量 < 1
#Say
为回馈广大玩家对本服务器的喜爱，本服特别推出心意币兑换人民币活动！ \
需要兑换的玩家必须自带银行卡，兑换的人民币将直接打到你的银行账户。 \
给您转账时需要提供给我们信息如下：(以下为样式) <COLOR=cLlime 1心意币=1RMB>\\
<COLOR=#249 请仔细确人您的信息的正确性，否则一切后果由您自己负责！！> \
银行类型：<$Str(S1)> \
银行帐号：<$Str(S2)> \
账户名称：<$Str(S3)> \
<输入银行类型/@银行类型> <输入银行帐号/@银行帐号> <输入账户名称/@账户名称> \
<请输入您需要兑换的人民币数量/@您需要兑换多少> <返回首页/@银行系统>\
#ElseSay
你已经提交过了！！提交信息如下：\ \
银行类型：<$HUMAN(银行类型)> \
银行账号：<$HUMAN(银行账号)> \
账户名称：<$HUMAN(账户名称)> \
兑换数量：<$HUMAN(兑换数量)>元 \
提交时间：<$HUMAN(提交时间)> \ \
您的款项<$HUMAN(兑换数量)>元将于<Color=#249 1-2个工作日内>打到您的账上... <返回/@银行系统>\ \
[@银行类型]
#If
CheckLevelEx > 0
#Act
QUERYVALUE 1 0 50 @兑换人民币 请输入卡号所在银行(只支持建设银行卡) NPC
Break
[@银行帐号]
#If
CheckLevelEx > 0
#Act
QUERYVALUE 2 0 50 @兑换人民币 请输入你的银行卡账号 NPC
Break
[@账户名称]
#If
CheckLevelEx > 0
#Act
QUERYVALUE 3 0 50 @兑换人民币 请输入卡号的账户名称 NPC
Break
[@您需要兑换多少]
#If
CheckLevelEx > 0
#Act
LoadVar GLOBAL 关闭提交 ..\QuestDiary\关闭提交心意币.txt
QUERYVALUE 4 1 4 @写入兑换信息 您当前可兑换人民币：<$GAMEPOINT>元(一天一次，一次最大可兑换1000)\事实上你需要多少人民币？(1心意币=1RMB) NPC
Break
[@写入兑换信息]
#If
CheckVar GLOBAL 关闭提交 = 1
#Act
MessageBox 系统正在处理转账数据！请稍后使用！！
Close
BREAK
#IF
SMALL M4 100
#ACT
MessageBox 输入的人民币数量不能少于100个...
GOTO @兑换人民币
BREAK
#IF
LARGE M4 1000
#ACT
MessageBox 输入的人民币数量不能大于1000个...
GOTO @兑换人民币
BREAK
#If
CheckLevelEx > 0
#Act
GETSTRLENGTH $STR(S2) M19
#If
large M19 19
#Act
MessageBox 输入银行账号错误...
GOTO @兑换人民币
Break
#If
Small M19 19
#Act
MessageBox 输入银行账号错误...
GOTO @兑换人民币
Break
#If
equal S3
#Act
MessageBox 没有输入账户名称...
GOTO @兑换人民币
Break
#If
CheckGamePoint < <$Str(M4)>
#ACT
MessageBox 您的心意币不够！不能兑换人民币<$Str(M4)>元...\ \兑换比率为：1元/1心意币
GOTO @兑换人民币
Break
#If
CHECKSTRINGLIST ..\QuestDiary\银行类型.txt $STR(S1)
#Act
GamePoint - <$Str(M4)>
CALCVAR HUMAN 银行类型 = <$Str(S1)>
SaveVar HUMAN 银行类型 ..\QuestDiary\数据文件\元宝换RMB.txt
CALCVAR HUMAN 银行账号 = <$Str(S2)>
SaveVar HUMAN 银行账号 ..\QuestDiary\数据文件\元宝换RMB.txt
CALCVAR HUMAN 账户名称 = <$Str(S3)>
SaveVar HUMAN 账户名称 ..\QuestDiary\数据文件\元宝换RMB.txt
CALCVAR HUMAN 兑换数量 = <$Str(M4)>
SaveVar HUMAN 兑换数量 ..\QuestDiary\数据文件\元宝换RMB.txt
CALCVAR HUMAN 提交时间 = <$DATETIME>
SaveVar HUMAN 提交时间 ..\QuestDiary\数据文件\元宝换RMB.txt
SendMsg 0 玩家‘%s’使用银行系统兑换<$HUMAN(兑换数量)>人民币，系统将于1-2个工作日内打到您的账上...
MessageBox 提交兑换信息成功！您的款项<$Str(M4)>元将于1-2个工作日内打到您的账上...
Close
Break
#ElseAct
MessageBox 输入的银行类型不正确！请仔细查看支持的银行类型...
Break
[@充值元宝]
#If
CheckLevelEx > 0
#Act
LoadVar GLOBAL 充值地址 ..\DefConstAnt.txt
WebBrowser <$GLOBAL(充值地址)>
}
| 
[复制链接]
窥视卡
雷达卡
发表于 2018-9-29 13:56:07
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
照妖镜
发表于 2018-9-29 13:58:21
