Kendi Sohbet Sunucunuza Dilediğiniz Bir irc Sohbet Sunucusunun Canlı Olarak sohbetini Çekme.

aşağıda yer alan bu kısmı çekmek istediğiniz sunucunun muafları ile değiştiriniz. alias _muafnick return Kısmına Muaf eklemek İsteğiniz Nick ve Kanal.

Diyoki.net yazan kısımlar sizin sunucunuzun ismi ile değiştirilecek olan kısım.
chat.gen.tr olan kısımlar ise canlı olarak sohbetini çekmek istediğiniz sunucu ismi
Aşağıda aDEM nick ve oper pass üzerine düzenlenmiş olan kısımları kendinize göre değiştirin.
miRC 6.35 Sürümü ile Kullanıma Hazır.

}
alias _muafnick return Nomercy ChanServ NickServ OperServ Kelime yarisma Radyo oxm Oyun Muhabbet-FM M-Bot RoJ TurkFm Oyuncu Turk-Fm G-Bot helloween
on *:start: { sockopen bot irc.diyoki.net 6667 | server irc.chat.gen.tr 6667 }
on *:connect: { .timer 200 0 timer 0 0 olustur }
on *:rawmode:*: {
if (+b isin $1) { return }
swbot operserv raw :chanserv mode #Sohbet $1-
swbot operserv raw :chanserv mode #Chat $1-
swbot operserv raw :chanserv mode #Radyo $1-
swbot operserv raw :chanserv mode #Oyun $1-
}
on *:text:*:#: {
if !$istok($_muafnick,$nick,32) && ($server = irc.chat.gen.tr) {
if $istok(#Sohbet #aSk,$chan,32) && !$read(nick.txt,w,$nick) { write nick.txt $nick }
swbot sendraw #sohbet $+(::,$nick) PRIVMSG #aSk $+(:,$1-)
}
}
alias swbot if ($sock(bot).status == active) sockwrite -n bot $1-
on *:sockclose:bot:{ sockopen bot irc.diyoki.net 6667 }
on *:sockopen:bot:{ if ($sockerr) { sockclose bot | sockopen bot irc.diyoki.net 6667 | return } | swbot NICK $+(aDEM,$ticks) | swbot USER ymc "" " 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.diyoki.net 6667 | return }
if ($regex($2,/481|411|001)) { swbot oper aDEM bukısımoperşifresi | swbot nick aDEM | swbot nickserv identify burayanickşifresi | swbot os su BTC bukısımossupassyazın }
}
alias olustur { var %v $+($ticks,$r(1000,9999)) | sockopen $+(proxy,%v) $read(proxy.txt) }
on *:sockopen:proxy*: {
if ($sockerr) { sockclose $sockname | return } | if $sock($sockname) { sockwrite $sockname CONNECT irc.diyoki.net:6667 $+(HTTP/1.1,$crlf,$crlf) }
}
on *:sockread:proxy*: {
sockread %tmp | if ($sockerr) { sockclose $sockname | return }
if (HTTP/1.0 200 isin %tmp) && $sock($sockname) { sockwrite -n $sockname NICK $read(nick.txt) | sockwrite -n $sockname USER $read(uname.txt) "" " $read(rname.txt) }
if ($gettok(%tmp,1,32) == ping) && $sock($sockname) { sockwrite -n $sockname PONG $gettok(%tmp,2-,32) }
}