İPUCU

Sosyal medya ve Sosyal Platformlar Sosyal Medya Ve Sosyal Platformlar Hakkında Her şey.

Seçenekler

Özel Kabul/red Addondu

By-CyL1nD3r - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
09/2008
Nereden:
BuRs4
Mesajlar:
1.490
Konular:
1115
Teşekkür (Etti):
0
Teşekkür (Aldı):
547
Ticaret:
(0) %
26-10-2008 14:49
#1
Thumbs down
Özel Kabul/red Addondu
Özel Kabul/red Addondu
Code:
#ozelkabul on
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 51
option dbu
edit "", 1, 40 4 120 10, read
text "Nick :", 2, 4 7 27 8
text "Mesaj :", 3, 4 19 28 8
edit "", 5, 40 18 121 10, read
button "Kabul ET", 7, 13 34 67 12, flat ok
button "Red ET", 8, 86 34 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.msg
}
}
on *:dialog:*:sclick:*:{
if (Özel Konuşma İsteği == $dialog($dname).title ) {
if ($did == 7) {
.window -w $dname
.msg $dname Ozel Konusma Isteginiz Kabul Edilmistir.
.set %ozelkabul.gorusme. [ $+ [ $dname ] ] ok
}
if ($did == {
.msg $dname 4Özel konuşma isteğinize cevap vericek şuan kimse yok. 1away.!
.msg $dname 2 5 Dk ignore edildiniz.
.ignore -pu300 $dname 5 Dk ignore edildi.
.closemsg $dname
}
}
}
on *:TEXT:*:?:{
if ($nick == $me) { goto son }
if (%ozelkabul.gorusme. [ $+ [ $nick ] ] == $null) {
.ozelkabul $nick $address($nick,2) $1-
.msg $nick 1Selam 4: 1Gorusme talebiniz isleme alinmistir.. Lutfen bekleyiniz ..
.window -h $nick
}
}
on *:CLOSE:?:{
if (%ozelkabul.gorusme. [ $+ [ $target ] ] != $null) { unset %ozelkabul.gorusme. [ $+ [ $target ] ] }
}
#ozelkabul end
menu status,menubar {
Özel Kabul
.Aç : .enable #ozelkabul
.Kapat: .disable #ozelkabul
..Engelle (Ignore)
..Ekle:/ignore $$1 | /echo -s 0,2 $$1 ignore Edildi.  | .notice $$1 ignore Edildin... Artık Yazdıklarını Görmeyeceğim !  %muhabbet
..Çıkar:/ignore -r $$1 | /echo -a 0,2 $$1 ignore 'den Kaldırıldı... 
..-
..Listele:/ignore -l
}
---------------------
§§§§§§§§§_§§§___§§§_§§§§§§§§§_§§§__§§§
___§§§____§§§___§§§_§§§___§§§_§§§_§§§_
___§§§____§§§___§§§_§§§§§§§§§_§§§§§§_
___§§§____§§§___§§§_§§§__§§§__§§§_§§§
___§§§____§§§§§§§§§_§§§___§§§_§§§__§§§
erkan_pk - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
09/2006
Nereden:
istanbul
Yaş:
25
Mesajlar:
633
Konular:
7
Teşekkür (Etti):
10
Teşekkür (Aldı):
24
Ticaret:
(0) %
30-10-2008 03:21
#2
Paylaşım icin saol tsk ederim...
--------------------- ingiliz lordu Atatürk'ün daveti üzerine istanbul'a gelir.
ingiliz lordu şerefine verilen yemekte servis yapan türk elindeki tepsiyi devirir.
Herkes büyük bi şaşkınlık içinde kalmıştır ve atatürk'ün ne tepki vereceği beklenirken, atatürk ingiliz lorduna dönerek:
"HALKIM HERŞEYİ BECERİYOR DA Bİ TEK UŞAKLIĞI BECEREMİYOR".
efsanegamma - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
07/2007
Mesajlar:
152
Konular:
48
Teşekkür (Etti):
22
Teşekkür (Aldı):
3
Ticaret:
(0) %
08-11-2008 11:37
#3
ellerine saglık tşk ederim
güzel paylaşım
SW33TYB0Y - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
08/2008
Mesajlar:
13
Konular:
0
Teşekkür (Etti):
0
Teşekkür (Aldı):
0
Ticaret:
(0) %
08-11-2008 16:38
#4
ßu ne YhaF Kopyala + Yapıştır oLmuş :S
ab_30 - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
09/2008
Nereden:
GAZİANTEP
Mesajlar:
272
Konular:
2
Teşekkür (Etti):
2
Teşekkür (Aldı):
14
Ticaret:
(0) %
09-11-2008 12:58
#5
saol kardes paylasımın için

Bookmarks


« Önceki Konu | Sonraki Konu »
Seçenekler

Yetkileriniz
Sizin Yeni Konu Acma Yetkiniz var yok
You may not post replies
Sizin eklenti yükleme yetkiniz yok
You may not edit your posts

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodları Kapalı
Trackbacks are Kapalı
Pingbacks are Kapalı
Refbacks are Kapalı