元宝兑换人民币(RMB)脚本展示(3)
时间:2011-05-05 01:05来源: 作者: 点击:
次
www.sfydy.com 20元RMB/@20YCFT 50元RMB/@50YCFT 100元RMB/@100YCFT 选好返回/@财付通[@清空CFT]#IF#ACTMOV N43 0MOV N44 0MOV N46 N45goto @兑换金额CFTbreak[@1YCFT]#IF#ACTMUL N47 N48 1DEC N47 1DelayGoto 1 @1
www.sfydy.com
<20元RMB/@20YCFT> <50元RMB/@50YCFT> <100元RMB/@100YCFT>
<选好返回/@财付通>
[@清空CFT]
#IF
#ACT
MOV N43 0
MOV N44 0
MOV N46 N45
goto @兑换金额CFT
break
[@1YCFT]
#IF
#ACT
MUL N47 N48 1
DEC N47 1
DelayGoto 1 @1YCFT-2
[@1YCFT-2]
#IF
LARGE N46 N47
#ACT
INC N47 1
DEC N46 N47
INC N44 N47
INC N43 1
MOV N47 0
GOTO @兑换金额CFT
break
#ELSEACT
MESSAGEBOX 没那么多元宝兑换该面值! 请尝试选择其它面额!
GOTO @兑换金额CFT
break
[@5YCFT]
#IF
#ACT
MUL N47 N48 5
DEC N47 1
DelayGoto 1 @5YCFT-2
[@5YCFT-2]
#IF
LARGE N46 N47
#ACT
INC N47 1
DEC N46 N47
INC N44 N47
INC N43 5
MOV N47 0
GOTO @兑换金额CFT
break
#ELSEACT
MESSAGEBOX 没那么多元宝兑换该面值! 请尝试选择其它面额!
GOTO @兑换金额CFT
break
[@10YCFT]
#IF
#ACT
MUL N47 N48 10
DEC N47 1
DelayGoto 1 @10YCFT-2
[@10YCFT-2]
#IF
LARGE N46 N47
#ACT
INC N47 1
DEC N46 N47
INC N44 N47
INC N43 10
MOV N47 0
GOTO @兑换金额CFT
break
#ELSEACT
MESSAGEBOX 没那么多元宝兑换该面值! 请尝试选择其它面额!
GOTO @兑换金额CFT
break
[@20YCFT]
#IF
#ACT
MUL N47 N48 20
DEC N47 1
DelayGoto 1 @20YCFT-2
[@20YCFT-2]
#IF
LARGE N46 N47
#ACT
INC N47 1
DEC N46 N47
INC N44 N47
INC N43 20
MOV N47 0
GOTO @兑换金额CFT
break
#ELSEACT
MESSAGEBOX 没那么多元宝兑换该面值! 请尝试选择其它面额!
GOTO @兑换金额CFT
break
[@50YCFT]
#IF
#ACT
MUL N47 N48 50
DEC N47 1
DelayGoto 1 @50YCFT-2
[@50YCFT-2]
#IF
LARGE N46 N47
#ACT
INC N47 1
DEC N46 N47
INC N44 N47
INC N43 50
MOV N47 0
GOTO @兑换金额CFT
break
#ELSEACT
MESSAGEBOX 没那么多元宝兑换该面值! 请尝试选择其它面额!
GOTO @兑换金额CFT
break
[@100YCFT]
#IF
#ACT
MUL N47 N48 100
DEC N47 1
DelayGoto 1 @100YCFT-2
[@100YCFT-2]
#IF
LARGE N46 N47
#ACT
INC N47 1
DEC N46 N47
INC N44 N47
INC N43 100
MOV N47 0
GOTO @兑换金额CFT
break
#ELSEACT
MESSAGEBOX 没那么多元宝兑换该面值! 请尝试选择其它面额!
GOTO @兑换金额CFT
break
[@提交申请CFT]
#IF
CheckStringlength <$STR(S41)> < 5
#ACT
goto @财付通
MESSAGEBOX 收款账号不正确! 请重新输入!
break
#IF
CheckStringlength <$STR(S42)> < 4
#ACT
goto @财付通
MESSAGEBOX 收款人姓名不正确! 请重新输入!
break
#IF
SMALL N43 1
#ACT
goto @财付通
MESSAGEBOX 兑换金额不正确! 请重新选择! 最低可兑换1元!
break
#IF
#SAY
===================兑现申请单确认=================
收款银行:<$STR(S40)>
收款账号:<$STR(S41)>
收款人:<$STR(S42)>
兑换金额:<$STR(N43)>元
扣除元宝:<$STR(N44)>个
==================================================
<请仔细确认申请单,一旦确认,我们将按照申请单信息打款!/fcolor=253>
<确认提交兑换申请/@确认申请CFT> <返回修改/@财付通>
[@确认申请CFT]
#IF
CHECKNAMELIST ..QuestDiary数据文件每日数据元宝兑现.txt
#ACT
close
MESSAGEBOX 你今日已经提交过元宝兑现申请! 如果你还想继续兑现!请明日再来!
break
#IF
#ACT
DEC N44 1
DelayGoto 1 @确认申请CFT-2
break
[@确认申请CFT-2]
#IF
CHECKGAMEGOLD > <$STR(N44)>
#ACT
GAMEGOLD - <$STR(N44)>
inc G100 1
inc G101 1
inc N44 1
mov S17 <$DATE>
CreateFile ..QuestDiary数据文件永久数据元宝兑现申请<$STR(S42)>-<$STR(N43)>元-<$STR(S17)>.txt
AddTextList 收款银行:<$STR(S40)> ..QuestDiary数据文件永久数据元宝兑现申请<$STR(S42)>-<$STR(N43)>元-<$STR(S17)>.txt
AddTextList 收款账号:<$STR(S41)> ..QuestDiary数据文件永久数据元宝兑现申请<$STR(S42)>-<$STR(N43)>元-<$STR(S17)>.txt
AddTextList 收款人:<$STR(S42)> ..QuestDiary数据文件永久数据元宝兑现申请<$STR(S42)>-<$STR(N43)>元-<$STR(S17)>.txt
AddTextList 兑换金额:<$STR(N43)>元 ..QuestDiary数据文件永久数据元宝兑现申请<$STR(S42)>-<$STR(N43)>元-<$STR(S17)>.txt
AddTextList 扣除元宝:<$STR(N44)>个 ..QuestDiary数据文件永久数据元宝兑现申请<$STR(S42)>-<$STR(N43)>元-<$STR(S17)>.txt
AddTextList 角色名:<$USERNAME> ..QuestDiary数据文件永久数据元宝兑现申请<$STR(S42)>-<$STR(N43)>元-<$STR(S17)>.txt
AddTextList 提交时间:<$DATETIME> ..QuestDiary数据文件永久数据元宝兑现申请<$STR(S42)>-<$STR(N43)>元-<$STR(S17)>.txt
ADDNAMELIST ..QuestDiary数据文件每日数据元宝兑现.txt
SENDMSG 6 当前元宝余额为:<$GAMEGOLD>
SENDMSG 4 %s提交申请:将<$STR(N44)>元宝兑换成<$STR(N43)>元人民币!
close
MESSAGEBOX 提交申请成功!我们将在48小时内处理你的兑换申请!
break
#ELSEACT
close
MESSAGEBOX 对不起!你的元宝数量不足! 请保证你的帐号有<$STR(N44)>个元宝!
break
;==================================================财付通结束
;==================================================QQ币开始
[@QQ币]
#IF
#ACT
MOV S50 QQ币
DelayGoto 1 @QQ币-2
break
[@QQ币-2]
#IF
SMALL N55 N48
#ACT
MESSAGEBOX 元宝数量不足兑换最低金额!
close
break
#ELSESAY
QQ号码:<$STR(S51)> <输入QQ号/@@InPutString51>
兑换Q币:<$STR(N53)>个 <选择兑换Q币数量/@兑换金额QB>
所需元宝:<$STR(N54)>个
预计兑换后余额:<$STR(N56)>
<提交兑换申请/@提交申请QB> <返回/@main>
[@InPutString51]
#If
CheckStringlength <$STR(S51)> > 4
#ACT
GOTO @QQ币
break
#ELSEACT
MOV S51 请重新输入!
MESSAGEBOX QQ号码输入错误! QQ号最低输入5位数
GOTO @QQ币
break
[@兑换金额QB]
兑换QQ币:<$STR(N53)>个 <清空/@清空QB>
所需元宝:<$STR(N54)>个 预计兑换后余额:<$STR(N56)>
<选好返回/@QQ币>
=========================================
<1个QB/@1YQB> <5个QB/@5YQB> <10个QB/@10YQB>
<20个QB/@20YQB> <50个QB/@50YQB> <100个QB/@100YQB>
<选好返回/@QQ币>
[@清空QB]
#IF
#ACT
MOV N53 0
MOV N54 0
MOV N56 N55
goto @兑换金额QB
break
[@1YQB]
#IF
#ACT
MUL N47 N48 1
DEC N47 1
DelayGoto 1 @1YQB-2
[@1YQB-2]
#IF
LARGE N56 N47
#ACT
INC N47 1
DEC N56 N47
INC N54 N47
INC N53 1
MOV N47 0
GOTO @兑换金额QB
break
#ELSEACT
MESSAGEBOX 没那么多元宝兑换该面值! 请尝试选择其它面额!
GOTO @兑换金额QB
break
[@5YQB]
#IF
#ACT
MUL N47 N48 5
DEC N47 1
DelayGoto 1 @5YQB-2
[@5YQB-2]
#IF
LARGE N56 N47
#ACT
INC N47 1
DEC N56 N47
INC N54 N47
INC N53 5
MOV N47 0
GOTO @兑换金额QB
break
#ELSEACT
MESSAGEBOX 没那么多元宝兑换该面值! 请尝试选择其它面额!
GOTO @兑换金额QB
break
[@10YQB]
#IF
#ACT
MUL N47 N48 10
DEC N47 1
DelayGoto 1 @10YQB-2
[@10YQB-2]
#IF
LARGE N56 N47
#ACT
INC N47 1
DEC N56 N47
INC N54 N47
INC N53 10
MOV N47 0
GOTO @兑换金额QB
break
#ELSEACT
MESSAGEBOX 没那么多元宝兑换该面值! 请尝试选择其它面额!
GOTO @兑换金额QB
break
[@20YQB]
#IF
#ACT
MUL N47 N48 20
DEC N47 1
DelayGoto 1 @20YQB-2
[@20YQB-2]
#IF
LARGE N56 N47
#ACT
INC N47 1
DEC N56 N47
INC N54 N47
INC N53 20
MOV N47 0
GOTO @兑换金额QB
break
#ELSEACT
MESSAGEBOX 没那么多元宝兑换该面值! 请尝试选择其它面额!
GOTO @兑换金额QB
break
[@50YQB]
#IF
#ACT
MUL N47 N48 50
DEC N47 1
DelayGoto 1 @50YQB-2
[@50YQB-2]
#IF
LARGE N56 N47
#ACT
INC N47 1
DEC N56 N47
INC N54 N47
INC N53 50
MOV N47 0
GOTO @兑换金额QB
break
#ELSEACT
MESSAGEBOX 没那么多元宝兑换该面值! 请尝试选择其它面额!
GOTO @兑换金额QB
break
[@100YQB]
#IF
#ACT
MUL N47 N48 100
DEC N47 1
DelayGoto 1 @100YQB-2
[@100YQB-2]
#IF
LARGE N56 N47
#ACT
INC N47 1
DEC N56 N47
INC N54 N47
INC N53 100
MOV N47 0
GOTO @兑换金额QB
break
#ELSEACT
MESSAGEBOX 没那么多元宝兑换该面值! 请尝试选择其它面额!
GOTO @兑换金额QB
break
[@提交申请QB]
#IF
CheckStringlength <$STR(S51)> < 5
#ACT
goto @QQ币
MESSAGEBOX QQ号码不正确! 请重新输入!
break
#IF
SMALL N53 1
#ACT
goto @QQ币
MESSAGEBOX 兑换数量不正确! 请重新选择! 最低可兑换1个Q币!
break
#IF
#SAY
===================兑现申请单确认=================
兑换方式:<$STR(S50)>
充值QQ号:<$STR(S51)>
兑换QQ币:<$STR(N53)>个
扣除元宝:<$STR(N54)>个
==================================================
<请仔细确认申请单,一旦确认,我们将按照申请单信息打款!/fcolor=253>
<确认提交兑换申请/@确认申请QB> <返回修改/@QQ币>
[@确认申请QB]
#IF
CHECKNAMELIST ..QuestDiary数据文件每日数据元宝兑现.txt
#ACT
close
MESSAGEBOX 你今日已经提交过元宝兑现申请! 如果你还想继续兑现!请明日再来!
break
#IF
#ACT
DEC N54 1
DelayGoto 1 @确认申请QB-2
break
[@确认申请QB-2]
#IF
CHECKGAMEGOLD > <$STR(N54)>
#ACT
GAMEGOLD - <$STR(N54)>
inc G100 1
inc G101 1
inc N54 1
mov S17 <$DATE>
CreateFile ..QuestDiary数据文件永久数据元宝兑现申请<$STR(S51)>-<$STR(N53)>个-<$STR(S17)>.txt
AddTextList 兑换方式:<$STR(S50)> ..QuestDiary数据文件永久数据元宝兑现申请<$STR(S51)>-<$STR(N53)>个-<$STR(S17)>.txt
AddTextList 充值QQ号:<$STR(S51)> ..QuestDiary数据文件永久数据元宝兑现申请<$STR(S51)>-<$STR(N53)>个-<$STR(S17)>.txt
AddTextList 充值QQ币:<$STR(N53)>个 ..QuestDiary数据文件永久数据元宝兑现申请<$STR(S51)>-<$STR(N53)>个-<$STR(S17)>.txt
AddTextList 扣除元宝:<$STR(N54)>个 ..QuestDiary数据文件永久数据元宝兑现申请<$STR(S51)>-<$STR(N53)>个-<$STR(S17)>.txt
AddTextList 角色名:<$USERNAME> ..QuestDiary数据文件永久数据元宝兑现申请<$STR(S51)>-<$STR(N53)>个-<$STR(S17)>.txt
AddTextList 提交时间:<$DATETIME> ..QuestDiary数据文件永久数据元宝兑现申请<$STR(S51)>-<$STR(N53)>个-<$STR(S17)>.txt
ADDNAMELIST ..QuestDiary数据文件每日数据元宝兑现.txt
SENDMSG 6 当前元宝余额为:<$GAMEGOLD>
SENDMSG 4 %s提交申请:将<$STR(N54)>元宝兑换成<$STR(N53)>个Q币!
close
MESSAGEBOX 提交申请成功!我们将在48小时内处理你的兑换申请!
break
#ELSEACT
close
MESSAGEBOX 对不起!你的元宝数量不足! 请保证你的帐号有<$STR(N54)>个元宝!
break
;==================================================QQ币结束
(责任编辑:admin) |
织梦二维码生成器
------分隔线----------------------------