Question

我想向我的机器人添加一个命令，该命令将接受用户定义的触发时间。触发器的默认值为60秒。但我希望用户能够通过命令手动设置。

示例：

[nick] @cmd 5s

[bot]命令在5秒内启动

或

[nick] @cmd 2m

[bot]命令在2分钟内启动

proc weed:pack {nick uhost hand chan text} {
if {[utimerexists delay] == ""} {
    putserv "PRIVMSG $chan \00303Pack your \00309bowls\00303! Chan-wide \00304Toke\00311-\00304out\00303 in\00308 1 \00303Minute!\003"
    global wchan
    set wchan $chan
    utimer 60 weed:pack:go
    utimer 60 delay
    }
}

和

proc weed:pack:go {} {
global wchan
putserv "PRIVMSG $wchan :\00303::\003045\00303:";
putserv "PRIVMSG $wchan :\00303::\003044\00303:";
putserv "PRIVMSG $wchan :\00303::\003043\00303:";
putserv "PRIVMSG $wchan :\00303::\003042\00303:";
putserv "PRIVMSG $wchan :\00303::\003041\00303:";
putserv "PRIVMSG $wchan :\00303::\00311\002SYNCRONIZED!\002 \00304FIRE THEM BOWLS UP!!!"; return
}

Answer 1

嗯，主要是了解utimer。该命令有两个参数，一个等待秒数的计数，以及一个命令（包括参数，如果相关），当计时器触发时执行。

您需要做的就是弄清楚如何解析用户提供的时间。我们可以使用scan。

scan $text "%d%1s" count type

最好检查一下结果，看看你是否成功了;成功时，返回2（两个字段）。既然你已经把事情分开了，你必须把它转换成秒数：

if {[scan $text "%d%1s" count type] != 2} {
    # Do an error message; don't just silently fail! Don't know eggdrop enough to do that properly
    return
}
switch -- $type {
    "s" { set delay $count }
    "m" { set delay [expr {$count * 60}] }
    "h" { set delay [expr {$count * 60 * 60}] }
    default {
        # Again, you ought to send a complaining message to the user here
        return
    }
}
utimer $delay weed:pack:go

坚持你proc内的所有内容以及你需要的任何其他内容，你应该好好去。如果您有多个需要解析的地方，您甚至可以将该代码转换为自己的程序;这就是我真正想要的，因为“解析持续时间描述”是这类事情的一个很好的选择。

如何为脚本添加用户定义的计时器？

1 个答案: