admin 发表于 2024-3-17 22:55:42

"双倍经验卷"如何实现离线保留经验时长并使用增加时间,可参考以下写法

;------------------------------------QF
[@STDMODEFUNC10]
#IF
CHECKLEVELEX > 0
#ACT
KILLMONEXPRATE 200 3600
Gmexecute showeffect 75
SENDMSG 7 您获得了1小时双倍经验时间
CalcVar HUMAN 双倍时间 = 3600
SaveVar HUMAN 双倍时间 ..\QuestDiary\数据文件\双倍时间保存.txt
SetScTimer 1 1
BREAK

;------------------------------------QM声明
Var Integer HUMAN 双倍时间 "" HardDisk
LOADVAR HUMAN 双倍时间 ..\QuestDiary\数据文件\双倍时间保存.txt

;------------------------------------登录添加:
#If
CheckVar HUMAN 双倍时间 > 0
#Act
KILLMONEXPRATE 200 <$HUMAN(双倍时间)>
SetScTimer 1 1
Break

;------------------------------------定时器执行
[@OnTimer1]
#If
CheckVar HUMAN 双倍时间 > 0
#Act
CalcVar HUMAN 双倍时间 - 1
SaveVar HUMAN 双倍时间 ..\QuestDiary\数据文件\双倍时间保存.txt
Break
#ElseAct
KILLMONEXPRATE 100 1
CalcVar HUMAN 双倍时间 = 0
SaveVar HUMAN 双倍时间 ..\QuestDiary\数据文件\双倍时间保存.txt
KillScTimer 1
Break
页: [1]
查看完整版本: "双倍经验卷"如何实现离线保留经验时长并使用增加时间,可参考以下写法