传奇服务端

 找回密码
 立即注册

简单一步 , 微信登陆

查看: 24435|回复: 324
收起左侧

[传奇脚本] GOM引擎专用在线卡号密码充值元宝系统脚本分享

  [复制链接]
发表于 2017-12-24 09:30:12 | 显示全部楼层 |阅读模式

登录后可查看完整内容和下载

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
GOM引擎专用在线卡号密码充值元宝系统脚本分享

下载地址: GOM引擎卡密充值系统脚本.zip (4.45 KB, 下载次数: 665, 售价: 1 金币)

100654zcujhc9eug9eqwb5.jpg

100656o5zjb22foie24euf.jpg

100700pxlgtz64dvtlxxrt.jpg


(@@InPutString)
[@main]
欢迎使用点卡充值系统  <充值比例:1元=10元宝  转账:1元=12元宝>\
                   ┃金币元宝互换\
卡号:                                ┃比例:2万金币=1元宝\
密码:                                ┃<金币换元宝/@金币换>\
                   ┃<元宝换金币/@元宝换>\
状态:<请输入卡号。。。/AUTOCOLOR=254,251,168,191,250,70,245,249,253>                ┃\
                   ┃\
<输入卡号/@@InPutString2(请输入充值卡卡号:)>    <在线购卡/@zaixiangk>    <关闭/@exit>          ┃
[@InPutString2]
#IF
#ACT
DELAYGOTO 2000 @yanzhengkh
#SAY
欢迎使用点卡充值系统 \ \
卡号:<$STR(S2)> \
密码:\ \
状态:<正在验证卡号。。。/AUTOCOLOR=254,251,168,191,250,70,245,249,253>\ \
<输入密码/FCOLOR=7>    <在线购卡/@zaixiangk>    <关闭/@exit>
[@yanzhengkh]
#IF
  CHECKTEXTLIST ..\QuestDiary\充值系统\10元卡号.txt <$STR(S2)>
#ACT
  MUL N5 1000 10
  MOV N4 10
  GOTO @kahaozq
  break
#IF
  CHECKTEXTLIST ..\QuestDiary\充值系统\50元卡号.txt <$STR(S2)>
#ACT
  MUL N5 5000 10
  MOV N4 50
  GOTO @kahaozq
  break
#IF
  CHECKTEXTLIST ..\QuestDiary\充值系统\100元卡号.txt <$STR(S2)>
#ACT
  MUL N5 100 10
  MOV N4 100
  GOTO @kahaozq
  break
#IF
  CHECKTEXTLIST ..\QuestDiary\充值系统\300元卡号.txt <$STR(S2)>
#ACT
  MUL N5 300 10
  MOV N4 300
  GOTO @kahaozq
  break
#IF
  CHECKTEXTLIST ..\QuestDiary\充值系统\500元卡号.txt <$STR(S2)>
#ACT
  MUL N5 500 10
  MOV N4 500
  GOTO @kahaozq
  break
#IF
  CHECKTEXTLIST ..\QuestDiary\充值系统\20元卡号.txt <$STR(S2)>
#ACT
  MUL N5 20 10
  MOV N4 20
  GOTO @kahaozq
  break
#ELSESAY
欢迎使用点卡充值系统 \ \
卡号:<$STR(S2)> <×/FCOLOR=249>\
密码:\ \
状态:<无法识别该卡号。。。/AUTOCOLOR=254,251,168,191,250,70,245,249,253>\ \
<返回/@main>    <在线购卡/@zaixiangk>    <关闭/@exit>
[@kahaozq]
#ACT
  CLEARDELAYGOTO
#SAY
欢迎使用点卡充值系统 \ \
卡号:<$STR(S2)> <√/FCOLOR=250>\
密码:\ \
状态:<请输入密码。。。/AUTOCOLOR=254,251,168,191,250,70,245,249,253>\ \
<输入密码/@@InPutString3(请输入充值卡密码:)>    <在线购卡/@zaixiangk>    <关闭/@exit>
[@InPutString3]
#IF
#ACT
DELAYGOTO 2000 @yanzhengmm
#SAY
欢迎使用点卡充值系统 \ \
卡号:<$STR(S2)> <√/FCOLOR=250> \
密码:<$STR(S3)>\ \
状态:<正在验证密码。。。/AUTOCOLOR=254,251,168,191,250,70,245,249,253>\ \
<确定充值/FCOLOR=7>    <在线购卡/@zaixiangk>    <关闭/@exit>
[@yanzhengmm]
#IF
  CHECKTEXTLIST ..\QuestDiary\充值系统\10元密码.txt <$STR(S3)>
#ACT
  GOTO @mimazq
  break
#IF
  CHECKTEXTLIST ..\QuestDiary\充值系统\50元密码.txt <$STR(S3)>
#ACT
  GOTO @mimazq
  break
#IF
  CHECKTEXTLIST ..\QuestDiary\充值系统\100元密码.txt <$STR(S3)>
#ACT
  GOTO @mimazq
  break
#IF
  CHECKTEXTLIST ..\QuestDiary\充值系统\300元密码.txt <$STR(S3)>
#ACT
  GOTO @mimazq
  break
#IF
  CHECKTEXTLIST ..\QuestDiary\充值系统\500元密码.txt <$STR(S3)>
#ACT
  GOTO @mimazq
  break
#IF
  CHECKTEXTLIST ..\QuestDiary\充值系统\20元密码.txt <$STR(S3)>
#ACT
  GOTO @mimazq
  break
#ELSESAY
欢迎使用点卡充值系统 \ \
卡号:<$STR(S2)> <√/FCOLOR=250> \
密码:<$STR(S3)> <×/FCOLOR=249>\ \
状态:<无法识别密码。。。/AUTOCOLOR=254,251,168,191,250,70,245,249,253>\ \
<返回/@main>    <在线购卡/@zaixiangk>    <关闭/@exit>
[@mimazq]
欢迎使用点卡充值系统 \ \
卡号:<$STR(S2)> <√/FCOLOR=250> \
密码:<$STR(S3)> <√/FCOLOR=250>\ \
状态:此卡为<$STR(N4)>元充值卡,此次充值你可以获得:<$STR(N5)> 元宝。\ \
<确定充值/@quedingcz>    <在线购卡/@zaixiangk>    <关闭/@exit>
[@quedingcz]
#IF
  CHECKTEXTLIST ..\QuestDiary\充值系统\10元卡号.txt <$STR(S2)>
  CHECKTEXTLIST ..\QuestDiary\充值系统\10元密码.txt <$STR(S3)>
#ACT
  DELTEXTLIST ..\QuestDiary\充值系统\10元卡号.txt <$STR(S2)>
  DELTEXTLIST ..\QuestDiary\充值系统\10元密码.txt <$STR(S3)>
GOTO @kaishicz
break
#IF
  CHECKTEXTLIST ..\QuestDiary\充值系统\50元卡号.txt <$STR(S2)>
  CHECKTEXTLIST ..\QuestDiary\充值系统\50元密码.txt <$STR(S3)>
#ACT
  DELTEXTLIST ..\QuestDiary\充值系统\50元卡号.txt <$STR(S2)>
  DELTEXTLIST ..\QuestDiary\充值系统\50元密码.txt <$STR(S3)>
GOTO @kaishicz
break
#if
  CHECKTEXTLIST ..\QuestDiary\充值系统\100元卡号.txt <$STR(S2)>
  CHECKTEXTLIST ..\QuestDiary\充值系统\100元密码.txt <$STR(S3)>
#ACT
  DELTEXTLIST ..\QuestDiary\充值系统\100元卡号.txt <$STR(S2)>
  DELTEXTLIST ..\QuestDiary\充值系统\100元密码.txt <$STR(S3)>
GOTO @kaishicz
break
#if
  CHECKTEXTLIST ..\QuestDiary\充值系统\300元卡号.txt <$STR(S2)>
  CHECKTEXTLIST ..\QuestDiary\充值系统\300元密码.txt <$STR(S3)>
#ACT
  DELTEXTLIST ..\QuestDiary\充值系统\300元卡号.txt <$STR(S2)>
  DELTEXTLIST ..\QuestDiary\充值系统\300元密码.txt <$STR(S3)>
GOTO @kaishicz
break
#if
  CHECKTEXTLIST ..\QuestDiary\充值系统\500元卡号.txt <$STR(S2)>
  CHECKTEXTLIST ..\QuestDiary\充值系统\500元密码.txt <$STR(S3)>
#ACT
  DELTEXTLIST ..\QuestDiary\充值系统\500元卡号.txt <$STR(S2)>
  DELTEXTLIST ..\QuestDiary\充值系统\500元密码.txt <$STR(S3)>
GOTO @kaishicz
break
#if
  CHECKTEXTLIST ..\QuestDiary\充值系统\20元卡号.txt <$STR(S2)>
  CHECKTEXTLIST ..\QuestDiary\充值系统\20元密码.txt <$STR(S3)>
#ACT
  DELTEXTLIST ..\QuestDiary\充值系统\20元卡号.txt <$STR(S2)>
  DELTEXTLIST ..\QuestDiary\充值系统\20元密码.txt <$STR(S3)>
GOTO @kaishicz
break
#ELSEACT
  GOTO @zuobijc
[@kaishicz]
#act
  CLEARDELAYGOTO
  GAMEGOLD + <$STR(N5)>
  SENDMSG 5 充值成功:增加<$STR(N5)>元宝,你当前帐户里元宝数为:<$GAMEGOLD>
  SENDMOVEMSG 0 251 249 350 1 %s使用在线充值卡--充值成功。
  break
#say
欢迎使用点卡充值系统 \ \
卡号:<$STR(S2)> <√/FCOLOR=250> \
密码:<$STR(S3)> <√/FCOLOR=250>\ \
状态:<充值成功.../AUTOCOLOR=254,251,168,191,250,70,245,249,253>\ \ \ \ \ \
<关闭/@exit>
[@zuobijc]
#act
CLEARDELAYGOTO
AddTextList ..\QuestDiary\充值系统\非法充值名单.txt <$USERNAME>
#say
你的作弊行为已被系统记录...\ \ \ \ \
<关闭/@exit>
[@zaixiangk]
#IF
#ACT
WebBrowser http://www.ruciwan.com



;\\\\\\\\\\\\\\\\\\\\\\\\\\金币元宝兑换、、、、、、、、
[@金币换]
 \
<2万金币换1元宝/@换2万金币>      <20万金币换10元宝/@换20万金币> \ \
<100万金币换50元宝/@换100万金币>   <200万金币换100元宝/@换200万金币> \ \
<返回/@main>

[@换2万金币]
#if
checkgold 20000
#act
take 金币 20000
gamegold + 1
SENDMSG 0 【%s】用金币成功兑换1元宝。
#elseact
messagebox 金币不足,不能兑换。
break
[@换20万金币]
#if
checkgold 200000
#act
take 金币 200000
gamegold + 10
SENDMSG 0 【%s】用金币成功兑换10元宝。
#elseact
messagebox 金币不足,不能兑换。
break
[@换100万金币]
#if
checkgold 1000000
#act
take 金币 1000000
gamegold + 50
SENDMSG 0 【%s】用金币成功兑换50元宝。
#elseact
messagebox 金币不足,不能兑换。
break
[@换200万金币]
#if
checkgold 2000000
#act
take 金币 2000000
gamegold + 100
SENDMSG 0 【%s】用金币成功兑换100元宝。
#elseact
messagebox 金币不足,不能兑换。
break


[@金币检测]
#if


[@元宝换]
 \
<1元宝换2万金币/@换1元宝>      <10元宝换20万金币/@换10元宝> \ \
<50元宝换100万金币/@换50元宝>   <100元宝换200万金币/@换100元宝> \ \
<返回/@main>

[@换1元宝]
#if
CHECKGAMEGOLD > 0
#act
gamegold - 1
give 金币 20000
SENDMSG 0 【%s】用1元宝成功兑换金币。
#elseact
messagebox 元宝不足,不能兑换。
break

[@换10元宝]
#if
CHECKGAMEGOLD > 9
#act
gamegold - 10
give 金币 200000
SENDMSG 0 【%s】用10元宝成功兑换金币。
#elseact
messagebox 元宝不足,不能兑换。
break

[@换50元宝]
#if
CHECKGAMEGOLD > 49
#act
gamegold - 50
give 金币 1000000
SENDMSG 0 【%s】用50元宝成功兑换金币。
#elseact
messagebox 元宝不足,不能兑换。
break

[@换100元宝]
#if
CHECKGAMEGOLD > 99
#act
gamegold - 100
give 金币 2000000
SENDMSG 0 【%s】用100元宝成功兑换金币。
#elseact
messagebox 元宝不足,不能兑换。
break

TA在排名榜Top100

金币:暂未上榜

发帖:暂未上榜

在线:暂未上榜

1121

帖子

225

金币

0

主题

LV26

Rank: 26Rank: 26Rank: 26Rank: 26Rank: 26Rank: 26

积分
3372
银蛋
0
     在线时间
9 小时
发表于 2017-12-24 09:30:13 | 显示全部楼层
我喜欢这个
回复 支持 反对

使用道具 举报

TA在排名榜Top100

金币:暂未上榜

发帖:暂未上榜

在线:暂未上榜

1164

帖子

207

金币

0

主题

LV35

Rank: 35Rank: 35Rank: 35Rank: 35Rank: 35Rank: 35Rank: 35

积分
3504
银蛋
0
     在线时间
1 小时
发表于 2017-12-24 11:20:07 | 显示全部楼层
和规范化风格的方式
回复 支持 反对

使用道具 举报

发表于 2017-12-24 11:24:21 | 显示全部楼层
这个系统好啊,开私服就少他了
回复 支持 反对

使用道具 举报

TA在排名榜Top100

金币:暂未上榜

发帖:暂未上榜

在线:暂未上榜

138

帖子

71

金币

2

主题

LV6

Rank: 6Rank: 6

积分
180
银蛋
0
     在线时间
0 小时
发表于 2017-12-24 11:55:23 | 显示全部楼层
良心精品 跨服制作
回复 支持 反对

使用道具 举报

TA在排名榜Top100

金币:暂未上榜

发帖:暂未上榜

在线:暂未上榜

1157

帖子

208

金币

0

主题

LV35

Rank: 35Rank: 35Rank: 35Rank: 35Rank: 35Rank: 35Rank: 35

积分
3483
银蛋
0
     在线时间
4 小时
发表于 2017-12-24 14:14:21 | 显示全部楼层
~~~~哼..哼..哼...
回复 支持 反对

使用道具 举报

TA在排名榜Top100

金币:暂未上榜

发帖:暂未上榜

在线:暂未上榜

1115

帖子

214

金币

1

主题

LV26

Rank: 26Rank: 26Rank: 26Rank: 26Rank: 26Rank: 26

积分
3348
银蛋
0
     在线时间
6 小时
发表于 2017-12-24 15:56:20 | 显示全部楼层
貌似我没看懂那~~~
回复 支持 反对

使用道具 举报

TA在排名榜Top100

金币:暂未上榜

发帖:暂未上榜

在线:暂未上榜

1140

帖子

191

金币

0

主题

LV35

Rank: 35Rank: 35Rank: 35Rank: 35Rank: 35Rank: 35Rank: 35

积分
3426
银蛋
0
     在线时间
9 小时
发表于 2017-12-24 18:29:51 | 显示全部楼层
谢谢楼主分享
回复 支持 反对

使用道具 举报

TA在排名榜Top100

金币:暂未上榜

发帖:暂未上榜

在线:暂未上榜

1096

帖子

193

金币

0

主题

LV34

Rank: 34Rank: 34Rank: 34Rank: 34Rank: 34Rank: 34

积分
3300
银蛋
0
     在线时间
7 小时
发表于 2017-12-24 22:03:59 | 显示全部楼层
来吧~~~
回复 支持 反对

使用道具 举报

TA在排名榜Top100

金币:暂未上榜

发帖:暂未上榜

在线:暂未上榜

1128

帖子

198

金币

0

主题

LV34

Rank: 34Rank: 34Rank: 34Rank: 34Rank: 34Rank: 34

积分
3384
银蛋
0
     在线时间
4 小时
发表于 2017-12-24 23:47:14 | 显示全部楼层
鼎力支持!!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

查看内容

传奇版本

金装版本

精华版本

商业版本

赚金币方法

新手教程

返回顶部

手机版|小黑屋|如此玩

Copyright © 2001-2018 RuCiWan Inc. Template by Comsenz Inc. 传奇服务端 | 联系QQ:84985880 | 鲁公网安备 37131102371507号

Powered by RuCiWanX3.4( 陕ICP备19019536号-1 )

快速回复 返回顶部 返回列表