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

GhostLy · 15 Ocak 2008, 13:22

[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: Kodu kopyalamak için üzerine çift tıklayın!

putserv "oper botnicki ghostly"

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

Kod: Kodu kopyalamak için üzerine çift tıklayın!

putserv "PRIVMSG operserv :su şifre"

ve gelelim tcl'e

Helperhost.tcl olarak adlandiralim..

Kod: Kodu kopyalamak için üzerine çift tıklayın!

 
# 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: Kodu kopyalamak için üzerine çift tıklayın!

/os set supass  yenişifre

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

Kod: Kodu kopyalamak için üzerine çift tıklayın!

putserv "PRIVMSG operserv :su şifre" }

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

Kod: Kodu kopyalamak için üzerine çift tıklayın!

root

yaziniz iyi çalişmalar.)

Hype · 20 Ocak 2008, 21:07

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

SaNaLStaR · 20 Ocak 2008, 21:16

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

GhostLy · 21 Ocak 2008, 17:07

Bir arkadaşın isteği üzerine gore duzenlemiştim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

eren_o7 · 23 Şubat 2008, 18:48

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ü?

GhostLy · 24 Şubat 2008, 10:13

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

eren_o7 · 24 Şubat 2008, 16:36

Peki Hocam Bekliyoruz. Eyw. Saolasın.

eren_o7 · 25 Şubat 2008, 13:18

GhostLy Hocam Manavgata yakınsan Gel misafirim ol.

GhostLy · 25 Şubat 2008, 15:03

Yukardaki anlatima bakarak yapabilirsiniz.

Eren

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

Kod: Kodu kopyalamak için üzerine çift tıklayın!

# 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"

eren_o7 · 25 Şubat 2008, 15:06

Emegine Sağlık Hocam. Senin Uğraşını gördüm Allah razı olsun
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.