chain

I just added the update on this script for Buzzen server will add it tomorrow or friday. Its not really a script to chat with but more a room monitor script. it's different the one that made this script was wims 😃

I just allocated a few old IRC scripts which i will add to downloads in the next few days.If anyone has more info on various IRC scripts let me know. We are trying to gather all snippets and scripts in various languages and store them in our websites. 

Our server is down until we update the panel and get things rolling. As soon as i Have an update ill inform all when coders-irc has its chanserv linked up and all.

We have seen a lot of scripts site closing and all the snippets leave with them, Our goal now is to collect from various script sites and in any language and try to preserve the scripts and snippets. After hawkee closed it was devastating to see all that work and codes lost forever. so it's now my goal to look everywhere and get as much stored in our data base and preserve them all if you know of a scripting site let us know.

Im one of the Staff that help with Buzzen chat. We had a rough year in 2024 and a lot of drama has gone and passed, 2025 looks like a great promising year with new chatter's comming in. We offer a lot at Buzzen we offer free chat and we offer free owner created rooms. we also made it that you can present your profile to anyway you wish. And you can also open your own blog on buzzen. we have great developers that maintain and run buzzen, our server is always being updated and we have saftey and privacey. Come and give us a try we also allow mIRC using our address but do not allow VPN's If your looking to open a script room well there is one on Buzzen, it's called IRCommunity which is run by err0r the owner of TG007. If your looking for trivia we have it, if your looking to join a radio station we have it. So if I have peeked your curosity come on in and try us!!  www.buzzen.net

I've been with these guys for 3 yrs and they always have challanges that still need to be claimed. Butt its a great place to study stuff and see what people do for hack challanges.

We are setting into the new years and we at coders-irc like to wish all a very happy new years and all the best and thanks for continuing with us and supporting Coders-irc 

alias giris { return giris } on !1:JOIN:#: { window -De @Giris var %mask = $mask($fulladdress,2) var %nfname = $mask($fulladdress,0) ; get the previous nicks var %nicks = $readini(giris.txt, %mask, nicks) ; get the pervious full names var %fname = $readini(giris.txt, %mask, fullname) ; add the new nick ($addtok will take care of duplicates) var %nicks = $addtok(%nicks,$nick,32) ; add the new fname ($addtok will take care of duplicates) var %fname = $addtok(%fname,$ial(%mask).user,32) ; update the nicks writeini -n giris.txt %mask nicks %nicks ; update the seen time writeini -n giris.txt %mask seentime $date ; update the fullname writeini -n giris.txt %mask fullname %fname echo -t @giris 4Bağlanan 5 $nick ------------------------------------------ echo -t @giris 4IP Adresi 5 %mask echo -t @giris 4Önceki Nick:5 $readini(giris.txt, %mask, nicks) echo -t @giris 4Kullanıcı Adı:5 $readini(giris.txt, %mask, fullname) echo -t @giris 4Son Görülen Zaman 5 $readini(giris.txt, %mask, seentime) echo -t @giris 4Kanal:5 $chan echo -t @giris 2End $nick ------------------------------------------ } alias ntrack { var %mask = $address($1,2) var %nfname = $address($1,0) ; get the previous nicks var %nicks = $readini(giris.txt, %mask, nicks) ; get the pervious full names var %fname = $readini(giris.txt, %mask, fullname) ; add the new nick ($addtok will take care of duplicates) var %nicks = $addtok(%nicks,$nick,32) ; add the new fname ($addtok will take care of duplicates) var %fname = $addtok(%fname,$ial(%mask).user,32) echo -a 12 $1 on the ip %mask has used the nicks: $readini(giris.txt, %mask, nicks) and the full names: $readini(giris.txt, %mask, fullname) and was last seen on $readini(giris.txt, %mask, seentime) } menu nicklist { NickTrack:ntrack $$1 } alias giris.txt { return giris.txt } on !1:nick: { window -De @giris var %mask = $mask($fulladdress,2) var %nfname = $mask($fulladdress,0) ; get the previous nicks var %nicks = $readini(giris.txt, %mask, nicks) ; get the pervious full names var %fname = $readini(giris.txt, %mask, fullname) ; add the new nick ($addtok will take care of duplicates) var %nicks = $addtok(%nicks,$newnick,32) ; add the new fname ($addtok will take care of duplicates) var %fname = $addtok(%fname,$ial(%mask).user,32) ; update the nicks writeini -n giris.txt %mask nicks %nicks ; update the seen time writeini -n giris.txt %mask seentime $date ; update the fullname writeini -n giris.txt %mask fullname %fname echo -t @giris 4Bağlanan 5 $nick ------------------------------------------ echo -t @giris 4IP Adresi 5 %mask echo -t @giris 4Önceki Nick:5 $readini(giris.txt, %mask, nicks) echo -t @giris 4Kullanıcı Adı:5 $readini(giris.txt, %mask, fullname) echo -t @giris 4Son Görülen Zaman 5 $readini(giris.txt, %mask, seentime) echo -t @giris 4Kanal:5 $chan echo -t @giris 2End $nick ------------------------------------------ }

on ^&*:text:*:*:{ var %text = $mid($rawbytes, $calc($pos($rawbytes, $chr(32), 3) + 2)) if (!$isutf(%text)) { echo -mbflirt $iif(#, #, $nick) $+(< , $left($nick(#, $nick, a, r).pnick, 1), $nick, >) $turkish(%text) haltdef } } alias turkish $iif($isid, return, echo -a) $utfdecode($utfencode($1-, 162))

raw 352:*:{ proxy $4 } on *:snotice:*Client connecting*: { .who +I $9 } alias proxy { var %rand $rand(0,99999) sockopen $+(ktor,%rand) www.checkingtools.com 80 sockmark $+(ktor,%rand) $1 } on *:sockopen:ktor*: { var %komut sockwrite -nt $sockname, %post $+(ip=,$sock($sockname).mark,&GO%21=GO%21) %komut POST /ip_check HTTP/1.1 %komut Host: www.checkingtools.com %komut Connection: keep-alive %komut Content-Length: $len(%post) %komut Cache-Control: max-age=0 %komut Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8 %komut Origin: http://www.checkingtools.com %komut User-Agent: Mozilla/5.0 (Windows NT 5.1) AppleWebKit/537.31 (KHTML, like Gecko) Chrome/26.0.1410.64 Safari/537.31 %komut Content-Type: application/x-www-form-urlencoded %komut Accept-Encoding: gzip,deflate,sdch %komut Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.6,en;q=0.4 %komut Accept-Charset: ISO-8859-9,utf-8;q=0.7,*;q=0.3 %komut Cookie: PHPSESSID=90b5ae6ed385b312ea3dcccb50c126e1; ck_lang=en; __atuvc=18%7C1 %komut %komut %post } on *:sockread:ktor*: { var %x | sockread %x | tokenize 32 %x if $regex($1-,/(XBL|SBL|XBL|SPAMCOP|CBL|NJABL|SURBL|HTTP:BL).+red/i) { gzline $+(*@,$sock($sockname).mark) 1h 1IP adresinizde 4PROXY 1girişi tespit edilmiştir. if !$window(@prxy-tor) { window -neg1 @prxy-tor } | echo @prxy-tor ( $+ $time $+ ) $+(4 $chr(32),$sock($sockname).mark),$chr(32)) 1IP adresinizde 4PROXY 1girişi tespit edilmiştir. sockclose $sockname halt } }

on ^1:SNOTICE:*:{ if (Connecting isin $1-) { if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis } echo 2 -t @Giris/Cikis 3Giriş :2 Nick:4[4 $8 4] 2Network:4[3 $7 4] 2Host:4[3 $9 4] | halt } if (exiting isin $1-) { if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis } echo 2 -t @Giris/Cikis 14Çıkış: 7Host:4[7 $8 4]7 Network:4[7 $7 4] | halt | halt } } Kodu remoteye ekliyorsunuz. Oper yetkiniz olması lazım. giriş çıkışlar görünmüyorsa : /mode Nickiniz +s nfF şeklinde kendinize mod vermelisiniz.

on ^1:SNOTICE:*:{ if (/whois isin $1-) { if ($window(@Whois) == $null) { window -ne @Whois } echo 2 -t @Whois 4Whois Çeken Nick 2[ $2 ]4 Ip: 2[ $3 ] | halt } if (his/her isin $1-) || (Failed isin $1-) || (Denied isin $1-) || (tkl isin $1-) || (Q: isin $1-) || (used isin $1-) || (OperOverride isin $1-) || (Mismatch: isin $1-) || (is now isin $1-) || (Received isin $1-) { if ($window(@Opers) == $null) { window -ne @Opers } echo 2 @Opers $1- | halt } if (gecos isin $1-) { if ($window(@Bilgi) == $null) { window -ne @Bilgi } echo 2 -t @Bilgi 4 Fullname Değişimi:1 $1 tarafından1 $6 $+ 1'nin fullnamesi değiştirilerek:4 $10- 1 $+ yapıldı. | halt } if (virtual isin $1-) { if ($window(@Bilgi) == $null) { window -ne @Bilgi } echo 2 -t @Bilgi 4 Host Değişimi:1 $1 tarafından1 $7 $+ 1'nin hostu değiştirilerek:4 $11- 1 $+ yapıldı. | halt } if (Locops isin $1-) { if ($window(@UyarI) == $null) { window -ne @UyarI } echo 2 -t @UyarI $1- | halt } if (G:Line isin $1-) || (Z:line isin $1-) || (K:line isin $1-) { if ($window(@XLine) == $null) { window -ne @XLine } echo 2 -t @XLine $1- | halt } if (removed isin $1-) { if ($window(@XLine) == $null) { window -ne @XLine } if (%unbanip isin $1-) || (%xlinex isin $1-) { echo -a *** 12 $+ %xlinex 5Adresinin Banı Açıldı. | unset %xline* | unset %unban* } echo 2 -t @XLine $1- | halt } if (tried isin $1-) { if ($window(@baskakanal) == $null) { window -ne @baskakanal } echo 2 -t @baskakanal $1- | halt } if (banned isin $1-) { if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis } echo 2 -t @Giris/Cikis $1- | halt } if (obtained isin $1-) { if ($window(@SupasGirdi) == $null) { window -ne @SupasGirdi } echo 2 -t @SupasGirdi $1- | halt } if (exiting isin $1-) { if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis } echo 2 -t @Giris/Cikis 14Çıkış: 7Nick:4[14 $gettok($8,1,33) 4]7 Network:4[14 $7 4] | halt | halt } if (Connecting isin $1-) { if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis } echo 2 -t @Giris/Cikis 3Giriş :2 Nick:4[4 $8 4] 2Network:4[3 $7 4] 2Host:4[3 $9 4] | halt } if (Forbidding isin $1-) || (Q:lined isin $1-) { if ($window(@Q-Lined) == $null) { window -ne @Q-Lined } echo 2 -t @Q-Lined $1- | halt } if (Expiring isin $1-) || (Shun isin $1-) { if ($window(@XLine) == $null) { window -ne @XLine } echo 2 -t @XLine 2Shun :2 Nick:4[4 $6 4] 2Network:4[3 $7 4] 2Uygulayan:4[3 $9 4] | halt } if (Spamfilter isin $1-) { if ($window(@Spam) == $null) { window -ne @Spam } echo 2 -t @Spam $1- halt } if (is now isin $1-) { write oper.txt $date $timestamp $1- } }

on *:TEXT:selam*:#: { /msg $chan Aleykum Selam Hoş Geldin $nick } Oto selam alma remotesini mircten remote kısmına eklediğinizde hemen çalışmaya başlıyacaktır. İkinci olarak Nick seslenme uyarısı nı paylaşacağım. Bu remotede neredeyse bütün mirclerde kullanılmaktadır. Farak Bizdeki remote birazdaha gelişmiş ve daha çok işlev görmektedir. on *:text:$(* $+ $me $+ *):*:{ if $active != $iif($left($target,1) != $chr(35),$nick,$target) &amp;&amp; !$istok(Nick1 Nick2 Nick3 ,$nic Mirc seslenme uyarısı kodu yukardaki gibidir. Bu kodun 2 farklı özelliği vardır 1) hem kanal hemde özelde selenmelere uyarı vermektedir. 2) Kodun içerisinde yer alan ” Nick1 Nick2 Nick3 ” Olan yerlere size seslenildiğinde uyarı vermesini istemediğiniz nickleri yazabilirsiniz. Özellikle bot nicklerini kullanıyorum ben. Şimdi kendi kullandığım yine ustteki kod kadar özel olan bir remote paylaşacağım. Bu remote Help kanalına user geldiğinde uyarı veriyor fakat help kanalına gelen Helper , oper veya admin ise uyarı vermiyor ve karışıklık olmuyor. on !*:join:#Help: if !$regex($address($nick,5),/oper|admin/i) { $+(.timer,$nick) 1 1 chex $chan $nick } alias chex { if $2 ison $1 && $2 isreg $1 && $2 !isvoice $1 { var %i = 1 while %i < = $nick($1,0) { if $regex($nick($1,%i).pnick,/(%|@)/i) && !$regex($nick($1,%i).pnick,/(&|~)/i) { set %onicks %onicks $nick($1,%i) } inc %i } echo -a %uyari 15,1 • 7 $2 15,1 #HeLp 7,1 kanalından yardım bekliyor.. unset %onicks } } Bu kodu da diğerleri gibi remote kısmına atmanız yeterli. Özellikle Türk Helperlerinde olmazsa olmaz kodlardan birtanesidir. sitemizdeki türkçe mirc scripttede kullandığım bir koddur. türkçe mirc 6.35 versionunda çok iş yapıyor. Şimdi paylaşacağım kodda mirc ile sohbet eden neredeyse butun oper admin ve helperlerde mevcut olan bir kodun gelişmiş halidir. Bu kod ile /amsg Komutunu uyguladığımızda seçtiğimiz kanallara mesajın gitmesini engelliyor. Ornek olarak #Help veya #Operhelp kanalı gibi. alias amsg { var %ahua = 1 while $chan(%ahua) { if !$istok(#xLine #helpEgitim #help #sales #OperHelp #Yardim #heLpSinav #HelpStaff #helpteam #mircheLp #Logs #Bots ,$v1,32) { msg $chan(%ahua) $1- } inc %ahua } } Kodu yine aynı şekilde remote kısmına ekleyip tamam dediğimizde çalışmaya başlıyacaktır. belirtilen kanallar kendi kullandığım kanallar olup istediğiniz gibi değişiklik yapabilirsiniz. Kısa remote kodlarının devamı için diğer konuya geçebilirsiniz. sayfa çok uzun olmasın diye ordan devam edeceğim.

alias rasgele { if $nick($active,0) < 3 { echo -a Kanalda üç kişi bile yok ne rasgelesi !!! | halt } if $me !isop $chan { echo -a $me sen bir op ol ondan sonra voice dağıtırsın :) | halt } var %rasgele $nick($active,$rand(1,$nick($active,0))) if %rasgele !isreg $active { halt } if %rasgele == $me { var %rasgele $nick($active,$rand(1,$nick($active,0))) } if %rasgele !isreg $active { halt } mode $active +v %rasgele .var %sure $rand(99,300) .timer -h 1 750 msg $active Benden rasgele voice kazandınız: %rasgele :) Voicenizin süresi: %sure saniye .timer $+ %rasgele 1 %sure if %rasgele ison $active mode $active -v %rasgele $chr(124) if %rasgele ison $active msg $active Rasgele voicenizin süresi doldu: %rasgele }