Code: Select all
bind cron - {*/59 * * * *} cron:warn
bind cron - {* */1 * * *} cron:week
proc cron:warn {minute hour day month weekday} {
putserv "PRIVMSG #some_channel :week will start in 1 minute"
}
proc cron:week {minute hour day month weekday} {
putserv "PRIVMSG #some_channel :!newweek"
}
Code: Select all
[07:07] Tcl error in file 'eggdrop.conf':
[07:07] bad type, should be one of: act, away, bcst, bot, chat, chjn, chof, chon, chpt, ctcp, ctcr, dcc, disc, evnt, filt, flud, join, kick, link, load, lost, mode, msg, msgm, need, nick, nkch, notc, note, part, pub, pubm, raw, rcvd, rejn, sent, sign, splt, time, topc, tout, unld, wall
while executing
"bind cron - {*/59 * * * *} cron:warn "
(file "scripts/random.tcl" line 1)
invoked from within
"source scripts/random.tcl"
(file "eggdrop.conf" line 1340)
[07:07] * CONFIG FILE NOT LOADED (NOT FOUND, OR ERROR)
Code: Select all
.status
The purpose is to identify and tell us the version of Eggdrop that you are currently using.I am <botnick>, running eggdrop v1.6.20: xx users (mem: xxxk).
Code: Select all
bind time - "59 * * * *" time:warn
bind time - "00 * * * *" time:week
proc time:warn {min hour day month year} {
putserv "PRIVMSG #some_channel :week will start in 1 minute"
}
proc time:week {min hour day month year} {
putserv "PRIVMSG #some_channel :!newweek"
}
Code: Select all
if {![onchan "WScrabble" #channel]} return
Code: Select all
if {[getchanidle "WScrabble" "#channel"] > 10} return
Code: Select all
bind time - "59 * * * *" time:week
bind time - "00 * * * *" time:week
proc time:week {min hour day month year} {
if {![onchan "WScrabble" "#channel"]} return
if {[getchanidle "WScrabble" "#channel"] > 10} return
if {[string trimleft $min 0] == 59} {
putserv "PRIVMSG #some_channel :week will start in 1 minute"
}
putserv "PRIVMSG #some_channel :!newweek"
}
}
Code: Select all
bind cron - {*/59 * * * *} cron:week
bind cron - {* */1 * * *} cron:week
proc cron:week {minute hour day month weekday} {
if {![onchan "WScrabble" "#channel"]} return
if {[getchanidle "WScrabble" "#channel"] > 10} return
if {[string trimleft $minute 0] == 59} {
putserv "PRIVMSG #some_channel :week will start in 1 minute"
} else {
putserv "PRIVMSG #some_channel :!newweek"
}
}
Code: Select all
bind cron - {*/59 * * * 1-5} cron:week
bind cron - {* */1 * * 1-5} cron:week
Code: Select all
bind time - "59 * * * *" time:week
bind time - "00 * * * *" time:week
proc time:week {min hour day month year} {
switch [string trimleft $day 0] {
"6" { return }
"7" { return }
default {
if {![onchan "WScrabble" "#channel"]} return
if {[getchanidle "WScrabble" "#channel"] > 10} return
if {[string trimleft $min 0] == 59} {
putserv "PRIVMSG #some_channel :week will start in 1 minute"
} else {
putserv "PRIVMSG #some_channel :!newweek"
}
}
}
}
Code: Select all
bind cron - {*/59 * 9-17 * 1-5} cron:week
bind cron - {* */1 9-17 * 1-5} cron:week
Code: Select all
set hour [string trimleft $hour 0]
if {$hour < 9 && $hour > 17} return
Code: Select all
bind time - "59 * * * *" time:week
bind time - "00 * * * *" time:week
proc time:week {min hour day month year} {
switch [string trimleft $day 0] {
"6" { return }
"7" { return }
default {
set hour [string trimleft $hour 0]
if {$hour < 9 && $hour > 17} return
if {![onchan "WScrabble" "#channel"]} return
if {[getchanidle "WScrabble" "#channel"] > 10} return
if {[string trimleft $min 0] == 59} {
putserv "PRIVMSG #some_channel :week will start in 1 minute"
} else {
putserv "PRIVMSG #some_channel :!newweek"
}
}
}
}
Code: Select all
bind time - "59 9 1 * *" time:week
bind time - "00 9 1 * *" time:week
bind time - "59 10 1 * *" time:week
bind time - "00 10 1 * *" time:week
Code: Select all
bind time - "59 17 1 * *" time:week
bind time - "00 17 1 * *" time:week
Code: Select all
[20:54] <CWUKCountdown> [15:54:00] Tcl error [cron:week]: illegal channel: '#CWUKCountdown'