egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2003-11-26T11:05:40-04:00 https://forum.eggheads.org/app.php/feed/topic/6226 2003-11-26T11:05:40-04:00 2003-11-26T11:05:40-04:00 https://forum.eggheads.org/viewtopic.php?p=30729#p30729 <![CDATA[user@host.tcl]]>

Code: 

putchan $chan "$nick  $arg :Ton masque d`adresse (User@host) est: $alternate [maskhost $hostmask]"
to
a) allways display full host

Code: 

putchan $chan "$nick  $arg :Ton masque d`adresse (User@host) est: $hostmask"
b) full host only with undernet

Code: 

if {[string match "*users.undernet.org" $hotmask]} {putchan $chan "$nick  $arg :Ton masque d`adresse (User@host) est: $hostmask" } else {putchan $chan "$nick  $arg :Ton masque d`adresse (User@host) est: $alternate [maskhost $hostmask]" }

Statistics: Posted by GodOfSuicide — Wed Nov 26, 2003 11:05 am

]]> 2003-11-26T06:48:01-04:00 2003-11-26T06:48:01-04:00 https://forum.eggheads.org/viewtopic.php?p=30712#p30712 <![CDATA[user@host.tcl]]> i`m using user@host1.1.tcl and it works juste fine but i`d like to know if it is possible to modify the way the userhost is display

exemple
[05:33] (Pitchat): !user@host
[05:33] (@Aide-moi): Pitchat :your user2host is: *!*Pitchat@*.undernet.org

and i`d like to have it that way : *!*Pitchat@Pitchat.users.undernet.org

to be consistent with the new ( not so new now) X from undernet

thanks

Code: 

                   ##################################                   #                                #                   #      !User@host TCL            #                   #             by deku            #                   ###################################################################################################################This TCL provides to users the possibility to get their user@host when        ##they request it to the bot via the !user@host command. You can also ask the   ##bot to give the user@host to someone by typing !host <nick>.                  ############################################################################################################################If you have questions/comments, you can ##contact me at: mrdeku@hotmail.com       ###########################################bind pub - !User@host pub_user@hostbind pub - !host pub_hostproc pub_host {nick uhost hand chan arg} {set arg [charfilter $arg]set alternate [lindex [split $arg] 2]set hostmask "$nick!*[getchanhost $arg $chan]"putchan $chan "$nick  $arg :Ton masque d`adresse (User@host) est: $alternate [maskhost $hostmask]"}proc pub_user@host {nick uhost hand chan arg} {set alternate [lindex [split $arg] 2]set hostmask "$nick!*[getchanhost $nick $chan]"putchan $chan "$nick  $arg :Ton masque d`adresse (User@host) est: $alternate [maskhost $hostmask]"}putlog "!user@host TCL by deku is now loaded."

Statistics: Posted by Pitchat — Wed Nov 26, 2003 6:48 am

]]>