全服自定义排行榜.ini 
 
INI内容 
 
[鲜花]  ;全服自定义排行榜.ini=文件;[鲜花]=节 ;bluem2 =键 ;100=值 
bluem2=100 
网易=100 
百度=100 
 
如果手动修改ini内容后,请使用命令,INI_RELOAD  文件     //重新加载文件,可以用于手动修改了文本文件的情况下。 
 
 
示例脚本:以下脚本只是演示,请GM自行完善 
 
注:脚本使用的是S1-S20 M1-M20的个人变量,如果你的版本里有,请自行修改。 
 
[@main] 
<排序鲜花的排名(名字+数值)/@Get>   <排序鲜花的排名(名字)/@GetEx>\\ 
 
<检查鲜花的排名(名字)/@Get1>\\ 
 
<清理鲜花数据/@INI_CLEAR_SECTION>\\  
 
<关闭/@exit > 
 
[@Get1] 
#IF 
EQUAL S1 <$USERNAME> 
#ACT 
MessageBox 目前你排名第一。 
BREAK 
#IF 
EQUAL S2 <$USERNAME> 
#ACT 
MessageBox 目前你排名第二。 
BREAK 
#IF 
EQUAL S3 <$USERNAME> 
#ACT 
MessageBox 目前你排名第三。 
BREAK 
#IF 
EQUAL S4 <$USERNAME> 
#ACT 
MessageBox 目前你排名第四。 
BREAK 
#IF 
EQUAL S5 <$USERNAME> 
#ACT 
MessageBox 目前你排名第五。 
BREAK 
#IF 
EQUAL S6 <$USERNAME> 
#ACT 
MessageBox 目前你排名第六。 
BREAK 
#IF 
EQUAL S7 <$USERNAME> 
#ACT 
MessageBox 目前你排名第七。 
BREAK 
#IF 
EQUAL S8 <$USERNAME> 
#ACT 
MessageBox 目前你排名第八。 
BREAK 
#IF 
EQUAL S9 <$USERNAME> 
#ACT 
MessageBox 目前你排名第九。 
BREAK 
#IF 
EQUAL S10 <$USERNAME> 
#ACT 
MessageBox 目前你排名第十。 
BREAK 
#ELSEACT 
MessageBox 榜上无名,请再接再厉。 
BREAK 
 
[@INI_CLEAR_SECTION] 
#IF 
CHECKLEVELEX > 0 
#ACT 
INI_CLEAR_SECTION ..\QuestDiary\功能脚本\全服自定义排行榜.ini 鲜花 
INI_SAVE ..\QuestDiary\功能脚本\全服自定义排行榜.ini 
INI_SORT_DELETE INI_排名__鲜花_IV 
SENDMSG 5 清楚鲜花数据成功。 
 
[@Get] 
#IF 
CHECKLEVELEX > 0 
#ACT 
INI_SORT_READ_SECTION_VALUES ..\QuestDiary\功能脚本\全服自定义排行榜.ini 鲜花 1 1 1 INI_排名__鲜花_IV 0 
INI_SORT_SECTION_VALUES_COUNT INI_排名__鲜花_IV D0 
;SENDMSG 5 获取到排行数据:<$STR(D0)>条 
 
#IF 
LARGE D0 1 
#ACT 
INI_SORT_GET_SECTION_STRING INI_排名__鲜花_IV S0 
;;P0用于限制最多的排名次数 
MOV P0 1 
;;S92用于累计排名,#ELSESAY的显示调用 
MOV S92 
SENDMSG 5 正在计算排名,请稍后。。。 
DELAYGOTO 1 @GetIdentValueLoop 
#ELSEACT 
MessageBox 目前没有数据。 
BREAK 
 
 
;按顺序获取排行字符串(IDENT_VALUE)到S1~S20 
[@GetIdentValueLoop] 
#IF 
LARGE D0 1 
SMALL P0 10 
#ACT 
MOV S90 S 
INC S90 <$STR(P0)> 
INC S92 <COLOR=clYellow> 
INC S92   
INC S92 <$STR(P0)>、 
INC S92 <COLOR=$F7FFFF> 
INI_SORT_GET_IDENT_VALUE_STRING INI_排名__鲜花_IV <$STR(P0)> <$STR(S90)> 
 
MOV S91 <$STR(S 
INC S91 <$STR(P0)> 
INC S91 )> 
 
INC S92 <$STR(S91)> 
INC S92 \ 
;SENDMSG 5 排名<$STR(P0)>:<$STR(S91)> 
 
DEC D0 1 
INC P0 1 
 
DELAYGOTO 1 @GetIdentValueLoop 
#SAY 
<$STR(S0)>的当前排名是:\ 
<$STR(S92)>\ 
<关闭/@exit> 
#ACT 
BREAK 
 
#IF 
LARGE D0 1 
LARGE P0 9 
SMALL P0 21 
#ACT 
MOV S90 S 
INC S90 <$STR(P0)> 
INC S92 <COLOR=clYellow> 
INC S92 <$STR(P0)>、 
INC S92 <COLOR=$F7FFFF> 
INI_SORT_GET_IDENT_VALUE_STRING INI_排名__鲜花_IV <$STR(P0)> <$STR(S90)> 
 
MOV S91 <$STR(S 
INC S91 <$STR(P0)> 
INC S91 )> 
 
INC S92 <$STR(S91)> 
INC S92 \ 
;SENDMSG 5 排名<$STR(P0)>:<$STR(S91)> 
 
DEC D0 1 
INC P0 1 
 
DELAYGOTO 1 @GetIdentValueLoop 
#SAY 
<$STR(S0)>的当前排名是:\ 
<$STR(S92)>\ 
<关闭/@exit> 
#ELSESAY 
<$STR(S0)>的当前排名是:\ 
<$STR(S92)>\ 
<关闭/@exit> 
 
#ELSEACT 
SENDMSG 5 鲜花排名完毕。 
BREAK 
 
 
 
[@GetEx] 
#IF 
CHECKLEVELEX > 0 
#ACT 
INI_RELOAD ..\QuestDiary\功能脚本\全服自定义排行榜.ini 
INI_SORT_READ_SECTION_VALUES ..\QuestDiary\功能脚本\全服自定义排行榜.ini 鲜花 1 1 1 INI_排名__鲜花_IVEX 0 
INI_SORT_SECTION_VALUES_COUNT INI_排名__鲜花_IVEX D0 
;SENDMSG 5 获取鲜花排行数据:<$STR(D0)>条 
 
#IF 
LARGE D0 1 
#ACT 
INI_SORT_GET_SECTION_STRING INI_排名__鲜花_IVEX S0 
;;P0用于限制最多的排名次数 
MOV P0 1 
;;S92用于累计排名,#ELSESAY的显示调用 
MOV S92 
SENDMSG 5 正在计算排名,请稍后。。。 
DELAYGOTO 1 @GetIdentValueLoopEx 
BREAK 
#ELSEACT 
MessageBox 目前没有数据。 
BREAK 
 
;按顺序获取排行,分别获取IDENT和VALUE到S1~S20 
[@GetIdentValueLoopEx] 
#IF 
LARGE D0 1 
SMALL P0 10 
#ACT 
MOV S90 S 
INC S90 <$STR(P0)> 
MOV S95 M 
INC S95 <$STR(P0)> 
INC S92 <COLOR=clYellow> 
INC S92   
INC S92 <$STR(P0)>、 
INC S92 <COLOR=$F7FFFF> 
INI_SORT_GET_IDENT_STRING INI_排名__鲜花_IVEX <$STR(P0)> <$STR(S90)> 
INI_SORT_GET_VALUE_INTEGER INI_排名__鲜花_IVEX <$STR(P0)> <$STR(S95)> 
 
MOV S91 <$STR(S 
INC S91 <$STR(P0)> 
INC S91 )> 
 
MOV S93 <$STR(M 
INC S93 <$STR(P0)> 
INC S93 )> 
 
INC S92 <$STR(S91)> 
INC S92 "  " 
INC S92 "  鲜花数:" 
INC S92 <$STR(S93)> 
INC S92 " " 
INC S92 \ 
;;SENDMSG 5 排名<$STR(P0)>:<$STR(S91)> 
DEC D0 1 
INC P0 1 
DELAYGOTO 1 @GetIdentValueLoopEx 
#SAY 
<$STR(S0)>的当前排名是:\ 
<$STR(S92)>\ 
<关闭/@exit> 
#ACT 
BREAK 
 
#IF 
LARGE D0 1 
LARGE P0 9 
SMALL P0 23 
#ACT 
MOV S90 S 
INC S90 <$STR(P0)> 
MOV S95 M 
INC S95 <$STR(P0)> 
INC S92 <COLOR=clYellow> 
INC S92 <$STR(P0)>、 
INC S92 <COLOR=$F7FFFF> 
 
INI_SORT_GET_IDENT_STRING INI_排名__鲜花_IVEX <$STR(P0)> <$STR(S90)> 
INI_SORT_GET_VALUE_INTEGER INI_排名__鲜花_IVEX <$STR(P0)> <$STR(S95)> 
 
MOV S91 <$STR(S 
INC S91 <$STR(P0)> 
INC S91 )> 
 
MOV S93 <$STR(M 
INC S93 <$STR(P0)> 
INC S93 )> 
 
INC S92 <$STR(S91)> 
INC S92 "  " 
INC S92 "  鲜花数:" 
INC S92 <$STR(S93)> 
INC S92 " " 
INC S92 \ 
;;SENDMSG 5 排名<$STR(P0)>:<$STR(S91)> 
DEC D0 1 
INC P0 1 
DELAYGOTO 1 @GetIdentValueLoopEx 
#SAY 
<$STR(S0)>的当前排名是:\ 
<$STR(S92)>\ 
<关闭/@exit> 
#ELSESAY 
<$STR(S0)>的当前排名是:\ 
<$STR(S92)>\ 
<关闭/@exit> 
#ELSEACT 
SENDMSG 5 鲜花排名完毕。 
BREAK 
 
 |