黑娃 发表于 2022-6-22 08:21:26

彩虹引擎得万能排序脚本

NPC调用脚本方式GOTO @标签&参数1&参数&参数3&参数4&参数5
参数1    需要在NPC上展示的行数
参数2    读取的起始行数,一般是0
参数3    排序方式-1/由小到大排列   0/由大到小排列   1/按行顺序排列
参数4    用于参数3排序的位置,必须是数值。比如需要排列积分高低,就选择他在文本中的位置


<≡/@红袖商城&8&0&1&1&@红袖商城>    按行排列
<↓/@红袖商城&8&0&-1&1&@红袖商城>    小到大
<↑/@红袖商城&8&0&0&1&@红袖商城>   大到小


goto @红袖商城&8&<$DEC^$INC.$STR(M91).$STR(M96)^$STR(M90)>&1&1&@红袖商城          刷新当前页面
刷新这个标签只是自动计算了需要读取的位置,其他参数不变。


掌握了这几种调用方式,那么就可以开始使用这个脚本写任何排序。




<$STR(S282)>   读取到的内容,需要自行格式化。
<$STR(S283)>   自动翻页标签按钮,脚本自动生成



[@原野排行]
;M90      显示行数                7
;M91      读取位置                0
;M92      排序方式                -1,优先小   0,优先大    1,按行    2,随机查询
;M93      参数位置                4
;S280      格式化方式      酒馆排行
;S281      文件路径               
;S282      返回的文字
;S283      返回的按钮
{

#IF
!SMALL M90 1
!SMALL M91 0
!SMALL M92 -1
!SMALL M93 0
!EQUAL $STR(S280)
CHECKTXT <$STR(S281)>
#ACT
MOV M94 $TXTLINE(<$STR(S281)>)
MOV M95 0
MOV M96 0
MOV S282
GOTO @原野排行_READ
BREAK
#ELSEACT
MOV S282 \\\#32#32#32未查询到相关信息...
MOV S283 \\\#32#32#32<离开/@EXIT>

#IF
ISADMIN
#ACT
SENDMSG 6 调试信息:该信息仅GM可见。
SENDMSG 6 参数:<$STR(M90)>
SENDMSG 6 参数:<$STR(M91)>
SENDMSG 6 参数:<$STR(M92)>
SENDMSG 6 参数:<$STR(M93)>
SENDMSG 6 参数:<$STR(S280)>
REPLACETEXT S281 \ ╲
SENDMSG 6 参数:<$STR(S281)>
BREAK


[@原野排行_READ]
#IF
LARGE M94 $STR(M91)
SMALL M95 $STR(M90)
SMALL M92 1
#ACT
READRANDOMSTR <$STR(S281)> S289 $STR(M91) $STR(M92) $STR(M93) |

#IF
LARGE M94 $STR(M91)
SMALL M95 $STR(M90)
EQUAL M92 2
#ACT
MOVR M96 $DEC.$STR(M94).1
INC M96 1
READRANDOMSTR <$STR(S281)> S289 $STR(M96)

#IF
LARGE M94 $STR(M91)
SMALL M95 $STR(M90)
EQUAL M92 1
#ACT
READRANDOMSTR <$STR(S281)> S289 $STR(M91)

#IF
!EQUAL S289
#ACT
INC M91 1
INC M95 1
GOTO <$STR(S280)>_格式
MOV S289
GOTO @原野排行_READ
BREAK

#IF
SMALL M95 $STR(M90)
#ACT
INC M95 1
INC M96 1
INC S282 \
GOTO @原野排行_READ
BREAK

#IF
LARGE M91 $STR(M90)
#ACT
MOV M97 $INC.$STR(M91).$STR(M96)
DEC M97 $MULT.$STR(M90).2
FORMATSTR S284 <上一页/%s&%s&%s&%s&%s&%s> <$STR(S280)>|<$STR(M90)>|<$STR(M97)>|<$STR(M92)>|<$STR(M93)>|<$STR(S280)>
#ELSEACT
MOV S284 <COLOR=GRAY#32上一页>

#IF
LARGE M94 $STR(M91)
#ACT
FORMATSTR S285 <下一页/%s&%s&%s&%s&%s&%s> <$STR(S280)>|<$STR(M90)>|<$STR(M91)>|<$STR(M92)>|<$STR(M93)>|<$STR(S280)>
MOV M98 $STR(M91)
CEIL M98 $STR(M90)
MOV M99 $STR(M94)
CEIL M99 $STR(M90)
FORMATSTR S286 <第1页/%s&%s&%s&%s&%s&%s> <$STR(S280)>|<$STR(M90)>|0|<$STR(M92)>|<$STR(M93)>|<$STR(S280)>
;FORMATSTR S283 %s%-6s%s%10s╱%-10s%s <$STR(S286)>|#32|<$STR(S284)>|<$STR(M98)>|<$STR(M99)>|<$STR(S285)>

FORMATSTR S283 %s%10s╱%-10s%s <$STR(S284)>|<$STR(M98)>|<$STR(M99)>|<$STR(S285)>
BREAK
#ELSEACT
MOV S285 <COLOR=GRAY#32下一页>
MOV M98 $STR(M91)
CEIL M98 $STR(M90)
MOV M99 $STR(M94)
CEIL M99 $STR(M90)
FORMATSTR S286 <第1页/%s&%s&%s&%s&%s&%s> <$STR(S280)>|<$STR(M90)>|0|<$STR(M92)>|<$STR(M93)>|<$STR(S280)>
;FORMATSTR S283 %s%-6s%s%10s╱%-10s%s <$STR(S286)>|#32|<$STR(S284)>|<$STR(M98)>|<$STR(M99)>|<$STR(S285)>
FORMATSTR S283 %s%10s╱%-10s%s <$STR(S284)>|<$STR(M98)>|<$STR(M99)>|<$STR(S285)>
BREAK


;------------------------------------------------------------------------------------------------------------------------格式化方式-------------------------------------------

[@别墅展示_格式]
#IF
!EQUAL S289
#ACT
MOV P97 $STR(M91)
MOD P97 $STR(M90)
#ELSEACT
BREAK

#IF
POS 123 $STR(P97)
#ACT
SPLIT $STR(S289) | S250
MOV S181 $STR(S252)
INC S251 ***
FILLTEXT S251 18
FILLTEXT S252 18
MOV P90 $STR(S256)
DEC P90 3
FORMATSTR S256 <COLOR=~别墅等级:%s$进入价格:%s元宝#32*> <$STR(P90)>级|<$STR(S254)>
REPLACETEXT S251 *** $STR(S256)
INC S201 <COLOR=FFFF00#32别墅名:>
INC S201 $STR(S251)
INC S202 <COLOR=FFFF00#32租赁人:>
INC S202 $STR(S252)
INC S203 <COLOR=FFFF00#32有效期:>
MOV P98 $STR(S253)

;----------------------------------------第一段-----------------------------------------

#IF
POS 123 $STR(P97)
SMALL P98 $INC.$LONGDATE.60
!SMALL P98 $LONGDATE
#ACT
FORMATSTR S180 <COLOR=RED#32抢购锁定>%-10s #32
INC S203 $STR(S180)
BREAK

#IF
POS 123 $STR(P97)
LARGE P98 $LONGDATE
EQUAL S181 $USERNAME
#ACT
FORMATSTR S180 {COLOR=~当前别墅您可以无限进入#0XFFFF00FF$别墅剩余有效时间:%s#32进别墅Go~/@无限进&%s}%-7s <$DIV^$DEC.$STR(P98).$LONGDATE^60>分钟|<$STR(S250)>|#32
INC S203 $STR(S180)
BREAK


#IF
POS 123 $STR(P97)
SMALL P98 $LONGDATE
#ACT
FORMATSTR S180 <COLOR=GREEN#32租用该别墅/@进入别墅&%s>%-8s <$STR(S255)>|#32
INC S203 $STR(S180)
BREAK

#IF
POS 123 $STR(P97)
!EQUAL P98 0
#ACT
DEC P98 $LONGDATE
DIV P98 60
FORMATSTR S180 <COLOR=ORANGE#32余%-4s分>%-10s <$STR(P98)>|#32
INC S203 $STR(S180)
BREAK
;----------------------


#IF
POS 456 $STR(P97)
#ACT
SPLIT $STR(S289) | S250
MOV S181 $STR(S252)
INC S251 ***
FILLTEXT S251 18
FILLTEXT S252 18
MOV P90 $STR(S256)
DEC P90 3
FORMATSTR S256 <COLOR=~别墅等级:%s$进入价格:%s元宝#32*> <$STR(P90)>级|<$STR(S254)>

REPLACETEXT S251 *** $STR(S256)
INC S204 <COLOR=FFFF00#32别墅名:>
INC S204 $STR(S251)
INC S205 <COLOR=FFFF00#32租赁人:>
INC S205 $STR(S252)
INC S206 <COLOR=FFFF00#32有效期:>
MOV P98 $STR(S253)

#IF
POS 456 $STR(P97)
SMALL P98 $INC.$LONGDATE.60
!SMALL P98 $LONGDATE
#ACT
FORMATSTR S180 <COLOR=RED#32抢购锁定中>%-10s #32
INC S206 $STR(S180)
BREAK

#IF
POS 456 $STR(P97)
LARGE P98 $LONGDATE
EQUAL S181 $USERNAME
#ACT
FORMATSTR S180 {COLOR=~当前别墅您可以无限进入#0XFFFF00FF$别墅剩余有效时间:%s#32进别墅Go~/@无限进&%s}%-7s <$DIV^$DEC.$STR(P98).$LONGDATE^60>分钟|<$STR(S255)>|#32
INC S206 $STR(S180)
BREAK


#IF
POS 456 $STR(P97)
SMALL P98 $LONGDATE
#ACT
FORMATSTR S180 <COLOR=GREEN#32租用该别墅/@进入别墅&%s>%-8s <$STR(S255)>|#32
INC S206 $STR(S180)
BREAK

#IF
POS 456 $STR(P97)
!EQUAL P98 0
#ACT
DEC P98 $LONGDATE
DIV P98 60
FORMATSTR S180 <COLOR=RED#32余%-4s分>%-10s <$STR(P98)>|#32
INC S206 $STR(S180)
BREAK


;----------------------
#IF
POS 780 $STR(P97)
#ACT
SPLIT $STR(S289) | S250
MOV S181 $STR(S252)
INC S251 ***
FILLTEXT S251 18
FILLTEXT S252 18
MOV P90 $STR(S256)
DEC P90 3
FORMATSTR S256 <COLOR=~别墅等级:%s$进入价格:%s元宝#32*> <$STR(P90)>级|<$STR(S254)>
REPLACETEXT S251 *** $STR(S256)
INC S207 <COLOR=FFFF00#32别墅名:>
INC S207 $STR(S251)
INC S208 <COLOR=FFFF00#32租赁人:>
INC S208 $STR(S252)
INC S209 <COLOR=FFFF00#32有效期:>
MOV P98 $STR(S253)

#IF
POS 780 $STR(P97)
SMALL P98 $INC.$LONGDATE.60
!SMALL P98 $LONGDATE
#ACT
FORMATSTR S180 <COLOR=RED#32抢购锁定中>%-10s #32
INC S209 $STR(S180)
BREAK


#IF
POS 780 $STR(P97)
LARGE P98 $LONGDATE
EQUAL S181 $USERNAME
#ACT
FORMATSTR S180 {COLOR=~当前别墅您可以无限进入#0XFFFF00FF$别墅剩余有效时间:%s#32进别墅Go~/@无限进&%s}%-7s <$DIV^$DEC.$STR(P98).$LONGDATE^60>分钟|<$STR(S255)>|#32
INC S209 $STR(S180)
BREAK


#IF
POS 780 $STR(P97)
SMALL P98 $LONGDATE
#ACT
FORMATSTR S180 <COLOR=GREEN#32租用该别墅/@进入别墅&%s>%-8s <$STR(S255)>|#32
INC S209 $STR(S180)
BREAK

#IF
POS 780 $STR(P97)
!EQUAL P98 0
#ACT
DEC P98 $LONGDATE
DIV P98 60
FORMATSTR S180 <COLOR=RED#32余%-4s分>%-10s <$STR(P98)>|#32
INC S209 $STR(S180)
BREAK

[@当票商城_格式]
#IF
!EQUAL S289
#ACT
SPLIT $STR(S289) | S290
FORMATSTR S288 #32<COLOR=GREEN#32%-18s><COLOR=FF00FF#32%10s>%-8s%-20s<当票兑换/@当票物品列表&%s> <$STR(S290)>|<$STR(S291)>张当票|#32|<$STR(S292)>|<$STR(S290)>
INC S282 $STR(S288)
INC S282 \
BREAK

[@充值数据_格式]
#IF
EQUAL S289
#ACT
BREAK

#IF
POS $STR(S289) 已领取
#ACT
SPLIT $STR(S289) | S290
FORMATSTR S288 #32<COLOR=GREEN#32%-18s><COLOR=FF00FF#32%10s>%14s%-8s<COLOR=GRAY#32%s> <$STR(S290)>|<$STR(S292)>.元宝|<$STR(S293)>.元宝|#32|<$STR(S294)>
INC S282 $STR(S288)
INC S282 \
BREAK
#ELSEACT
SPLIT $STR(S289) | S290
FORMATSTR S288 #32<COLOR=GREEN#32%-18s><COLOR=FF00FF#32%10s>%14s%-8s%s <$STR(S290)>|<$STR(S292)>.元宝|<$STR(S293)>.元宝|#32|<$STR(S294)>
INC S282 $STR(S288)
INC S282 \
BREAK

;-----------------------------------------------------------------------------
[@酒馆物品_格式]
#IF
!EQUAL S289
#ACT
SPLIT $STR(S289) | S290
MOV P92 $STR(S291)
MOV P93 $STR(S292)
DEC P93 $LONGDATE
#ELSEACT
BREAK

#IF
LARGE P93 0
#ACT
FORMATSTR S288 %-5s<COLOR=~%s#32详>%-30s%s <$STR(S290)>|<$STR(S294)>|<$STR(S293)>|剩余[<$DIV.$STR(P93).60>]分钟
INC S282 $STR(S288)
INC S282 \
BREAK

#IF
EQUAL S292 订单已关闭
#ACT
FORMATSTR S288 %-5s<COLOR=~%s#32详>%-30s%s <$STR(S290)>|<$STR(S294)>|<$STR(S293)>|<COLOR=RED#32订单已关闭>
INC S282 $STR(S288)
INC S282 \
BREAK


#IF
RANDOM 1
#ACT
FORMATSTR S288 %-5s<COLOR=~%s#32详>%-30s<Color=Green#32酿造完成>#32#32#32#32#32#32#32#32<@@!PIC2#3250,40007><领取/@领取酒品&%s&%s&%s><@@!PIC2#3250,40008> <$STR(S290)>|<$STR(S294)>|<$STR(S293)>|<$STR(S290)>|<$STR(S291)>|<$STR(S292)>
INC S282 $STR(S288)
INC S282 \
BREAK



[@查询BOSS_格式]
#IF
!EQUAL S289
#ACT
SPLIT $STR(S289) | S290
GETVALIDSTR $STR(S290) , S290 S299
REPLACETEXT S292 0
REPLACETEXT S292 1
REPLACETEXT S292 2
REPLACETEXT S292 3
REPLACETEXT S292 4
REPLACETEXT S292 5
REPLACETEXT S292 6
REPLACETEXT S292 7
REPLACETEXT S292 8
REPLACETEXT S292 9
MOV P16 $GLOBAL(BOSS<$STR(M96)>)
#ELSEACT
BREAK

#IF
POS $STR(S289) *
#ACT
FORMATSTR S288 {COLOR=FF00FF#32%-16s}{COLOR=RED#32%-18s}{Color=orange#32%-20s}<尊享地图/@会员地图>\ <$STR(S292)>|******|<$STR(S291)>
INC S282 $STR(S288)
BREAK

#IF
EQUAL P16 -1
#ACT
FORMATSTR S288 {COLOR=FF00FF#32%-16s}{COLOR=RED#32%-18s}{Color=orange#32%-20s}<BOSS传送/@BOSS传送&%s>\ <$STR(S292)>|已复活|<$STR(S291)>|<$STR(M96)>
INC S282 $STR(S288)
BREAK
#ELSEACT
MOV S16
MOV P17 $DIV.$STR(P16).60
MOV P18 $MULT.$STR(P17).60
MOV P18 $DEC.$STR(P16).$STR(P18)

#IF
LARGE P17 9
#ACT
INC S16 $STR(P17)
INC S16 时
#ELSEACT
INC S16 0
INC S16 $STR(P17)
INC S16 时

#IF
LARGE P18 9
#ACT
INC S16 $STR(P18)
INC S16 分
FORMATSTR S288 {COLOR=FF00FF#32%-16s}{COLOR=RED#32%-18s}{Color=orange#32%-20s}<BOSS传送/@BOSS传送&%s>\ <$STR(S292)>|<$STR(S16)>|<$STR(S291)>|<$STR(M96)>
INC S282 $STR(S288)
BREAK
#ELSEACT
INC S16 0
INC S16 $STR(P18)
INC S16 分
FORMATSTR S288 {COLOR=FF00FF#32%-16s}{COLOR=RED#32%-18s}{Color=orange#32%-20s}<BOSS传送/@BOSS传送&%s>\ <$STR(S292)>|<$STR(S16)>|<$STR(S291)>|<$STR(M96)>
INC S282 $STR(S288)
BREAK


[@后台查询BOSS_格式]
#IF
!EQUAL S289
#ACT
SPLIT $STR(S289) | S290
GETVALIDSTR $STR(S290) , S290 S299
REPLACETEXT S292 0
REPLACETEXT S292 1
REPLACETEXT S292 2
REPLACETEXT S292 3
REPLACETEXT S292 4
REPLACETEXT S292 5
REPLACETEXT S292 6
REPLACETEXT S292 7
REPLACETEXT S292 8
REPLACETEXT S292 9
MOV P16 $GLOBAL(BOSS<$STR(M91)>)
#ELSEACT
BREAK


#IF
EQUAL P16 -1
#ACT
FORMATSTR S288 {COLOR=FF00FF#32%-16s}{COLOR=RED#32%-18s}{Color=orange#32%-20s}<BOSS传送/@后台BOSS传送&%s>\ <$STR(S292)>|已复活|<$STR(S291)>|<$STR(M91)>
INC S282 $STR(S288)
BREAK
#ELSEACT
MOV S16
MOV P17 $DIV.$STR(P16).60
MOV P18 $MULT.$STR(P17).60
MOV P18 $DEC.$STR(P16).$STR(P18)

#IF
LARGE P17 9
#ACT
INC S16 $STR(P17)
INC S16 时
#ELSEACT
INC S16 0
INC S16 $STR(P17)
INC S16 时

#IF
LARGE P18 9
#ACT
INC S16 $STR(P18)
INC S16 分
FORMATSTR S288 {COLOR=FF00FF#32%-16s}{COLOR=RED#32%-18s}{Color=orange#32%-20s}<BOSS传送/@后台BOSS传送&%s>\ <$STR(S292)>|<$STR(S16)>|<$STR(S291)>|<$STR(M91)>
INC S282 $STR(S288)
BREAK
#ELSEACT
INC S16 0
INC S16 $STR(P18)
INC S16 分
FORMATSTR S288 {COLOR=FF00FF#32%-16s}{COLOR=RED#32%-18s}{Color=orange#32%-20s}<BOSS传送/@后台BOSS传送&%s>\ <$STR(S292)>|<$STR(S16)>|<$STR(S291)>|<$STR(M91)>
INC S282 $STR(S288)
BREAK


[@读取品级_格式]                ;调试后台用于查询品级怪物的数量
#IF
!EQUAL S289
#ACT
SPLIT $STR(S289) | S290
COPYTEXT $STR(S290) 0 8 S295
COPYTEXT $STR(S290) 9 2 S296
COPYTEXT $STR(S290) 11 2 S297
FORMATSTR S285 %-9s%s:%-8s%-18s%-18s%s\ <$STR(S295)>|<$STR(S296)>|<$STR(S297)>|<$STR(S291)>|<$STR(S292)>|<$STR(S293)>品
INC S282 $STR(S285)
BREAK

[@数字仓库_格式]
#IF
!EQUAL S289
#ACT
GETVALIDSTR $STR(S289) | S290 S291
GETVALIDSTR $STR(S291) | S290 S291
FORMATSTR S285 %-5s%-23s%-15s<存入物品/@物品存入&%s>%-4s<取出物品/@物品取出&%s> <$STR(M91)>|<$STR(S290)>|[<$STR(S291)>]个|<$STR(S290)>|#32|<$STR(S290)>
INC S282 $STR(S285)
INC S282 \
BREAK


[@武馆心法二代_格式]
#IF
!EQUAL S289
#ACT
SPLIT $STR(S289) | S290
#ELSEACT
BREAK

#IF
POS $STR(S292) /
#ACT
GETVALIDSTR $STR(S292) / S297 S298
GETVALIDSTR $STR(S298) / S298 S299
MOV S292 $STR(S<$INC.297.$JOBID>)

#IF
SMALL $DEC.$STR(M91).1 $CUSTOMVALUE(155)
#ACT
REPLACETEXT S290 * $STR(S292)
FORMATSTR S285 <COLOR=GREEN#32%-13s%-14s><COLOR=FF00FF#32%-25s><COLOR=ORANGE#32%-11s>%-7s<@@!PIC2#3250,40025><@@!PIC2#3250,40025><@@!PIC2#3250,40025><@@!PIC2#3250,40025><@@!PIC2#3250,40025> #32|<$NUMTOCHR($STR(M91))>重|<$STR(S290)>|<$STR(S293)>|#32
INC S282 $STR(S285)
INC S282 \
BREAK

#IF
LARGE $DEC.$STR(M91).1 $CUSTOMVALUE(155)
#ACT
REPLACETEXT S290 * $STR(S292)
FORMATSTR S285 <COLOR=GRAY#32%-13s%-14s%-25s><COLOR=ORANGE#32%-11s>%-7s<@@!PIC2#3250,40026><@@!PIC2#3250,40026><@@!PIC2#3250,40026><@@!PIC2#3250,40026><@@!PIC2#3250,40026> #32|<$NUMTOCHR($STR(M91))>重|<$STR(S290)>|<$STR(S293)>|#32
INC S282 $STR(S285)
INC S282 \
BREAK

#IF
EQUAL $DEC.$STR(M91).1 $CUSTOMVALUE(155)
#ACT
REPLACETEXT S290 * $STR(S292)
FORMATSTR S285 <COLOR=GREEN#32%-13s%-14s><COLOR=FF00FF#32%-25s><COLOR=ORANGE#32%-11s>%-7s<@@!PIC2#3250,40026><凝练心法/@提交心法物品&%s><@@!PIC2#3250,40026> #32|<$NUMTOCHR($STR(M91))>重|<$STR(S290)>|<$STR(S293)>|<$CUSTOMVALUE(156)>/<$STR(S294)>|<$STR(M91)>
INC S282 $STR(S285)
INC S282 \
BREAK


[@庄园索引_格式]
#IF
!EQUAL S289
#ACT
SPLIT $STR(S289) | S290
;INDEX|庄园名称|庄园等级|庄园主人ID|庄园主人|庄园主人区
#ELSEACT
BREAK

#IF
EQUAL S293 0
#ACT
FORMATSTR S285 <COLOR=GREEN#32%-10s%-5s%-18s%-10s%-15s%-16s><购买庄园/@购买庄园&%s> #32|<$STR(S290)>|<$STR(S291)>|<$STR(S292)>|<$STR(S295)>|<$STR(S294)>|<$STR(S290)>
INC S282 $STR(S285)
INC S282 \
BREAK


#IF
!EQUAL S293 $CUSTOMVALUE(3)
#ACT
FORMATSTR S285 <COLOR=GRAY#32%-10s%-5s%-18s%-10s%-15s%-16s><潜入庄园/@潜入庄园&%s> #32|<$STR(S290)>|<$STR(S291)>|<$STR(S292)>|<$STR(S295)>|<$STR(S294)>|<$STR(S293)>
INC S282 $STR(S285)
INC S282 \
BREAK

#IF
EQUAL S293 $CUSTOMVALUE(3)
#ACT
FORMATSTR S285 <COLOR=ORANGE#32%-10s%-5s%-18s%-10s%-15s%-16s><我的庄园/@进入庄园&%s> #32|<$STR(S290)>|<$STR(S291)>|<$STR(S292)>|<$STR(S295)>|<$STR(S294)>|<$STR(S293)>
INC S282 $STR(S285)
INC S282 \
BREAK


[@庄园物资排序_格式]
#IF
!EQUAL S289
#ACT
;紫金灵芝,46,45,1612479756,1612481436|叨叨|暂无|0|时间
SPLIT $STR(S289) | S270
;S270      紫金灵芝,46,45,1612479756,1612481436
;S271      叨叨
;S272      暂无,采集者
;S273      采集者的唯一编号
;S274      采集排序
SPLIT $STR(S270) , S250
#ELSEACT
BREAK

#IF
EQUAL S272 $USERNAME
#ACT
;                物资名称                              采集人
FORMATSTR S285 <COLOR=GRAY#32%-14s%-28s%-16s> <$STR(S250)>|#32|<$STR(S272)>
INC S282 $STR(S285)
INC S282 \
BREAK

#IF
!EQUAL S272 $USERNAME
!EQUAL S272 暂无
#ACT
;                物资名称                              采集人
FORMATSTR S285 <COLOR=FF00FF#32%-14s%-28s><遭遇窃取/@潜入庄园&%s&%s> <$STR(S250)>|<$STR(S272)>窃取了该物资|<$STR(S273)>|<$STR(S272)>
INC S282 $STR(S285)
INC S282 \
BREAK

#IF
LARGE $LONGDATE $STR(S254)
#ACT
;                物资名称                              采集人
FORMATSTR S285 <COLOR=Green#32%-14s%-14s%-14s%s> <$STR(S250)>|<$STR(S251)>,<$STR(S252)>|已成熟|尚未采集
INC S282 $STR(S285)
INC S282 \
BREAK
#ELSEACT
MOV P0 $STR(S254)
DEC P0 $LONGDATE
DIV P0 60
;                物资名称                              采集人
FORMATSTR S285 <COLOR=RED#32%-14s%-14s%-14s> <$STR(S250)>|<$STR(S251)>,<$STR(S252)>|[<$STR(P0)>]分钟后成熟
INC S282 $STR(S285)
INC S282 \
BREAK


[@庄园收入排序_格式]
#IF
!EQUAL S289
#ACT
;<$STR(A97)>|<$STR(A98)>|<$USERNAME>|<$CUSTOMVALUE(3)>|<$DIV^$MULT.20.$STR(S3)^2>|未领取
SPLIT $STR(S289) | S290
#ELSEACT
BREAK

#IF
EQUAL S295 未领取
#ACT
FORMATSTR S285 <COLOR=GREEN#32%-14s%-26s元宝×%-6s><领取收益/@领取收益&%s> <$STR(S290)>|<$STR(S292)>[<$STR(S291)>]|<$STR(S294)>|<$STR(S289)>
INC S282 $STR(S285)
INC S282 \
BREAK
#ELSEACT
FORMATSTR S285 <COLOR=GRAY#32%-14s%-26s元宝×%-6s%s> <$STR(S290)>|<$STR(S292)>[<$STR(S291)>]|<$STR(S294)>|<$STR(S295)>
INC S282 $STR(S285)
INC S282 \
BREAK

[@查询元宝分成_格式]
#IF
!EQUAL S289
#ACT
;输入时间|区服|玩家名字|数字账号|充值金额|分成金额|已领取金额|当前可领取
;20200708|一区|原野测试|100004|0|0|0|0
SPLIT $STR(S289) | S290
#ELSEACT
BREAK

#IF
EQUAL S297 0
#ACT
FORMATSTR S285 %-14s%-8s%-18s%-10s%-6s<领取分成/@领取推广分成&%s> <$STR(S290)>|<$STR(S291)>|<$STR(S292)>|<$STR(S294)>|<$STR(S295)>|<$STR(S290)>
INC S282 $STR(S285)
INC S282 \
BREAK
#ELSEACT
FORMATSTR S285 %-14s%-8s%-18s%-10s%-6s<COLOR=GRAY#32已领取> <$STR(S290)>|<$STR(S291)>|<$STR(S292)>|<$STR(S294)>|<$STR(S295)>
INC S282 $STR(S285)
INC S282 \
BREAK



[@红袖商城_格式]
#IF
!EQUAL S289
#ACT
SPLIT $STR(S289) | S290
FORMATSTR S285 %-18s%-14s%-20s<购买物品/@红袖物品&%s> <$STR(S290)>|<$STR(S291)>|<$STR(S292)>|<$STR(S289)>
INC S282 $STR(S285)
INC S282 \
#ELSEACT
BREAK




}

调用数据
点金石|50|激活装备属性
圣灵药水|30|修复破损装备
超级天山雪莲|5|持续回血
超级深海灵礁|5|持续回蓝
道尊神符|20|可使用5000次
道尊灵毒(绿)|20|可使用3000次
道尊灵毒(红)|20|可使用3000次
随机神石|40|地图随机传送
回城石(大)|50|可用100次
战斗号角|1|建立行会必备
超级冰泉圣水|10|特修全身装备
7级宠物强化卷|40|BB强化至7级
兽名魔咒|20|宠物改名必备
兽神水|50|复活死亡宠物
极品兽粮|5|喂食所有宠物
真视水晶|10|探寻仇人位置
飞来神石|20|好友地图传送
探魔球|100|探寻魔王位置
遗忘丹|10|帮助遗忘技能
仙品项圈|10|捕捉麒麟凤凰
仙品项圈(捆)|200|捕捉麒麟凤凰
黄金御兽天袍|1000|高级骑战服饰
黄金御兽天衣|1000|高级骑战服饰
绝望探魔卷轴|10|绝望领域专用的卷轴不错请自行理解
页: [1]
查看完整版本: 彩虹引擎得万能排序脚本