IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

- TCL Scriptler (https://www.ircforumlari.net/tcl-scriptler/)

- - helperhost.tcl (https://www.ircforumlari.net/tcl-scriptler/47392-helperhosttcl.html)

[KBSC] 12::58 <12GhostLy> !helper
14© 7Ask-Net5 Artik bir Helpdesksiniz. Basarılar
14© 7Ask-Net5 Bravo basariyla Helpdesk Hostunu, Identini, Ismini Ve Modelerini aldin.
14© 7Ask-Net5 Lutfen #Helpdesk kanalindaki kullancilarla iyi gecinin ve saygili olun.
[KBSC] 12::58 *** GhostLy Nick değiştirerek Nickini helpdesk_GhostLy yaptı
[KBSC] 12::58 <05Ask-Net> Basariyla helper oldunuz.

eggdrop'unuz. oper derecesi en az services olmalidir. nicki şifreli ve admin listte olmalidir.

Eggdrop botunuzun confunda su satiri bulun.

Kod:

putserv "oper botnicki ghostly"

ve hemen altina. gormus olduğunuz satiri ekleyin..

Kod:

putserv "PRIVMSG operserv :su şifre"

ve gelelim tcl'e

Helperhost.tcl olarak adlandiralim..

Kod:

 
 # IRCHostum.Net Internet Teknolojileri 
 # msn : 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
 
 # server : /server IRC.IRCHostum.Net 
 # web : 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
size="2"># System Root : GhostLy 
 # duzenleyen : GhostLy

 
 bind msgm - root ghostly
 proc ghostly { nick uhost handle text } {
 putserv "PRIVMSG operserv :su şifre" }

 
 bind pub - !helper helperim
 proc helperim {nick uhand host chan text} {
 if {![isop $nick $chan]} {return 0} 
 putserv "PRIVMSG operserv :chghost $nick helpdesk.Domain.Com"
 putserv "PRIVMSG operserv :chgident $nick helpdesk"
 putserv "PRIVMSG operserv :chgname $nick Domain helpdesk Team"
 putserv "NOTICE $nick Artik bir Helpdesksiniz. Basarılar"
 putserv "NOTICE $nick Bravo basariyla Helpdesk Hostunu, Identini, Ismini Ve Modelerini aldin."
 putserv "NOTICE $nick Lutfen #Helpdesk kanalindaki kullancilarla iyi gecinin ve saygili olun."
 putserv "PRIVMSG operserv :raw svsmode $nick +hWq :1"
 putserv "PRIVMSG operserv :raw svsnick $nick helpdesk_$nick :1"
 putserv "privmsg $chan : $text Basariyla helper oldunuz."
 }
 putlog "helperhost.tcl  by GhostLy"

ben su pass nasıl olusturacan ?
işte bu şekilde.

Kod:

/os set supass yenişifre

tcl içindede burdaki yeri değişiniz. kendinize göre.

Kod:

putserv "PRIVMSG operserv :su şifre" }

botu sunuya bağlandiğinda operini girdikten sonra botun özeline

Kod:

root

yaziniz iyi çalişmalar.)

Cevap: helperhost.tcl

Güzel paylaşım işime yaradı Emeqine SaqLık.

Cevap: helperhost.tcl

Erkan eline sağlık ama Oto Host GüzeL ;dremel

Cevap: helperhost.tcl

Bir arkadaşın isteği üzerine gore duzenlemiştim :)

Cevap: helperhost.tcl

Peki GhostLy Hocam Bu Bot Helpdesk Kanalında. Şimdi Kanalda benim Access var Kanala girdim Kanala girdiğimde Takı Host vs veremez mi. Kanala giriyorum @ oluyorum ve Takı almak istiyorum. mümkün mü?

Cevap: helperhost.tcl

Mümkün şuan antalya'da iş nedeniyle giremiyorum ist donusumde cvp veririm iyi çalişmalar.

Cevap: helperhost.tcl

Peki Hocam Bekliyoruz. Eyw. Saolasın.

Cevap: helperhost.tcl

GhostLy Hocam Manavgata yakınsan Gel misafirim ol.

Cevap: helperhost.tcl

Yukardaki anlatima bakarak yapabilirsiniz.

Eren

istediğin şekilde duzenledim. helper kanalına !helper yazman yeterli olacaktir. host bolumu için.

Kod:

# duzenleyen : GhostLy

bind msgm - root ghostly

proc ghostly { nick uhost handle text } {

putserv "PRIVMSG operserv :su şifre" }

 

bind mode - * helper

proc helper {nick uhost hand chan mode text} {

if {$chan != "#help"} {return 0}

if {$mode == "+o"} {

putserv "PRIVMSG $chan $text Helper konumuna geçti."

putserv "PRIVMSG operserv :raw svsmode $text +hWq :1"

putserv "PRIVMSG operserv :raw svsnick $text helpdesk_$text :1"

putserv "privmsg $chan : $text Basariyla helper oldunuz."

return 1

}

return 1

}

 

bind pub - !helper helperim

 

proc helperim {nick uhand host chan text} {

if {![isop $nick $chan]} {return 0} 

putserv "PRIVMSG operserv :chghost $nick helpdesk.Domain.Com"

putserv "PRIVMSG operserv :chgident $nick helpdesk"

putserv "PRIVMSG operserv :chgname $nick Domain helpdesk Team"

putserv "NOTICE $nick Artik bir Helpdesksiniz. Basarılar"

putserv "NOTICE $nick Bravo basariyla Helpdesk Hostunu, Identini, Ismini Ve Modelerini aldin."

putserv "NOTICE $nick Lutfen #Helpdesk kanalindaki kullancilarla iyi gecinin ve saygili olun."

}

putlog "helperhost.tcl  by GhostLy"

Cevap: helperhost.tcl

Emegine Sağlık Hocam. Senin Uğraşını gördüm Allah razı olsun ;)