Mirc Ozel Kabul Remotesi - Ozel Kabul Remotesi - Mirc Hazir Kodlar - IRCSayfasi

ATLanTiS · 09 Mayıs 2025, 23:37

Mirc Ozel Kabul Remotesi - Ozel Kabul Remotesi - Mirc Hazir Kodlar

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

PHP- Kodu:


			
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

09 Mayıs 2025, 23:37	#1
Çevrimdışı ATLanTiS	Mirc Ozel Kabul Remotesi - Ozel Kabul Remotesi - Mirc Hazir Kodlar -- Sponsor Baglantı -- Mirc Ozel Kabul Remotesi - Ozel Kabul Remotesi - Mirc Hazir Kodlar 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 PHP- Kodu: 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 Paylaş Paylaşmak istediğiniz sosyal site seçin Digg Del.icio.us Technorati Twitter Face'de paylaş Spurl! Reddit! Wong! 0 __________________ To view links or images in signatures your post count must be 0 or greater. You currently have 0 signatures.*

Seçenekler
Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder
Stil
Normal Hybrid-Şeklinde gösterime geç Ağaç şeklinde gösterime geç

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Oto Mod Alma (kişiye ozel)	aSK	mIRC Parça Kodlar	0	13 Ocak 2021 16:59
covid 19 remotesi	Subzero	mIRC Parça Kodlar	0	19 Aralık 2020 03:05
Port koruma remotesi	eRoS	mIRC Parça Kodlar	0	27 Ağustos 2020 13:51
mirc oto saat remotesi	GeN	mIRC Parça Kodlar	1	08 Ağustos 2020 17:21
Hazir kodlar, nasil olmalidir ve ornekleri	PLuToN	IRCd Makaleler	0	15 Temmuz 2020 05:23

Şu an bu konuyu okuyan kişi sayısı: 1 (0 üye ve 1 misafir)