looking for a script

[infernal]

someone knows where i can find a script that arrange trigger for me, but also can print .txt files, like: !help==>print help.txt

[GodOfSuicide]

print = post to the channel or send it to a printer ?

[]Kami[]

Well,

I think he means print = read from file (print is used in C - similar as echo in php).If he means that, then you can try something like this:

Code: Select all

bind pub -|- "!help" pub:help

proc pub:help {nick host handle chan arg} {

set fileid [open help.txt r]
gets $fileid newvar1
gets $fileid newvar2
putquick "PRIVMSG $chan :$newvar1"
putquick "PRIVMSG $chan :$newvar2"
close $fileid

}

This script will open file help.txt for reading (r) and it will take first 2 lines from file and displayed them in channel

[infernal]

lol, i need more then 20 lines, there about 30 lines in that help file

[KrzychuG]

This should help

Code: Select all

bind pub -|- "!help" pub:help 

proc pub:help { nick host handle channel arg } { 

  set fname [open help.txt r]
  while {![eof $fname]} {
    set line [gets $fname]
    puthelp "PRIVMSG $channel :$line"
  }
  close $fname
} ;# pub:help

[infernal]

well, that works, only he prints it in the channel and not via a pm, how do i do that??

you can always come and look @ it: irc://irc.uicn.net/infernalarts

[]Kami[]

Look tcl-commands.doc

Btw, this will msg user:

Code: Select all

bind pub -|- "!help" pub:help 

proc pub:help { nick host handle channel arg } { 

  set fname [open help.txt r] 
  while {![eof $fname]} { 
    set line [gets $fname] 
    puthelp "PRIVMSG $nick :$line" 
  } 
  close $fname 
} ;# pub:help 

[infernal]

works now, thank you verry much

[]Kami[]

No Problem