Beim Starten vom Eggdrop bekomm ich immer folgende Meldung:
Code: Alles auswählen
(file "scripts/trigger/trigger.tcl" line 3)
invoked from within
"source scripts/trigger/trigger.tcl"
(file "eggdrop.conf" line 104)
[17:52] * CONFIG FILE NOT LOADED (NOT FOUND, OR ERROR)
Script:
Code: Alles auswählen
alias aversion { return RC 2 }
alias cmdchar { return ! }
alias trig.storage {
if (!$isdir(Storage)) {
mkdir Storage
}
return Storage\trigger.hsh
}
alias addon.status { return on }
; ---------------------------------------------------------------------------------------------------------------
; on :XXX: events
; ---------------------------------------------------------------------------------------------------------------
on *:LOAD: {
set %emailaddy $?="corps3grind3r@gmail.com"
if (!$exists($trig.storage)) {
if (!$hget(trigger.addon)) {
hmake trigger.addon 1000
}
hload trigger.addon $trig.storage
}
else {
hfree trigger.addon
hmake trigger.addon 1000
if (!$isfile($$mircdirStorage\trigger.hsh) { hsave trigger.addon $trig.storage }
hload trigger.addon $trig.storage
}
}
on *:START: {
if (!$exists($trig.storage)) {
if (!$hget(trigger.addon)) {
hmake trigger.addon 1000
}
hload trigger.addon $trig.storage
}
else {
hfree trigger.chan
if (!$isfile($$mircdirStorage\trigger.hsh) { hsave trigger.addon $trig.storage }
hmake trigger.addon 1000
hload trigger.addon $trig.storage
}
}
on *:UNLOAD: {
if ($exists($trig.storage)) {
var %remove $input(Do you want to remove the storage file?,yn)
if (%remove == %true) { .remove -b $trig.storage }
if ($hget(trigger.addon)) {
hfree trigger.addon
var %unload $input(Script has been unloaded.,o)
}
}
}
; ---------------------------------------------------------------------------------------------------------------
; The Trigger script
; ---------------------------------------------------------------------------------------------------------------
on *:TEXT:*:#: {
if ($addon.status != on) && ($addon.status != off) { .msg $chan invalid configurations. | halt }
elseif ($addon.status == off) { halt }
elseif ($hget(trigger.addon, $remove($1, $chr(33))) != $null) {
if ($left($1,1) == $cmdchar) {
.msg $chan ( $+ $remove($1, $chr(33)) $+ ) $replace($hget(trigger.addon, $remove($1, $chr(33))), <nick>, $nick, <chan>, $chan, <host>, $address($nick,2), <b>, , <u>, )
halt
}
}
elseif ($1 == $cmdchar $+ add) {
if ($nick !isop $chan) { .notice $nick not enough access. | halt }
elseif (!$3) { .notice $nick More parameters needed. | halt }
elseif ($2 == $cmdchar $+ add) || ($2 == $cmdchar $+ del) || ($2 == $cmdchar $+ list) { .notice $nick Primary triggers cant be setted. | halt }
elseif ($2 == $cmdchar $+ credits) { .notice $nick Primary triggers cant be setted. | halt }
elseif ($hget(trigger.addon, $2) != $null) { .notice $nick Trigger already taken. | halt }
hadd -m trigger.addon $2 $3-
hsave trigger.addon $trig.storage
.msg $chan A new Trigger was added by $nick (Trigger: $2 $+ , Text: $3-)
}
elseif ($1 == $cmdchar $+ del) {
if ($nick !isop $chan) { .notice $nick not enough access. | halt }
elseif (!$2) { .notice $nick More parameters needed. | halt }
elseif (!$hget(trigger.addon, $2)) { .notice $nick This trigger doenst exist. | halt }
hdel trigger.addon $2
hsave trigger.addon $trig.storage
.msg $chan The trigger $2 has been removed.
}
elseif ($1 == $cmdchar $+ list) {
if (!$2) {
var %total $hget(trigger.addon, 0).item, %count = 0, %lists
while (%count < %total) {
inc %count
%lists = $addtok(%lists, $hget(trigger.addon, %count).item $chr(45) , 32)
}
.notice $nick $iif(%lists == $null, No triggers found, $v1)
}
if ($2 == -l) {
var %total $hget(trigger.addon, 0).item, %count = 0, %lists
while (%count < %total) {
inc %count
.notice $nick $+ $hget(trigger.addon, %count).item $+ : $hget(trigger.addon, $hget(trigger.addon, %count).item)
}
.notice $nick $iif(%total == 0, No triggers found, End of triggerlist.)
}
if ($2 == -s) {
if (!$3) { .notice $nick more parameters needed. | halt }
var %total $hget(trigger.addon, 0).item, %count = 0, %lists
while (%count < %total) {
inc %count
if (* $+ $3 $+ * iswm $hget(trigger.addon, %count).item) {
.notice $nick $+ $hget(trigger.addon, %count).item $+ : $hget(trigger.addon, $hget(trigger.addon, %count).item)
}
}
.notice $nick $iif(%total == 0, No triggers found, End of triggerlist.)
}
}
if ($1 == $cmdchar $+ credits) { .msg $chan 0,1-=[Trigger Addon :: Version: $aversion © by Patrick Rennings (Vox) :: www.ogamenet.net / #allnitecafe $&
For any errors please report them to: %emailaddy $+ ]=- }
else { $null }
}
Mit freundlichen Grüßen C0rPs3