Galatasaray Türkçe mIRC
Script’i Buradan İndirebilirsiniz.>> http://rapidshare.com/files/197753351/gskscript.exe
» Devamını OkuEtiket: script
mIRC Fake Mail Gönderici / mIRCScripting
Bu addon üzerinden belirlediğiniz ve listeye eklediğiniz kişilere kimliğinizi göstermeden veya göstererek mail atabilirsiniz. not: renklendirmesi icin mdx.dll gereklidir. alias mail { dialog -m mail mail } alias dlls if $1 = mdx { return mdx.dll } | if $1 = bars { return bars.mdx } dialog mail { title “Mail Gönderme by SuLh” size -1 -1 219 191 […]
» Devamını OkumIRC Girişte Ülke/Şehir/İSP Gösterme
Merhaba, Sunucuya giriş yapan kullanıcının ülke/şehir/isp adresini @Giriş penceresine yansıtır. En az oper yetkiniz olması gerek ve sunucuya giriş/çıkış(snotice)’leri görmeniz gerekmektedir.. on *:snotice:*Client connecting on port*:who +I $9 raw 352:*:var %:r $r(1000,99999) | sockopen $+(pro,%:r) www.ipaddresslocation.org 80 | sockmark $+(pro,%:r) $+($4,¿,$6) alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } […]
» Devamını OkuScript’inize Ses Dosyaları Ekleyen Remote.
|
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 |
wav türünde ses dosyalarını, bir klasöre atıp aşağıdaki kod metinlerinde klasör/sesdosyasiadi.wav yazan kısımleri editleyerek belirtilen işlem için ses tanımlayabilirsiniz. Kanala giriş sesi; on 1:join:#: { if ($nick != $me) { halt } else { splay klasör\sesdosyasininadi.wav | halt } } Kanaldan çıkma sesi; on 1:part:#: { if ($nick != $me) { halt } else { splay klasör\sesdosyasininadi.wav | halt } } Voice verildiğinde çalacak olan ses; on 1:voice:#: { if ($vnick != $me) { halt } else { splay klasör\sesdosyasininadi.wav | halt } } Op olduğunuzda çalacak ses; on 1:op:#: { if ($opnick != $me) { halt } else { splay klasör\sesdosyasininadi.wav | halt } } |
Showmirc komutu ve parametreleri
ShowmIRC komutu çalışmakta olan mIRC programına çeşitli direktifler vererek işlem yaptırmak için kullanılır. Simge durumunda küçültme, ekranı kaplama seçeneğinin büyümesi, programı açma, programı saatin olduğu sağ alt bölüme yerleştirme, ekranı kaplama seçeneğinin küçülmesi, program üzerine farklı pencereler açma ve açmama gibi işlemler yapmak mümkündür. Parametreler : /Showmirc – m-n-r-s-t- x -o-p /Showmirc -m : mIRC programını görev çubuğuna yerleştirir /Showmirc […]
» Devamını OkumIRC Script Log sistem
|
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 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 |
alias kayitgosterici.mo ( var% s = $ $ input ($ nopath ($ longfn ($ 1 -) dosyasi icinde aramak istediginizi yaziniz:), eq, Arama) net @ LogArama ($ window (@ LogArama)) () ise pencere k0z @ LogArama var% t = $ keneler kte_echo @ LogArama $ PARANTEZ ($ nopath ($ longfn ($ 1 -))) dosyasinda $ PARANTEZ (% s) for Arama yapildi $ + ... echo @ LogArama? filtre-fwbp $ 1 - @ LogArama $+(*,% s *) echo @ LogArama? kte_echo @ LogArama $ nopath ($ longfn ($ 1 -)) dosyasinda arnan $ + (\ \ \ '% s, \ \ \') ile ilgili $ PARANTEZ ($ filtre) sonuc $ tur ($ (($ calc keneler -% t) / 1000), 2) saniyede bulundu. ) alias kayitgosterici ( yak?n ($ window (@ LogGosterici)) (if - @ @ LogGosterici) pencere k0l16zS @ LogGosterici icinde $ PARANTEZ ($ nopath ($ findfile ($ logdir, *. log, 0,))) $ 1 - kayit.yukle @ LogGosterici $ logdir echo dosyasi bulundu giri? yap?n. ($ Isfile ($ 1 -)) (if ($ Hatlar? ($ 1 e?er -)> 64000) ( Ay?e mIRC chr (44) ile gosterilebilmesi Click fazla buyuk $ + $ log ($ input (e?er. Send logu de?il Defteri ile Birlikte kaydolma Ba misiniz?, Wy)) ($ 1 ko?mak -) durdurmak ) $ Kayitgosterici.aktifkayit set% shortfn ($ 1 -) loadbuf-pr @ LogGosterici $ 1 - ba?l?k @ LogGosterici - $ nopath ($ mid ($ sol ($ 1 -, -1), 2)) ) ) alias kayitgosterici.yenile ( ($ Window (@ LogGosterici)) (if aç?k-l @ LogGosterici net @ LogGosterici echo-q $ nopath ($ findfile ($ logdir, *. log, 0,)) $ 1 - kayit.yukle. ($ 1 e?er! =-C) ( (% Kayitgosterici.aktifkayit) (loadbuf-pr @ LogGosterici% kayitgosterici.aktifkayit) e?er else (@ echo LogGosterici Loglar yenilendi ... ) ) ) ) alias kayitfilter ( filtre-fwbp $ 1 @ LogArama $+(*,$ 2 - *) inc% kayitaaranan2 ($ Süzülmü?) (if @ LogArama $ filtre sonuc $ PARANTEZ ($ longfn ($ 1)) dosyasinda bulundu yank? ... echo @ LogArama? inc% kayitabulunan $ filtre ) rline @ LogArama 1 $ deltok ($ line (@ LogArama, 1), -1,32) $ int ($ calc (% kayitaaranan2 /% kayitaaranan * 100)) $ +% ) alias kayitmod.aktif (if ($ dialog (lsetmode)) (did-e $ ifmatch 21)) alias kayit.yukle ( (# * Iswm $ nopath ($ 1 -)) (aline-l @ LogGosterici olur? $ + $ ($ 1 - $ logdir)) kald?r else (aline-l @ LogGosterici $ ($ 1 - $ logdir)) kald?r ) menü @ LogArama ( $ Style (2) aktif $+([,$]): x - Sonuclari Kaydet ( var% x = $ sfile (c: \ \ \ \ *. log, Ay?e Arama sonuclarini nereye kaydetmek istersiniz?, Kaydet) yazmak-c% x savebuf $ aktif% x ) - Kapat: yak?n - @ $ aktif ) menü @ LogGosterici ( dclick ( var% f = $ shortfn ($+($ logdir, $ strip ($ line (@ LogGosterici, $ 1 -, 1)))) ($ Hatlar? (% e?er f)> 64000) ( Ay?e mIRC chr (44) ile gosterilebilmesi Click fazla buyuk $ + $ log ($ input (e?er. Send logu de?il Defteri ile Birlikte kaydolma Ba misiniz?, Wy, Log Fazla Büyük)) (çal??t?rmak% f) durdurmak ) set% kayitgosterici.aktifkayit% f loadbuf-pr @ LogGosterici% f ba?l?k @ LogGosterici - $ strip ($ line (@ LogGosterici, $ 1 -, 1)) ) - Ara . Tum Loglarda ( % Kayitabulunan 0 set % Kayitaaranan findfile ($ logdir, $ set *. log, 0) set% kayitaaranan2 0 var% = $ $ input (Eger buyuk log dosyalarina sahipseniz Arama islemi Uzun Zaman alacaktir. Devam etmek istiyorsaniz $ + $ chr (44) aramak istediginizi kutuya yazin. s, eq, Arama) net @ LogArama ($ window (@ LogArama)) () ise pencere k0z @ LogArama var% t = $ keneler @ LogArama $ + (\ \ \ '% s echo, \ \ \' Click Arama yapiliyor ...)% 0 @ LogArama $ findfile ($ logdir, echo *. log, 0, kayitfilter 1 $% s). Shortfn log dosyasinda $ + (\ \ \ '% s, \ \ \' arandi.) Toplam $ PARANTEZ (% kayitabulunan) sonuc $ tur ($ (($ kenelerin -% t) / 1000), 2) saniyede bulundu kalk. unset% kayitabulunan% kayitaaranan% kayitaaranan2 ) . $ IIf ($ mouse.lb, $ strip ($ 1)): kayitgosterici.mo $ shortfn ($+($ logdir, $ strip ($ 1))) . $ IIf (! $ Mouse.lb, $ nopath (% kayitgosterici.aktifkayit)): kayitgosterici.mo% kayitgosterici.aktifkayit $ IIf ($ mouse.lb, HTML Olustur): strip ($ 1))) $ shortfn ($+($ logdir, $ crlog $ IIf (! $ Mouse.lb, HTML Olustur): crlog% kayitgosterici.aktifkayit $ IIf ($ mouse.lb, Logu göster) ( var% f = $ shortfn ($+($ logdir, $ strip ($ 1))) ($ Hatlar? (% e?er f)> 64000) ( Ay?e mIRC chr (44) ile gosterilebilmesi Click fazla buyuk $ + $ log ($ input (e?er. Send logu de?il Defteri ile Birlikte kaydolma Ba misiniz?, Wy, Log Fazla Büyük)) ( ko?mak% f durdurmak ) else (halt) ) set% kayitgosterici.aktifkayit% f loadbuf-pr @ LogGosterici% f ba?l?k @ LogGosterici - $ strip ($ 1 -) ) $ IIf (! $ Mouse.lb & &% kayitgosterici.aktifkayit, de?il Defteriyle Ac): ko?mak% kayitgosterici.aktifkayit Log Dizinini Ac: ", $ logdir, \ \") $ + (\ \ ko?mak - Sil . Tum Loglari ( BÜTÜN loglarinizi silmek istediginizden Emin misiniz?, Wy)) (($ input (e?er net @ LogGosterici aç?k-l @ LogGosterici @ Echo LogGosterici Loglar siliniyor ... . Echo-q $ findfile ($ logdir, *. log, 0,. Kald?rmak $ 1 -). Shortfn net @ LogGosterici @ Echo LogGosterici BÜTÜN log dosyalariniz basariyla silindi. ba?l?k @ LogGosterici - Acik oturum fade ) ) . Aktif logu ( ($ 1 == $ null) (if net @ LogGosterici @ LogGosterici Lutfen tür bir kez silmek istediginiz logu listeden Seçin yank?. durdurmak ) var% t = $ sline (@ LogGosterici, 0) ($ Input ($ + $ $ 1 loguni silmek istediginizden Emin misiniz? Not: Oturum su Anda kullanimdaysa silinmeyebilir e?er., Wy)) ( unset% kayitgosterici.aktifkayit i var% = $ sline (@ LogGosterici, 0) (% I> ise = 1) ( "LogGosterici, i)% $ logdir, $ strip ($ sline (@ $ + (\ \ kald?r ($ isfile ($ logdir $ + $ strip ($ sline (@ LogGosterici,% i)))) (if. ), \ \ ")) dline-l @ LogGosterici $ sline (@ LogGosterici,% i). ln Aral?k% i ) net @ LogGosterici @ LogGosterici $ PARANTEZ (% t) echo (lar) i basariyla silindi dosyas giri? yap?n. ) ba?l?k @ LogGosterici - Acik oturum fade ) - Yenile: kayitgosterici.yenile Kapat: yak?n - @ @ LogGosterici ) alias crlog ( var% f = $ shortfn ($ IIf ($ 1, $ 1 - $ sfile ($ logdir $ + *. log, Hangi log dosyasindan HTML dosyasi olusturmak istiyorsunuz?, Tamam ))),% o = $ shortfn ($ sfile ($ + (c: \ \ \ \ $ deltok ($ nopath (% f), -1,46),. htm), Bir cikis dosyasi Seçin, Olustur !)),% p = $ keneler ($ Isfile (e?er% f)) ( yazmak-c% o dialog-m htmlolustur htmlolustur did-a htmlolustur 1 1 0 999 -Ra htmlolustur yapt?m 2 Olusturuluyor ... -Ra htmlolustur 3 Kaynak yapt?: -Ra htmlolustur 4 Satir yapt?: -Ra htmlolustur 5 Biten yapt?: -Ra htmlolustur 6 Kalan Sure yapt?: did-ra htmlolustur 7 $ nopath ($ longfn (% f)) did-ra htmlolustur 8,9,10? pencere-h @ htmlolustur var% i = 4,% b = 0,% tt = $ hatlar? (% f),% u = 0 aline @ htmlolustur $ + (<html> <head> <title>, $ nopath ($ longfn (% f )),</ title> </ head> <style type = \ \ "metin / css \ \ "><!--) aline @ htmlolustur vücut $ chr (123) $ + (background-color = \ \ ", $ hexcolor (arka), \ \"; font-family: \ \ ", $ window ($ aktif). font, \ \ "; font-size: \ \", $ window ($ aktif). "\ \ Yaz?y?; color = \ \", $ hexcolor (normal), \ \ ") $ chr (125 ) aline @ htmlolustur - loadbuf 1-2001 @ htmlolustur% f (% U <=% tt) (süre rline @ htmlolustur% i $ + ($ ($ (@ htmlolustur,% i )),<,& lt ;,>,& gt strip ($ line yerine;), ) (% I == 2001) (if var% i = 1 inc% b 2001 savebuf-a @ htmlolustur% o loadbuf $ + ($ calc (% b 1 ),-,$ calc (% b 2001))-r @ htmlolustur% f devam etmek ) If (! $ Calc (% i% 100)) ( did-a htmlolustur 1% u% 0 tt did-ra htmlolustur 8 $ + (% u /% tt) did-ra htmlolustur 9 $ + ($ int ($ calc (% u /% tt * 100 )),%) (% U> 5000) (did-ra htmlolustur 10 $ süresi (int $ ($ (($ kenelerin -% p) / 1000 /% u *% tt kalk - (($ kenelerin -% p) / 1000) ise )))) ) inc% i inc% u ) aline @ htmlolustur </ html> savebuf-a @ htmlolustur $ + (\ \ ",% o, \ \") yak?n - @ @ htmlolustur dialog-c htmlolustur yazmak-L3 $ + (\ \ ",% o, \ \") --></ style> • HTML $ Tarih Tarihinde $ tur ($ calc (($ keneler dosyasi tarafindan log - % p) / 1000), 2) saniyede, • $ nopath ($ longfn (% f)) dosyasindan olusturuldu $ PARANTEZ (Orijinal dosya say?s?% tt SATIR $ + $ chr (44) $ byte ( $ ()% f). dosya boyutu. SUF), ) (HTML yuvarlak ($ (($ kenelerin -% p) / 1000), 2) $ + (saniye icinde basariyla olusturuldu kalk. Dosyasi $ log ($ input e?er $ CRLF, $ CRLF, maddesine ba?lant? veren sayfalar: $ nopath (% o ) $ PARANTEZ ($ byte ($ (% o) dosyas?. boyutunda). SUF), $ CRLF, Kaynak: $ nopath (% f) $ PARANTEZ ($ byte ($ file (% f). boyutunda). SUF) , $ CRLF, Satir:% tt, $ CRLF, $ CRLF, Log Dizini \ \ \ ', $ longfn (% o), \ \ \'. $ CRLF, birsey calistirmak Ba misiniz?), IY, HTML logu )) (url-an% o) ) else (errdialog maddesine ba?lant? veren sayfalar cikis hatasi% f $ +! ) ) ileti?im htmlolustur ( boyutu -1 -1 120 49 seçenek dBu metin \ \ "? \ \", 2,2 3 116 8, merkez Metin "" \ \ \ \ 1,2 12 116 10 metin \ \ "? \ \", 3,2 24 50 8, sa? metin \ \ "? \ \", 4,2 32 50 8, sa? metin \ \ "? \ \", 5,2 40 50 8, sa? metin \ \ "? \ \", 6,2 48 50 8, sa? metin \ \ "? \ \", 7,55 24 60 8 metin \ \ "? \ \", 8,55 32 60 8 metin \ \ "? \ \", 9,55 40 60 8 metin \ \ "? \ \", 10,55 48 60 8 ) * Do?um: dialog: htmlolustur: init: 0: ( SetMircVersion sürümü $ mdx MarkDialog dname $ dialog ($ dname) $ mdx. Hwnd SetControlMDX ProgressBar pürüzsüz> script $ dname 1 mdx \ \ \ \ mdx \ \ \ \ ctl_gen.mdx SetDialog tarz? dlgmodal $ dname mdx did-i $ dname 1 1 bgcolor $ rgb (hilight) did-i $ dname 1 1 barcolor $ rgb (metin) ) * Do?um: close: @ LogGosterici: (unset% kayitgosterici.aktifkayit) alias PARANTEZ (return ($ + $ 1 - $ +)) menü kanal, durum ( Ne dinliyorum?: ?ark? # - Log gösterici:. Kayitgosterici ) |
mIRC Alias Ekleme
Alias Nedir? Mirc Aliaslar aslinda basitce anlatmak gerekirse mIRC Script’e yüklenen komutlar dizini olarak tanımlanabilir. Alias ile mIRC üzerindeki uzun komutları kısaltabilirsiniz. Bu komutları F1, F2, F3, F4,F5 Gibi tuşlarla kullanabiliriz. Komutla örnek bir alias oluşturalım (f1) tuşuna bir alias ekliyelim örnek kanalda seçitigimiz rumuza +o verelim Alias Ekleme Komutu: /alias F1 (f2,f3,f4 vs eklenecek kısaltma tuşu) //mode # +o $$1 […]
» Devamını Oku