Propose Tcl

the_crow · Post by **the_crow** » Sun Apr 13, 2003 10:44 am

HEllo there.
Im looking for a tcl for along time ago.
I try to find a tcl, that all users that are in the channel can propose is nick to something, and the bot keep the record of the persons that propose is nick.
Can you help me???
Thanks

Post by **caesar** » Sun Apr 13, 2003 10:53 am

Please define this "propose is nick to something" and probably I'll help you out somehow..

the_crow · Post by **the_crow** » Mon Apr 14, 2003 7:33 am

Sorry about my english.

Let me try explain even better...

The reason that i want this tcls it's for users from a channell, can give is nick to possibles op's. I would like to find one tcl, that permit one person make !me (it's a exemple) and the bot record's his nick(but only the nick) in a database.

Post by **caesar** » Mon Apr 14, 2003 9:16 am

So, the propose of this is it to write in a file the nick of the person who calls a channel command, like !me and he to record it's nick in that file, is this what you want to do?

the_crow · Post by **the_crow** » Mon Apr 14, 2003 2:52 pm

Yessssss.... is that

Can you help me!?!?
Thks

Post by **caesar** » Mon Apr 14, 2003 3:43 pm

Code: Select all

set propose "propose.txt"

bind pub - !me write:propose

proc write:propose {nick uhost hand chan text} {
  if {![file exists $::propose]} { 
    putlog "$::propose file doesnt exists, creating file..." 
    set file [open $::propose w] 
    puts $file "$nick" 
    catch {close $file} 
  }
  set file [open $::propose a] 
  puts $file "$nick" 
  catch {close $file} 
}

the_crow · Post by **the_crow** » Mon Apr 14, 2003 6:54 pm

thanks

This message is only to say thanks