Tekil Mesaj gösterimi
Alt 12 Ekim 2020, 15:17   #1
Çevrimdışı
cinaryigit
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yardıma Kanalına Giriş Uyarısı




Selam Arkadaşlar.

Kod şu işe yarıyor;
Belirlediğiniz bir kanala giriş olduğu takdirde ekranınızda ufak bir kutucuk açılır.
Ben #Chanserv kanalı için kullanıyorum
Not: Diğer kodlara bakarak hazırladım. Aslında "memoserv" iletisiydi. Kodun orijinal hali bu.Hak geçmesin
dialog ms {
title "MemoServ Bilgi Kutusu"
size -1 -1 220 85
text "Yeni bir notunuz var.",2,10 10 220 200
text "Okumak için tamam butonuna basınız.",3,10 30 220 200
button "Tamam",4,70 50 85 25,ok
}
on ^*:notice:*yeni bir notunuz*:*:{
if ($nick == MemoServ) {
dialog -ma ms ms
halt
}
}
on 1:ACTIVE:*:{
if ($dialog(idrqm)) { dialog -v ms }
}
on 1:dialog:ms:sclick:4:/ms read last
}


menu status,menubar, {
.-
.• Chanserv Uyarı
..• Açık !:.enable #xchan | .echo -a 0,4 Giriş Uyarı AÇıldı
..• Kapalı !:.disable #xchan | .echo -a 0,4 Uyarı Kapatıldı
.-
}

#xchan on
on ^*:join:#kanaladı: { notice $me 10( $+ $time $+ )  $chan  4Kanalına Giriş Yapan 10 : $nick ( $+ $address $+ ) | dialog -ma chanserv chanserv  | halt }
Oper/Admin host muaf.
if $regex($site,/(Root|Admin|Network|Services|Help|IRCOP|Oper|Local )/i) { return }
Nick Muaf.
elseif $regex($nick,/(Muaf|Muaf2|Muaf3/i) { return }
dialog chanserv {
title "Chanserv Yardım Uyarı"
size -1 -1 220 85
text "Lütfen #Chanserv Kanalına Bakınız",2,10 10 220 200
text "Tamam Tuşuna Basarak Yardım Edebilirsiniz",3,10 30 220 200
button "Tamam",4,70 50 85 25,ok
}

on 1:ACTIVE:*:{
if ($dialog(idrqm)) { dialog -v chanserv }
}
on 1:dialog:chanserv:sclick:4:/join #kanaldı
}
#xchan end


Alt+R yaparak remote içine kopyalayın, tamam deyiniz.
İyi IF'ler

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet bizimmekan