egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2004-07-09T16:38:21-04:00 https://forum.eggheads.org/app.php/feed/topic/7866 2004-07-09T16:38:21-04:00 2004-07-09T16:38:21-04:00 https://forum.eggheads.org/viewtopic.php?p=38393#p38393 <![CDATA[need help for read out]]>
Thx for reply ...

Tcl have now no error, but the script have no effect ?!

Statistics: Posted by multikon — Fri Jul 09, 2004 4:38 pm

]]> 2004-07-09T16:16:40-04:00 2004-07-09T16:16:40-04:00 https://forum.eggheads.org/viewtopic.php?p=38392#p38392 <![CDATA[need help for read out]]>

Code: 

proc show_latest { hand idx text } {
To this:

Code: 

proc show_latest {nick uhost hand chan text} {

Statistics: Posted by Alchera — Fri Jul 09, 2004 4:16 pm

]]> 2004-07-09T13:11:04-04:00 2004-07-09T13:11:04-04:00 https://forum.eggheads.org/viewtopic.php?p=38386#p38386 <![CDATA[need help for read out]]>

Code: 

set url "http://my-page.net/latest.shtml"if {![info exists egghttp(version)]} {  putlog "egghttp.tcl wurde nicht einwandfrei geladen"  putlog "egghttp_latest.tcl wurde nicht geladen"} else {  proc your_callbackproc {sock} {    global url    set headers [egghttp:headers $sock]    set body [egghttp:data $sock]      regsub -all "\n" $body "" body    regsub -all -nocase {<br>} $body "<br>\n" body    regexp {<b>(.*)</b>} $body    putlog "'$url'$served"  }  bind pub f|f !testlatest show_latest  proc show_latest { hand idx text } {    global url     set sock [egghttp:geturl $url your_callbackproc]    return 1  }    putlog "egghttp_latest.tcl loaded."}
Don`t work ...

The errormessage is:
Tcl error [show_latest]: wrong # args: should be "show_latest hand idx text"

Please help me, to fix them :cry: [/b][/code]

Statistics: Posted by multikon — Fri Jul 09, 2004 1:11 pm

]]>