Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:start: { sockopen bot irc.sunucu.com 6667 | timer 1 10 sockopen bot1 irc.sunucu.com 6667 | timer 1 20 sockopen bot2 irc.sunucu.com 6667 | timer 1 30 sockopen bot3 irc.sunucu.com 6667 | timer 1 40 sockopen bot4 irc.sunucu.com 6667 | server irc.sunucu.com 6667 }
alias swbot if ($sock(bot).status == active) sockwrite -n bot $1-
on *:sockclose:bot:{ sockopen bot irc.sunucu.com 6667 }
on *:sockopen:bot:{ if ($sockerr) { sockclose bot | sockopen bot irc.sunucu.com 6667 | return } | swbot NICK $+(Botnick,$ticks) | swbot USER Botident "" " Turkce Mirc v6.35 }
on *:sockread:bot:{
var %; | sockread %; | tokenize 32 %; | if ($1 = ping) swbot pong $remove($2,:) | if ($sockerr) || ($2 = 451) { sockclose bot | sockopen bot irc.sunucu.com 6667 | return }
if ($regex($2,/481|411|001)) { swbot nick Ayse | swbot nickserv identify 22520 | swbot partall | swbot join #kanal,#Kanal1 }
}
alias swbot1 if ($sock(bot1).status == active) sockwrite -n bot1 $1-
on *:sockclose:bot1:{ sockopen bot1 irc.sunucu.com 6667 }
on *:sockopen:bot1:{ if ($sockerr) { sockclose bot1 | sockopen bot1 irc.sunucu.com 6667 | return } | swbot1 NICK $+(Botnick,$ticks) | swbot1 USER Botident "" " Turkce Mirc v6.35 }
on *:sockread:bot1:{
var %; | sockread %; | tokenize 32 %; | if ($1 = ping) swbot1 pong $remove($2,:) | if ($sockerr) || ($2 = 451) { sockclose bot1 | sockopen bot1 irc.sunucu.com 6667 | return }
if ($regex($2,/481|411|001)) { swbot1 nick Fatma | swbot1 nickserv identify 22520 | swbot1 partall | swbot1 join #kanal1,#Kanal2 }
}
alias swbot2 if ($sock(bot2).status == active) sockwrite -n bot2 $1-
on *:sockclose:bot2:{ sockopen bot2 irc.sunucu.com 6667 }
on *:sockopen:bot2:{ if ($sockerr) { sockclose bot2 | sockopen bot2 irc.sunucu.com 6667 | return } | swbot2 NICK $+(Botnick,$ticks) | swbot2 USER Botident "" " Turkce Mirc v6.35 }
on *:sockread:bot2:{
var %; | sockread %; | tokenize 32 %; | if ($1 = ping) swbot2 pong $remove($2,:) | if ($sockerr) || ($2 = 451) { sockclose bot2 | sockopen bot2 irc.sunucu.com 6667 | return }
if ($regex($2,/481|411|001)) { swbot2 nick Hayriye | swbot2 nickserv identify 22520 | swbot2 partall | swbot2 join #kanal2,#kanal3 }
}
alias swbot3 if ($sock(bot3).status == active) sockwrite -n bot3 $1-
on *:sockclose:bot3:{ sockopen bot3 irc.sunucu.com 6667 }
on *:sockopen:bot3:{ if ($sockerr) { sockclose bot3 | sockopen bot3 irc.sunucu.com 6667 | return } | swbot3 NICK $+(Botnick,$ticks) | swbot3 USER Botident "" " Turkce Mirc v6.35 }
on *:sockread:bot3:{
var %; | sockread %; | tokenize 32 %; | if ($1 = ping) swbot3 pong $remove($2,:) | if ($sockerr) || ($2 = 451) { sockclose bot3 | sockopen bot3 irc.sunucu.com 6667 | return }
if ($regex($2,/481|411|001)) { swbot3 nick Kübra | swbot3 nickserv identify 22520 | swbot3 partall | swbot3 join #kanal3,#Kanal4 }
}
alias swbot4 if ($sock(bot4).status == active) sockwrite -n bot4 $1-
on *:sockclose:bot4:{ sockopen bot4 irc.sunucu.com 6667 }
on *:sockopen:bot4:{ if ($sockerr) { sockclose bot4 | sockopen bot4 irc.sunucu.com 6667 | return } | swbot4 NICK $+(Botnick,$ticks) | swbot4 USER Botident "" " Turkce Mirc v6.35 }
on *:sockread:bot4:{
var %; | sockread %; | tokenize 32 %; | if ($1 = ping) swbot4 pong $remove($2,:) | if ($sockerr) || ($2 = 451) { sockclose bot4 | sockopen bot4 irc.sunucu.com 6667 | return }
if ($regex($2,/481|411|001)) { swbot4 nick Hatice | swbot4 nickserv identify 22520 | swbot4 partall | swbot4 join #Kanal4,#Kanal5 }
}