金币通区娱乐脚本-RMB娱乐--金币换成元宝对比---金币娱乐--元宝体系那--GOM引擎

2727611031 · 发表于 2022-11-11 20:19:15

===========================================================
QQ交流群:①615629963（推荐） ②xxxxxxxx（推荐） ③xxxxxxxx（推荐） ④xxxxxxxx（推荐）
===========================================================
资源下载链接失效联系QQ;2727611031
===========================================================

资源下载：

MUL n$娱乐金额 9
DIV n$娱乐金额 10

扣百分10
===========================================================
金币充值比例 1/10 下载链接失效联系QQ 2727611031 处理
论坛业务介绍：服务器租用，版本修改，收徒，传奇一条龙
============================================================
传奇脚本图片介绍：

============================================================
传奇脚本内容介绍：

[@娱乐脚本]
{

#IF
CHECKTEXTLIST ..\QuestDiary\功能文件\服务器状态控制.txt 测试
#ACT
MESSAGEBOX 测试区不支持此功能！
BREAK

#IF
#ACT
MOV N$娱乐金额 0
MOV N$序号0 0
MOV N$序号1 1
MOV N$序号2 2
MOV N$序号3 3
MOV N$序号4 4
MOV N$序号5 5
MOV N$序号6 6
MOV N$序号7 7
MOV N$序号8 8
MOV N$序号9 9

GOTO @娱乐界面

[@娱乐界面]
#IF
#ACT
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录0 <$STR(N$序号0)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录1 <$STR(N$序号1)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录2 <$STR(N$序号2)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录3 <$STR(N$序号3)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录4 <$STR(N$序号4)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录5 <$STR(N$序号5)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录6 <$STR(N$序号6)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录7 <$STR(N$序号7)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录8 <$STR(N$序号8)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录9 <$STR(N$序号9)>

EXTRACTSTRING | <$STR(S$娱乐记录0)> S$区组0 S$人物0 S$金额0 S$状态0 S$时间0
EXTRACTSTRING | <$STR(S$娱乐记录1)> S$区组1 S$人物1 S$金额1 S$状态1 S$时间1
EXTRACTSTRING | <$STR(S$娱乐记录2)> S$区组2 S$人物2 S$金额2 S$状态2 S$时间2
EXTRACTSTRING | <$STR(S$娱乐记录3)> S$区组3 S$人物3 S$金额3 S$状态3 S$时间3
EXTRACTSTRING | <$STR(S$娱乐记录4)> S$区组4 S$人物4 S$金额4 S$状态4 S$时间4
EXTRACTSTRING | <$STR(S$娱乐记录5)> S$区组5 S$人物5 S$金额5 S$状态5 S$时间5
EXTRACTSTRING | <$STR(S$娱乐记录6)> S$区组6 S$人物6 S$金额6 S$状态6 S$时间6
EXTRACTSTRING | <$STR(S$娱乐记录7)> S$区组7 S$人物7 S$金额7 S$状态7 S$时间7
EXTRACTSTRING | <$STR(S$娱乐记录8)> S$区组8 S$人物8 S$金额8 S$状态8 S$时间8
EXTRACTSTRING | <$STR(S$娱乐记录9)> S$区组9 S$人物9 S$金额9 S$状态9 S$时间9

MOV S$微信姓名 <$STR(T31)>
MOV S$微信账号 <$STR(T32)>
MOV S$当前金额 <$GOLDCOUNT>
MOV S$娱乐金额 <$STR(N$娱乐金额)>

MOV S$序号0 <$STR(N$序号0)>
MOV S$序号1 <$STR(N$序号1)>
MOV S$序号2 <$STR(N$序号2)>
MOV S$序号3 <$STR(N$序号3)>
MOV S$序号4 <$STR(N$序号4)>
MOV S$序号5 <$STR(N$序号5)>
MOV S$序号6 <$STR(N$序号6)>
MOV S$序号7 <$STR(N$序号7)>
MOV S$序号8 <$STR(N$序号8)>
MOV S$序号9 <$STR(N$序号9)>

#IF
#ACT
SetStringBlank S$区组0 20 1
SetStringBlank S$区组1 20 1
SetStringBlank S$区组2 20 1
SetStringBlank S$区组3 20 1
SetStringBlank S$区组4 20 1
SetStringBlank S$区组5 20 1
SetStringBlank S$区组6 20 1
SetStringBlank S$区组7 20 1
SetStringBlank S$区组8 20 1
SetStringBlank S$区组9 20 1

SetStringBlank S$人物0 16 1
SetStringBlank S$人物1 16 1
SetStringBlank S$人物2 16 1
SetStringBlank S$人物3 16 1
SetStringBlank S$人物4 16 1
SetStringBlank S$人物5 16 1
SetStringBlank S$人物6 16 1
SetStringBlank S$人物7 16 1
SetStringBlank S$人物8 16 1
SetStringBlank S$人物9 16 1

SetStringBlank S$金额0 8 1
SetStringBlank S$金额1 8 1
SetStringBlank S$金额2 8 1
SetStringBlank S$金额3 8 1
SetStringBlank S$金额4 8 1
SetStringBlank S$金额5 8 1
SetStringBlank S$金额6 8 1
SetStringBlank S$金额7 8 1
SetStringBlank S$金额8 8 1
SetStringBlank S$金额9 8 1

SetStringBlank S$状态0 8 1
SetStringBlank S$状态1 8 1
SetStringBlank S$状态2 8 1
SetStringBlank S$状态3 8 1
SetStringBlank S$状态4 8 1
SetStringBlank S$状态5 8 1
SetStringBlank S$状态6 8 1
SetStringBlank S$状态7 8 1
SetStringBlank S$状态8 8 1
SetStringBlank S$状态9 8 1

SetStringBlank S$时间0 14 1
SetStringBlank S$时间1 14 1
SetStringBlank S$时间2 14 1
SetStringBlank S$时间3 14 1
SetStringBlank S$时间4 14 1
SetStringBlank S$时间5 14 1
SetStringBlank S$时间6 14 1
SetStringBlank S$时间7 14 1
SetStringBlank S$时间8 14 1
SetStringBlank S$时间9 14 1

SetStringBlank S$序号0 4 1
SetStringBlank S$序号1 4 1
SetStringBlank S$序号2 4 1
SetStringBlank S$序号3 4 1
SetStringBlank S$序号4 4 1
SetStringBlank S$序号5 4 1
SetStringBlank S$序号6 4 1
SetStringBlank S$序号7 4 1
SetStringBlank S$序号8 4 1
SetStringBlank S$序号9 4 1
SetStringBlank S$微信姓名 20 1
SetStringBlank S$微信账号 20 1
SetStringBlank S$娱乐金额 20 1
SetStringBlank S$当前金额 20 1

CloseBigDialogBox
OPENMERCHANTBIGDLG 1 192 1 4 1 -100 1 460 5
#SAY
<>\
<>\

<> {序号/FCOLOR=149}    {游戏区组/FCOLOR=250}       {游戏角色/FCOLOR=253} {娱乐金币/FCOLOR=254}{娱乐状态/FCOLOR=243} {娱乐时间/FCOLOR=246} \
<Img:34:1:70:5>\
<> {<$STR(S$序号0)>/FCOLOR=149}{<$STR(S$区组0)>/FCOLOR=250}{<$STR(S$人物0)>/FCOLOR=253}{<$STR(S$金额0)>/FCOLOR=254}{<$STR(S$状态0)>/FCOLOR=243}{<$STR(S$时间0)>/FCOLOR=246}\
<> {<$STR(S$序号1)>/FCOLOR=149}{<$STR(S$区组1)>/FCOLOR=250}{<$STR(S$人物1)>/FCOLOR=253}{<$STR(S$金额1)>/FCOLOR=254}{<$STR(S$状态1)>/FCOLOR=243}{<$STR(S$时间1)>/FCOLOR=246}\
<> {<$STR(S$序号2)>/FCOLOR=149}{<$STR(S$区组2)>/FCOLOR=250}{<$STR(S$人物2)>/FCOLOR=253}{<$STR(S$金额2)>/FCOLOR=254}{<$STR(S$状态2)>/FCOLOR=243}{<$STR(S$时间2)>/FCOLOR=246}\
<> {<$STR(S$序号3)>/FCOLOR=149}{<$STR(S$区组3)>/FCOLOR=250}{<$STR(S$人物3)>/FCOLOR=253}{<$STR(S$金额3)>/FCOLOR=254}{<$STR(S$状态3)>/FCOLOR=243}{<$STR(S$时间3)>/FCOLOR=246}\
<> {<$STR(S$序号4)>/FCOLOR=149}{<$STR(S$区组4)>/FCOLOR=250}{<$STR(S$人物4)>/FCOLOR=253}{<$STR(S$金额4)>/FCOLOR=254}{<$STR(S$状态4)>/FCOLOR=243}{<$STR(S$时间4)>/FCOLOR=246}\
<> {<$STR(S$序号5)>/FCOLOR=149}{<$STR(S$区组5)>/FCOLOR=250}{<$STR(S$人物5)>/FCOLOR=253}{<$STR(S$金额5)>/FCOLOR=254}{<$STR(S$状态5)>/FCOLOR=243}{<$STR(S$时间5)>/FCOLOR=246}\
<> {<$STR(S$序号6)>/FCOLOR=149}{<$STR(S$区组6)>/FCOLOR=250}{<$STR(S$人物6)>/FCOLOR=253}{<$STR(S$金额6)>/FCOLOR=254}{<$STR(S$状态6)>/FCOLOR=243}{<$STR(S$时间6)>/FCOLOR=246}\
<> {<$STR(S$序号7)>/FCOLOR=149}{<$STR(S$区组7)>/FCOLOR=250}{<$STR(S$人物7)>/FCOLOR=253}{<$STR(S$金额7)>/FCOLOR=254}{<$STR(S$状态7)>/FCOLOR=243}{<$STR(S$时间7)>/FCOLOR=246}\
<> {<$STR(S$序号8)>/FCOLOR=149}{<$STR(S$区组8)>/FCOLOR=250}{<$STR(S$人物8)>/FCOLOR=253}{<$STR(S$金额8)>/FCOLOR=254}{<$STR(S$状态8)>/FCOLOR=243}{<$STR(S$时间8)>/FCOLOR=246}\
<> {<$STR(S$序号9)>/FCOLOR=149}{<$STR(S$区组9)>/FCOLOR=250}{<$STR(S$人物9)>/FCOLOR=253}{<$STR(S$金额9)>/FCOLOR=254}{<$STR(S$状态9)>/FCOLOR=243}{<$STR(S$时间9)>/FCOLOR=246}\
<Img:34:1:70:5>\
<> <上一页/@娱乐上一页> <10金币=1元现金/FCOLOR=253> <(回收比例为1:10)/FCOLOR=254><畅爽娱乐·娱乐无忧/FCOLOR=253> <下一页/@娱乐下一页>\ \
<>                            每天出款三次：中午12点下午18点晚上23点\
<>\
<> <微信姓名|253#请输入微信昵称{Fcolor=250}/@@InPutString53>：{<$STR(S$微信姓名)>/FCOLOR=253}  <微信账号|253#如果有@号，请用#号代替{Fcolor=250}/@@InPutString54>：{<$STR(S$微信账号)>/FCOLOR=253}\
<> <娱乐金币|253#请直接输入需要娱乐的钻石金额{Fcolor=250}/@@InPutInteger55>：{<$STR(S$娱乐金额)>/FCOLOR=253}  <当前金币/FCOLOR=250>：{<$STR(S$当前金额)>/scolor=253} \ \
<>                                                          【<确定娱乐/@确认娱乐>】

[@娱乐下一页]

#IF
#ACT
INC N$序号0 10
INC N$序号1 10
INC N$序号2 10
INC N$序号3 10
INC N$序号4 10
INC N$序号5 10
INC N$序号6 10
INC N$序号7 10
INC N$序号8 10
INC N$序号9 10
GOTO @娱乐界面

[@娱乐上一页]
#if
LARGE N$序号0 0
#ACT
DEC N$序号0 10
DEC N$序号1 10
DEC N$序号2 10
DEC N$序号3 10
DEC N$序号4 10
DEC N$序号5 10
DEC N$序号6 10
DEC N$序号7 10
DEC N$序号8 10
DEC N$序号9 10
GOTO @娱乐界面
#ELSEACT
MESSAGEBOX 当前最后一页！

[@InPutString53]
#IF
Equal <$STR(S53)>
#ACT
MessageBox 请输入您的真实姓名！
BREAK

#OR
CheckContainsText @ <$STR(S53)>
CheckContainsText <$STR(S53)>
#ACT
MessageBox 您输入的字符不合法，请重新输入！
#ELSEACT
MOV T31 <$STR(S53)>
GOTO @娱乐界面
BREAK

[@InPutString54]
#IF
Equal <$STR(S54)>
#ACT
MessageBox 请输入您的微信帐号！
BREAK

#OR
CheckContainsText @ <$STR(S53)>
CheckContainsText <$STR(S53)>
#ACT
MessageBox 您输入的字符不合法，请重新输入！如帐号内包含‘@’请使用‘#’代替！
#ELSEACT
MOV T32 <$STR(S54)>
GOTO @娱乐界面
BREAK

[@InPutInteger55]
#IF
Equal T31
#ACT
MessageBox 请输入您的真实姓名！
BREAK

#IF
Equal T32
#ACT
MessageBox 请输入您的微信帐号！
BREAK

#IF
Small <$STR(N55)> 500
#ACT
MOV N$娱乐金额 0
GOTO @娱乐界面
MessageBox 娱乐失败，每次娱乐最少500金币！
BREAK

#IF
CHECKGOLD <$STR(N55)>
NOT Equal T31
NOT Equal T32
#ACT
MOV N$娱乐金额 <$STR(N55)>
GOTO @娱乐界面
BREAK
#ELSEACT
MOV N$娱乐金额 0
GOTO @娱乐界面
MessageBox 娱乐失败，您的金币不足[<$STR(N55)>]！
BREAK

[@确认娱乐]

#IF
Equal T31
#ACT
MessageBox 请输入您的真实姓名！
BREAK

#IF
Equal T32
#ACT
MessageBox 请输入您的微信帐号！
BREAK

#IF
Small <$STR(N$娱乐金额)> 500
#ACT
MessageBox 娱乐失败，每次娱乐最少500金币！
BREAK

#IF
CHECKGOLD <$STR(N$娱乐金额)>
#ELSEACT
MessageBox 娱乐失败，您的金币不足[<$STR(N$娱乐金额)>]！
BREAK

#IF
NOT Equal T31
NOT Equal T32
CHECKGOLD <$STR(N$娱乐金额)>
#ACT
GOTO @开始娱乐
BREAK

[@开始娱乐]
#IF
#ACT
TAKE 金币 <$STR(N$娱乐金额)>

#IF
#ACT
DIV N$娱乐RMBA N$娱乐金额 10

#IF
#ACT
AddTextListEx ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt <$SERVERNAME>|<$USERNAME>|<$STR(N$娱乐金额)>|审核中|<$MONTH>月<$DAY>日<$HOUR>:<$MINUTE>
AddTextListEx ..\..\..\..\赤月通区数据\娱乐数据\娱乐处理.txt <$SERVERNAME>:玩家姓名:<$USERNAME>:娱乐:<$STR(N$娱乐RMBA)>:微信名称:<$STR(T31)>:微信账号:<$STR(T32)>:<$YEAR>年<$MONTH>月<$DAY>日<$HOUR>时<$MINUTE>分:<$SECOND>:未审核
SENDMOVEMSG 0 249 0 100 1 恭喜玩家〖<$USERNAME>〗成功娱乐『<$STR(N$娱乐金额)>金币』，距离苍月岛的海景房又进一步！
SENDMOVEMSG 0 249 0 100 1 恭喜玩家〖<$USERNAME>〗成功娱乐『<$STR(N$娱乐金额)>金币』，距离苍月岛的海景房又进一步！
GOTO @main
BREAK

}

D盘主目录创建文件夹名称赤月通区数据

D盘赤月通区数据文件夹里创建娱乐数据文件夹  娱乐申请  娱乐处理  两个文本

D盘赤月通区数据文件夹里娱乐数据文件夹  创建

RMB点----------------脚本

[@娱乐脚本]
{

#IF
CheckContainsText <$Servername> 测试
#ACT
MESSAGEBOX 测试区不支持此功能！
BREAK

#IF
#ACT
MOV N$娱乐金额 0
MOV N$序号0 0
MOV N$序号1 1
MOV N$序号2 2
MOV N$序号3 3
MOV N$序号4 4
MOV N$序号5 5
MOV N$序号6 6
MOV N$序号7 7
MOV N$序号8 8
MOV N$序号9 9

GOTO @娱乐界面

[@娱乐界面]
#IF
#ACT
#Call [\游戏登陆\娱乐清空.txt] @娱乐清理

GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录0 <$STR(N$序号0)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录1 <$STR(N$序号1)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录2 <$STR(N$序号2)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录3 <$STR(N$序号3)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录4 <$STR(N$序号4)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录5 <$STR(N$序号5)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录6 <$STR(N$序号6)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录7 <$STR(N$序号7)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录8 <$STR(N$序号8)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录9 <$STR(N$序号9)>

EXTRACTSTRING | <$STR(S$娱乐记录0)> S$区组0 S$人物0 S$金额0 S$状态0 S$时间0
EXTRACTSTRING | <$STR(S$娱乐记录1)> S$区组1 S$人物1 S$金额1 S$状态1 S$时间1
EXTRACTSTRING | <$STR(S$娱乐记录2)> S$区组2 S$人物2 S$金额2 S$状态2 S$时间2
EXTRACTSTRING | <$STR(S$娱乐记录3)> S$区组3 S$人物3 S$金额3 S$状态3 S$时间3
EXTRACTSTRING | <$STR(S$娱乐记录4)> S$区组4 S$人物4 S$金额4 S$状态4 S$时间4
EXTRACTSTRING | <$STR(S$娱乐记录5)> S$区组5 S$人物5 S$金额5 S$状态5 S$时间5
EXTRACTSTRING | <$STR(S$娱乐记录6)> S$区组6 S$人物6 S$金额6 S$状态6 S$时间6
EXTRACTSTRING | <$STR(S$娱乐记录7)> S$区组7 S$人物7 S$金额7 S$状态7 S$时间7
EXTRACTSTRING | <$STR(S$娱乐记录8)> S$区组8 S$人物8 S$金额8 S$状态8 S$时间8
EXTRACTSTRING | <$STR(S$娱乐记录9)> S$区组9 S$人物9 S$金额9 S$状态9 S$时间9

MOV S$微信姓名 <$STR(T31)>
MOV S$微信账号 <$STR(T32)>
MOV S$当前金额 <$GamePoint>
MOV S$娱乐金额 <$STR(N$娱乐金额)>

MOV S$序号0 <$STR(N$序号0)>
MOV S$序号1 <$STR(N$序号1)>
MOV S$序号2 <$STR(N$序号2)>
MOV S$序号3 <$STR(N$序号3)>
MOV S$序号4 <$STR(N$序号4)>
MOV S$序号5 <$STR(N$序号5)>
MOV S$序号6 <$STR(N$序号6)>
MOV S$序号7 <$STR(N$序号7)>
MOV S$序号8 <$STR(N$序号8)>
MOV S$序号9 <$STR(N$序号9)>

#IF
#ACT
SetStringBlank S$区组0 20 1
SetStringBlank S$区组1 20 1
SetStringBlank S$区组2 20 1
SetStringBlank S$区组3 20 1
SetStringBlank S$区组4 20 1
SetStringBlank S$区组5 20 1
SetStringBlank S$区组6 20 1
SetStringBlank S$区组7 20 1
SetStringBlank S$区组8 20 1
SetStringBlank S$区组9 20 1

SetStringBlank S$人物0 16 1
SetStringBlank S$人物1 16 1
SetStringBlank S$人物2 16 1
SetStringBlank S$人物3 16 1
SetStringBlank S$人物4 16 1
SetStringBlank S$人物5 16 1
SetStringBlank S$人物6 16 1
SetStringBlank S$人物7 16 1
SetStringBlank S$人物8 16 1
SetStringBlank S$人物9 16 1

SetStringBlank S$金额0 8 1
SetStringBlank S$金额1 8 1
SetStringBlank S$金额2 8 1
SetStringBlank S$金额3 8 1
SetStringBlank S$金额4 8 1
SetStringBlank S$金额5 8 1
SetStringBlank S$金额6 8 1
SetStringBlank S$金额7 8 1
SetStringBlank S$金额8 8 1
SetStringBlank S$金额9 8 1

SetStringBlank S$状态0 8 1
SetStringBlank S$状态1 8 1
SetStringBlank S$状态2 8 1
SetStringBlank S$状态3 8 1
SetStringBlank S$状态4 8 1
SetStringBlank S$状态5 8 1
SetStringBlank S$状态6 8 1
SetStringBlank S$状态7 8 1
SetStringBlank S$状态8 8 1
SetStringBlank S$状态9 8 1

SetStringBlank S$时间0 14 1
SetStringBlank S$时间1 14 1
SetStringBlank S$时间2 14 1
SetStringBlank S$时间3 14 1
SetStringBlank S$时间4 14 1
SetStringBlank S$时间5 14 1
SetStringBlank S$时间6 14 1
SetStringBlank S$时间7 14 1
SetStringBlank S$时间8 14 1
SetStringBlank S$时间9 14 1

SetStringBlank S$序号0 4 1
SetStringBlank S$序号1 4 1
SetStringBlank S$序号2 4 1
SetStringBlank S$序号3 4 1
SetStringBlank S$序号4 4 1
SetStringBlank S$序号5 4 1
SetStringBlank S$序号6 4 1
SetStringBlank S$序号7 4 1
SetStringBlank S$序号8 4 1
SetStringBlank S$序号9 4 1
SetStringBlank S$微信姓名 20 1
SetStringBlank S$微信账号 20 1
SetStringBlank S$娱乐金额 20 1
SetStringBlank S$当前金额 20 1

CloseBigDialogBox
OPENMERCHANTBIGDLG 1 192 1 4 1 -100 1 460 5
#SAY
<>\
<>\

<> {序号/FCOLOR=149}    {游戏区组/FCOLOR=250}       {游戏角色/FCOLOR=253} {娱乐金币/FCOLOR=254}{娱乐状态/FCOLOR=243} {娱乐时间/FCOLOR=246} \
<Img:34:1:70:5>\
<> {<$STR(S$序号0)>/FCOLOR=149}{<$STR(S$区组0)>/FCOLOR=250}{<$STR(S$人物0)>/FCOLOR=253}{<$STR(S$金额0)>/FCOLOR=254}{<$STR(S$状态0)>/FCOLOR=243}{<$STR(S$时间0)>/FCOLOR=246}\
<> {<$STR(S$序号1)>/FCOLOR=149}{<$STR(S$区组1)>/FCOLOR=250}{<$STR(S$人物1)>/FCOLOR=253}{<$STR(S$金额1)>/FCOLOR=254}{<$STR(S$状态1)>/FCOLOR=243}{<$STR(S$时间1)>/FCOLOR=246}\
<> {<$STR(S$序号2)>/FCOLOR=149}{<$STR(S$区组2)>/FCOLOR=250}{<$STR(S$人物2)>/FCOLOR=253}{<$STR(S$金额2)>/FCOLOR=254}{<$STR(S$状态2)>/FCOLOR=243}{<$STR(S$时间2)>/FCOLOR=246}\
<> {<$STR(S$序号3)>/FCOLOR=149}{<$STR(S$区组3)>/FCOLOR=250}{<$STR(S$人物3)>/FCOLOR=253}{<$STR(S$金额3)>/FCOLOR=254}{<$STR(S$状态3)>/FCOLOR=243}{<$STR(S$时间3)>/FCOLOR=246}\
<> {<$STR(S$序号4)>/FCOLOR=149}{<$STR(S$区组4)>/FCOLOR=250}{<$STR(S$人物4)>/FCOLOR=253}{<$STR(S$金额4)>/FCOLOR=254}{<$STR(S$状态4)>/FCOLOR=243}{<$STR(S$时间4)>/FCOLOR=246}\
<> {<$STR(S$序号5)>/FCOLOR=149}{<$STR(S$区组5)>/FCOLOR=250}{<$STR(S$人物5)>/FCOLOR=253}{<$STR(S$金额5)>/FCOLOR=254}{<$STR(S$状态5)>/FCOLOR=243}{<$STR(S$时间5)>/FCOLOR=246}\
<> {<$STR(S$序号6)>/FCOLOR=149}{<$STR(S$区组6)>/FCOLOR=250}{<$STR(S$人物6)>/FCOLOR=253}{<$STR(S$金额6)>/FCOLOR=254}{<$STR(S$状态6)>/FCOLOR=243}{<$STR(S$时间6)>/FCOLOR=246}\
<> {<$STR(S$序号7)>/FCOLOR=149}{<$STR(S$区组7)>/FCOLOR=250}{<$STR(S$人物7)>/FCOLOR=253}{<$STR(S$金额7)>/FCOLOR=254}{<$STR(S$状态7)>/FCOLOR=243}{<$STR(S$时间7)>/FCOLOR=246}\
<> {<$STR(S$序号8)>/FCOLOR=149}{<$STR(S$区组8)>/FCOLOR=250}{<$STR(S$人物8)>/FCOLOR=253}{<$STR(S$金额8)>/FCOLOR=254}{<$STR(S$状态8)>/FCOLOR=243}{<$STR(S$时间8)>/FCOLOR=246}\
<> {<$STR(S$序号9)>/FCOLOR=149}{<$STR(S$区组9)>/FCOLOR=250}{<$STR(S$人物9)>/FCOLOR=253}{<$STR(S$金额9)>/FCOLOR=254}{<$STR(S$状态9)>/FCOLOR=243}{<$STR(S$时间9)>/FCOLOR=246}\
<Img:34:1:70:5>\
<> <上一页/@娱乐上一页> <10金币=1元现金/FCOLOR=253> <(回收比例为1:10)/FCOLOR=254><畅爽娱乐·娱乐无忧/FCOLOR=253> <下一页/@娱乐下一页>\ \
<>                            每天出款三次：中午12点下午18点晚上23点\
<>\
<> <微信姓名|253#请输入微信昵称{Fcolor=250}/@@InPutString53>：{<$STR(S$微信姓名)>/FCOLOR=253}  <微信账号|253#如果有@号，请用#号代替{Fcolor=250}/@@InPutString54>：{<$STR(S$微信账号)>/FCOLOR=253}\
<> <娱乐金币|253#请直接输入需要娱乐的钻石金额{Fcolor=250}/@@InPutInteger55>：{<$STR(S$娱乐金额)>/FCOLOR=253}  <当前金币/FCOLOR=250>：{<$STR(S$当前金额)>/scolor=253} \ \
<>                                                          【<确定娱乐/@确认娱乐>】\

[@娱乐下一页]

#IF
#ACT
INC N$序号0 10
INC N$序号1 10
INC N$序号2 10
INC N$序号3 10
INC N$序号4 10
INC N$序号5 10
INC N$序号6 10
INC N$序号7 10
INC N$序号8 10
INC N$序号9 10

#if
#act
MOV S$娱乐记录0
MOV S$娱乐记录1
MOV S$娱乐记录2
MOV S$娱乐记录3
MOV S$娱乐记录4
MOV S$娱乐记录5
MOV S$娱乐记录6
MOV S$娱乐记录7
MOV S$娱乐记录8
MOV S$娱乐记录9
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录0 <$STR(N$序号0)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录1 <$STR(N$序号1)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录2 <$STR(N$序号2)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录3 <$STR(N$序号3)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录4 <$STR(N$序号4)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录5 <$STR(N$序号5)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录6 <$STR(N$序号6)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录7 <$STR(N$序号7)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录8 <$STR(N$序号8)>
GetRandomText ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt S$娱乐记录9 <$STR(N$序号9)>

#IF
Equal S$娱乐记录0
Equal S$娱乐记录1
Equal S$娱乐记录2
Equal S$娱乐记录3
Equal S$娱乐记录4
Equal S$娱乐记录5
Equal S$娱乐记录6
Equal S$娱乐记录7
Equal S$娱乐记录8
Equal S$娱乐记录9
#act
goto @娱乐上一页
MESSAGEBOX 当前最后一页！
#elseact
GOTO @娱乐界面
break

[@娱乐上一页]
#if
LARGE N$序号0 0
#ACT
DEC N$序号0 10
DEC N$序号1 10
DEC N$序号2 10
DEC N$序号3 10
DEC N$序号4 10
DEC N$序号5 10
DEC N$序号6 10
DEC N$序号7 10
DEC N$序号8 10
DEC N$序号9 10
GOTO @娱乐界面
#ELSEACT
MESSAGEBOX 当前最后一页！

[@InPutString53]
#IF
Equal <$STR(S53)>
#ACT
MessageBox 请输入您的真实姓名！
BREAK

#OR
CheckContainsText @ <$STR(S53)>
CheckContainsText <$STR(S53)>
#ACT
MessageBox 您输入的字符不合法，请重新输入！
#ELSEACT
MOV T31 <$STR(S53)>
GOTO @娱乐界面
BREAK

[@InPutString54]
#IF
Equal <$STR(S54)>
#ACT
MessageBox 请输入您的微信帐号！
BREAK

#OR
CheckContainsText @ <$STR(S53)>
CheckContainsText <$STR(S53)>
#ACT
MessageBox 您输入的字符不合法，请重新输入！如帐号内包含‘@’请使用‘#’代替！
#ELSEACT
MOV T32 <$STR(S54)>
GOTO @娱乐界面
BREAK

[@InPutInteger55]
#IF
Equal T31
#ACT
MessageBox 请输入您的真实姓名！
BREAK

#IF
Equal T32
#ACT
MessageBox 请输入您的微信帐号！
BREAK

#IF
Small <$STR(N55)> 500
#ACT
MOV N$娱乐金额 0
GOTO @娱乐界面
MessageBox 娱乐失败，每次娱乐最少500金币1！
BREAK

#IF
Not Small <$GAMEPOINT> <$STR(N55)>
NOT Equal T31
NOT Equal T32
#ACT
MOV N$娱乐金额 <$STR(N55)>
GOTO @娱乐界面
BREAK
#ELSEACT
MOV N$娱乐金额 0
GOTO @娱乐界面
MessageBox 娱乐失败，您的钻石不足[<$STR(N55)>]2！
BREAK

[@确认娱乐]

#IF
Equal T31
#ACT
MessageBox 请输入您的真实姓名！
BREAK

#IF
Equal T32
#ACT
MessageBox 请输入您的微信帐号！
BREAK

#IF
Small <$STR(N$娱乐金额)> 500
#ACT
MessageBox 娱乐失败，每次娱乐最少500金币3！
BREAK

#IF
Small <$GAMEPOINT> <$STR(N$娱乐金额)>
#ACT
MessageBox 娱乐失败，您的金币不足[<$STR(N$娱乐金额)>]4！
BREAK

#IF
NOT Equal T31
NOT Equal T32
Not Small <$GAMEPOINT> <$STR(N$娱乐金额)>
#ACT
GOTO @开始娱乐
BREAK

[@开始娱乐]
#IF
#ACT
GAMEPOINT - <$STR(N$娱乐金额)>

#IF
#ACT
DIV N$娱乐RMBA N$娱乐金额 10

#IF
#ACT
AddTextListEx ..\..\..\..\赤月通区数据\娱乐数据\娱乐申请.txt <$SERVERNAME>|<$USERNAME>|<$STR(N$娱乐金额)>|审核中|<$MONTH>月<$DAY>日<$HOUR>:<$MINUTE>
AddTextListEx ..\..\..\..\赤月通区数据\娱乐数据\娱乐处理.txt <$SERVERNAME>:玩家姓名:<$USERNAME>:娱乐:<$STR(N$娱乐RMBA)>:微信名称:<$STR(T31)>:微信账号:<$STR(T32)>:<$YEAR>年<$MONTH>月<$DAY>日<$HOUR>时<$MINUTE>分:<$SECOND>:未审核
SENDMOVEMSG 0 249 0 100 1 恭喜玩家〖<$USERNAME>〗成功娱乐『<$STR(N$娱乐金额)>金币』，距离苍月岛的海景房又进一步！
SENDMOVEMSG 0 249 0 100 1 恭喜玩家〖<$USERNAME>〗成功娱乐『<$STR(N$娱乐金额)>金币』，距离苍月岛的海景房又进一步！
GOTO @main
BREAK

}

#Call [\游戏登陆\娱乐清空.txt] @娱乐清理

[@娱乐清理]
{
#if
#act

MOV S$娱乐记录0
MOV S$娱乐记录1
MOV S$娱乐记录2
MOV S$娱乐记录3
MOV S$娱乐记录4
MOV S$娱乐记录5
MOV S$娱乐记录6
MOV S$娱乐记录7
MOV S$娱乐记录8
MOV S$娱乐记录9

MOV S$区组0
MOV S$人物0
MOV S$金额0
MOV S$状态0
MOV S$时间0
MOV S$区组1
MOV S$人物1
MOV S$金额1
MOV S$状态1
MOV S$时间1
MOV S$区组2
MOV S$人物2
MOV S$金额2
MOV S$状态2
MOV S$时间2
MOV S$区组3
MOV S$人物3
MOV S$金额3
MOV S$状态3
MOV S$时间3
MOV S$区组4
MOV S$人物4
MOV S$金额4
MOV S$状态4
MOV S$时间4
MOV S$区组5
MOV S$人物5
MOV S$金额5
MOV S$状态5
MOV S$时间5
MOV S$区组6
MOV S$人物6
MOV S$金额6
MOV S$状态6
MOV S$时间6
MOV S$区组7
MOV S$人物7
MOV S$金额7
MOV S$状态7
MOV S$时间7
MOV S$区组8
MOV S$人物8
MOV S$金额8
MOV S$状态8
MOV S$时间8
MOV S$区组9
MOV S$人物9
MOV S$金额9
MOV S$状态9
MOV S$时间9
break

}

============================================================

wx_JsjHg5Lj · 发表于 2022-11-11 20:19:10

看起来不错，逐枫传奇版本库就是便宜

wx_dnP1a8iE · 发表于 2022-11-13 14:33:37

逐枫版本库传奇素材传奇脚本传奇教程

小别野 · 发表于 2022-12-2 06:25:37

这么强,支持楼主，佩服我爱逐枫版本库

沙尘越_vpiSv · 发表于 2022-12-6 15:04:35

我想学习LEG引擎，LEG引擎，求教

wx_C25ofEFY · 发表于 2023-1-30 01:57:01

爱这里有很多传奇版本库哦免费传奇版本

田世亚 · 发表于 2023-3-19 15:45:59

我想学习BLUE引擎，BLUE引擎，求教

wx_Udmllk0O · 发表于 2023-4-6 00:38:06

不错支持一个了我爱逐枫版本库

王顺Z · 发表于 2023-5-8 16:01:36

不错支持一个了我爱逐枫版本库

啊敏 · 发表于 2023-5-10 13:41:44

我想学习LEG引擎，LEG引擎，求教

用户名		自动登录	找回密码
密码			立即注册

金币通区娱乐脚本-RMB娱乐--金币换成元宝对比---金币娱乐--元宝体系那--GOM引擎

相关帖子