egghelp/eggheads community

i need help whit a script

2004-03-12T06:44:34-04:00

Ok, it's realy works
Thanks

Statistics: Posted by Guest — Fri Mar 12, 2004 6:44 am

i need help whit a script

2004-03-12T04:56:09-04:00

Code:

set addqpubprefix !set addqchan "#somethinghere"set addqfile scripts/questions.txtif { ![info exists toolbox_loaded] } {   source scripts/alltools.tcl}bind pub - [string trim $addqpubprefix]addquestion addq:pub:addquestionproc addq:pub:addquestion {nick uhost hand chan arg} {   if {[string tolower $chan] != [string tolower $::addqchan]} {      putserv "NOTICE $nick :You're not in the good channel, try it in $::addqchan"      return 0   }   if { $arg == "" } {      putserv "NOTICE $nick :Usage: !addquestion "      return 0   }   set file [open $::addqfile a]   puts $file "$arg"   close $file   putserv "NOTICE $nick :Added Question...$arg"   return 1}

Statistics: Posted by CrazyCat — Fri Mar 12, 2004 4:56 am

i need help whit a script

2004-03-12T02:00:30-04:00

i need help with a little script, the script works but for all channels and
i want to make it work just for 1 channel, but i made somethig wrong and I don't no where is the mistake

here is the code, maybe you can help me

Code:

set addqpubprefix !set addqchan "#somethinghere"set addqfile scripts/questions.txt########################################           THIS IS CODE              ########################################if { ![info exists toolbox_loaded] } { source scripts/alltools.tcl }bind pub - [string trim $addqpubprefix]addquestion addq:pub:addquestionproc addq:pub:addquestion {nick uhost hand chan arg} { global addqchan addqfile  if { $arg == "" } {  putnotc $nick "Usage: !addquestion "  return 0 } set file [open $addqfile a] puts $file "$arg" close $file putnotc $nick "Added Question...$arg" return 1}

Thanks

Statistics: Posted by Guest — Fri Mar 12, 2004 2:00 am