Tekil Mesaj gösterimi
Alt 05 Ekim 2010, 16:23   #40
Çevrimdışı
diyorumki
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Query Blocker (Özel Kabul) Add-on'u




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 "Özel Konuşma İsteği"
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 (Özel Konuşma İsteği == $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 (Özel Konuşma İsteği == $dialog($dname).title ) {
if ($did == 7) {
.window -w $dname
.msg $dname 3,9/9,3\1,3/3,1\9,19,1 15,2 ÔzeL ~  Gørûşme ~  Ïstegïnïz  11,1 ®  15,2 KaßuL  Edïlmïştïr 11,1 || 8,2 $$me 11,1 || 3,1/1,3\9,3/3,9\0,9
.set %ozelkabul.gorusme. [ $+ [ $dname ] ] ok
}
if ($did == 8) {
.msg $dname 3,9/9,3\1,3/3,1\ 0,4 R € D ! ® 8,5  Kurállárá ~ U ÿmámák ~ Uygunsuz ~ Davranış ! 11,1 || 8,2 $$me 11,1 || 3,1/1,3\9,3/3,9\0,9
.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 3,9/9,3\1,3/3,1\9,1 15 11,1 ØzeL ~ Görüşme ~ Ïçin 11,1 ® 11,1 Lûtƒen ~ ßekleyïniz 11,1 || 8,2 $$me 11,1 || 3,1/1,3\9,3/3,9\0,93,9\0,9
.window -h $nick
}
}
on *:CLOSE:?:{
if (%ozelkabul.gorusme. [ $+ [ $target ] ] != $null) { unset %ozelkabul.gorusme. [ $+ [ $target ] ] }
}
menu status,query,channel,nicklist,menubar {
-
Ozel sistem
.Aç:.enable #ozelkabul| echo -a 4,1Özel Sistem :4,1 Açık 
.Kapa:.disable #ozelkabul | echo -a 4,1Özel Sistem :4,1 Kapalı 
-
}
}


Bunuda deneyebilirsiniz..Özel kabul /Red Addonu

alt r yapıp remoteye eklediğinde çalışacaktır..

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver