eggdrop aansturen

[Verwijderd]

Ok, ik heb het volgende....

Ik heb een php board (wbb). En nu wil ik als er een nieuwe post is gemaakt dat een eggdrop dit in een irc kanaal zegt.
Ik heb de eggdrop al werkende, maar hoe moet ik deze nu automatisch laten aansturen??
Ik weet trouwens vrij weinig tot niks van tcl scripting af. Maar wel redelijk veel van php.

Kan iemand mij een beetje op gang helpen??

[Flake]

Als je wilt dat dit met PHP gebeurt dan zul je met fsockopen() een telnet sessie moeten aansturen met de bot. Dit kost echter ontzettend veel load. Het beste kun je gewoon een TCL scriptje bouwen die het kanaal op de hoogte houdt van nieuwe posts. Ik heb geen ervaring met TCL dus daar kan ik je niet mee helpen.

/edit: Typootje

[Verwijderd]

pleur iets met php in een file en scan met tcl die file

PHP:

<?function channel($str){    $fp = fopen("/path/to/logfile","a");    if( $fp )    {         fwrite($fp,"$str\n");    }    fclose($fp);}?>

[Verwijderd]

code:

set pubchans1 "#channel"
set chktimer 5
set logfile "/path/to/your.log"
set block_size 1

proc sndall {text} {global pubchans1
  foreach chan $pubchans1 {
    putserv "PRIVMSG $chan :$text"
  }
}


proc scanlog {} {
  global logfile chktimer lastoct
  utimer $chktimer "scanlog"
  if {[file size $logfile] == $lastoct} {return 0}
  if {[file size $logfile] < $lastoct} {set lastoct 0}
  putlog "seeking logfile"
  if {[catch {set of [open $logfile r]}] != 0} {return 0}
  seek $of $lastoct
  while {![eof $of]} {
    set line [gets $of]
    if {$line == ""} {continue}
    sndall "$line"
  }
  close $of
  set lastoct [file size $gllog]
  putlog "done seeking"
  return 0

}

if {[lsearch [utimers] "* scanlog *"] == -1} {utimer $chktimer "scanlog"}
if {![info exists lastoct]} {set lastoct [file size $gllog]}

Het was wel geen scriptrequest maargoed...

edit:
het rammelde een beetje....

[Verwijderd]

bedankt voor de reply's....

ik ga het maar weer eens proberen....

en heeeel erg bedankt voor dat tcl scriptje... (als het daarmee lukt). Ik had dat nooit kunnen maken

[Verwijderd]

Als ik nu de eggdrop op een andere host draai. kan ik dan gewoon de url ingeven inplaats van het path??

[Dash2in1]

heb je het al geprobeerd?

[Verwijderd]

je script geeft een error

code:

[16:26] TCL error in file 'dstrivia.conf':
[16:16] <Redemption^> [16:26] can't read "gllog": no such variable
[16:16] <Redemption^>     while executing
[16:16] <Redemption^> "file size $gllog"
[16:16] <Redemption^>     invoked from within
[16:16] <Redemption^> "if {![info exists lastoct]} {set lastoct [file size $gllog]}
[16:16] <Redemption^> "
[16:16] <Redemption^>     (file "scripts/wbbaddon.tcl" line 33)
[16:16] <Redemption^>     invoked from within
[16:16] <Redemption^> "source scripts/wbbaddon.tcl"
[16:16] <Redemption^>     (file "dstrivia.conf" line 1227)
[16:16] <Redemption^> [16:26] * CONFIG FILE NOT LOADED (NOT FOUND, OR ERROR)

Help aub

[chris]

Hmz. Ga ff goed kijken wat het script doet. En ga zelf ff aan het klooien. Het is hier niet hotscripts.com.

[Verwijderd]

sorry dat ik geen tcl kan coden hoor....

maar ik denk dat gllog nog geset moet worden...
maar welke waarde moet die dan hebben?

[Verwijderd]

zou iemand me aub misschien kunnen helpen met die error.. want ik kom er echt niet uit

[Verwijderd]

je moet gllog veranderen in logfile

[QuasaR]

set pubchans1 "#channel"
set chktimer 5
set logfile "/path/to/your.log" <-- deze moet wel wijzen naar je logfile

en alle $gllog veranderen naar $logfile

[Verwijderd]

ik heb het eindelijk zover dat het werkt vanaf m'n eigen hd...


Maar ik kan geen webadres opgeven voor die file die gelezen moet worden

enig idee of dit mogelijk is?

[chem]

moeten we nu echt stap voor stap je handje vasthouden?

[Verwijderd]

nee, dat zeg ik toch niet....

Ik vroeg me alleen af of dit nou kon of niet... Anders dan moet ik iets anders verzinnen