冲值元宝.txt

企业版传奇世界本

[@买元宝]
{
“元宝”可以向我们<color=green 购买冲值卡>进行冲值　<color=red 1元RMB>=<color=red 20元宝>\\
　<color=green 50元>  面值点卡=1000元宝　　　　<color=green 100元>  面值点卡=2200元宝\
　<color=green 500元> 面值点卡=12000元宝　　　 <color=green 1000元> 面值点卡=25000元宝\\
我已购买冲值卡，<进入冲值页面进行冲值/@冲值卡>\\
　　　　　　　　<点击这里联系客服QQ购买元宝/@@urlwpa.qq.com/msgrd?V=1&Uin=11111111>　　　　<返回/@main>\

[@冲值卡]
#IF
CHECKLEVELEX > 49
#ACT
queryvalue 请输入你所购买的冲值卡卡号: 2 30 11
break
#ELSESAY
等级不足50级能不是用元宝冲值功能！\\
<离开/@exit>

[@getstring11]
#ACT
Getstring s5
goto @JCSRHML
break

[@JCSRHML]
#IF
CHECKVARLIST $STR(S5) ..\QuestDiary\数据文件\点卡管理\50元点卡.txt
#ACT
DELVARLIST $STR(S5) ..\QuestDiary\数据文件\点卡管理\50元点卡.txt
GAMEGOLD + 1000
CALCVAR GLOBAL DKJL + 1000
SAVEVAR GLOBAL DKJL ..\QuestDiary\数据文件\DKJLSave.txt
CALCVAR HUMAN DKWJCK + 1000
SAVEVAR HUMAN DKWJCK ..\QuestDiary\数据文件\点卡管理\玩家冲卡记录\DKWJCKSave.txt
SENDMSG 5 点卡冲值成功！元宝值增加+1000点.
messagebox 点卡冲值成功！元宝值增加+1000点.\感谢你对服务器的支持，谢谢！！！
break
close
#IF
CHECKVARLIST $STR(S5) ..\QuestDiary\数据文件\点卡管理\100元点卡.txt
#ACT
DELVARLIST $STR(S5) ..\QuestDiary\数据文件\点卡管理\100元点卡.txt
GAMEGOLD + 2200
CALCVAR GLOBAL DKJL + 2200
SAVEVAR GLOBAL DKJL ..\QuestDiary\数据文件\DKJLSave.txt
CALCVAR HUMAN DKWJCK + 2200
SAVEVAR HUMAN DKWJCK ..\QuestDiary\数据文件\点卡管理\玩家冲卡记录\DKWJCKSave.txt
SENDMSG 5 点卡冲值成功！元宝值增加+2200点.
messagebox 点卡冲值成功！元宝值增加+2200点.\感谢你对服务器的支持，谢谢！！！
break
close
#IF
CHECKVARLIST $STR(S5) ..\QuestDiary\数据文件\点卡管理\500元点卡.txt
#ACT
DELVARLIST $STR(S5) ..\QuestDiary\数据文件\点卡管理\500元点卡.txt
GAMEGOLD + 12000
CALCVAR GLOBAL DKJL + 12000
SAVEVAR GLOBAL DKJL ..\QuestDiary\数据文件\DKJLSave.txt
CALCVAR HUMAN DKWJCK + 12000
SAVEVAR HUMAN DKWJCK ..\QuestDiary\数据文件\点卡管理\玩家冲卡记录\DKWJCKSave.txt
SENDMSG 5 点卡冲值成功！元宝值增加+12000点.
messagebox 点卡冲值成功！元宝值增加+12000点.\感谢你对服务器的支持，谢谢！！！
break
close
#IF
CHECKVARLIST $STR(S5) ..\QuestDiary\数据文件\点卡管理\1000元点卡.txt
#ACT
DELVARLIST $STR(S5) ..\QuestDiary\数据文件\点卡管理\1000元点卡.txt
GAMEGOLD + 25000
CALCVAR GLOBAL DKJL + 25000
SAVEVAR GLOBAL DKJL ..\QuestDiary\数据文件\DKJLSave.txt
CALCVAR HUMAN DKWJCK + 25000
SAVEVAR HUMAN DKWJCK ..\QuestDiary\数据文件\点卡管理\玩家冲卡记录\DKWJCKSave.txt
SENDMSG 5 点卡冲值成功！元宝值增加+25000点.
messagebox 点卡冲值成功！元宝值增加+25000点.\感谢你对服务器的支持，谢谢！！！
break
close
#ELSEACT
INC D7 1
goto @panduancuowu
messagebox 你所输入的冲值卡卡号不正确！\或者该卡已经被冲值过了\连续三次输入卡号错误将被关监狱3天\
break

[@panduancuowu]
#IF
large D7 2
#ACT
goto @jianyujinru
break
#ELSEACT
break

[@jianyujinru]
#act
take 回城卷轴 60
take 地牢卷轴 60
take 城堡回城卷 60
take 城堡回城卷包 60
mov d7 0
mapmove 128
SENDMSG 7 因为你对服务器冲卡系统进行恶意的操作！系统判你入狱3天！



}