| View previous topic :: View next topic |
| Author |
Message |
vince164 Voice
Joined: 23 May 2006 Posts: 7
|
Posted: Fri May 26, 2006 9:47 pm Post subject: How come this dont work |
|
|
Hi am trying to get this code to work but im haveing difficulty. i do have the vhchan set, the problem im haveing is the proc msg:vhchan dosent seem to work
| Code: | setudef flag vhchan
bind pub - !vhost pub:vhost
bind notc - * msg:vhchan
bind pub - !remove pub:remove
bind pub - !help pub:help
proc pub:remove {nick uhost hand chan text} {
if { $chan == "#vhost" } {
putquick "PRIVMSG hostserv :DEL $nick"
putquick "PRIVMSG $chan :$nick 4your vhost has been removed, 8Thank you for stoping by #vhost have a good day"
return
}
}
proc pub:help {nick uhost hand chan text} {
if { $chan == "#vhost" } { putquick "PRIVMSG $chan :!Remove - will remove your vhost"
putquick "PRIVMSG $chan :!vhost hostname - will give you the vhost specified"
putquick "PRIVMSG $chan :would set your vhost to: I.got.my.own.vhost"
putquick "PRIVMSG $chan :The choosen vhost is permanent, only when your nick is registered, and will be enabled on identification with nickserv"
return
}
}
proc pub:vhost {nick host hand chan text} {
if {![channel get $chan vhchan]} {return}
set vhost [lindex $text 0]
if {($vhost == "")} {putserv "PRIVMSG $chan :$nick Please specify a hostname you would like... Try again!"; return}
if {($vhost != "")} {
putserv "PRIVMSG hostserv :set $nick $vhost"
}
}
proc msg:vhchan {nick uhost hand text chan} {
if {[string match -nocase "HostServ" $nick]} {
set line [lrange [split $text] 0 end]
putserv "PRIVMSG $chan :[join $line]"
if {([string match -nocase "*A vhost must*" $line])} {putserv "PRIVMSG $chan :8Please use proper format. \(!vhost ident@vhost.com\)"; return}
putserv "PRIVMSG $chan :15To Activate your vhost type /msg hostserv on"
}
} |
|
|
| Back to top |
|
 |
DragnLord Owner

Joined: 24 Jan 2004 Posts: 711 Location: C'ville, Virginia, USA
|
Posted: Fri May 26, 2006 10:12 pm Post subject: |
|
|
| Code: | | proc msg:vhchan {nick uhost hand text chan} | is wrong, should be
| Code: | | proc msg:vhchan {nick uhost hand chan text} |
|
|
| Back to top |
|
 |
vince164 Voice
Joined: 23 May 2006 Posts: 7
|
Posted: Sat May 27, 2006 1:22 am Post subject: |
|
|
i get this error now
Tcl error [pub_raw]: can't read "whoami": no such variable |
|
| Back to top |
|
 |
DragnLord Owner

Joined: 24 Jan 2004 Posts: 711 Location: C'ville, Virginia, USA
|
Posted: Sat May 27, 2006 2:03 am Post subject: |
|
|
1) proc pub_raw is not in the script you posted
2) there is no call for "whoami" in what you posted |
|
| Back to top |
|
 |
vince164 Voice
Joined: 23 May 2006 Posts: 7
|
Posted: Sat May 27, 2006 2:49 am Post subject: |
|
|
| lol thats what im wondering, everytime i do !vhost myvhost.com it says that in the partyline |
|
| Back to top |
|
 |
De Kus Revered One

Joined: 15 Dec 2002 Posts: 1361 Location: Germany
|
Posted: Sat May 27, 2006 4:41 am Post subject: |
|
|
this is because of some lame script bound to raw. It is obviously triggered by some feedback from the server in that script. Check the script with that function. _________________ De Kus
StarZ|De_Kus, De_Kus or DeKus on IRC
Copyright © 2005-2009 by De Kus - published under The MIT License
Love hurts, love strengthens... |
|
| Back to top |
|
 |
|