传奇充值元宝排行榜设置教程

MerChant做个NPC
ph3345342游戏排行0121

具体效果如下

 

QManag
先声明下自定义变量用到的2个自定义变量有些平台可能是别的你自己修改成统一的
[@Login]
#if
CHECKLEVELEX>0
#act
VARIntegerHUMAN消费积分
VARIntegerHUMAN元宝消费
LOADVARHUMAN消费积分..\QuestDiary\充值积分\消费积分Save.txt
LOADVARHUMAN元宝消费..\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
CHECKVARHUMAN消费积分>0
#ACT
MOVG100<$HUMAN(消费积分)>
goto@shuaxin
BREAK

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

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

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

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

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

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

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

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

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

}