| DeamoN | 25 Eylül 2011 14:52 |
Cevap: ~ Socket Cyclev2 Bot ~
Kod:
alias swalias {
;eğer bot socketı açıksa
if $sock(bot) {
var %: = echo $color(info) -st > Socket bot:
if :VERSION iswm $4- { swbot NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ VERSION Jawa User %logo $+ $chr(1) }
if :FINGER iswm $4- { swbot NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ FINGER Jawa User %logo $+ $chr(1) }
if $1 == PING { swbot PiNG $2- }
if $2 == 474 { %: $4 kanalında banlı. }
if $2 == 366 { %: $4 kanalına girdi. }
if $1 == error && $2 == :closing {
baslat 2
}
if $2 == NICK {
set %nickdegis $remove($gettok($1,1,33),:) | set %newnick $right($3,-1)
if (%parametre == sunucu) { nickbot | halt }
}
if $2 == JOIN {
if ($kanal isin $3) {
set %joinnick $remove($gettok($1,1,33),:)
if (%parametre == sunucu) { joinbot | halt }
}
}
if $2 == PART {
if ($3 == $kanal) {
set %partnick $remove($gettok($1,1,33),:)
if (%parametre == sunucu) { partbot | halt }
}
}
if ($2 == privmsg) {
var %n = $gettok($gettok($1,1,33),1,58), %k = $3
if (%k == #kanal) {
swbota os raw $+(:,%n) privmsg #kanal $4-
}
}
if $2 == quit {
set %quitnick $remove($gettok($1,1,33),:)
if (%parametre == sunucu) { quitbot | halt }
}
}
}
}
}
Kırmızı olan yerlere kanal adlarini yazin. misal #sohbet #sohbet
2. Kod:
;Cycle Botta Komut Kullanacak Master Nickleri Yan Yana Yaziniz. ;
alias masternick return masternickiniz
;Cycle Botun Logs Kanali ;
alias logchan return #logs
;Cycle Botun Komut Kullanma Kanali ;
alias operchan return #opers
;Cycle Botu Sokacaginiz Sunucu Ismı ve Portu ,
alias sunucum return irc.kendisunucunuz.com 6667
;Cycle Botun Girecegi Sunucunun Port Sifresi Varsa Port Sifresi ,
alias benimpsifre return 1EB2C357
;Cycle Botun Cycle Botlari Alacagi Diger Sunucu
alias sunucu return irc.baglanacaksunucu.com 6667
;Cycle Botun Cycle Botlari Alacagi Diger Sunucunun Port Sifresi ,
alias sunucupsifre return 123456
;Cycle Botun sizin Sunucudaki nicki ,
alias cyclenick return Cycle
;Cycle Botun Sizin Sunucudaki nickin sifresi
alias cyclenickpassword return 19899
;Cycle Botun Sizin Sunucudaki Oper nicki ve Oper sifrei
alias opers return Opernick nickiniz
;Cycle Botun Sizin Sunucudaki SuPASS'ı
alias supass return operserv su pass sifreniz.
;Cycle Botun Sizin Sunucudaki RealNamesi ,
alias realname return Socket Cycle Bot ~ Coder Aeg ~
;Cycle Botun Cycle Botlari Alacagi Sunucudaki Nicki ,
alias dcyclenick return diger sunucuda alacagi nick.
;Cycle Botun Cycle Botlari Alacagi Sunucudaki Nickin varsa sifresi ,
alias dcyclenickpassword return sifresi varsa sifresi.
;Cycle Botun Diger Sunucudaki Real Namesi,
alias drealname return Web Kullanici
;Sizin Sunucunun Identi ,
alias ident return kendi sunucu identi.
;Diger Sunucunun Identi ,
alias dident return diger sunucu identi.
;Cycle Botlarin Sizin Sunucudaki Girecegi Kanallar ,
alias kanallar return #kanal1,#kanal2,#kanal3,#kanal4,#kanal5,#kanal6
;Cycle Botlarin Diger Sunucuda botlari Cekecegi Kanal
alias kanal return #kanal
;Cycle Botlarin Sizin Sunucudan Cıkıs Mesaji
alias cıkısmesaj return 1Sanal ortamını gerçek hayata taşıyor .. kimmi ? tabiki 3[7 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 3]
;Sizin Sunucunun Services Ismı;
alias services return Services.sunucu.com
Buralari Kendinize göre ayarlarsaniz hic bir sıkıntı kalmicaktir. Ornek sunucuda verebilirim. Iyi Forumlar.. |
