egghelp/eggheads community

!info script help

2005-02-18T12:16:40-04:00

thx works

Statistics: Posted by tuShai — Fri Feb 18, 2005 12:16 pm

!info script help

2005-02-18T11:30:57-04:00

Ermm i am presuming that you want this script to only work in your specified channel?

if thats the case use this.

Code:

bind pub -|- "!infouk" pub:infoukset homechan "#xyz"set inuse 0proc pub:infouk {nick host hand chan arg} {    global inuse homechan    if { [string tolower $chan] != [string tolower $homechan] } { return }    if { $inuse == 1 } {    putserv "PRIVMSG $nick :Sorry this function is in use please wait 20 seconds and try again"    return    }    set fname [open voiceuk.txt r]    while {![eof $fname]} {    set infos [gets $fname]    set inuse 1    putserv "PRIVMSG $nick :$infos"    utimer 20 {set inuse 0}    }    close $fname}

Statistics: Posted by ^DooM^ — Fri Feb 18, 2005 11:30 am

!info script help

2005-02-18T11:02:15-04:00

yapp. that was the prob. but still have the channel. i made now this buts not working

Code:

bind pub -|- "!infouk" pub:infoukset homechan "#xyz" if {![info exists homechan]} {set homechan "[lindex [channels] 0]"} set inuse 0proc pub:infouk {nick host hand chan arg} {    global inuse    if { $inuse == 1 } {    putserv "PRIVMSG $nick :Sorry this function is in use please wait 20 seconds and try again"    return    }    set fname [open voiceuk.txt r]    while {![eof $fname]} {    set infos [gets $fname]    set inuse 1    putserv "PRIVMSG $nick :$infos"    utimer 20 {set inuse 0}    }    close $fname}

well bad TCler

Statistics: Posted by tuShai — Fri Feb 18, 2005 11:02 am

!info script help

2005-02-18T10:22:08-04:00

Well, i have right now this. buts not working. i dont know why

Code:

bind pub -|- "!infouk" pub:infoukset inuse 0proc pub:info {nick host hand chan arg} {    global inuse    if { $inuse == 1 } {    putquick "PRIVMSG $nick :Pls wait 20 Secs. Function is in use"    return    }    set fname [open ts2_eng.txt r]    while {![eof $fname]} {    set infos [gets $fname]    set inuse 1    putquick "PRIVMSG $nick :$infos"    utimer 20 {set inuse 0}    }    close $fname}

Change this in your script

Code:

proc pub:info {nick host hand chan arg} {

to this

Code:

proc pub:infouk {nick host hand chan arg} {

Your binds have to match your proc names else it will not know which proc to call when that !trigger is called. Theres no point just changing its name and not know what its doing

Statistics: Posted by ^DooM^ — Fri Feb 18, 2005 10:22 am

!info script help

2005-02-18T09:55:48-04:00

Well, i have right now this. buts not working. i dont know why

Code:

bind pub -|- "!infouk" pub:infoukset inuse 0proc pub:info {nick host hand chan arg} {    global inuse    if { $inuse == 1 } {    putquick "PRIVMSG $nick :Pls wait 20 Secs. Function is in use"    return    }    set fname [open ts2_eng.txt r]    while {![eof $fname]} {    set infos [gets $fname]    set inuse 1    putquick "PRIVMSG $nick :$infos"    utimer 20 {set inuse 0}    }    close $fname}

Hmm works now. needed to change here

Code:

proc pub:[b]info[/b] {nick host hand chan arg} {

Didnt knew that But one more question. Ho can i make it that this works just for one channel ???? e.g. #xyz ???

Statistics: Posted by tuShai — Fri Feb 18, 2005 9:55 am

!info script help

2005-02-18T08:18:48-04:00

The easiest way would be to create 2 proc's.

Code:

bind pub -|- "!infouk" pub:infouk

set the text file for the english version on this bind and use the german text file on the second proc with

Code:

bind pub -|- "!infode" pub:infode

and to slow it down try using 'putserv' rather than 'putquick'

Statistics: Posted by ^DooM^ — Fri Feb 18, 2005 8:18 am

!info script help

2005-02-18T06:41:54-04:00

Thats what i am looking For.
Thanx m8

Still a question. Ho can i put 2 triggers in

one for .de (german Text output)
one for .eng (english Text output)

and how can i make the message output a lil bit slowlier

and how to change this part that it reads the german txt file and an english one. atm it works not so well when i code it . Thx for ya help

Code:

if { $inuse == 1 } {    putquick "PRIVMSG $chan :Sorry this function is in use please wait 20 seconds and try again"    return    }    set fname [open ts2.txt r]    while {![eof $fname]} {    set infos [gets $fname]    set inuse 1    putquick "PRIVMSG $chan :$infos"    utimer 20 {set inuse 0}    }    close $fname

Statistics: Posted by tuShai — Fri Feb 18, 2005 6:41 am

!info script help

2005-02-18T06:05:42-04:00

try this

Code:

bind pub -|- "!info" pub:infoset inuse 0 proc pub:info {nick host hand chan arg} {    global inuse    if { $inuse == 1 } {     putquick "PRIVMSG $chan :Sorry this function is in use please wait 20 seconds and try again"    return    }    set fname [open ts2.txt r]    while {![eof $fname]} {    set infos [gets $fname]    set inuse 1    putquick "PRIVMSG $chan :$infos"    utimer 20 {set inuse 0}    }    close $fname}

This isn't tested but should work

Statistics: Posted by ^DooM^ — Fri Feb 18, 2005 6:05 am

!info script help

2005-02-18T05:08:54-04:00

Hi everybody. I found that script in the Database. It works well but i have a few probs with it. Hope that somebody can help me.

Code:

bind pub -|- "!info" pub:infoproc pub:info {nick host hand chan arg} {set fname [open ts2.txt r]while {![eof $fname]} {set infos [gets $fname]putquick "PRIVMSG $chan :$infos"}close $fname}

Well, the prob is, when more then 1 person types !info the bot get crased. is it possible to create a spammprotection that tells, if sombody entered !info and gets the text, the other will get a notice like " Pls be Patient, trigger !info is in use. Try again in a few mins"
And is it also possible that the text comes out timed. well I only know it from msl. there u can make it with

Code:

 timer 1 0 notice $nick  timer 1 1 notice $nick  timer 1 2 notice $nick and so on

Thx for the help

Statistics: Posted by tuShai — Fri Feb 18, 2005 5:08 am