egghelp.org community Forum Index
[ egghelp.org home | forum home ]
egghelp.org community
Discussion of eggdrop bots, shell accounts and tcl scripts.
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

How come this dont work

 
Post new topic   Reply to topic    egghelp.org community Forum Index -> Scripting Help
View previous topic :: View next topic  
Author Message
vince164
Voice


Joined: 23 May 2006
Posts: 7

PostPosted: Fri May 26, 2006 9:47 pm    Post subject: How come this dont work Reply with quote

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
View user's profile Send private message
DragnLord
Owner


Joined: 24 Jan 2004
Posts: 711
Location: C'ville, Virginia, USA

PostPosted: Fri May 26, 2006 10:12 pm    Post subject: Reply with quote

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
View user's profile Send private message
vince164
Voice


Joined: 23 May 2006
Posts: 7

PostPosted: Sat May 27, 2006 1:22 am    Post subject: Reply with quote

i get this error now

Tcl error [pub_raw]: can't read "whoami": no such variable
Back to top
View user's profile Send private message
DragnLord
Owner


Joined: 24 Jan 2004
Posts: 711
Location: C'ville, Virginia, USA

PostPosted: Sat May 27, 2006 2:03 am    Post subject: Reply with quote

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
View user's profile Send private message
vince164
Voice


Joined: 23 May 2006
Posts: 7

PostPosted: Sat May 27, 2006 2:49 am    Post subject: Reply with quote

lol thats what im wondering, everytime i do !vhost myvhost.com it says that in the partyline
Back to top
View user's profile Send private message
De Kus
Revered One


Joined: 15 Dec 2002
Posts: 1361
Location: Germany

PostPosted: Sat May 27, 2006 4:41 am    Post subject: Reply with quote

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
View user's profile Send private message MSN Messenger
Display posts from previous:   
Post new topic   Reply to topic    egghelp.org community Forum Index -> Scripting Help All times are GMT - 4 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Forum hosting provided by Reverse.net

Powered by phpBB © 2001, 2005 phpBB Group
subGreen style by ktauber