开启辅助访问      

传世单机社区

 找回密码
 立即注册
https://www.wooolc.com
查看: 7145|回复: 57

[彩虹脚本] 彩虹的万能排序脚本

  [复制链接]

升级   100%

发表于 2021-3-5 14:01:48 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

x
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)>   自动翻页标签按钮,脚本自动生成





这里是NPC调用脚本
  1. (@conscribeHeros)
  2. [@main]
  3. #ACT
  4. GOTO @红袖商城&8&0&1&1&@红袖商城


  5. [@红袖商城] FLASH(8)
  6. #IF
  7. RANDOM 1
  8. #ACT
  9. MOV M90 $SCRIPTPARAM(1)                ;显示数量
  10. MOV M91 $SCRIPTPARAM(2)                ;读取位置
  11. MOV M92 $SCRIPTPARAM(3)                ;排序方式
  12. MOV M93 $SCRIPTPARAM(4)                ;用于排序的文本位
  13. MOV S280 $SCRIPTPARAM(5)        ;当前标签的名字
  14. MOV S281 ..\..\..\..\轮回数据\轮回配置\红袖购物列表.ini
  15. #CALL [\游戏功能\原野排行.txt] @原野排行
  16. #SAY
  17. \
  18. <COLOR=ORANGE 商品名称          元宝          功效说明>   \
  19. <$STR(S282)>\
  20. <$STR(S283)>        <≡/@红袖商城&8&0&1&1&@红袖商城>  <↓/@红袖商城&8&0&-1&1&@红袖商城>  <↑/@红袖商城&8&0&0&1&@红袖商城>


  21. [@红袖物品]
  22. #IF
  23. POSINLIST $SCRIPTPARAM(1) ..\..\..\..\轮回数据\轮回配置\红袖购物列表.ini S0
  24. #ACT
  25. SPLIT $STR(S0) | S1
  26. #ELSEACT
  27. SENDMSG 5 非法数据
  28. BREAK

  29. #IF
  30. !CHECKGAMEGOLD < $STR(S2)
  31. #ACT
  32. GAMEGOLD - $STR(S2)
  33. GIVE $STR(S1) 1 1
  34. SENDMSG 14 玩家%s购买了<$STR(S1)>
  35. #ELSEACT
  36. SENDMSG 5 元宝不足。
复制代码

这里是排序主要脚本


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

  11. #IF
  12. !SMALL M90 1
  13. !SMALL M91 0
  14. !SMALL M92 -1
  15. !SMALL M93 0
  16. !EQUAL $STR(S280)
  17. CHECKTXT <$STR(S281)>
  18. #ACT
  19. MOV M94 $TXTLINE(<$STR(S281)>)
  20. MOV M95 0
  21. MOV M96 0
  22. MOV S282
  23. GOTO @原野排行_READ
  24. BREAK
  25. #ELSEACT
  26. MOV S282 \\\#32#32#32未查询到相关信息...
  27. MOV S283 \\\#32#32#32<离开/@EXIT>

  28. #IF
  29. ISADMIN
  30. #ACT
  31. SENDMSG 6 调试信息:该信息仅GM可见。
  32. SENDMSG 6 参数[1]:<$STR(M90)>
  33. SENDMSG 6 参数[2]:<$STR(M91)>
  34. SENDMSG 6 参数[3]:<$STR(M92)>
  35. SENDMSG 6 参数[4]:<$STR(M93)>
  36. SENDMSG 6 参数[5]:<$STR(S280)>
  37. REPLACETEXT S281 \ ╲
  38. SENDMSG 6 参数[6]:<$STR(S281)>
  39. BREAK


  40. [@原野排行_READ]
  41. #IF
  42. LARGE M94 $STR(M91)
  43. SMALL M95 $STR(M90)
  44. SMALL M92 1
  45. #ACT
  46. READRANDOMSTR <$STR(S281)> S289 $STR(M91) $STR(M92) $STR(M93) |

  47. #IF
  48. LARGE M94 $STR(M91)
  49. SMALL M95 $STR(M90)
  50. EQUAL M92 2
  51. #ACT
  52. MOVR M96 $DEC.$STR(M94).1
  53. INC M96 1
  54. READRANDOMSTR <$STR(S281)> S289 $STR(M96)

  55. #IF
  56. LARGE M94 $STR(M91)
  57. SMALL M95 $STR(M90)
  58. EQUAL M92 1
  59. #ACT
  60. READRANDOMSTR <$STR(S281)> S289 $STR(M91)

  61. #IF
  62. !EQUAL S289
  63. #ACT
  64. INC M91 1
  65. INC M95 1
  66. GOTO <$STR(S280)>_格式
  67. MOV S289
  68. GOTO @原野排行_READ
  69. BREAK

  70. #IF
  71. SMALL M95 $STR(M90)
  72. #ACT
  73. INC M95 1
  74. INC M96 1
  75. INC S282 \
  76. GOTO @原野排行_READ
  77. BREAK

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

  86. #IF
  87. LARGE M94 $STR(M91)
  88. #ACT
  89. FORMATSTR S285 <下一页/%s&%s&%s&%s&%s&%s> <$STR(S280)>|<$STR(M90)>|<$STR(M91)>|<$STR(M92)>|<$STR(M93)>|<$STR(S280)>
  90. MOV M98 $STR(M91)
  91. CEIL M98 $STR(M90)
  92. MOV M99 $STR(M94)
  93. CEIL M99 $STR(M90)
  94. FORMATSTR S286 <第1页/%s&%s&%s&%s&%s&%s> <$STR(S280)>|<$STR(M90)>|0|<$STR(M92)>|<$STR(M93)>|<$STR(S280)>
  95. ;FORMATSTR S283 %s%-6s%s%10s╱%-10s%s <$STR(S286)>|#32|<$STR(S284)>|<$STR(M98)>|<$STR(M99)>|<$STR(S285)>

  96. FORMATSTR S283 %s%10s╱%-10s%s <$STR(S284)>|<$STR(M98)>|<$STR(M99)>|<$STR(S285)>
  97. BREAK
  98. #ELSEACT
  99. MOV S285 <COLOR=GRAY#32下一页>
  100. MOV M98 $STR(M91)
  101. CEIL M98 $STR(M90)
  102. MOV M99 $STR(M94)
  103. CEIL M99 $STR(M90)
  104. FORMATSTR S286 <第1页/%s&%s&%s&%s&%s&%s> <$STR(S280)>|<$STR(M90)>|0|<$STR(M92)>|<$STR(M93)>|<$STR(S280)>
  105. ;FORMATSTR S283 %s%-6s%s%10s╱%-10s%s <$STR(S286)>|#32|<$STR(S284)>|<$STR(M98)>|<$STR(M99)>|<$STR(S285)>
  106. FORMATSTR S283 %s%10s╱%-10s%s <$STR(S284)>|<$STR(M98)>|<$STR(M99)>|<$STR(S285)>
  107. BREAK


  108. ;------------------------------------------------------------------------------------------------------------------------格式化方式-------------------------------------------

  109. [@别墅展示_格式]
  110. #IF
  111. !EQUAL S289
  112. #ACT
  113. MOV P97 $STR(M91)
  114. MOD P97 $STR(M90)
  115. #ELSEACT
  116. BREAK

  117. #IF
  118. POS 123 $STR(P97)
  119. #ACT
  120. SPLIT $STR(S289) | S250
  121. MOV S181 $STR(S252)
  122. INC S251 ***
  123. FILLTEXT S251 18
  124. FILLTEXT S252 18
  125. MOV P90 $STR(S256)
  126. DEC P90 3
  127. FORMATSTR S256 <COLOR=~别墅等级:%s$进入价格:%s元宝#32*> <$STR(P90)>级|<$STR(S254)>
  128. REPLACETEXT S251 *** $STR(S256)
  129. INC S201 <COLOR=FFFF00#32别墅名:>
  130. INC S201 $STR(S251)
  131. INC S202 <COLOR=FFFF00#32租赁人:>
  132. INC S202 $STR(S252)
  133. INC S203 <COLOR=FFFF00#32有效期:>
  134. MOV P98 $STR(S253)

  135. ;----------------------------------------第一段-----------------------------------------

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

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


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

  159. #IF
  160. POS 123 $STR(P97)
  161. !EQUAL P98 0
  162. #ACT
  163. DEC P98 $LONGDATE
  164. DIV P98 60
  165. FORMATSTR S180 <COLOR=ORANGE#32余%-4s分>%-10s <$STR(P98)>|#32
  166. INC S203 $STR(S180)
  167. BREAK
  168. ;----------------------


  169. #IF
  170. POS 456 $STR(P97)
  171. #ACT
  172. SPLIT $STR(S289) | S250
  173. MOV S181 $STR(S252)
  174. INC S251 ***
  175. FILLTEXT S251 18
  176. FILLTEXT S252 18
  177. MOV P90 $STR(S256)
  178. DEC P90 3
  179. FORMATSTR S256 <COLOR=~别墅等级:%s$进入价格:%s元宝#32*> <$STR(P90)>级|<$STR(S254)>

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

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

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


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

  210. #IF
  211. POS 456 $STR(P97)
  212. !EQUAL P98 0
  213. #ACT
  214. DEC P98 $LONGDATE
  215. DIV P98 60
  216. FORMATSTR S180 <COLOR=RED#32余%-4s分>%-10s <$STR(P98)>|#32
  217. INC S206 $STR(S180)
  218. BREAK


  219. ;----------------------
  220. #IF
  221. POS 780 $STR(P97)
  222. #ACT
  223. SPLIT $STR(S289) | S250
  224. MOV S181 $STR(S252)
  225. INC S251 ***
  226. FILLTEXT S251 18
  227. FILLTEXT S252 18
  228. MOV P90 $STR(S256)
  229. DEC P90 3
  230. FORMATSTR S256 <COLOR=~别墅等级:%s$进入价格:%s元宝#32*> <$STR(P90)>级|<$STR(S254)>
  231. REPLACETEXT S251 *** $STR(S256)
  232. INC S207 <COLOR=FFFF00#32别墅名:>
  233. INC S207 $STR(S251)
  234. INC S208 <COLOR=FFFF00#32租赁人:>
  235. INC S208 $STR(S252)
  236. INC S209 <COLOR=FFFF00#32有效期:>
  237. MOV P98 $STR(S253)

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


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


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

  261. #IF
  262. POS 780 $STR(P97)
  263. !EQUAL P98 0
  264. #ACT
  265. DEC P98 $LONGDATE
  266. DIV P98 60
  267. FORMATSTR S180 <COLOR=RED#32余%-4s分>%-10s <$STR(P98)>|#32
  268. INC S209 $STR(S180)
  269. BREAK

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

  279. [@充值数据_格式]
  280. #IF
  281. EQUAL S289
  282. #ACT
  283. BREAK

  284. #IF
  285. POS $STR(S289) 已领取
  286. #ACT
  287. SPLIT $STR(S289) | S290
  288. 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)>
  289. INC S282 $STR(S288)
  290. INC S282 \
  291. BREAK
  292. #ELSEACT
  293. SPLIT $STR(S289) | S290
  294. FORMATSTR S288 #32<COLOR=GREEN#32%-18s><COLOR=FF00FF#32%10s>%14s%-8s%s <$STR(S290)>|<$STR(S292)>.元宝|<$STR(S293)>.元宝|#32|<$STR(S294)>
  295. INC S282 $STR(S288)
  296. INC S282 \
  297. BREAK

  298. ;-----------------------------------------------------------------------------
  299. [@酒馆物品_格式]
  300. #IF
  301. !EQUAL S289
  302. #ACT
  303. SPLIT $STR(S289) | S290
  304. MOV P92 $STR(S291)
  305. MOV P93 $STR(S292)
  306. DEC P93 $LONGDATE
  307. #ELSEACT
  308. BREAK

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

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


  323. #IF
  324. RANDOM 1
  325. #ACT
  326. 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)>
  327. INC S282 $STR(S288)
  328. INC S282 \
  329. BREAK



  330. [@查询BOSS_格式]
  331. #IF
  332. !EQUAL S289
  333. #ACT
  334. SPLIT $STR(S289) | S290
  335. GETVALIDSTR $STR(S290) , S290 S299
  336. REPLACETEXT S292 0
  337. REPLACETEXT S292 1
  338. REPLACETEXT S292 2
  339. REPLACETEXT S292 3
  340. REPLACETEXT S292 4
  341. REPLACETEXT S292 5
  342. REPLACETEXT S292 6
  343. REPLACETEXT S292 7
  344. REPLACETEXT S292 8
  345. REPLACETEXT S292 9
  346. MOV P16 $GLOBAL(BOSS<$STR(M96)>)
  347. #ELSEACT
  348. BREAK

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

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

  366. #IF
  367. LARGE P17 9
  368. #ACT
  369. INC S16 $STR(P17)
  370. INC S16 时
  371. #ELSEACT
  372. INC S16 0
  373. INC S16 $STR(P17)
  374. INC S16 时

  375. #IF
  376. LARGE P18 9
  377. #ACT
  378. INC S16 $STR(P18)
  379. INC S16 分
  380. 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)>
  381. INC S282 $STR(S288)
  382. BREAK
  383. #ELSEACT
  384. INC S16 0
  385. INC S16 $STR(P18)
  386. INC S16 分
  387. 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)>
  388. INC S282 $STR(S288)
  389. BREAK


  390. [@后台查询BOSS_格式]
  391. #IF
  392. !EQUAL S289
  393. #ACT
  394. SPLIT $STR(S289) | S290
  395. GETVALIDSTR $STR(S290) , S290 S299
  396. REPLACETEXT S292 0
  397. REPLACETEXT S292 1
  398. REPLACETEXT S292 2
  399. REPLACETEXT S292 3
  400. REPLACETEXT S292 4
  401. REPLACETEXT S292 5
  402. REPLACETEXT S292 6
  403. REPLACETEXT S292 7
  404. REPLACETEXT S292 8
  405. REPLACETEXT S292 9
  406. MOV P16 $GLOBAL(BOSS<$STR(M91)>)
  407. #ELSEACT
  408. BREAK


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

  420. #IF
  421. LARGE P17 9
  422. #ACT
  423. INC S16 $STR(P17)
  424. INC S16 时
  425. #ELSEACT
  426. INC S16 0
  427. INC S16 $STR(P17)
  428. INC S16 时

  429. #IF
  430. LARGE P18 9
  431. #ACT
  432. INC S16 $STR(P18)
  433. INC S16 分
  434. 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)>
  435. INC S282 $STR(S288)
  436. BREAK
  437. #ELSEACT
  438. INC S16 0
  439. INC S16 $STR(P18)
  440. INC S16 分
  441. 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)>
  442. INC S282 $STR(S288)
  443. BREAK


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

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


  465. [@武馆心法二代_格式]
  466. #IF
  467. !EQUAL S289
  468. #ACT
  469. SPLIT $STR(S289) | S290
  470. #ELSEACT
  471. BREAK

  472. #IF
  473. POS $STR(S292) /
  474. #ACT
  475. GETVALIDSTR $STR(S292) / S297 S298
  476. GETVALIDSTR $STR(S298) / S298 S299
  477. MOV S292 $STR(S<$INC.297.$JOBID>)

  478. #IF
  479. SMALL $DEC.$STR(M91).1 $CUSTOMVALUE(155)
  480. #ACT
  481. REPLACETEXT S290 * $STR(S292)
  482. 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
  483. INC S282 $STR(S285)
  484. INC S282 \
  485. BREAK

  486. #IF
  487. LARGE $DEC.$STR(M91).1 $CUSTOMVALUE(155)
  488. #ACT
  489. REPLACETEXT S290 * $STR(S292)
  490. 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
  491. INC S282 $STR(S285)
  492. INC S282 \
  493. BREAK

  494. #IF
  495. EQUAL $DEC.$STR(M91).1 $CUSTOMVALUE(155)
  496. #ACT
  497. REPLACETEXT S290 * $STR(S292)
  498. 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)>
  499. INC S282 $STR(S285)
  500. INC S282 \
  501. BREAK


  502. [@庄园索引_格式]
  503. #IF
  504. !EQUAL S289
  505. #ACT
  506. SPLIT $STR(S289) | S290
  507. ;INDEX|庄园名称|庄园等级|庄园主人ID|庄园主人|庄园主人区
  508. #ELSEACT
  509. BREAK

  510. #IF
  511. EQUAL S293 0
  512. #ACT
  513. 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)>
  514. INC S282 $STR(S285)
  515. INC S282 \
  516. BREAK


  517. #IF
  518. !EQUAL S293 $CUSTOMVALUE(3)
  519. #ACT
  520. 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)>
  521. INC S282 $STR(S285)
  522. INC S282 \
  523. BREAK

  524. #IF
  525. EQUAL S293 $CUSTOMVALUE(3)
  526. #ACT
  527. 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)>
  528. INC S282 $STR(S285)
  529. INC S282 \
  530. BREAK


  531. [@庄园物资排序_格式]
  532. #IF
  533. !EQUAL S289
  534. #ACT
  535. ;紫金灵芝,46,45,1612479756,1612481436|叨叨|暂无|0|时间
  536. SPLIT $STR(S289) | S270
  537. ;S270        紫金灵芝,46,45,1612479756,1612481436
  538. ;S271        叨叨
  539. ;S272        暂无,采集者
  540. ;S273        采集者的唯一编号
  541. ;S274        采集排序
  542. SPLIT $STR(S270) , S250
  543. #ELSEACT
  544. BREAK

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

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

  562. #IF
  563. LARGE $LONGDATE $STR(S254)
  564. #ACT
  565. ;                物资名称                                采集人
  566. FORMATSTR S285 <COLOR=Green#32%-14s%-14s%-14s%s> <$STR(S250)>|<$STR(S251)>,<$STR(S252)>|已成熟|尚未采集
  567. INC S282 $STR(S285)
  568. INC S282 \
  569. BREAK
  570. #ELSEACT
  571. MOV P0 $STR(S254)
  572. DEC P0 $LONGDATE
  573. DIV P0 60
  574. ;                物资名称                                采集人
  575. FORMATSTR S285 <COLOR=RED#32%-14s%-14s%-14s> <$STR(S250)>|<$STR(S251)>,<$STR(S252)>|[<$STR(P0)>]分钟后成熟
  576. INC S282 $STR(S285)
  577. INC S282 \
  578. BREAK


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

  587. #IF
  588. EQUAL S295 未领取
  589. #ACT
  590. FORMATSTR S285 <COLOR=GREEN#32%-14s%-26s元宝×%-6s><领取收益/@领取收益&%s> <$STR(S290)>|<$STR(S292)>[<$STR(S291)>]|<$STR(S294)>|<$STR(S289)>
  591. INC S282 $STR(S285)
  592. INC S282 \
  593. BREAK
  594. #ELSEACT
  595. FORMATSTR S285 <COLOR=GRAY#32%-14s%-26s元宝×%-6s%s> <$STR(S290)>|<$STR(S292)>[<$STR(S291)>]|<$STR(S294)>|<$STR(S295)>
  596. INC S282 $STR(S285)
  597. INC S282 \
  598. BREAK

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

  608. #IF
  609. EQUAL S297 0
  610. #ACT
  611. FORMATSTR S285 %-14s%-8s%-18s%-10s%-6s<领取分成/@领取推广分成&%s> <$STR(S290)>|<$STR(S291)>|<$STR(S292)>|<$STR(S294)>|<$STR(S295)>|<$STR(S290)>
  612. INC S282 $STR(S285)
  613. INC S282 \
  614. BREAK
  615. #ELSEACT
  616. FORMATSTR S285 %-14s%-8s%-18s%-10s%-6s<COLOR=GRAY#32已领取> <$STR(S290)>|<$STR(S291)>|<$STR(S292)>|<$STR(S294)>|<$STR(S295)>
  617. INC S282 $STR(S285)
  618. INC S282 \
  619. BREAK



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




  630. }
复制代码


附带一份调用数据
  1. 点金石|50|激活装备属性
  2. 圣灵药水|30|修复破损装备
  3. 超级天山雪莲|5|持续回血
  4. 超级深海灵礁|5|持续回蓝
  5. 道尊神符|20|可使用5000次
  6. 道尊灵毒(绿)|20|可使用3000次
  7. 道尊灵毒(红)|20|可使用3000次
  8. 随机神石|40|地图随机传送
  9. 回城石(大)|50|可用100次
  10. 战斗号角|1|建立行会必备
  11. 超级冰泉圣水|10|特修全身装备
  12. 7级宠物强化卷|40|BB强化至7级
  13. 兽名魔咒|20|宠物改名必备
  14. 兽神水|50|复活死亡宠物
  15. 极品兽粮|5|喂食所有宠物
  16. 真视水晶|10|探寻仇人位置
  17. 飞来神石|20|好友地图传送
  18. 探魔球|100|探寻魔王位置
  19. 遗忘丹|10|帮助遗忘技能
  20. 仙品项圈|10|捕捉麒麟凤凰
  21. 仙品项圈(捆)|200|捕捉麒麟凤凰
  22. 黄金御兽天袍|1000|高级骑战服饰
  23. 黄金御兽天衣|1000|高级骑战服饰
  24. 绝望探魔卷轴|10|绝望领域专用的卷轴
复制代码



为什么会有这么个东西产生。
之前写版本都是需要用到排序就写一个排序,写的多了发现所有的排序反正就是这么个格式,于是将它独立出来了。
这样写到排序脚本的时候就不需要重写一次排序,一个脚本涵盖版本中所有需要排序的脚本。

下面的NPC都是使用排序完成的。
排序展示2.png
效果展示,别墅排序.png
别墅购买后需要刷新当前页面,所有有了刷新这个标签。
效果展示,排序使用.png
效果展示,排序.png

排序显示.png

评分

参与人数 1热心 +1 传世币 +1 收起 理由
鲁邦三世 + 1 + 1 鼓励转贴优秀传世工具和版本!

查看全部评分

升级   100%

发表于 2021-3-8 10:50:06 | 显示全部楼层
楼主你太给力了,你真牛!

回复 支持 反对

使用道具 举报

升级   0%

发表于 2021-3-8 16:30:52 | 显示全部楼层
看帖回帖是一种美德,回复一个吧...

回复 支持 反对

使用道具 举报

升级   0%

发表于 2021-3-8 19:32:13 | 显示全部楼层
老铁,双击666!!

回复 支持 反对

使用道具 举报

升级   59.1%

发表于 2021-3-9 09:47:39 | 显示全部楼层
这个厉害啊啊这个厉害啊啊这个厉害啊啊这个厉害啊啊这个厉害啊啊这个厉害啊啊这个厉害啊啊

回复 支持 反对

使用道具 举报

升级   100%

发表于 2021-3-10 08:26:06 | 显示全部楼层
支持技术贴

回复 支持 反对

使用道具 举报

升级   1.06%

发表于 2021-3-10 09:33:50 | 显示全部楼层
       
看帖回帖是一种美德,回复一个吧...

回复 支持 反对

使用道具 举报

升级   6.8%

发表于 2021-3-10 15:14:30 | 显示全部楼层
这个厉害啊啊这个厉害啊啊这个厉害啊啊这个厉害啊啊这个厉害啊啊这个厉害啊啊这个厉害啊啊


回复 支持 反对

使用道具 举报

升级   100%

发表于 2021-3-11 09:48:05 | 显示全部楼层
相当高级牛逼的

回复 支持 反对

使用道具 举报

升级   57.33%

发表于 2021-3-11 16:35:52 | 显示全部楼层
#在这里快速回复#鼓励转贴优秀传世工具和版

回复 支持 反对

使用道具 举报

懒得打字嘛,点击右侧快捷回复
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

1、请认真发帖,禁止回复纯表情,纯数字等无意义的内容!帖子内容不要太简单!
2、提倡文明上网,净化网络环境!抵制低俗不良违法有害信息。
3、如果你对主帖作者的帖子不屑一顾的话,请勿回帖。谢谢合作!

关闭

站长推荐 上一条 /1 下一条

传奇世界单机版|传世服务端|传世版本|关于我们|小黑屋|手机版| 传世单机社区 |网站地图

GMT+8, 2024-4-23 15:51 , Processed in 0.160987 second(s), 38 queries , Gzip On.

Powered by Discuz! X3.4

© 2001-2018 Comsenz Inc.

快速回复 返回顶部 返回列表