Mirc Ozel Kabul Remotesi
Mirc ozel kabul remotesi mirc kullanicilari icin oldukca faydali bi kod
Alttaki kodu eklemenin en kolay yolu, metin belgesine kodu atarak bu belgeyi ozelkabul olarak adlandirin
Ve mirc klasorune atin.
Aktif etmek icin mirc acik durumda iken /load -rs ozelkabul.txt komutu ile aktif edebilirsiniz
menu * {
.-
. Ozel Kabul
..» Açık !:.enable #ozelkabul | .echo -a 0,15 12 Ozel Kabul Açık.. %Java
..» Kapalı !:.disable #ozelkabul | .echo -a 0,15 12 Ozel Kabul Kapalı.. %Java
.-
}
#ozelkabul off
alias ozelkabul {
set %ozelkabul.nick $1
set %ozelkabul.address $2
set %ozelkabul.msg $3-
if ($dialog($1) != $null) { goto son }
dialog -m $1 ozelkabul
:son
}
dialog ozelkabul {
title “Ozel Konusma Istegi”
size -1 -1 164 61
option dbu
edit “”, 1, 40 4 120 10, read
text “Nick :”, 2, 4 7 27 8
text “Adres :”, 3, 4 19 28 8
text “Mesaj :”, 4, 4 31 28 8
edit “”, 5, 40 18 121 10, read
edit “”, 6, 40 30 121 10, read
button “Kabul ET”, 7, 13 44 67 12, flat ok
button “Red ET”, 8, 86 44 66 12, flat cancel
}
on *:dialog:*:init:*:{
if (Ozel Konusma Istegi == $dialog($dname).title ) {
set %ozelkabul.dialog $dname
did -a $dname 1 %ozelkabul.nick
did -a $dname 5 %ozelkabul.address
did -a $dname 6 %ozelkabul.msg
}
}
on *:dialog:*:sclick:*:{
if (Ozel Konusma Istegi == $dialog($dname).title ) {
if ($did == 7) {
.window -w $dname
.msg $dname 4,8 $Nick 1,8Özel Konuşma İsteğiniz Kabul Edilmiştir.. )
.set %ozelkabul.gorusme. [ $+ [ $dname ] ] ok
}
if ($did == 8) {
.msg $dname 4,8 $dname 1,8 Üzgünüm Ama Şuanda Meşkulum.. Özel Konuşma İsteğiniz Kabul Edilmedi..
.ignore -pu300 $dname
.closemsg $dname
}
}
}
on *:TEXT:*:?:{
if ($nick == $me) { goto son }
if (%ozelkabul.gorusme. [ $+ [ $nick ] ] == $null) {
.ozelkabul $nick $address($nick,2) $1-
.msg $nick 4,8 $nick 1,8Özel Programım Açık Durumda.. Lütfen Bekleyiniz..
.window -h $nick
:son
}
}
on *:CLOSE:?:{
if (%ozelkabul.gorusme. [ $+ [ $target ] ] != $null) { unset %ozelkabul.gorusme. [ $+ [ $target ] ] }
}
#ozelkabul end
MEFTUN
Eline sağlık bu iyi olmuş.
SamueL
emeklerınıze sagLık
Hilye
Mirc ozel kabul remotesini aldim Tesekkurler
eSs
Mirc Kodları, Mirc Addon, Mirc Remote, Mirc Ozel Karşılama Remotesi, Script Ozel Karşılama Addonu, Mirc Hazır Kodlar Lafazan.net de