View Single Post
Old 06-09-2003, 01:13 PM  
zpr
Senior Member
 
Join Date: Feb 2003
Posts: 170
Default

WarC, tried and it doesnt work.

ioa.cfg:

RequestLine= [%##] [%-10user] -> %-50request

dzsbot.tcl:

################################################## ###############################
# SHOWING REQUESTS IN IRC #
################################################## ###############################
proc proc_requests {nick uhost hand chan args} {
global announce disable reqs_file reqsplitter
if { $disable(REQUESTSHOW) == 0 } {
set tempfile [open $reqs_file r]
set section "DEFAULT"
set cnt 0
set output $announce(REQHEADER)
set output [basicreplace $output "REQUESTS"]
sndall $section $output
while {![eof $tempfile]} {
set line [gets $tempfile]
set index2 [string first $reqsplitter $line]
if { $index2 != "-1" } {
set cnt [expr $cnt + 1]
set output $announce(REQUESTSHOW)
set output [replacevar $output "%user" [string trim [string trim [lindex $line 1] "\["] "\]"]]
set output [replacevar $output "%request" [string range $line [expr $index2 + [string length $reqsplitter]] end]]
set output [replacevar $output "%cnt" [format %02d $cnt]]
set output [basicreplace $output "REQUESTS"]
sndall $section $output
}
}
close $tempfile
set output $announce(REQFOOT)
set output [basicreplace $output "REQUESTS"]
sndall $section $output
}
}

ZeroRacer, tried also your way, without brackets:

RequestLine= [%##] %-10user -> %-50request

and replaced those 3 lines in dzsbot.tcl. same, failded

[20:05:48] (@zpr) !requests
[20:05:52] (@Bot) -xxx- -----[ Current Requests ]
[20:05:53] (@Bot) -xxx- -----[ End ]

regards
zpr is offline   Reply With Quote