Türkçe mIRC indir – Resmi mIRC indirme Sitesi
Türkçe mirc resmi adresi TurkIRC. Mirc indir, mirc sohbet, mirc chat odaları, mirc addonları, IRC Client komutları alanında kaliteli hizmet vermektedir.
Action(Ame/Me/Describe Küfür Koruma Addon ( Ame,Me,Describe Küfür Koruma Addonu ) Ajoin Sistemi ( Nickinizi identify ettikten sonra istediğiniz kanala girebilmek için ) Aktif Haberler ( Aktif haberler , Son dakika haberlerini ögrenebilmek için iyi bir addon. ) Alarm Addonu ( Siz istediginiz zamanı ayarlayın Addon uyarı versin ) AntiSpam ( Spam botu Server’de reklam kontrollerini daha güvenli hale getirebilirsiniz ) […]
» Devamını Oku|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 |
alias ac { dialog -m notify notify } dialog notify { title \\"mIRC Notify Addon\\" size -1 -1 116 58 option dbu text \\"Nick\\", 1, 5 10 25 8 edit \\"\\", 3, 33 9 78 10 box \\"Notify\\", 2, 2 1 113 23 button \\"Ekle\\", 4, 15 27 37 12 button \\"Ç?kar\\", 5, 57 27 37 12 button \\"Listele\\", 6, 35 41 37 12 } on *ialog:notify:sclick:4:{ notify $did(3) | gload notify } on *:dialog:notify:Sclick:5:{ notify -r $did(3) } on *ialog:notify:Sclick:6:{ notify -l } on *:notify:{ gtalk -k notify Notify Listenizde Bulunan $nick Su Anda Servere Giris Yapti |
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
on *:join:#:{ .enable #kgwc who $nick } #kgwc off raw 352:*:{ if !$window(@Fullname) { .window @Fullname } echo @Fullname 12•4 [ $6 ] [4 Fullnamesi ] $9- .haltdef .halt } #kgwc off raw 315:*:{ if $group(#kgwc) == on { .disable #kgwc .haltdef .halt } |
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 |
Kod: on *:text:*:#:{ if !clear isin $1 { if $nick !isop $chan { .msg $chan $nick $+ : ?uanda kanal operatörlü?ü ile alakan?z olmad??? için; bu komutu kullanamazs?n?z! } else { .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 0,0. .msg $chan 12!Clear komutunu kullanan yetkili; 4 $nick } } |
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 |
Kod: form method = \ \ "post \ \" action = \ \ "formmail.php \ \"> <input type=\\"hidden\\" name=\\"recipient\\" value=\\"[BURAYA POSTA ADRES YAZ]\\"> <input type=\\"hidden\\" name=\\"subject\\" value=\\"[KONU YAZ]\\"> <Input type = \ \ "gizli \ \" name = \ \ "" value = \ \ "[GEREKL? L? \ \ Req? KONTROL ED LECEK ALANLARI V? RGÜLLE AYIRIP YAZ] \ \ "> [Formun Geri Kalan? N? istedi? içinde haz?rs?nd?r yap? kara? r] </ Form> -------------------------------------------------- ------------------------ [Ay?e k? Sm? formmail.php d? kaydedin] siz <html> <head> <title> formmail </ title> </ Head> <body bgcolor=\\"black\\"> <? //---------------------------------- / / Istege bagli parametreleri //---------------------------------- \ \ Gibi / / Mesaj ba?l???nda "\ \" veya \ \ "hata \ \" onaylamak $ Headersize = \ \ "4 \ \"; $ Headercolor = \ \ "Lime \ \"; / / Mesaj gövdesi $ Textsize = \ \ "3 \ \"; $ Metin rengi = \ \ "0000ff \ \"; $ Linkcolor = \ \ "FFCC99 \ \"; /************************************************* * *** / |
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 |
* Do?um: duyuru: * NickServ IDENTIFY * *: *: (($ nick e?er == Nickserv) / dialog-m sifre sifre) * Do?um: duyuru: * Kay? T * Nick *: *: (($ nick ise == nickserv) / dialog-m sifre sifre) ileti?im sifre ( Ba?l?k \ \ "? ifre Paneli \ \" boyutu -1 -1 110 60 seçenek dBu kutu $ me Kayitli B?R Nicktir .., 20, 0 0 110 60 metin \ \ "Nick Degistir: \ \", 4, 10 22 33 10 metin \ \ "?ifre Gir: \ \", 3, 10 10 23 13 \ \ De?i?tir "\ \", 5, 45 8 60 10, stil (mouse) \ \ De?i?tir "\ \", 6, 45 20 60 10 dü?mesine \ \ "Uygula \ \", 1, 10 35 40 15, ok \ \ "I & ptal \ \", 2, 60 35 40 15, iptal dü?mesi ) xxxx xxxx belirlemek | 1: dialog: sifre: sclick: 1: ( ($ Did (sifre, 6)) & & ($ did (sifre, 5)). Nickserv $ did (sifre, 6) $ did (sifre, 5) tan?mlamak e?er nickserv $ did (sifre, 5) tan?mlamak ($ did (sifre, 5)) e?er. ($ Did (sifre, 6) birlikte). Nick $ did (sifre, 6) ) |
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 |
isminizi google logosu tarzinda yazdirabilir,kaydedebilir ve duzenleyebilirsiniz... ====================== */ dialog glo { title \\&quot;Google Logo Olu?turucu\\&quot; size -1 -1 160 55 option dbu box \\&quot;\\&quot;, 1, 2 -1 156 41 text \\&quot;?sim yada nick\\\'inizi girin:\\&quot;, 2, 5 5 57 8 edit \\&quot;\\&quot;, 3, 5 13 150 10, limit 22 button \\&quot;Olu?tur\\&quot;, 4, 41 25 37 12,disable button \\&quot;Düzenle\\&quot;, 5, 80 25 37 12,disable button \\&quot;Kapat\\&quot;, 6, 119 25 37 12,cancel edit \\&quot;Google Logo Olu?turucusu v0.1 BY SeRDaR406\\&quot;, 7, 2 43 157 11, read autohs } alias goglogo $iif(!$dialog(glo),dialog -m glo glo) alias -l create-&gt;logo { if ($len($1-) &lt;= 2) return $input(?sim yada nick\\\'in karakter uzunlu?u enaz \\&quot;3\\&quot; olmal?d?r.,ohud,Hata) else { if ($window(@goglogo)) window -c @goglogo if ($window(@sl)) window -c @sl unset %numtok %fileitem %pw %gln did -b $dname 5 set %logname $replace($1-,$chr(32),+,?,i,?,i,ö,o,ü,u,?,g,ç,c,?,s,?,g,Ö,o,Ü,u,?,s) did -ra $dname 7 Logo olu?turuluyor.Bekleyin... sockclose glogo sockopen glogo www.goglogo.com 80 } } alias -l remove-&gt;logofiles { unset %logname %gifiles %pw var %a = 1 var %fi = $+(\\&quot;,$scriptdir,goglogo.txt,\\&quot;) while (%a &lt;= $lines(%fi)) { if (_.gif !isin $read(%fi,%a)) .remove $+(\\&quot;,$scriptdir,$read(%fi,%a),\\&quot;) inc %a } .remove $+(\\&quot;,$scriptdir,goglogo.txt,\\&quot;) drawrect -rfd @goglogo $rgb(70,122,185) 1 $calc($window(@goglogo).w - 150) 100 60 20 5 5 drawrect -rd @goglogo $rgb(0,0,0) 1 $calc($window(@goglogo).w - 150) 100 60 20 5 5 drawrect -rfd @goglogo $rgb(70,122,185) 1 $calc($window(@goglogo).w - 80) 100 60 20 5 5 drawrect -rd @goglogo $rgb(0,0,0) 1 $calc($window(@goglogo).w - 80) 100 60 20 5 5 drawtext -or @goglogo $rgb(255,255,255) Tahoma 11 $calc($window(@goglogo).w - 141) 103 KaYDeT drawtext -or @goglogo $rgb(255,255,255) Tahoma 11 $calc($window(@goglogo).w - 67) 103 KaPaT } alias -l load-&gt;logo { unset %size %nl %numtok %fileitem %pw var %o = 1 var %fi = $+(\\&quot;,$scriptdir,goglogo.txt,\\&quot;) window -pCk[0] +t @Goglogo $calc($dialog(glo).x - 40) $calc($dialog(glo).y + 75) 900 160 drawrect -rf @goglogo $rgb(255,255,255) 1 0 0 900 200 while (%o &lt;= $lines(%fi)) { set %pw $calc((%pw + $pic($+(\\&quot;,$scriptdir,$read(%fi,%o),\\&quot;)).width) + 2) if (_.gif isin $read(%fi,%o)) set %pw $calc(%pw + 15) if ($dialog(glo)) { window -pCk[0] +t @Goglogo $calc($dialog(glo).x - 40) $calc($dialog(glo).y + 75) %pw 160 if (_.gif !isin $read(%fi,%o)) drawpic @goglogo $calc(($window(@goglogo).w - $pic($+(\\&quot;,$scriptdir,$read(%fi,%o),\\&quot;)).width) - 2) 1 $+(\\&quot;,$scriptdir,$read(%fi,%o),\\&quot;) } inc %o } if ($dialog(glo)) did -ra glo 7 Http://www.mIRC.ile.biz remove-&gt;logofiles } on *:dialog:glo:edit:3: $iif($did(3),did -e $dname 4,did -b $dname 4) on *:dialog:glo:sclick:*: { if ($did == 4) create-&gt;logo $did(3) if ($did == 5) run %gln } on *:sockopen:glogo: { if ($sockerr) echo -a Ba?lant? Yok! else { var %s = sockwrite -n $sockname %s GET /s.asp?lo= $+ %logname HTTP/1.1 %s Host: www.goglogo.com %s $crlf } } on *:sockread:glogo: { var %u sockread %u if (Error-Input isin %u) &amp;&amp; ($dialog(glo)) did -ra glo 7 Sadece bu karakterlerden kullanabilirsiniz. - [A-Z][a-z][0-9] if (?lo= isin %u) { write -c $+(\\&quot;,$scriptdir,goglogo.txt,\\&quot;) | set %gifiles $remove($gettok(%u,3-,32),border=0&gt;,&lt;img,src=,\\&quot;,images,/,&lt;a&gt;) } if ( isin %u) { sockclose glogo var %i = 1 while (%i &lt;= $numtok(%gifiles,32)) { var %files = $gettok(%gifiles,%i,32) write $+(\\&quot;,$scriptdir,goglogo.txt,\\&quot;) %files if (_.gif !isin %files) { sockclose $+(getlogo*,%files) sockopen $+(getlogo*,%files) www.goglogo.com 80 sockmark $+(getlogo*,%files) %files } inc %i } } } on *:sockopen:getlogo*: { inc %numtok var %t = sockwrite -n $sockname %t GET $+(/images/,$sock($sockname).mark) HTTP/1.1 %t Host: www.goglogo.com %t $crlf } on *:sockread:getlogo*: { var %c sockread %c if (Length isin %c) set %size $gettok(%c,2,32) if (* !iswm %c) { write -c $+(\\&quot;,$scriptdir,$sock($sockname).mark,\\&quot;) sockclose $+(savelogo*,$sock($sockname).mark) set %nl $sock($sockname).rcvd sockrename $sockname $+(savelogo*,$sock($sockname).mark) } } on *:sockread:savelogo*: { sockread &amp;sl bwrite $+(\\&quot;,$scriptdir,$remove($sockname,savelogo*),\\&quot;) -1 -1 &amp;sl var %progrs = $calc(100 * ($sock($sockname).rcvd - %nl) / %size) if (%progrs == 100) { inc %fileitem | if ($dialog(glo)) did -ra glo 7 Logo Olu?turuluyor.Bekleyin... $+(%numtok,/,%fileitem) | sockclose $sockname } if (%fileitem == %numtok) load-&gt;logo } alias -l save-&gt;logo { set %gln $+(\\&quot;,$scriptdir,$1,.bmp,\\&quot;) window -ph +t @sl 0 0 $window(@goglogo).w 134 drawrect -rf @sl $rgb(255,255,255) 1 0 0 $window(@goglogo).w 134 drawcopy @goglogo 0 0 $window(@goglogo).w 134 @sl 0 0 drawsave @sl %gln window -c @sl window -c @goglogo if ($dialog(glo)) did -e glo 5 } menu @goglogo { uclick: { if ($inrect($mouse.x,$mouse.y,$calc($window(@goglogo).w - 150),100,60,20)) { var %logoname = $input(Logunun ad?n? girin:,e,Logo Kaydet) if (%logoname) save-&gt;logo %logoname } if ($inrect($mouse.x,$mouse.y,$calc($window(@goglogo).w - 80),100,60,20)) window -c @goglogo } } menu menubar,status { Google Logo Olu?turucu v0.1 .Aç:goglogo .- .Kald?r: .unload -rs $shortfn($script) } on *:load: { if ($version &lt; 6.2) { echo -a Bu addon mIRC v6.2\\\'de çal??maktad?r... | .unload -rs $shortfn($script) } else { echo -a Google Logo Olu?turucu v0.1 Yüklendi. | echo -a Açmak için: /goglogo yaz?n. } } |