Sohbet, Chat Odaları

Ban List Editör

on *:load: {
.echo -aq $input(Yapımcı: SaNCaK $+ $crlf $+ $crlf $+ Addon: Add-On $chr(40) $+ v5.4 $+ $chr(41) $+ $crlf $+ $crlf $+ Yapım: 17/10/2014 $+ $crlf $+ $crlf $+ Iletişim: sancak@ym2ks.org $+ $crlf $+ $crlf $+ Kodu Kullandığınız için Teşekkür ederim,igo,Addon: SaNCaK $chr(40) $+ v5.4 $+ $chr(41))
echo -a _____________________________________________________________________________________
echo -a 4,1[15,1 SaNCaK 4,1] 0,1 Add-On yükleniyor…
echo -a 4,1[15,1 SaNCaK 4,1] 0,1 Çalýþan mIRC15 $version 0Sistem15 Windows $+ $os
echo -a 4,1[15,1 SaNCaK 4,1] 0,1 Coder: 15SaNCaK 0,1 E-Mail: 15sancak@ym2ks.org
echo -a 4,1[15,1 SaNCaK 4,1] 0,1 http://www.mircclub.org
echo -a 4,1[15,1 SaNCaK 4,1] 0,1 Copyright 12©15 1999-2018
echo -a ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
}
on *:unload: {
.echo -aq $input(Yapımcı: SaNCaK $+ $crlf $+ $crlf $+ Addon: Add-On $chr(40) $+ v5.4 $+ $chr(41) $+ $crlf $+ $crlf $+ Yapım: 17/10/2014 $+ $crlf $+ $crlf $+ Iletişim: sancak@ym2ks.org $+ $crlf $+ $crlf $+ Kodu Kullandığınız için Teşekkür ederim,igo,Addon: SaNCaK $chr(40) $+ v5.4 $+ $chr(41))
}

menu channel,menubar {
Ban List:iblstart
}
dialog ibllist {
title “Ban List”
size -1 -1 211 137
option dbu
box “Ban Listesi:”, 1, 3 3 137 131
list 2, 7 11 128 106, result
box “Ban Bilgisi:”, 3, 143 3 64 51
text “Banlayan:”, 4, 147 11 31 8, center
text “”, 5, 147 21 56 8
text “Ban Zamanı:”, 6, 147 31 33 8, center
text “”, 7, 147 41 56 8
button “Tümünü Seç”, 8, 143 57 64 12, flat
button “Temizle”, 9, 143 72 64 12, flat
button “Seçlenleri Temizle”, 10, 143 87 64 12, flat
button “Tümünü Temizle”, 11, 143 102 64 12, flat
button “Ok/Cancel”, 12, 156 118 37 12, flat ok cancel
text “”, 13, 7 122 128 8
}

on *:DIALOG:ibllist:init:*: {
if ($ibl($active,0) != 0) {
var %a = 1
while (%a <= $ibl($active,0)) {
did -a $dname 2 $ibl($active,%a)
inc %a
}
did -a $dname 13 $+($active,$chr(58)) için Toplam giriş: $ibl($active,0)
noop $input(Tüm kayıtlar eklendi..,o,Tamamlandı!)
}
else {
noop $input(Hiçbir kayıt yok: $+($active,.),o,Kapatılıyor!)
dialog -x $dname
}
}
on *:DIALOG:ibllist:sclick:2,8-11: {
var %a
if ($did == 2) {
if ($did($dname,2,0).sel == 1) {
did -ra $dname 5 $ibl($active,$did($dname,2).sel).by
did -ra $dname 7 $ibl($active,$did($dname,2).sel).date
}
elseif ($did($dname,2,0).sel >= 2) {
did -ra $dname 5 Birden fazla kayıt
did -ra $dname 7 Birden fazla kayıt
}
elseif ($did($dname,2,0).sel == 0) {
if ($did($dname,5) != $null) && ($did($dname,7) != $null) {
did -r $dname 5,7
}
}
}
if ($did == 8) {
%a = 1
while (%a <= $did($dname,2).lines) {
if ($did(8).text == CheckAll) {
did -s $dname 2 %a
}
elseif ($did(8).text == UnCheckAll) {
did -l $dname 2 %a
}
inc %a
}
if ($did(8).text == CheckAll) {
did -ra $dname 8 UnCheckAll
}
elseif ($did(8).text == UnCheckAll) {
did -ra $dname 8 CheckAll
}
}
if ($did == 9) {
if ($did($dname,2,0).sel == 1) {
mode $active -b $did($dname,2,$did($dname,2).sel).text
did -d $dname 2 $did($dname,2).sel
.timer 1 1 refreshibl
}
}
if ($did == 10) {
%a = 0
var %bans
while ($did($dname,2,0).csel > 0) {
%bans = %bans $did($dname,2,$did($dname,2,1).csel).text
did -d $dname 2 $did($dname,2,1).csel
inc %a
if (%a == $modespl) {
mode $active – $+ $str(b,%a) %bans
%bans = $null
%a = 0
}
}
if (%bans) {
mode $active – $+ $str(b,%a) %bans
}
.timer 1 1 refreshibl
}
if ($did == 11) {
%a = 0
var %bans
while ($did($dname,2).lines > 0) {
%bans = %bans $did($dname,2,1).text
did -d $dname 2 1
inc %a
if (%a == $modespl) {
mode $active – $+ $str(b,%a) %bans
%bans = $null
%a = 0
}
}
if (%bans) {
mode $active – $+ $str(b,%a) %bans
}
.timer 1 1 refreshibl
}
}
alias iblstart {
if ($me !ison $active) {
return
}
if (!$chan($active).ibl) {
.enable #IBLList
.timerIBLListTimeout 1 8 ibltimeout
mode $active +b
}
else {
ibldialog
}
}
alias ibldialog {
dialog $iif($dialog(ibllist),-v,-m ibllist) ibllist
}
alias -l refreshibl {
did -ra ibllist 13 Total entries on $+($active,$chr(58)) $ibl($active,0)
}
#IBLList off
raw 368:*: {
HALTDEF
.timerIBLListTimeout off
.disable #IBLList
ibldialog
}
#IBLList end
alias ibltimeout {
.disable #IBLList
ibldialog
}

Yazı hakkında görüşlerinizi belirtmek istermisiniz?


Mobil Sohbet

Kullanıcılarımızın dilediği yerden, istediği zaman rahatlıkla sohbete bağlanması için geliştirmiş olduğumuz; Mobil Sohbet Uygulamamızı akıllı cep telefonlarınıza indirerek, Mobil uyumlu sohbet odalarımıza katılabilir. Yeni insanlarla sohbet etmek için can atan sohbet sevenler ile doyasıya sohbet edebilirsiniz.

Play Store Üzerinden App Store Üzerinden
%d blogcu bunu beğendi: