11 Ağustos 2009, 04:16
|
#4 |
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
| Cevap: Karsilama Botu ( SocketBot )
Kod: Kodu kopyalamak için üzerine çift tıklayın! on *:SOCKOPEN:X: {
sockwrite -nt $sockname NICK BotNick
sockwrite -nt $sockname Pass Şifre
sockwrite -nt $sockname USER Botident "" " $+ $iif($host,$host,$ip) $+ " :Fullname
}
on *:SOCKREAD:X: {
var %s
sockread %s
tokenize 32 %s
if $1 == PING {
sockwrite -nt $sockname PONG $2
}
if $2 == 376 {
sockwrite -nt $sockname join 0,
.timer 1 2 sockwrite -nt $sockname oper operpass.
.timer 1 3 sockwrite -nt $sockname join #kanal1,#kanal2,#kanal3(Giriceği kanallar)
}
if $2 == Notice {
if *Client connecting on* iswm $1- {
sockwrite -nt $sockname privmsg $12 Mesaj
sockwrite -nt $sockname privmsg $12 Mesaj2
sockwrite -nt $sockname privmsg $12 Mesaj3
sockwrite -nt $sockname privmsg $12 Mesaj4
sockwrite -nt $sockname privmsg $12 Mesaj5
}
}
}
Konu Che tarafından (25 Mart 2022 Saat 17:45 ) değiştirilmiştir.
Sebep: Code tag içine alındı.
|
| |