[BLUE/LEG脚本] HGE游戏点货币脚本,货币手续费为10%,合区后开放货币功能

[复制链接]
发表于 2019-4-10 19:02:24 | 显示全部楼层 |阅读模式
(@@InPutInteger @@InPutString)
[@main]
#IF
#ACT
OPENMERCHANTDLG 19|1280|0|0|0|0|0|0|1|390|28
#say
\  \
--------------------------------------------------------\
<1.申请货币最低50元,货币手续费为10%,合区后开放货币功能./FCOLOR=253>\
<2.每天晚上23点前发放货币金额到玩家支付宝账户,请务必认真填写。/FCOLOR=249>\
<3.RMB功能:装备、材料、元宝、特殊均可摆摊卖游戏点(可货币)/FCOLOR=150>\
<4.土豪收东西直接充值RMB交易(可避免被骗风险)。/FCOLOR=254>\
<5.各大地图均可爆出可货币实物,散人运气好日赚300可以轻松实现!/FCOLOR=22>\
--------------------------------------------------------\
<{s=兑换游戏点;FC=150;i=311;li=19;ih=312;id=313}/@兑换游戏点>     <{s=兑换充值点;FC=150;i=311;li=19;ih=312;id=313}/@兑换充值点>      
   <{s=货币;FC=150;i=311;li=19;ih=312;id=313}/@货币>

[@兑换游戏点]
#ACT
#SAY
\
<游戏点券双击使用即可获得相应的游戏点点(可货币)/FCOLOR=243> <方便交易可防骗!/FCOLOR=249>\
<游戏点点兑换游戏点券比例为1:1/FCOLOR=253> <无手续费/FCOLOR=243>\  \
<选择你要兑换的游戏点券数额:/FCOLOR=250>\  

<{s=1元游戏点券;FC=150;i=311;li=19;ih=312;id=313}/@兑换1元>    <{s=5元游戏点券;FC=150;i=311;li=19;ih=312;id=313}/@兑换5元>   <{s=10元游戏点券;FC=150;i=311;li=19;ih=312;id=313}/@兑换10元> \
<{s=20元游戏点券;FC=150;i=311;li=19;ih=312;id=313}/@兑换20元>    <{s=50元游戏点券;FC=150;i=311;li=19;ih=312;id=313}/@兑换50元>   <{s=100元游戏点券;FC=150;i=311;li=19;ih=312;id=313}/@兑换100元> \ \



[@兑换1元]
#IF
CHECKGameGird > 0
#ACT
GameGird - 1
GIVE 1元游戏点 1
GOTO @兑换游戏点
SENDMSG 0 玩家【<$USERNAME>】成功兑换1元游戏点券(可交易)。 0 251
#ELSEACT
MESSAGEBOX 你的游戏点点不足以兑换游戏点券。
BREAK

[@兑换5元]
#IF
CHECKGameGird > 4
#ACT
GameGird - 5
GIVE 5元游戏点 1
GOTO @兑换游戏点
SENDMSG 0 玩家【<$USERNAME>】成功兑换5元游戏点券(可交易)。 0 251
#ELSEACT
MESSAGEBOX 你的游戏点点不足以兑换游戏点券。
BREAK

[@兑换10元]
#IF
CHECKGameGird > 9
#ACT
GameGird - 10
GIVE 10元游戏点 1
GOTO @兑换游戏点
SENDMSG 0 玩家【<$USERNAME>】成功兑换10元游戏点券(可交易)。 0 251
#ELSEACT
MESSAGEBOX 你的游戏点点不足以兑换游戏点券。
BREAK



[@兑换20元]
#IF
CHECKGameGird > 19
#ACT
GameGird - 20
GIVE 20元游戏点 1
GOTO @兑换游戏点
SENDMSG 0 玩家【<$USERNAME>】成功兑换20元游戏点券(可交易)。 0 251
#ELSEACT
MESSAGEBOX 你的游戏点点不足以兑换游戏点券。
BREAK



[@兑换50元]
#IF
CHECKGameGird > 49
#ACT
GameGird - 50
GIVE 50元游戏点 1
GOTO @兑换游戏点
SENDMSG 0 玩家【<$USERNAME>】成功兑换50元游戏点券(可交易)。 0 251
#ELSEACT
MESSAGEBOX 你的游戏点点不足以兑换游戏点券。
BREAK




[@兑换100元]
#IF
CHECKGameGird > 99
#ACT
GameGird - 100
GIVE 100元游戏点 1
GOTO @兑换游戏点
SENDMSG 0 玩家【<$USERNAME>】成功兑换100元游戏点券(可交易)。 0 251
#ELSEACT
MESSAGEBOX 你的游戏点点不足以兑换游戏点券。
BREAK












[@兑换充值点]
#ACT
#SAY
\
<充值券双击使用即可获得相应的充值/FCOLOR=243> <请先核对分辨!/FCOLOR=249>\
<游戏点券兑换充值点比例为1:1,等同平台充值数额/FCOLOR=253> <无手续费/FCOLOR=243>\  \
<选择你要兑换的充值点数额(不可用于货币,可开礼包)/FCOLOR=250>\  

<{s=1元充值点;FC=150;i=311;li=19;ih=312;id=313}/@兑换1元券>    <{s=5元充值点;FC=150;i=311;li=19;ih=312;id=313}/@兑换5元券>   <{s=10元充值点;FC=150;i=311;li=19;ih=312;id=313}/@兑换10元券> \
<{s=20元充值点;FC=150;i=311;li=19;ih=312;id=313}/@兑换20元券>    <{s=50元充值点;FC=150;i=311;li=19;ih=312;id=313}/@兑换50元券>   <{s=100元充值点;FC=150;i=311;li=19;ih=312;id=313}/@兑换100元券> \ \


[@兑换1元券]
#IF
CHECKGameGird > 0
#ACT
GameGird - 1
GAMEDIAMOND + 1
GOTO @兑换充值点
SENDMSG 0 玩家【<$USERNAME>】成功兑换1元充值点(可开礼包)。 0 251
#ELSEACT
MESSAGEBOX 你的游戏点点不足以兑换充值点。
BREAK

[@兑换5元券]
#IF
CHECKGameGird > 4
#ACT
GameGird - 5
GAMEDIAMOND + 5
GOTO @兑换充值点
SENDMSG 0 玩家【<$USERNAME>】成功兑换5元充值点(可开礼包)。 0 251
#ELSEACT
MESSAGEBOX 你的游戏点点不足以兑换充值点。
BREAK

[@兑换10元券]
#IF
CHECKGameGird > 9
#ACT
GameGird - 10
GAMEDIAMOND + 10
GOTO @兑换充值点
SENDMSG 0 玩家【<$USERNAME>】成功兑换10元充值点(可开礼包)。 0 251
#ELSEACT
MESSAGEBOX 你的游戏点点不足以兑换充值点。
BREAK



[@兑换20元券]
#IF
CHECKGameGird > 19
#ACT
GameGird - 20
GAMEDIAMOND + 20
GOTO @兑换充值点
SENDMSG 0 玩家【<$USERNAME>】成功兑换20元充值点(可开礼包)。 0 251
#ELSEACT
MESSAGEBOX 你的游戏点点不足以兑换充值点。
BREAK



[@兑换50元券]
#IF
CHECKGameGird > 49
#ACT
GameGird - 50
GAMEDIAMOND + 50
GOTO @兑换充值点
SENDMSG 0 玩家【<$USERNAME>】成功兑换50元充值点(可开礼包)。 0 251
#ELSEACT
MESSAGEBOX 你的游戏点点不足以兑换充值点。
BREAK



[@兑换100元券]
#IF
CHECKGameGird > 99
#ACT
GameGird - 100
GAMEDIAMOND + 100
GOTO @兑换充值点
SENDMSG 0 玩家【<$USERNAME>】成功兑换100元充值点(可开礼包)。 0 251
#ELSEACT
MESSAGEBOX 你的游戏点点不足以兑换充值点。
BREAK





[@货币]
#IF
NOT EQUAL A146 新区
#ACT
OPENMERCHANTDLG 50|707|0|0|0|0|0|0|1|480|28
GetRandomName D:\货币文件\货币名字.txt A231 1 1
GetRandomName D:\货币文件\货币名字.txt A232 2 1
GetRandomName D:\货币文件\货币名字.txt A233 3 1
GetRandomName D:\货币文件\货币名字.txt A234 4 1
GetRandomName D:\货币文件\货币名字.txt A235 5 1
GetRandomName D:\货币文件\货币名字.txt A236 6 1
GetRandomName D:\货币文件\货币名字.txt A237 7 1
GetRandomName D:\货币文件\货币名字.txt A238 8 1
GetRandomName D:\货币文件\货币名字.txt A239 9 1
GetRandomName D:\货币文件\货币名字.txt A240 10 1

GetRandomName D:\货币文件\货币金额.txt A251 1 1
GetRandomName D:\货币文件\货币金额.txt A252 2 1
GetRandomName D:\货币文件\货币金额.txt A253 3 1
GetRandomName D:\货币文件\货币金额.txt A254 4 1
GetRandomName D:\货币文件\货币金额.txt A255 5 1
GetRandomName D:\货币文件\货币金额.txt A256 6 1
GetRandomName D:\货币文件\货币金额.txt A257 7 1
GetRandomName D:\货币文件\货币金额.txt A258 8 1
GetRandomName D:\货币文件\货币金额.txt A259 9 1
GetRandomName D:\货币文件\货币金额.txt A260 10 1

GetRandomName D:\货币文件\货币时间.txt A241 1 1
GetRandomName D:\货币文件\货币时间.txt A242 2 1
GetRandomName D:\货币文件\货币时间.txt A243 3 1
GetRandomName D:\货币文件\货币时间.txt A244 4 1
GetRandomName D:\货币文件\货币时间.txt A245 5 1
GetRandomName D:\货币文件\货币时间.txt A246 6 1
GetRandomName D:\货币文件\货币时间.txt A247 7 1
GetRandomName D:\货币文件\货币时间.txt A248 8 1
GetRandomName D:\货币文件\货币时间.txt A249 9 1
GetRandomName D:\货币文件\货币时间.txt A250 10 1


#SAY
;<$DATETIME>服务器时间变量
\  \    \  \
<以下为玩家货币名单、金额、时间/FCOLOR=253><(全区服货币名单只显示最近10个)/FCOLOR=249>\  \
<1. :/FCOLOR=149><角色名:/FCOLOR=22><$STR(A231)> <货币金额:/FCOLOR=253><$STR(A251)> <货币时间:/FCOLOR=243><$STR(A241)>   \
<2. :/FCOLOR=149><角色名:/FCOLOR=22><$STR(A232)> <货币金额:/FCOLOR=253><$STR(A252)> <货币时间:/FCOLOR=243><$STR(A242)>   \
<3. :/FCOLOR=149><角色名:/FCOLOR=22><$STR(A233)> <货币金额:/FCOLOR=253><$STR(A253)> <货币时间:/FCOLOR=243><$STR(A243)>   \
<4. :/FCOLOR=149><角色名:/FCOLOR=22><$STR(A234)> <货币金额:/FCOLOR=253><$STR(A254)> <货币时间:/FCOLOR=243><$STR(A244)>   \
<5. :/FCOLOR=149><角色名:/FCOLOR=22><$STR(A235)> <货币金额:/FCOLOR=253><$STR(A255)> <货币时间:/FCOLOR=243><$STR(A245)>   \
<6. :/FCOLOR=149><角色名:/FCOLOR=22><$STR(A236)> <货币金额:/FCOLOR=253><$STR(A256)> <货币时间:/FCOLOR=243><$STR(A246)>   \
<7. :/FCOLOR=149><角色名:/FCOLOR=22><$STR(A237)> <货币金额:/FCOLOR=253><$STR(A257)> <货币时间:/FCOLOR=243><$STR(A247)>   \
<8. :/FCOLOR=149><角色名:/FCOLOR=22><$STR(A238)> <货币金额:/FCOLOR=253><$STR(A258)> <货币时间:/FCOLOR=243><$STR(A248)>   \
<9. :/FCOLOR=149><角色名:/FCOLOR=22><$STR(A239)> <货币金额:/FCOLOR=253><$STR(A259)> <货币时间:/FCOLOR=243><$STR(A249)>   \
<10.:/FCOLOR=149><角色名:/FCOLOR=22><$STR(A240)> <货币金额:/FCOLOR=253><$STR(A260)> <货币时间:/FCOLOR=243><$STR(A250)>   \

\  \   
     <支付宝账户: /FCOLOR=150><$STR(S11)>   <货币金额: /FCOLOR=150> <$STR(S12)> 元   \   
\  <{s=设置货币账号;FC=150;i=311;li=19;ih=312;id=313}/@@InPutString11|Title=请输入支付宝账号>   <{s=设置货币金额;FC=150;i=311;li=19;ih=312;id=313}/@@InPutString12|Title=请输入货币金额(确定包裹里游戏点券数量)>
   <{s=确认货币;FC=150;i=311;li=19;ih=312;id=313}/@确认货币50>\

#ELSEACT
GOTO @货币2



[@货币2]
#ACT
OPENMERCHANTDLG 50|707|0|0|0|0|0|0|1|480|28
GetRandomName D:\货币文件\货币名字.txt A231 1 1
GetRandomName D:\货币文件\货币名字.txt A232 2 1
GetRandomName D:\货币文件\货币名字.txt A233 3 1
GetRandomName D:\货币文件\货币名字.txt A234 4 1
GetRandomName D:\货币文件\货币名字.txt A235 5 1
GetRandomName D:\货币文件\货币名字.txt A236 6 1
GetRandomName D:\货币文件\货币名字.txt A237 7 1
GetRandomName D:\货币文件\货币名字.txt A238 8 1
GetRandomName D:\货币文件\货币名字.txt A239 9 1
GetRandomName D:\货币文件\货币名字.txt A240 10 1

GetRandomName D:\货币文件\货币金额.txt A251 1 1
GetRandomName D:\货币文件\货币金额.txt A252 2 1
GetRandomName D:\货币文件\货币金额.txt A253 3 1
GetRandomName D:\货币文件\货币金额.txt A254 4 1
GetRandomName D:\货币文件\货币金额.txt A255 5 1
GetRandomName D:\货币文件\货币金额.txt A256 6 1
GetRandomName D:\货币文件\货币金额.txt A257 7 1
GetRandomName D:\货币文件\货币金额.txt A258 8 1
GetRandomName D:\货币文件\货币金额.txt A259 9 1
GetRandomName D:\货币文件\货币金额.txt A260 10 1

GetRandomName D:\货币文件\货币时间.txt A241 1 1
GetRandomName D:\货币文件\货币时间.txt A242 2 1
GetRandomName D:\货币文件\货币时间.txt A243 3 1
GetRandomName D:\货币文件\货币时间.txt A244 4 1
GetRandomName D:\货币文件\货币时间.txt A245 5 1
GetRandomName D:\货币文件\货币时间.txt A246 6 1
GetRandomName D:\货币文件\货币时间.txt A247 7 1
GetRandomName D:\货币文件\货币时间.txt A248 8 1
GetRandomName D:\货币文件\货币时间.txt A249 9 1
GetRandomName D:\货币文件\货币时间.txt A250 10 1


#SAY
;<$DATETIME>服务器时间变量
\  \    \  \
<以下为玩家货币名单、金额、时间/FCOLOR=253><(全区服货币名单只显示最近10个)/FCOLOR=249>\  \
<1. :/FCOLOR=149><角色名:/FCOLOR=22><$STR(A231)> <货币金额:/FCOLOR=253><$STR(A251)> <货币时间:/FCOLOR=243><$STR(A241)>   \
<2. :/FCOLOR=149><角色名:/FCOLOR=22><$STR(A232)> <货币金额:/FCOLOR=253><$STR(A252)> <货币时间:/FCOLOR=243><$STR(A242)>   \
<3. :/FCOLOR=149><角色名:/FCOLOR=22><$STR(A233)> <货币金额:/FCOLOR=253><$STR(A253)> <货币时间:/FCOLOR=243><$STR(A243)>   \
<4. :/FCOLOR=149><角色名:/FCOLOR=22><$STR(A234)> <货币金额:/FCOLOR=253><$STR(A254)> <货币时间:/FCOLOR=243><$STR(A244)>   \
<5. :/FCOLOR=149><角色名:/FCOLOR=22><$STR(A235)> <货币金额:/FCOLOR=253><$STR(A255)> <货币时间:/FCOLOR=243><$STR(A245)>   \
<6. :/FCOLOR=149><角色名:/FCOLOR=22><$STR(A236)> <货币金额:/FCOLOR=253><$STR(A256)> <货币时间:/FCOLOR=243><$STR(A246)>   \
<7. :/FCOLOR=149><角色名:/FCOLOR=22><$STR(A237)> <货币金额:/FCOLOR=253><$STR(A257)> <货币时间:/FCOLOR=243><$STR(A247)>   \
<8. :/FCOLOR=149><角色名:/FCOLOR=22><$STR(A238)> <货币金额:/FCOLOR=253><$STR(A258)> <货币时间:/FCOLOR=243><$STR(A248)>   \
<9. :/FCOLOR=149><角色名:/FCOLOR=22><$STR(A239)> <货币金额:/FCOLOR=253><$STR(A259)> <货币时间:/FCOLOR=243><$STR(A249)>   \
<10.:/FCOLOR=149><角色名:/FCOLOR=22><$STR(A240)> <货币金额:/FCOLOR=253><$STR(A260)> <货币时间:/FCOLOR=243><$STR(A250)>   \
\  \  \   \

              <新区不开放货币功能/FCOLOR=249>    

[@InPutString11]
#IF
CHECKLEVELEX > 0
#ACT
DELAYGOTO 1 ~InPutString11
[~InPutString11]
#IF
#ACT
GOTO @货币
BREAK


[@InPutString12]
#IF
LARGE S12 49
;CHECKLEVELEX > 0
#ACT
DELAYGOTO 1 ~InPutString12
#ELSEACT
MESSAGEBOX 货币要求最低50元.
MOV S12 0
BREAK
[~InPutString12]
#IF
LARGE S12 49
#ACT
GOTO @货币
#ELSEACT
MESSAGEBOX 货币要求最低50元.
BREAK



[@确认货币50]
#IF
CHECKGAMEGIRD ≥ <$STR(S12)>
#ACT
GAMEGIRD - <$STR(S12)>
GOTO @确认货币2
BREAK
#ELSEACT
MESSAGEBOX 你的游戏点点不足。
BREAK





[@确认货币2]
#IF
#ACT
;GetFileToVar D:\货币文件\货币名单.txt 1 S11 S12
AddTextListEX <$DATETIME> D:\货币文件\货币时间.txt 0 1
AddTextListEX <$USERNAME> D:\货币文件\货币名字.txt 0 1
AddTextListEX <$STR(S12)> D:\货币文件\货币金额.txt 0 1
AddTextListEX <$STR(S11)> D:\货币文件\货币支付宝.txt 0 1
MESSAGEBOX 货币成功!请于23点后查看支付宝账户到账提示! \若有延迟,请耐心等待。
SendCenterMsg 150 249 系统:恭喜玩家【<$USERNAME>】成功货币<$STR(S12)>元游戏点到支付宝账户。 1 15 3
SendCenterMsg 150 249 系统:恭喜玩家【<$USERNAME>】成功货币<$STR(S12)>元游戏点到支付宝账户。 1 15 3
SendCenterMsg 150 249 系统:恭喜玩家【<$USERNAME>】成功货币<$STR(S12)>元游戏点到支付宝账户。 1 15 3
GOTO @货币
BREAK





上一篇:财富劫阵脚本,财富结阵到达49层土城出现大量游戏点
下一篇:HGE转生使者脚本
爱上论坛,GM基地,传奇基地,传奇SF,传奇素材网,传奇脚本网,传奇一条龙,服务器租用,版本定制!
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|手机版|传奇GM论坛 ( 湘ICP备16009886号-2 )|网站地图

Powered by Discuz! X3.4© 2001-2013 Comsenz Inc.

禁止发布任何违反国家法律、法规的言论与图片等内容;本站内容均来自个人观点与网络等信息,非本站认同之观点.如遇版权问题,请及时QQ联系(2364142471)

今天是: | 本站已经安全运行: //这个地方可以改颜色

9pk | 9ss | 99j | 88a | haosf | zhaosf | laomir | qusf | 2hq | 6xq

热血传奇 | 英雄合击 | 贪玩蓝月 | 手机版传奇 | 网页版传奇 | 单职业传奇 | 传奇服务端 | 传奇广告代理 | 传奇广告价格表

传奇引擎 | 传奇版本 | 传奇脚本 | 传奇工具 | 传奇加速器 | 传奇登陆器 | 传奇教程 | 传奇论坛 | 传奇广告发布 | 传奇版本下载站

复古传奇 | 金币传奇 | 打金传奇 | 轻变传奇 | 微变传奇 | 中变传奇 | 超变传奇 | 变态传奇 | 合击传奇 | 连击传奇 | 迷失传奇 | 单职业传奇 | 开区模板

51LA统计
快速回复 返回顶部 返回列表