脚本示例

装备一键回收脚本

一键回收脚本:回收权限按有效期判断,总入口按档位 #CALL 到各回收子脚本,用 TAKE 46 计数后统一发放金币。

用途

这是装备回收系统的总入口 [@回收装备]:先判断回收功能是否还在有效期内(整数变量 $INTS22 与 $UNIXTIME 比较),再按 HASH H_角色数据 里记录的档位开关,用 #CALL 分发到各个回收子脚本去收货算钱,最后统一 GIVE 金币;顺带还给道士补给药粉、护身符一类消耗品。

参考脚本

[@回收装备]
{
#IF
compval $INTS22 < $UNIXTIME
#ACT
BREAK

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_沃玛极品> = 1
#ACT
#CALL [回收脚本\沃玛套装.txt] @回收沃玛极品

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_祖玛极品> = 1
#ACT
#CALL [回收脚本\祖玛套装.txt] @回收祖玛极品

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_赤月极品> = 1
#ACT
#CALL [回收脚本\赤月套装.txt] @回收赤月极品

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_特殊极品> = 1
#ACT
#CALL [回收脚本\特殊套装.txt] @回收特殊极品

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_靴子极品> = 1
#ACT
#CALL [回收脚本\靴子腰带.txt] @回收靴子极品

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_口罩极品> = 1
#ACT
#CALL [回收脚本\口罩面巾.txt] @回收口罩极品

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_军鼓极品> = 1
#ACT
#CALL [回收脚本\军鼓军牌.txt] @回收军鼓极品

#IF(1)
Compval <$HASH(H_角色数据)<$USERNAME>_服装极品> = 1
Compval <$HASH(H_角色数据)<$USERNAME>_戒指极品> = 1
Compval <$HASH(H_角色数据)<$USERNAME>_手镯极品> = 1
Compval <$HASH(H_角色数据)<$USERNAME>_项链极品> = 1
Compval <$HASH(H_角色数据)<$USERNAME>_头盔极品> = 1
Compval <$HASH(H_角色数据)<$USERNAME>_武器极品> = 1
#ACT
#CALL [快捷脚本\批量回收.txt] @一键极品回收

#IF(4)
CHECKJOB TAOIST
compval $INTS22 > $UNIXTIME
Compval <$ITEMCOUNT(黄色药粉(大量))> = 0
CHECKGOLD 50000
#ACT
take 金币 50000
GIVE 黄色药粉(大量) 1

#IF(4)
CHECKJOB TAOIST
compval $INTS22 > $UNIXTIME
Compval <$ITEMCOUNT(灰色药粉(大量))> = 0
CHECKGOLD 50000
#ACT
take 金币 50000
GIVE 灰色药粉(大量) 1

#IF(4)
CHECKJOB TAOIST
compval $INTS22 > $UNIXTIME
Compval <$ITEMCOUNT(护身符(大))> = 0
CHECKGOLD 5000
#ACT
take 金币 5000
GIVE 护身符(大) 5

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_普通武器> = 1
#ACT
#CALL [回收脚本\普通武器.txt] @回收普通武器

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_普通服装> = 1
#ACT
#CALL [回收脚本\普通服装.txt] @回收普通服装

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_普通头盔> = 1
#ACT
#CALL [回收脚本\普通头盔.txt] @回收普通头盔

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_普通项链> = 1
#ACT
#CALL [回收脚本\普通项链.txt] @回收普通项链

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_普通手镯> = 1
#ACT
#CALL [回收脚本\普通手镯.txt] @回收普通手镯

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_普通戒指> = 1
#ACT
#CALL [回收脚本\普通戒指.txt] @回收普通戒指

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_初级书籍> = 1
#ACT
#CALL [回收脚本\初级书籍.txt] @回收初级书籍

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_中级书籍> = 1
#ACT
#CALL [回收脚本\中级书籍.txt] @回收中级书籍

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_高级书籍> = 1
#ACT
#CALL [回收脚本\高级书籍.txt] @回收高级书籍

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_终级书籍> = 1
#ACT
#CALL [回收脚本\终级书籍.txt] @回收终级书籍

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_沃玛套装> = 1
#ACT
#CALL [回收脚本\沃玛套装.txt] @回收沃玛套装

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_祖玛套装> = 1
#ACT
#CALL [回收脚本\祖玛套装.txt] @回收祖玛套装

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_赤月套装> = 1
#ACT
#CALL [回收脚本\赤月套装.txt] @回收赤月套装

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_口罩面巾> = 1
#ACT
#CALL [回收脚本\口罩面巾.txt] @回收口罩面巾

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_靴子腰带> = 1
#ACT
#CALL [回收脚本\靴子腰带.txt] @回收靴子腰带

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_特殊套装> = 1
#ACT
#CALL [回收脚本\特殊套装.txt] @回收特殊套装

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_血石> = 1
#ACT
#CALL [回收脚本\血石.txt] @回收血石

#IF
Compval <$HASH(H_角色数据)<$USERNAME>_军鼓军牌> = 1
#ACT
#CALL [回收脚本\军鼓军牌.txt] @回收军鼓
}

关键点

  • 回收权限存在整数变量 $INTS22 里:compval $INTS22 < $UNIXTIME 表示未开通,> $UNIXTIME 表示还在有效期内,到期时间按 $UNIXTIME + 天数 计算。
  • 总入口自己不算价,只按开关 #CALL [回收脚本\xxx.txt] @回收xxx 分发;调用路径要与子脚本实际所在目录一致。
  • 子脚本的回收单价写在 MUL M回收临时金币 <单价>,改价格只改这一行。
  • 回收计数用 TAKE <物品> 46 P0 <是否只收极品>:46 是批量按需回收模式,数量落在 P0 上,INC M回收普通数量 <$STR(P0)> 累计件数;第 4 参数写 1 只收极品(如 [@回收普通头盔]),写 0 不限。
  • 每档收完用 LARGE M回收金币 0 判断确实有货,再 GIVE 金币 <$STR(M回收金币)> 一次性发钱并 BREAK。
  • 档位覆盖普通武器/服装/头盔/项链/手镯/戒指,初/中/高/终级书籍,沃玛/祖玛/赤月/特殊套装,靴子腰带、口罩面巾、军鼓军牌、血石等,每档一个子文件。

相关阅读