定时器中一秒执行吃多种货币的写法

jin2003

;自动吃货币-----------放入QM的1秒定时器中执行的
#OR
CHECKITEM 1铜钱[绑] 1
CHECKITEM 2铜钱[绑] 1
CHECKITEM 5铜钱[绑] 1
CHECKITEM 10铜钱[绑] 1
CHECKITEM 20铜钱[绑] 1
CHECKITEM 30铜钱[绑] 1
CHECKITEM 50铜钱[绑] 1
CHECKITEM 100铜钱[绑] 1
CHECKITEM 200铜钱[绑] 1
CHECKITEM 300铜钱[绑] 1
CHECKITEM 500铜钱[绑] 1
CHECKITEM 800铜钱[绑] 1
CHECKITEM 1000铜钱[绑] 1
CHECKITEM 2000铜钱[绑] 1
CHECKITEM 3000铜钱[绑] 1
CHECKITEM 5000铜钱[绑] 1
CHECKITEM 8000铜钱[绑] 1
CHECKITEM 10000铜钱[绑] 1
CHECKITEM 20000铜钱[绑] 1
CHECKITEM 30000铜钱[绑] 1
CHECKITEM 50000铜钱[绑] 1
#ACT
MOV N$自动吃绑铜 0
TakeBagItem 1铜钱[绑] 60 0 0 0 0 N$自动吃绑铜1 0 0
TakeBagItem 2铜钱[绑] 60 0 0 0 0 N$自动吃绑铜2 0 0
TakeBagItem 5铜钱[绑] 60 0 0 0 0 N$自动吃绑铜3 0 0
TakeBagItem 10铜钱[绑] 60 0 0 0 0 N$自动吃绑铜4 0 0
TakeBagItem 20铜钱[绑] 60 0 0 0 0 N$自动吃绑铜5 0 0
TakeBagItem 30铜钱[绑] 60 0 0 0 0 N$自动吃绑铜6 0 0
TakeBagItem 50铜钱[绑] 60 0 0 0 0 N$自动吃绑铜7 0 0
TakeBagItem 100铜钱[绑] 60 0 0 0 0 N$自动吃绑铜8 0 0
TakeBagItem 200铜钱[绑] 60 0 0 0 0 N$自动吃绑铜9 0 0
TakeBagItem 300铜钱[绑] 60 0 0 0 0 N$自动吃绑铜10 0 0
TakeBagItem 500铜钱[绑] 60 0 0 0 0 N$自动吃绑铜11 0 0
TakeBagItem 800铜钱[绑] 60 0 0 0 0 N$自动吃绑铜12 0 0
TakeBagItem 1000铜钱[绑] 60 0 0 0 0 N$自动吃绑铜13 0 0
TakeBagItem 2000铜钱[绑] 60 0 0 0 0 N$自动吃绑铜14 0 0
TakeBagItem 3000铜钱[绑] 60 0 0 0 0 N$自动吃绑铜15 0 0
TakeBagItem 5000铜钱[绑] 60 0 0 0 0 N$自动吃绑铜16 0 0
TakeBagItem 8000铜钱[绑] 60 0 0 0 0 N$自动吃绑铜17 0 0
TakeBagItem 10000铜钱[绑] 60 0 0 0 0 N$自动吃绑铜18 0 0
TakeBagItem 20000铜钱[绑] 60 0 0 0 0 N$自动吃绑铜19 0 0
TakeBagItem 30000铜钱[绑] 60 0 0 0 0 N$自动吃绑铜20 0 0
TakeBagItem 50000铜钱[绑] 60 0 0 0 0 N$自动吃绑铜21 0 0
FORMULATION (<$str(N$自动吃绑铜1)>*1)+(<$str(N$自动吃绑铜2)>*2)+(<$str(N$自动吃绑铜3)>*5)+(<$str(N$自动吃绑铜4)>*10)+(<$str(N$自动吃绑铜5)>*20) N$自动吃绑铜
FORMULATION (<$str(N$自动吃绑铜6)>*30)+(<$str(N$自动吃绑铜7)>*50)+(<$str(N$自动吃绑铜8)>*100)+(<$str(N$自动吃绑铜9)>*200)+(<$str(N$自动吃绑铜10)>*300)+<$str(N$自动吃绑铜)> N$自动吃绑铜
FORMULATION (<$str(N$自动吃绑铜11)>*500)+(<$str(N$自动吃绑铜12)>*800)+(<$str(N$自动吃绑铜13)>*1000)+(<$str(N$自动吃绑铜14)>*2000)+(<$str(N$自动吃绑铜15)>*3000)+<$str(N$自动吃绑铜)> N$自动吃绑铜
FORMULATION (<$str(N$自动吃绑铜16)>*5000)+(<$str(N$自动吃绑铜17)>*8000)+(<$str(N$自动吃绑铜18)>*10000)+(<$str(N$自动吃绑铜19)>*20000)+(<$str(N$自动吃绑铜20)>*30000)+(<$str(N$自动吃绑铜21)>*50000)+<$str(N$自动吃绑铜)> N$自动吃绑铜
ChangeMoney 绑铜 + <$str(N$自动吃绑铜)>
Sendmsg 6 获得了：<$str(N$自动吃绑铜)>绑铜


ChangeMoney 绑铜 + <$str(N$自动吃绑铜)>这个可以改为常规的元宝代码

jin2003

啦啦啦啦啦啦啦

40731803

我给你写一个优化版，使用更少的代码实现同样的功能：

#if
#Act
Mov L$货币名组 [1铜钱,2铜钱,3铜钱,5铜钱,10铜钱,50铜钱,100铜钱,200铜钱,500铜钱,1000铜钱]
Mov L$对应货币 [1,2,3,5,10,50,100,200,500,1000]
Mov N$XHZZ 0
Mov N$吃货币总数 0
GetListVarCount L$货币名组 N1
While N$XHZZ < N1
Mov S$物品名字 <$Str(L$货币名组[<$Str(N$XHZZ)>])>
Mov N$对应数值 <$Str(L$对应货币[<$Str(N$XHZZ)>])>
Mov N$吃掉数量 0
TakeBagItem <$Str(S$物品名字)> 60 0 0 0 0 N$吃掉数量 0 0
FORMULATION <$str(N$吃掉数量)>*<$Str(N$对应数值)> N$计算结果
Inc N$吃货币总数 <$Str(N$计算结果)>
Inc N$XHZZ 1
EndWhile
#IF
Large N$吃货币总数 0
#Act
ChangeMoney 绑铜 + <$str(N$吃货币总数)>
Sendmsg 6 获得了：<$str(N$吃货币总数)>绑铜
#ElseAct
SendMsg 5 你背包中没有可吃的货币

jz9005

40731803 发表于 2026-6-2 17:53
我给你写一个优化版，使用更少的代码实现同样的功能：

你是黑总？

40731803

jz9005 发表于 2026-6-2 18:40
你是黑总？

我TM是黑哥，不是黑总

9093535

40731803 发表于 2026-6-2 17:53
我给你写一个优化版，使用更少的代码实现同样的功能：

感谢黑总分享，研究研究！

40731803

9093535 发表于 2026-6-2 20:05
感谢黑总分享，研究研究！

这是TXT脚本，VV引擎支持LUA，实际上这类脚本用LUA写效率更高不说，而且代码量更少

jz9005

这是TXT脚本，VV引擎支持LUA，实际上这类脚本用LUA写效率更高不说，而且代码量更少

我爱嘟嘟

#在这里快速回复#这个可以改为常规的元宝代码