admin 发表于 2018-6-26 06:51:59

GOM引擎智能等级代练脚本

　　　　　　　　　　　   <【等级代练系统】/SCOLOR=146>\
　\
<【亲爱的玩家】:/SCOLOR=146><$USERNAME><,你好！这里是等级代练发布的地方！/SCOLOR=146>   <《开始发布》/@开始发布代练>\
　\
<1.[发布者]：> [<$GLOBAL(代练名1)>]　<当前他的等级：/SCOLOR=213>[<$GLOBAL(代练者级1)>]级 <$STR(S1)>\
　　　　　　　<需要代练到：/SCOLOR=172>[<$GLOBAL(代练到级1)>]级　<代练酬劳：/SCOLOR=245>[<$GLOBAL(代练酬劳1)>]元宝　<剩余时间：/SCOLOR=243>[<$GLOBAL(剩余时间1)>]分钟\
<2.[发布者]：> [<$GLOBAL(代练名2)>]　<当前他的等级：/SCOLOR=213>[<$GLOBAL(代练者级2)>]级 <$STR(S2)>\
　　　　　　　<需要代练到：/SCOLOR=172>[<$GLOBAL(代练到级2)>]级　<代练酬劳：/SCOLOR=245>[<$GLOBAL(代练酬劳2)>]元宝　<剩余时间：/SCOLOR=243>[<$GLOBAL(剩余时间2)>]分钟\
<3.[发布者]：> [<$GLOBAL(代练名3)>]　<当前他的等级：/SCOLOR=213>[<$GLOBAL(代练者级3)>]级 <$STR(S3)>\
　　　　　　　<需要代练到：/SCOLOR=172>[<$GLOBAL(代练到级3)>]级　<代练酬劳：/SCOLOR=245>[<$GLOBAL(代练酬劳3)>]元宝　<剩余时间：/SCOLOR=243>[<$GLOBAL(剩余时间3)>]分钟\
<4.[发布者]：> [<$GLOBAL(代练名4)>]　<当前他的等级：/SCOLOR=213>[<$GLOBAL(代练者级4)>]级 <$STR(S4)>\
　　　　　　　<需要代练到：/SCOLOR=172>[<$GLOBAL(代练到级4)>]级　<代练酬劳：/SCOLOR=245>[<$GLOBAL(代练酬劳4)>]元宝　<剩余时间：/SCOLOR=243>[<$GLOBAL(剩余时间4)>]分钟\
<5.[发布者]：> [<$GLOBAL(代练名5)>]　<当前他的等级：/SCOLOR=213>[<$GLOBAL(代练者级5)>]级 <$STR(S5)>\
　　　　　　　<需要代练到：/SCOLOR=172>[<$GLOBAL(代练到级5)>]级　<代练酬劳：/SCOLOR=245>[<$GLOBAL(代练酬劳5)>]元宝　<剩余时间：/SCOLOR=243>[<$GLOBAL(剩余时间5)>]分钟\
　\
<1.接手代练后,等级将会变成发布者的等级！/SCOLOR=9>\
<2.每条代练广告需要交纳10万元宝.持续1小时/SCOLOR=9>\
<3.发布的等级不能低于50级,发布的酬劳不能低于1万元宝！/SCOLOR=9>\
<4.若发布者离线期间,代练完成或广告到期,系统会在下次登录时处理！/SCOLOR=9>\


[@接手此人代练1]
#if
CHECKVAR GLOBAL 代练名1 = <$USERNAME>
#ACT
MessageBox 不能接手自己的代练！
BREAK
#if
CHECKVAR GLOBAL 代练到级1 > <$LEVEL>
#ACT
MessageBox 你的等级不符合他的要求,需要达到:<$GLOBAL(代练到级1)>级
BREAK
#if
CHECKVAR GLOBAL 代练到级1 < 50
#ACT
GOTO @main
BREAK
#if
CheckOnline <$GLOBAL(代练名1)>
#ACT
GAMEGOLD + <$GLOBAL(代练酬劳1)>
MOV S5 <$GLOBAL(代练名1)>
S5.GOTO @发布者在线
CHANGELEVEL = 1
CHANGELEVEL + <$GLOBAL(代练者级1)>
CHANGELEVEL - 1
SENDMSG 0 ◆[等级代练通知]◆：[<$USERNAME>],完成了[<$GLOBAL(代练名1)>]发布的[<$GLOBAL(代练到级1)>]级,代练请求,获得了酬劳金额[<$GLOBAL(代练酬劳1)>]个元宝!
CALCVAR GLOBAL 代练名1 =
SAVEVAR GLOBAL 代练名1 ..\QuestDiary\名单专用\等级代练系统\系统代练数据.txt
CALCVAR GLOBAL 代练者级1 = 0
SAVEVAR GLOBAL 代练者级1 ..\QuestDiary\名单专用\等级代练系统\系统代练数据.txt
CALCVAR GLOBAL 代练到级1 = 0
SAVEVAR GLOBAL 代练到级1 ..\QuestDiary\名单专用\等级代练系统\系统代练数据.txt
CALCVAR GLOBAL 代练酬劳1 = 0
SAVEVAR GLOBAL 代练酬劳1 ..\QuestDiary\名单专用\等级代练系统\系统代练数据.txt
CALCVAR GLOBAL 剩余时间1 = 0
SAVEVAR GLOBAL 剩余时间1 ..\QuestDiary\名单专用\等级代练系统\系统代练数据.txt
GOTO @main
#ELSEACT
GAMEGOLD + <$GLOBAL(代练酬劳1)>
AddTextList .\QuestDiary\gm003名单专用\等级代练系统\代练完成.txt <$GLOBAL(代练名1)>
CHANGELEVEL = 1
CHANGELEVEL + <$GLOBAL(代练者级1)>
CHANGELEVEL - 1
SENDMSG 0 ◆[等级代练通知]◆：[<$USERNAME>],完成了[<$GLOBAL(代练名1)>]发布的[<$GLOBAL(代练到级1)>]级,代练请求,获得了酬劳金额[<$GLOBAL(代练酬劳1)>]个元宝!
CALCVAR GLOBAL 代练名1 =
SAVEVAR GLOBAL 代练名1 ..\QuestDiary\gm003名单专用\等级代练系统\系统代练数据.txt
CALCVAR GLOBAL 代练者级1 = 0
SAVEVAR GLOBAL 代练者级1 ..\QuestDiary\gm003名单专用\等级代练系统\系统代练数据.txt
CALCVAR GLOBAL 代练到级1 = 0
SAVEVAR GLOBAL 代练到级1 ..\QuestDiary\gm003名单专用\等级代练系统\系统代练数据.txt
CALCVAR GLOBAL 代练酬劳1 = 0
SAVEVAR GLOBAL 代练酬劳1 ..\QuestDiary\gm003名单专用\等级代练系统\系统代练数据.txt
CALCVAR GLOBAL 剩余时间1 = 0
SAVEVAR GLOBAL 剩余时间1 ..\QuestDiary\gm003名单专用\等级代练系统\系统代练数据.txt
GOTO @main

一样的天空 发表于 2018-7-2 10:23:05

撸过。支持。。。支持。。。

夜乄枫影 发表于 2018-7-26 06:16:10

66666668

季节 发表于 2018-12-23 08:16:58

木子九天 发表于 2019-1-2 07:15:51

不错，楼主用心了，我等必须支持下

阿鲁卡多 发表于 2019-2-2 10:57:31

啥也不说了，感谢楼主分享哇！

榀婲刄 发表于 2019-2-13 10:48:20

不错，楼主用心了，我等必须支持下

魖冥 发表于 2019-2-24 10:12:17

感谢楼主分享，2019发大财！！！

獨特愛戀 发表于 2019-2-26 10:33:37

很干净的论坛，不错！

刀三十三阿罪 发表于 2019-2-28 10:13:55

为保住菊花，这个一定得回复！
页: [1] 2 3 4 5
查看完整版本: GOM引擎智能等级代练脚本