充值元宝排行榜

色胚

MerChant做个NPC
ph 3 345 342 游戏排行  0  12  1

具体效果如下
www.cfabc.netQManag
先声明下自定义变量用到的2个自定义变量有些平台可能是别的 你自己修改成统一的
[@Login]
#if
CHECKLEVELEX > 0
#act
VAR Integer HUMAN 消费积分
VAR Integer HUMAN 元宝消费
LOADVAR HUMAN 消费积分 ..\QuestDiary\充值积分\消费积分Save.txt
LOADVAR HUMAN 元宝消费 ..\QuestDiary\充值积分\元宝消费Save.txt
#CALL [\充值积分\排行刷新.txt] @排行刷新

NPC脚本ph-3 占用了A变量（全局变量可保存)
[@MAIN]
<第一名〖天下首富〗/AUTOCOLOR=254>:<$STR(A81)>     <共充值/AUTOCOLOR=253>:<$STR(G101)><个元宝/AUTOCOLOR=253>\
<第二名〖首富逼人〗/AUTOCOLOR=254>:<$STR(A82)>     <共充值/AUTOCOLOR=253>:<$STR(G102)><个元宝/AUTOCOLOR=253>\
<第三名〖富甲一方〗/AUTOCOLOR=254>:<$STR(A83)>     <共充值/AUTOCOLOR=253>:<$STR(G103)><个元宝/AUTOCOLOR=253>\
<第四名〖富贵荣华〗/AUTOCOLOR=254>:<$STR(A84)>     <共充值/AUTOCOLOR=253>:<$STR(G104)><个元宝/AUTOCOLOR=253>\
<第五名〖家财万贯〗/AUTOCOLOR=254>:<$STR(A85)>     <共充值/AUTOCOLOR=253>:<$STR(G105)><个元宝/AUTOCOLOR=253>\
<第六名〖一掷千金〗/AUTOCOLOR=254>:<$STR(A86)>     <共充值/AUTOCOLOR=253>:<$STR(G106)><个元宝/AUTOCOLOR=253>\
<第七名〖财运亨想〗/AUTOCOLOR=254>:<$STR(A87)>     <共充值/AUTOCOLOR=253>:<$STR(G107)><个元宝/AUTOCOLOR=253>\
<第八名〖财大气粗〗/AUTOCOLOR=254>:<$STR(A88)>     <共充值/AUTOCOLOR=253>:<$STR(G108)><个元宝/AUTOCOLOR=253>\ \

然后需要创建几个储存名单、消费积分、元宝消费什么的TXT有些平台也是自动生成的可能路径会不一致你需要手动改成和QM里面保存的路径一致
\QuestDiary\充值积分下面
排行刷新脚本占用了G变量(也是全局变量 可保存的类型)
[@排行刷新]
{
#IF
checknamelist ..\QuestDiary\充值积分\排行1.txt
#ACT
GOTO @jianc1
BREAK
#IF
checknamelist ..\QuestDiary\充值积分\排行2.txt
#ACT
GOTO @jianc2
BREAK
#IF
checknamelist ..\QuestDiary\充值积分\排行3.txt
#ACT
GOTO @jianc3
BREAK
#IF
checknamelist ..\QuestDiary\充值积分\排行4.txt
#ACT
GOTO @jianc4
BREAK
#IF
checknamelist ..\QuestDiary\充值积分\排行5.txt
#ACT
GOTO @jianc5
BREAK
#IF
checknamelist ..\QuestDiary\充值积分\排行6.txt
#ACT
GOTO @jianc6
BREAK
#IF
checknamelist ..\QuestDiary\充值积分\排行7.txt
#ACT
GOTO @jianc7
BREAK
#IF
checknamelist ..\QuestDiary\充值积分\排行8.txt
#ACT
GOTO @jianc8
BREAK
#IF
CHECKVAR HUMAN 消费积分 > 0
#ACT
MOV G100 <$HUMAN(消费积分)>
goto @shuaxin
BREAK

[@jianc1]
#IF
CHECKVAR HUMAN 消费积分 > <$STR(G101)>
#ACT
CLEARNAMELIST ..\QuestDiary\充值积分\排行1.txt
SENDMSG 5 避免数据出错，请小退后再登陆！
SENDMSG 5 避免数据出错，请小退后再登陆！
KICK
BREAK
[@jianc2]
#IF
CHECKVAR HUMAN 消费积分 > <$STR(G102)>
#ACT
CLEARNAMELIST ..\QuestDiary\充值积分\排行2.txt
SENDMSG 5 避免数据出错，请小退后再登陆！
SENDMSG 5 避免数据出错，请小退后再登陆！
KICK
BREAK
[@jianc3]
#IF
CHECKVAR HUMAN 消费积分 > <$STR(G103)>
#ACT
CLEARNAMELIST ..\QuestDiary\充值积分\排行3.txt
SENDMSG 5 避免数据出错，请小退后再登陆！
SENDMSG 5 避免数据出错，请小退后再登陆！
KICK
BREAK
[@jianc4]
#IF
CHECKVAR HUMAN 消费积分 > <$STR(G104)>
#ACT
CLEARNAMELIST ..\QuestDiary\充值积分\排行4.txt
SENDMSG 5 避免数据出错，请小退后再登陆！
SENDMSG 5 避免数据出错，请小退后再登陆！
KICK
BREAK
[@jianc5]
#IF
CHECKVAR HUMAN 消费积分 > <$STR(G105)>
#ACT
CLEARNAMELIST ..\QuestDiary\充值积分\排行5.txt
SENDMSG 5 避免数据出错，请小退后再登陆！
SENDMSG 5 避免数据出错，请小退后再登陆！
KICK
BREAK
[@jianc6]
#IF
CHECKVAR HUMAN 消费积分 > <$STR(G106)>
#ACT
CLEARNAMELIST ..\QuestDiary\充值积分\排行6.txt
SENDMSG 5 避免数据出错，请小退后再登陆！
SENDMSG 5 避免数据出错，请小退后再登陆！
KICK
BREAK
[@jianc7]
#IF
CHECKVAR HUMAN 消费积分 > <$STR(G107)>
#ACT
CLEARNAMELIST ..\QuestDiary\充值积分\排行7.txt
SENDMSG 5 避免数据出错，请小退后再登陆！
SENDMSG 5 避免数据出错，请小退后再登陆！
KICK
BREAK
[@jianc8]
#IF
CHECKVAR HUMAN 消费积分 > <$STR(G108)>
#ACT
CLEARNAMELIST ..\QuestDiary\充值积分\排行8.txt
SENDMSG 5 避免数据出错，请小退后再登陆！
SENDMSG 5 避免数据出错，请小退后再登陆！
KICK
BREAK

[@shuaxin]
#IF
large G100 <$STR(G101)>
#ACT
MOV G101 <$STR(G100)>
MOV A81 <$USERNAME>
CLEARNAMELIST ..\QuestDiary\充值积分\排行1.txt
addnamelist ..\QuestDiary\充值积分\排行1.txt
BREAK

#IF
large G100 <$STR(G102)>
#ACT
MOV G102 <$STR(G100)>
MOV A82 <$USERNAME>
CLEARNAMELIST ..\QuestDiary\充值积分\排行2.txt
addnamelist ..\QuestDiary\充值积分\排行2.txt
BREAK

#IF
large G100 <$STR(G103)>
#ACT
MOV G103 <$STR(G100)>
MOV A83 <$USERNAME>
CLEARNAMELIST ..\QuestDiary\充值积分\排行3.txt
addnamelist ..\QuestDiary\充值积分\排行3.txt
BREAK

#IF
large G100 <$STR(G104)>
#ACT
MOV G104 <$STR(G100)>
MOV A84 <$USERNAME>
CLEARNAMELIST ..\QuestDiary\充值积分\排行4.txt
addnamelist ..\QuestDiary\充值积分\排行4.txt
BREAK

#IF
large G100 <$STR(G105)>
#ACT
MOV G105 <$STR(G100)>
MOV A85 <$USERNAME>
CLEARNAMELIST ..\QuestDiary\充值积分\排行5.txt
addnamelist ..\QuestDiary\充值积分\排行5.txt
BREAK

#IF
large G100 <$STR(G106)>
#ACT
MOV G106 <$STR(G100)>
MOV A86 <$USERNAME>
CLEARNAMELIST ..\QuestDiary\充值积分\排行6.txt
addnamelist ..\QuestDiary\充值积分\排行6.txt
BREAK

#IF
large G100 <$STR(G107)>
#ACT
MOV G107 <$STR(G100)>
MOV A87 <$USERNAME>
CLEARNAMELIST ..\QuestDiary\充值积分\排行7.txt
addnamelist ..\QuestDiary\充值积分\排行7.txt
BREAK

#IF
large G100 <$STR(G108)>
#ACT
MOV G108 <$STR(G100)>
MOV A88 <$USERNAME>
CLEARNAMELIST ..\QuestDiary\充值积分\排行8.txt
addnamelist ..\QuestDiary\充值积分\排行8.txt
BREAK

}

www.cfabc.net


本文为传奇素材网——色胚（原创
另外最近在研究legend引擎 有没有懂legend运9变色的朋友 指点下我在有问必答的提问谢谢了；

admin

leg直接放弃就好了 问题太多

色胚

admin 发表于 2014-5-7 12:18
leg直接放弃就好了 问题太多

个人爱好吧 我始终是坚持

风流欧师傅

传奇素材网都是好东西

风流欧师傅

传奇素材网都是好东西

夜色疗人

这需要冲值脚本支持的

那些年..

看看。。。。。。。。。。。。。

无休哥哥

哦也~~~~~~~~~~

zhao3k

: 充值元宝排行榜 [修改]

w5252099b

看看~~~~~~~~~~~