mIRCTime.Org - mIRC indir » mirc hazir kodlar http://www.mirctime.org Türkiyenin mIRC & IRC Platformu Mon, 10 May 2010 19:27:12 +0000 http://wordpress.org/?v=2.9.2 en hourly 1 mIRC Ince Yazi Kodu 1 http://www.mirctime.org/mirc-ince-yazi-kodu-1.html http://www.mirctime.org/mirc-ince-yazi-kodu-1.html#comments Wed, 16 Dec 2009 10:47:47 +0000 mIRCTime http://www.mircaskim.net/?p=255 mirc scriptlerinizde CTRL+B kullanarak ince yazi yaziyorsunuz. Isterseniz tüm yazilarinizi ince yazabilirsiniz. Aşagidaki kodu mircde remotelere ekleyiniz.

on *:input:*: {
if (/* !iswm $1-) && (status win !isin $active) && (@* !iswm $active) {
/msg $active  $+ $1-
halt

]]> http://www.mirctime.org/mirc-ince-yazi-kodu-1.html/feed 0 Mirchane -Karsilama Mesaji http://www.mirctime.org/mirchane-karsilama-mesaji.html http://www.mirctime.org/mirchane-karsilama-mesaji.html#comments Wed, 16 Dec 2009 10:39:30 +0000 mIRCTime http://www.mircaskim.net/?p=252 
Kod:
cd IRCS * Kod:
pico-w modules / chanserv / check.c

Kod:
    if (call_callback_4 (modül, cb_check_chan_user_modes,
                        kaynak, kullan?c?, c, modes)> 0)
 return; Sat? r? n? n hemen alt?na;

Kod:
if (! stricmp (\ \ "\ sslssl \", user-> nick)) (
send_cmd (s_GlobalNoticer, \ \ "PRIVMSG% s: zehirli KELEBEK Sunucusu Özel Kullan? c? s? Statusunde, Kanala Giri? Yapm? st? r \ \", ci-> name);
) ?eklinde ekleyin sslssl yerine Kendi Nickinizi Yaz? N ve make install cektikten sonra servislerinizi restleyin.
]]> http://www.mirctime.org/mirchane-karsilama-mesaji.html/feed 0 mIRC Nick Degisenleri Ayri Pencerede Görmek http://www.mirctime.org/mirc-nick-degisenleri-ayri-pencerede-gormek.html http://www.mirctime.org/mirc-nick-degisenleri-ayri-pencerede-gormek.html#comments Wed, 16 Dec 2009 10:37:52 +0000 mIRCTime http://www.mircaskim.net/?p=250 Bu kod ile mircte Nick değişen kullanıcalari @Nickler diye pencerede görmenizi saglicaktir. Kodu Remotelere ekleyiniz. ( ALT+R )


on ^*:snotice:*his/her*: {
window -e @Nickler
echo @Nickler  $time  9,1 Nick  4  4 $4 1nickini, 4,1 $11  1olarak de?i?tirdi.
halt
}

]]> http://www.mirctime.org/mirc-nick-degisenleri-ayri-pencerede-gormek.html/feed 0 Hazır mirc kodları… http://www.mirctime.org/hazir-mirc-kodlari-mirc-mirc-hazir-kodlar-mirc-kodlari-mirc-kodu-mirc-code-mirc-code-snippets-mirc-script-kodu-irc-kod-irc-kodlari-ircd.html http://www.mirctime.org/hazir-mirc-kodlari-mirc-mirc-hazir-kodlar-mirc-kodlari-mirc-kodu-mirc-code-mirc-code-snippets-mirc-script-kodu-irc-kod-irc-kodlari-ircd.html#comments Sun, 15 Nov 2009 16:27:36 +0000 mIRCTime http://www.mircaskim.net/?p=3 Özel Cevaplama

on *:open:?:*:{
msg $nick 2Selam4  $nick
msg $nick 2Bugün4 $date 2ve Saat 4 $time(HH:nn.ss)
msg $nick 2Konuşmadığım Süre 4 $duration($idle)
msg $nick 2Toplam Açılan Özel Pencerem 4Sayısı %q!
inc %q!
msg $nick 2Şu an Özelimdeki4 $+($query(0),.) 2Kişisin Müsait Olduğumda Cevap Verilecektir
msg $nick 2Lutfen 4Op2, 4Voice2, 4Oper 2istemeyiniz istemeniz Durumunda Direk Olarak ignore Edileceksiniz4.2IRC Servisler iLe iLgiLi Sorunlariniz için 4/join #help 2Yaziniz. 4Zline, Kline, Akill, Nick 2ve 4Kanal 2$ifre  2Sorunlariniz icin 4/join #OperHelp 2Yaziniz..
inc %q!
}

Anti Ban

on @1:BAN:*:{
if ( $nick == $me ) { halt }
if ( $bnick == $me ) { goto banaction }
if ( $banmask iswm $address($me,5)) { goto banaction }
else { halt }
:banaction
mode $chan -o $nick
ban $chan $nick 2 | kick $chan $nick 4Anti.Ban
mode $chan -b $banmask
}
}
}

#anti.ban end

Anti Pv (Özeli Kabul Yada Reddet)

alias pv {
dialog -m antipv antipv
}

dialog antipv {
title “Anti/pv By CaRtOs”
size -1 -1 87 86
option dbu
box “Anti Pv”, 1, 3 1 82 70
text “[-Ozel Geldiyinde-]“, 2, 8 9 110 8
check “Ozeli Kapat”, 3, 8 17 50 10
check “Mesaj Gonder”, 4, 8 26 67 10
text “[-Gonderilecek Mesaj-]“, 5, 8 37 110 8
edit %antipvmsg, 6, 8 47 71 10, autohs
radio “Aktiflestir”, 7, 8 59 30 10
radio “DésAktiflestir”, 8, 44 59 33 10
button “[-OK-]“, 9, 3 73 81 10, multi ok
}

on *:dialog:antipv:sclick:9:{ set %antipv $did(6) }
on *:dialog:antipv:*:*:{
if ($devent == sclick) && ($did(3).state == 1) { set %antipvclose on }
if ($devent == sclick) && ($did(3).state == 0) { set %antipvclose off }
if ($devent == sclick) && ($did(7).state == 1) { .enable #antipv }
if ($devent == sclick) && ($did(8).state == 1) { .disable #antipv }
if ($devent == sclick) && ($did(4).state == 1) { .set %antipvmess on }
if ($devent == sclick) && ($did(4).state == 0) { .set %antipvmess off }
if ($devent == init) && ($group(#antipv) == on) { did -c antipv 7 }
if ($devent == init) && ($group(#antipv) == off) { did -c antipv 8 }
if ($devent == init) && (%antipvmess == on) { did -c antipv 4 }
if ($devent == init) && (%antipv != $null) { did -ra antipv 6 %antipv }
if ($devent == init) && (%antipvclose == on) { did -c antipv 3 }
}

#antipv on
On 1:OPEN:?:{
if (%antipvclose == on) { close -m $nick }
if (%antipvmess == on) { msg $nick %antipv }
halt
}
#antipv end

Mp3 Player

alias mp3 { dialog -dm mp3 mp3 | set %mp3 $findfile(%location,*.mp3 ,0,1,did -a mp3 1 $nopath($1-)) }
menu menubar,channel {
-
Lecteur mp3:/mp3
-
}
on *:load:{
/echo -a 4Mp3 Player Yuklendi.
}
dialog mp3 {
title "Mp3 Player By CaRtOs  "
size -1 -1 152 170
option dbu
text "Mp3 Player", 1, 0 10 150 8, center
button "Play", 2, 6 26 36 12
button "Stop", 3, 6 44 36 12
button "Pause", 4, 6 64 36 12
button "Tekrar", 5, 6 84 36 12
button "+", 7, 6 124 13 12
button "-", 8, 30 138 12 12
list 11, 46 54 102 102, size
box "Bilgiler", 12, 46 19 102 34
text "Title :", 13, 48 28 16 8
text "sure :", 16, 48 40 24 8
box "Volume", 18, 2 112 44 44
box "Control", 19, 2 18 44 82
text "© 2006 CaRtOs", 20, 2 160 62 8
edit "", 21, 66 26 82 10, disable autohs
edit "", 24, 68 39 40 10, disable autohs
button "repertuari seciniz ", 25, 0 0 150 8
button "kapat", 6, 71 159 76 10, ok cancel
}

On *:dialog:init:*:*{
/autoauth

On *:dialog:mp3:sclick*:*:{
if ($did == 25) {
set %location $sdir=”repertuari seciniz” C:\
did -ra mp3 1 %location
set %mp3 $findfile(%location,*.mp3 ,0,1,did -a mp3 11 $nopath($1-))
}
if ($did == 8) {
vol -v $calc($vol(master) – 5000)
}
if ($did == 4) {
splay -p pause
}
if ($did == 2) {
set %mp3 %location $+ $did(11).seltext
set %mp3titre $mp3(%mp3).title
set %mp3time $duration($calc($mp3(%mp3).length / 1000 ))
if (%mp3 == $null) { /echo -a 4Error ! 1Lutfen Listeden bir mp3 seciniz ! }
if (%mp3titre == $null) { set %mp3titre [Inconnu] }
if (%mp3time == $null) { set %mp3time [Inconnu] }
did -ra mp3 21 %mp3titre
did -ra mp3 24 %mp3time
/msg $chan 7¬ 10Mp³ 4•2 %mp3titre 4• 7-»2 %mp3time 7¬
splay %mp3
}
if ($did == 5) {
splay -p resume
}
if ($did == 7) {
vol -v $calc($vol(master) + 5000)
}
if ($did == 3) {
splay -p stop
}
}

Seslenme Remotesi v.2

on *:load: {
if ($version >= 5.81) {
set %me $me
set %ses +
echo -a 14 Ses Sistemi Menubar Popups'una 4Yüklendi.
echo -a 14 Menubari Bilmiyorsaniz 4/ses 14Komutunu Kullanın...
echo -a 14 Eğer $öyle bir hata ile kar$ila$irsaniz 6> 4 * /dialog: 'ses' error loading icon 'images/ses.bmp' (line 16, ses.mrc) 14 Lütfen 4ses.bmp 14 dosyasını mIRC32.exe dosyasıyla aynı yere koyun.
ses
}
else {
echo -a 14 ScripT Version'nunuz Bu addon için yeterli degil.
echo -a 14Lütfen 4 http://www.mirc.co.uk 14 adresinden mIRC v5.81 'i veya daha yüksek bir versionu indiriniz.
echo -a 14ScripT Şimdilik 4Unload 14 Edildi...
.unload -rs $script
}
}
;XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
alias ses {
if ( $dialog(ses) == $null ) { dialog -m ses ses }
else { /zaten }
}
dialog ses {
size -1 -1 350 300
title "* Ses Düzenleme"
button "Tamam", 500, 500 570 75 30,ok
text "Bağlandığımda",1,5 13 75 20
text "Kanala Girdiğimde",2,5 33 95 20
text "Op - Voice",3,5 53 75 20
text "Kick Me",4,5 73 75 20
text "Kick User",5,5 93 75 20
text "Ping",6,5 113 75 20
text "Nickim Geçtiğinde",7,5 133 95 20
text "Notifyde",8,5 153 75 20
text "Düştüğümde",9,5 173 75 20
edit "",10,100 10 160 20,autohs
edit "",11,100 30 160 20,autohs
edit "",12,100 50 160 20,autohs
edit "",13,100 70 160 20,autohs
edit "",14,100 90 160 20,autohs
edit "",15,100 110 160 20,autohs
edit "",16,100 130 160 20,autohs
edit "",17,100 150 160 20,autohs
edit "",18,100 170 160 20,autohs
icon 19, 270 5 30 30, ses.bmp
icon 20, 270 25 30 30, ses.bmp
icon 21, 270 45 30 30, ses.bmp
icon 22, 270 65 30 30, ses.bmp
icon 23, 270 85 30 30, ses.bmp
icon 24, 270 105 30 30, ses.bmp
icon 25, 270 125 30 30, ses.bmp
icon 26, 270 145 30 30, ses.bmp
icon 27, 270 165 30 30, ses.bmp
button "Ayarla",28, 300 10 40 20
button "Ayarla",29, 300 30 40 20
button "Ayarla",30, 300 50 40 20
button "Ayarla",31, 300 70 40 20
button "Ayarla",32, 300 90 40 20
button "Ayarla",33, 300 110 40 20
button "Ayarla",34, 300 130 40 20
button "Ayarla",35, 300 150 40 20
button "Ayarla",36, 300 170 40 20
edit "", 37, 100 210 200 80,multi,vsbar
radio "Açik",38, 5 210 40 20
radio "Kapali",39, 5 230 60 20
}
; Hepsi Acik & Hepsi Kapali xxxxxxxxxxxxxxxx
on *:dialog:ses:sclick:39:{
set %ses -
did -r ses 10
did -r ses 11
did -r ses 12
did -r ses 13
did -r ses 14
did -r ses 15
did -r ses 16
did -r ses 17
did -r ses 18
did -b ses 10
did -b ses 11
did -b ses 12
did -b ses 13
did -b ses 14
did -b ses 15
did -b ses 16
did -b ses 17
did -b ses 18
}
on *:dialog:ses:sclick:38:{
set %ses +
did -e ses 10
did -e ses 11
did -e ses 12
did -e ses 13
did -e ses 14
did -e ses 15
did -e ses 16
did -e ses 17
did -e ses 18
did -a ses 10 %ses.1
did -a ses 11 %ses.2
did -a ses 12 %ses.3
did -a ses 13 %ses.4
did -a ses 14 %ses.5
did -a ses 15 %ses.6
did -a ses 16 %ses.7
did -a ses 17 %ses.8
did -a ses 18 %ses.9
}
;xxxxxxxxxx açilis xxxxxxxxxxxxxxxx
on *:dialog:ses:init:*:{
if %ses == - {
did -c ses 39
did -r ses 10
did -r ses 11
did -r ses 12
did -r ses 13
did -r ses 14
did -r ses 15
did -r ses 16
did -r ses 17
did -r ses 18
did -b ses 10
did -b ses 11
did -b ses 12
did -b ses 13
did -b ses 14
did -b ses 15
did -b ses 16
did -b ses 17
did -b ses 18
}
else {
did -c ses 38
did -e ses 10
did -e ses 11
did -e ses 12
did -e ses 13
did -e ses 14
did -e ses 15
did -e ses 16
did -e ses 17
did -e ses 18
did -a ses 10 %ses.1
did -a ses 11 %ses.2
did -a ses 12 %ses.3
did -a ses 13 %ses.4
did -a ses 14 %ses.5
did -a ses 15 %ses.6
did -a ses 16 %ses.7
did -a ses 17 %ses.8
did -a ses 18 %ses.9
}
}
;XXXXXXXX BUTTON VE RESIM LINKLERI VE GOREVLERI DAGITILIYOR XXXXXXXXXXXXXXXXXXXXXX
on *:dialog:ses:sclick:19: if (%ses == +) && (%ses.1 != $null) { .splay %ses.1 } | else { did -r ses 37 | did -a ses 37 .... Bu kutucukta ses dosyasi yok! $crlf .... Veya ses ayarlari kapali | .timer 1 2 did -r ses 37 }
on *:dialog:ses:sclick:20: if (%ses == +) && (%ses.2 != $null) { .splay %ses.2 } | else { did -r ses 37 | did -a ses 37 .... Bu kutucukta ses dosyasi yok! $crlf .... Veya ses ayarlari kapali | .timer 1 2 did -r ses 37 }
on *:dialog:ses:sclick:21: if (%ses == +) && (%ses.3 != $null) { .splay %ses.3 } | else { did -r ses 37 | did -a ses 37 .... Bu kutucukta ses dosyasi yok! $crlf .... Veya ses ayarlari kapali | .timer 1 2 did -r ses 37 }
on *:dialog:ses:sclick:22: if (%ses == +) && (%ses.4 != $null) { .splay %ses.4 } | else { did -r ses 37 | did -a ses 37 .... Bu kutucukta ses dosyasi yok! $crlf .... Veya ses ayarlari kapali | .timer 1 2 did -r ses 37 }
on *:dialog:ses:sclick:23: if (%ses == +) && (%ses.5 != $null) { .splay %ses.5 } | else { did -r ses 37 | did -a ses 37 .... Bu kutucukta ses dosyasi yok! $crlf .... Veya ses ayarlari kapali | .timer 1 2 did -r ses 37 }
on *:dialog:ses:sclick:24: if (%ses == +) && (%ses.6 != $null) { .splay %ses.6 } | else { did -r ses 37 | did -a ses 37 .... Bu kutucukta ses dosyasi yok! $crlf .... Veya ses ayarlari kapali | .timer 1 2 did -r ses 37 }
on *:dialog:ses:sclick:25: if (%ses == +) && (%ses.7 != $null) { .splay %ses.7 } | else { did -r ses 37 | did -a ses 37 .... Bu kutucukta ses dosyasi yok! $crlf .... Veya ses ayarlari kapali | .timer 1 2 did -r ses 37 }
on *:dialog:ses:sclick:26: if (%ses == +) && (%ses.8 != $null) { .splay %ses.8 } | else { did -r ses 37 | did -a ses 37 .... Bu kutucukta ses dosyasi yok! $crlf .... Veya ses ayarlari kapali | .timer 1 2 did -r ses 37 }
on *:dialog:ses:sclick:27: if (%ses == +) && (%ses.9 != $null) { .splay %ses.9 } | else { did -r ses 37 | did -a ses 37 .... Bu kutucukta ses dosyasi yok! $crlf .... Veya ses ayarlari kapali | .timer 1 2 did -r ses 37 }
on *:dialog:ses:sclick:28: if (%ses == +) { set %ses.1 $1 $file="Bir Ses Dosyasi Seçiniz" $mircdir\*.wav | did -a ses 10 %ses.1 }
on *:dialog:ses:sclick:29: if (%ses == +) { set %ses.2 $1 $file="Bir Ses Dosyasi Seçiniz" $mircdir\*.wav | did -a ses 11 %ses.2 }
on *:dialog:ses:sclick:30: if (%ses == +) { set %ses.3 $1 $file="Bir Ses Dosyasi Seçiniz" $mircdir\*.wav | did -a ses 12 %ses.3 }
on *:dialog:ses:sclick:31: if (%ses == +) { set %ses.4 $1 $file="Bir Ses Dosyasi Seçiniz" $mircdir\*.wav | did -a ses 13 %ses.4 }
on *:dialog:ses:sclick:32: if (%ses == +) { set %ses.5 $1 $file="Bir Ses Dosyasi Seçiniz" $mircdir\*.wav | did -a ses 14 %ses.5 }
on *:dialog:ses:sclick:33: if (%ses == +) { set %ses.6 $1 $file="Bir Ses Dosyasi Seçiniz" $mircdir\*.wav | did -a ses 15 %ses.6 }
on *:dialog:ses:sclick:34: if (%ses == +) { set %ses.7 $1 $file="Bir Ses Dosyasi Seçiniz" $mircdir\*.wav | did -a ses 16 %ses.7 }
on *:dialog:ses:sclick:35: if (%ses == +) { set %ses.8 $1 $file="Bir Ses Dosyasi Seçiniz" $mircdir\*.wav | did -a ses 17 %ses.8 }
on *:dialog:ses:sclick:36: if (%ses == +) { set %ses.9 $1 $file="Bir Ses Dosyasi Seçiniz" $mircdir\*.wav | did -a ses 18 %ses.9 }
;XXXXXXXXXX SESLER UYGULANIYOR XXXXXXXXXXXXXXXXXXX
raw 329:*:{ set %me $me | if (%ses == +) && (%ses.2 != $null) { .splay %ses.2 } | halt }
ON *:OP:#: { set %me $me | if ($opnick == $me) && (%ses == +) && (%ses.3 != $null) { .splay %ses.3 } }
ON *:VOICE:#: { set %me $me | if ($opnick == $me) && (%ses == +) && (%ses.3 != $null) { .splay %ses.3 } }
on *:KICK:#:{ set %me $me | if ($knick == $me) && (%ses == +) && (%ses.4 != $null) { .splay %ses.4 | .timer 1 0 join # } }
alias /kick { set %me $me | /kick # $$1 | if (%ses == +) && (%ses.5 != $null) { .splay %ses.5 } }
alias /ping { set %me $me | /ctcp $$1 ping | if (%ses == +) && (%ses.6 != $null) { .splay %ses.6 } }
on *:text:%me:#: { if (%ses == +) && (%ses.7 != $null) { .splay %ses.7 } }
on *:NOTIFY:{ set %me $me | if (%ses == +) && (%ses.8 != $null) { .splay %ses.8 } | echo -a 14 $nick 4Online }
on *:DISCONNECT: { if (%ses == +) && (%ses.9 != $null) { .splay %ses.9 } }
on *:CONNECT: { set %me $me | if (%ses == +) && (%ses.1 != $null) { .splay %ses.1 } }
;XXXXXXX ADDON KISAYOLU MENUBARA ATILIYOR XXXXXXXXXXXX
menu menubar {
-
Seslenme
.Sesleri Ayarla:set %me $me | ses
.-
.Unload: {
unset %ses
unset %ses.1
unset %ses.2
unset %ses.3
unset %ses.4
unset %ses.5
unset %ses.6
unset %ses.7
unset %ses.8
unset %ses.9
unset %me
echo -a 14 Ses Düzeni 4 Unload 14Edildi...
.unload -rs $script
}
}
]]> http://www.mirctime.org/hazir-mirc-kodlari-mirc-mirc-hazir-kodlar-mirc-kodlari-mirc-kodu-mirc-code-mirc-code-snippets-mirc-script-kodu-irc-kod-irc-kodlari-ircd.html/feed 0