ArkadasLar ScprintLere ÖzeL AddonLar ArıYoırum Yardımcı olabilirmsiniz

Buda Scprinitize özeL KabuL Addonu işe yaricaktır SaygıLar








#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 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 Özel Konuşma İsteğiniz Kabul Edilmiştir ..
.set %ozelkabul.gorusme. [ $+ [ $dname ] ] ok
}
if ($did == 8) {
.msg $dname Özel Konuşma İsteğinize Cevap vericek Şuan Kimse Yok. away .! ( Mesaj birakiniz )
.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 Merhaba : Görüşme talebiniz işleme alinmiştir.. Lutfen bekleyiniz ..
.window -h $nick
}
}
on *:CLOSE:?:{
if (%ozelkabul.gorusme. [ $+ [ $target ] ] != $null) { unset %ozelkabul.gorusme. [ $+ [ $target ] ] }
}
#ozelkabul end
menu channel,status,menubar,query {
Özel Kabul Sistemi
.Aç : .enable #ozelkabul
.Kapat: .disable #ozelkabul

[50 mesajı olmayan foruma link yollayamaz, bu kural virüs ve reklam gönderenler çoğaldığı için konulmuştur.]

arkadaslaR bi oPer Yapmıstı.. Bildiğimiz Sajoin komutu iLe aralıksız timer kullanırcasına . duraksamadan bir dünya kanala giris yapıp Scriptimi kitlior nasıl Bir komut Sizce ? ßiLen vArsa Örenebilirmiyim ?

arkadaşlar başka irc serverinde yüklü oyun botunu nasıl alabilirim, telnette nerelere girmek gerekir, tcl dosyası mirce eklenirmi, yardımlarınıza çok acil ihtiyacım var arkadaşlarımm