Ame Amsg Yasaklama

- dialog ame_amsg {
title "Ame/Amsg Kontrol"
size -1 -1 184 113
option dbu
tab "Ame", 5, 2 5 178 105
button "ekle", 7, 34 92 37 12, tab 5
button "sil", 8, 34 79 37 12, tab 5
text "Bu Listedeki kanallar /ame mesajlarınızdan muaf tutulur.", 9, 8 28 61 28, tab 5
check "Ame Kontrol Aktif", 17, 8 63 63 10, tab 5
list 1, 75 25 99 80, tab 5 size hsbar vsbar
tab "Amsg", 10
text "Bu Listedeki kanallar /amsg mesajlarınızdan muaf tutulur.", 12, 8 28 61 28, tab 10
button "sil", 13, 34 79 37 12, tab 10
button "ekle", 14, 34 92 37 12, tab 10
check "Amsg Kontrol Aktif", 18, 8 63 63 10, tab 10
list 2, 75 25 99 80, tab 10 size hsbar vsbar
tab "Hakkinda", 15
edit "Ame/Amsg Kontrol addonudur. Listeye Eklediginiz kanallara Ame ve Amsg msjlarınız Gitmez. TRSohbet.com için hazırlanmıştır Çeviri Coder ßy ßad şikayetleriniz vs işlermler için ; Bad@trdostluk.net adresinden ulaşabilirsiniz.. Bad", 19, 8 21 167 85, tab 15 read multi
}
ON *:dialog:ame_amsg:init:*:{
if (!$isfile(ame_amsg.ini)) { return }
if ($readini(ame_amsg.ini,settings,ame) == on) { did -c $dname 17 }
if ($readini(ame_amsg.ini,settings,amsg) == on) { did -c $dname 18 }
if ($ini(ame_amsg.ini,ame_channels)) loadbuf $ini(ame_amsg.ini,ame_channels,0) -otame_channels $dname 1 ame_amsg.ini
if ($ini(ame_amsg.ini,amsg_channels)) loadbuf $ini(ame_amsg.ini,amsg_channels,0) -otamsg_channels $dname 2 ame_amsg.ini
did -z $dname 1
did -z $dname 2
}
ON *:dialog:ame_amsg:sclick:*:{
if ($did == 8) {
remini ame_amsg.ini ame_channels $gettok($did(1).seltext,1,61)
did -r $dname 1
if ($ini(ame_amsg.ini,ame_channels)) loadbuf $ini(ame_amsg.ini,ame_channels,0) -otame_channels $dname 1 ame_amsg.ini
did -z $dname 1
return
}
if ($did == 7) {
var %ame_add = $$input(Add a channel to exclude from /ame $+ $chr(44) in the form: #channel=all for all networks or #channel=network1 $+ $chr(44) $+ network2 $+ $chr(44) $+ network3 for particular networks.,e,Add a channel to exclude from ame),61)
if ($numtok(%ame_add,61) == 2) { writeini ame_amsg.ini ame_channels $replace(%ame_add,=,$chr(32)) | did -r ame_amsg 1 | loadbuf $ini(ame_amsg.ini,ame_channels,0) -otame_channels $dname 1 ame_amsg.ini }
else echo -a *** Yanlış Ekleme Formatı. Format: #channel=all. ÖRNEK: #globalops=all Şeklinde olamlıdır.
did -z $dname 1
return
}
if ($did == 17) {
writeini ame_amsg.ini settings ame $iif($did(17).state == 1,on,off)
return
}
if ($did == 18) {
writeini ame_amsg.ini settings amsg $iif($did(18).state == 1,on,off)
return
}
if ($did == 13) {
remini ame_amsg.ini amsg_channels $gettok($did(2).seltext,1,61)
did -r $dname 2
if ($ini(ame_amsg.ini,amsg_channels)) loadbuf $ini(ame_amsg.ini,amsg_channels,0) -otamsg_channels $dname 2 ame_amsg.ini
did -z $dname 2
return
}
if ($did == 14) {
var %amsg_add = $$input(Add a channel to exclude from /amsg $+ $chr(44) in the form: #channel=all for all networks or #channel=network1 $+ $chr(44) $+ network2 $+ $chr(44) $+ network3 for particular networks.,e,Add a channel to exclude from amsg),61)
if ($numtok(%amsg_add,61) == 2) { writeini ame_amsg.ini amsg_channels $replace(%amsg_add,=,$chr(32)) | did -r ame_amsg 2 | loadbuf $ini(ame_amsg.ini,amsg_channels,0) -otamsg_channels $dname 2 ame_amsg.ini }
else echo -a *** Invalid format. Format shoud be: #channel=network. Example: #mirc=all or #mirc=undernet,dalnet
did -z $dname 2
return
}
}
alias ame {
if ($readini(ame_amsg.ini,settings,ame) != on) { ame $1- | return }
var %all_chans = $chan(0)
while (%all_chans) {
if ($ini(ame_amsg.ini,ame_channels,$chan(%all_chans)) == 0) { var %ame_list = $chan(%all_chans) $+ $chr(44) $+ %ame_list | echo $chan(%all_chans)  $+ $color(action) $+ $timestamp * $me $1- | goto skip }
if ($readini(ame_amsg.ini,ame_channels,$chan(%all_chans)) == all) { goto skip }
if ($network !isin $readini(ame_amsg.ini,ame_channels,$chan(%all_chans))) { var %ame_list = $chan(%all_chans) $+ $chr(44) $+ %ame_list | echo $chan(%all_chans)  $+ $color(action) $+ $timestamp * $me $1- }
:skip
dec %all_chans
}
if (%ame_list) { .raw PRIVMSG %ame_list :
ACTION $1- $+
}
}
alias amsg {
if ($readini(ame_amsg.ini,settings,amsg) != on) { amsg $1- | return }
var %all_chans = $chan(0)
while (%all_chans) {
if ($ini(ame_amsg.ini,amsg_channels,$chan(%all_chans)) == 0) { var %amsg_list = $chan(%all_chans) $+ $chr(44) $+ %amsg_list | echo $chan(%all_chans)  $+ $color(own text) $+ $timestamp < $+ $me $+ > $1- | goto skip }
if ($readini(ame_amsg.ini,amsg_channels,$chan(%all_chans)) == all) { goto skip }
if ($network !isin $readini(ame_amsg.ini,amsg_channels,$chan(%all_chans))) { var %amsg_list = $chan(%all_chans) $+ $chr(44) $+ %amsg_list | echo $chan(%all_chans)  $+ $color(own text) $+ $timestamp < $+ $me $+ > $1- }
:skip
dec %all_chans
}
if (%amsg_list) { .raw privmsg %amsg_list : $+ $1- }
}
menu channel,menubar {
ame/amsg control: dialog -m ame_amsg ame_amsg
}


Kodu alıp remote ye yapıştırıyoruz ve kaydediyoruz.
Sonra /dialog -m ame_amsg ame_amsg Komutu ile addonu çalıştırıyoruz ve eklemek istedigimiz kanalı ekle yi tıklıyoruz #kanal=all şeklinde ekliyoruz. işte bukadar