egghelp/eggheads community

players stats for gather bot

2006-11-05T14:43:16-04:00

Here is the mistake, in both procs:

set text [split text]

should be:

set text [split $text]

I editted the above script to fix that.

Statistics: Posted by rosc2112 — Sun Nov 05, 2006 2:43 pm

players stats for gather bot

2006-11-05T09:13:29-04:00

[09:39:20] .add FMB
[09:39:22] Wrote text to file D:/Viliaus/CD/sys/Eggdrop/ech/rankfile.txt
[09:39:24] .rank FMB
[09:39:26] Rank for text: 2
[09:39:30]
[09:39:42] .rank serx
[09:39:43] Rank for text: 2

Statistics: Posted by serx — Sun Nov 05, 2006 9:13 am

players stats for gather bot

2006-11-05T05:41:38-04:00

You asked for a script to add nicks, that's what it does (unless there's some error, which your reply does not make clear)

Statistics: Posted by rosc2112 — Sun Nov 05, 2006 5:41 am

players stats for gather bot

2006-11-05T03:42:05-04:00

then I type: .add serx bot add to txt file that "text" and nothing ;[

Statistics: Posted by serx — Sun Nov 05, 2006 3:42 am

players stats for gather bot

2006-11-05T03:27:10-04:00

thanx man

Statistics: Posted by serx — Sun Nov 05, 2006 3:27 am

players stats for gather bot

2006-11-05T14:45:53-04:00

If the rank order is just the order names are added:

Code:

#  Fixed missing $ in:       set text [split $text]#######################################################################################################################set rankfile "/home/mybot/data/rankfile.txt"bind pub - .add addprocproc addproc {nick uhost hand chan text} {      global rankfile      set text [string trim $text]      if {$text == ""} {puthelp "PRIVMSG $chan :You didn't supply a name!";return}      set text [split $text]      # check the existing data for duplicate names      if {[file exists $rankfile]} {              set rankdata [open $rankfile r]              while {![eof $rankdata]} {                      set curline [gets $rankdata]                      set curline [split $curline]                      if {[string tolower $curline] == [string tolower $text]} {                               # I assume you dont want to replace existing data so we just return with an error msg.                               puthelp "PRIVMSG $chan :That name '[join $text]' already exists"                               catch {close $rankdata}                               return                      }              }      }      # write the data to the end of the file.      set rankdata [open $rankfile a]      puts $rankdata [join $text]      flush $rankdata      catch {close $rankdata}      puthelp "PRIVMSG $chan :Wrote [join $text] to file $rankfile"      return} bind pub - .rank rankprocproc rankproc {nick uhost hand chan text} {      global rankfile      set text [string trim $text]      if {$text == ""} {puthelp "PRIVMSG $chan :You didn't supply a name!";return}      set text [split $text]      set ranktemp "";set rankdata "";set ranknumber -1      if {![file exists $rankfile]} {              puthelp "PRIVMSG $chan :No datafile exists."              return      }      set ranktemp [open $rankfile r]      while {![eof $ranktemp]} {              set curline [gets $ranktemp]              set curline [split $curline]              if {$curline != ""} {                     set rankdata [linsert $rankdata end $curline]              }      }      catch {close $ranktemp}      set ranknumber [lsearch -exact $rankdata $text]      if {$ranknumber != -1} {              puthelp "PRIVMSG $chan :Rank for $text: [expr $ranknumber + 1]"      } else {              puthelp "PRIVMSG $chan :Rank for $text not found."              return      }}

Not tested.

Keep in mind if you try to use names with " (double quotes), [ ] (square brackets) or other special tcl chars the puthelp strings will likely produce errors, in which case you can just remove the [join $text] part and use $text (which will show strings like \[name\" which is not a problem, it just looks bad..)

Statistics: Posted by rosc2112 — Sat Nov 04, 2006 5:25 pm

players stats for gather bot

2006-11-04T13:35:35-04:00

hello,
Can every one make script then type: .add nick , bot adden nick to ranks.txt file and then type .rank bot whrite exemple: Your Rank is 50 of 452.
SORRY FOR MY BAD ENGLISH

Statistics: Posted by serx — Sat Nov 04, 2006 1:35 pm