Need help with mirc to tcl..

[AtomicWedgie]

Code:
ON *:TEXT:*:#:{

if ($1 == !add) {

if ($2 == game) {
if ( ($3 != $null) && (!$read(database\games.txt,w,$3) ) { /.write database\games.txt $3 $nick }

}
}
if ($2 == clan) {
if ( ($3 != $null) && (!$read(database\clans.txt,w,$3) ) { /.write database\clans.txt $3 $nick }
}
}

Please make this .. and a !removeme Command thanks.


!removeme should remove the name of player (or by host) from all lists.

One last thing...

i want a !show command that will show all list's as a notice or query or echo

Please Post a replay if any1 is making it ... thank you

[Galadhrim]

as requested here: http://forum.egghelp.org/viewtopic.php?t=9563

[awyeah]

Something like this maybe?

Code: Select all

bind pub - "!add" my:proc

proc my:proc {nick uhost hand chan text} {
 if {[string equal -nocase "game" [lindex $text 0]]} {
  if {([lindex $text 1] != "") && ![file exists database\games.txt]} {
  set file [open database\games.txt a]; puts $file "[lindex $text 1] $nick"
  close $file
  }
 }
 if {[string equal -nocase "clan" [lindex $text 0]]} {
  if {([lindex $text 1] != "") && ![file exists database\clans.txt]} {
  set file [open database\clans.txt a]; puts $file "[lindex $text 1] $nick"
  close $file
  }
 }
}

[AtomicWedgie]

yes

now all needed is !removeme that will remove name from all lists

and !show <list> .

[AtomicWedgie]

now all needed is !removeme that will remove name from list

and !show



this is correct

[AtomicWedgie]

!show <should show the Number of Listed and will show list,
!remove <should remove nick from list>


and if you can add this little thing it will be perfect ...

as some1 !adds the bot will change topic with Last Added : <NAME>

and an admin command to !remove <nick> thats all thanks

[AtomicWedgie]

hmm,
friend says i will get flooded with the bot sending the whole list to ppl...

maybe any1 can make :
an Admin command that will add Lists like ..

.Addlist UT

CS.txt and UT.txt, then you can do !players UT

and the bot says Totally players under UT is: 32