IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  reklamver

>
+
Etiketlenen Kullanıcılar

 
 
LinkBack Seçenekler Arama Stil
Prev önceki Mesaj   sonraki Mesaj Next
Alt 30 Aralık 2009, 19:39   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Bad Nick List Gline Atsın




Merhaba Arkadaslar Bunu Nick Kick Ban Degilde Gline Olarak Nasıl Degiştirabiliriz Şimdiden Teşekkürler







alias flowerslist { if ($dialog(flowerslist)) { dialog -c flowerslist } | dialog -ma flowerslist flowerslist }
dialog flowerslist {
size -1 -1 295 346, flat
icon sounds/icon1.ico
title "Karaliste-Badnick Addon"
Combo 1, 1 1 240 330
button "&Ekle", 2, 244 2 50 150 ,flat
button "&Cikar", 3, 244 155 50 150 ,flat
button "&Tamam", 4, 244 308 50 38, flat ok
Check "flowerslist Ac" , 5 , 1 327 241 20, flat
}
on *:dialog:flowerslist:*:*: {
if ($devent == init) { flowerslist.init }
if ($devent == sclick) {
if ($did == 2) { if ($did(1) != $null) { /.auser 10 $did(1) | flowerslist.init } }
if ($did == 3) { if ($did(1) != $null) { /.ruser $did(1) | flowerslist.init } }
if ($did == 5) {
if ($did(5).state == 1) { writeini " $+ $mircini $+ " flowerslist flowerslist on }
if ($did(5).state == 0) { writeini " $+ $mircini $+ " flowerslist flowerslist off }
}
}
}
alias flowerslist.init {
did -r flowerslist 1
if ($readini " $+ $mircini $+ " flowerslist flowerslist == on) { did -c flowerslist 5 }
set %ul 1
while (%ul <= $ulist(*,0)) {
if ($level($ulist(*,%ul)) == 10) { did -a flowerslist 1 $ulist(*,%ul) }
inc %ul 1
}
unset %ul
}
#karaliste on
on 10:join:#: {
if ($readini " $+ $mircini $+ " flowerslist flowerslist == on) {
if (($me isop $chan) || ($me ishelp $chan)) {
mode # +b $$1 | .kick # $$1 4Rumuzunuz 1kanal seviyesine uygun olmayan nitelikler taşımaktadır. 4/Nick YeniRumuz 1komutuyla rumuzunuzu değiştirmeden kanala giriş yapamazsınız.
}
}
}
#karaliste end
#karaliste on
on 10art:#: {
if ($readini " $+ $mircini $+ " flowerslist flowerslist == on) {
if (($me isop $chan) || ($me ishelp $chan)) {
mode # +b $nick | kick # $nick 5 $+ # Kanalına Girişin 12Karaliste 4/ 12Badnick 4/ 12Inviter 5 Sebebinden Dolayı Yasaklanmı$tır...
}
}
}
#karaliste end
#karaliste on
on 10:nick: {
if ($readini " $+ $mircini $+ " flowerslist flowerslist == on) {
if (($me isop $chan) || ($me ishelp $chan)) {
mode # +b $nick | kick $chan $newnick 5 $+ # Kanalına Girişin 12Karaliste 4/ 12Badnick 4/ 12Inviter 5 Sebebinden Dolayı Yasaklanmıştır...
}
}
}
#karaliste on
on 10:text:*:#: {
if ($readini " $+ $mircini $+ " flowerslist flowerslist == on) {
if (($me isop $chan) || ($me ishelp $chan)) {
mode # +b $nick | kick $chan $nick 5 $+ # Kanalına Girişin 12Karaliste 4/ 12Badnick 4/ 12Inviter 5 Sebebinden Dolayı Yasaklanmıştır...
}
}
}
#karaliste end
#karaliste on
on 10:notice:*:#: {
if ($readini " $+ $mircini $+ " flowerslist flowerslist == on) {
if (($me isop $chan) || ($me ishelp $chan)) {
mode # +b $nick | kick $chan $nick 5 $+ # Kanalına Girişin 12Karaliste 4/ 12Badnick 4/ 12Inviter 5 Sebebinden Dolayı Yasaklanmıştır...
}
}
}
#karaliste end
menu nicklist {
.-
Karalist-Badnick
.-
.Ekle:/.auser 10 $$1 | /echo -a 10 $+ $$1 4Karalisteye Alındı... | /mode # +b $nick | /kick # $nick 10 $+ # Kanalına Girişin 12Karaliste 4/ 12Badnick 4/ 12Inviter 10 Sebebinden Dolayı Yasaklanmıştır...
.Çıkar:/.ruser $$1 | /echo -a 10 $+ $$1 4Karalisteden Çıkarıldı...
.At:mode # +b $$1 | .kick # $$1 4Rumuzunuz 1kanal seviyesine uygun olmayan nitelikler taşımaktadır. 4/Nick YeniRumuz 1komutuyla rumuzunuzu değiştirmeden kanala giriş yapamazsınız.
}
}
menu channel {
.-
Karalist-Badnick
.-
.Ekle:/.auser 10 $$?="Nick Giriniz" | /echo -a 10Karalisteye Alındı...
.Çıkar:/.ruser $$?="Nick Giriniz" | /echo -a 10Karalisteden Çıkarıldı...
.Düzenle:/flowerslist | /echo -a 10 $+ $me 4Karaliste Açıldı


Konu XcLusive tarafından (30 Aralık 2009 Saat 20:00 ) değiştirilmiştir.
 
Alıntı ile Cevapla

 

Etiketler
atsin, atsın, bad, gline, list, lutenbad, mirc download, mirc indir


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

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


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Nick yazılınca satırı msg atsın lsls mIRC Scripting Sorunları 5 30 Ağustos 2014 19:16
Ban degilde gline atsın istiyorum boyner mIRC Scripting Sorunları 7 01 Ocak 2012 12:27
statüste ip adresine cift tıklayınca gline atsın eyeS mIRC Scripting Sorunları 2 16 Aralık 2011 22:31
setnamesi asdfg olana gline atsın nasıl olur ? eyeS mIRC Scripting Sorunları 10 09 Ekim 2011 23:59
Sqline List'ten girene gline cashmare mIRC Scripting Sorunları 5 05 Şubat 2011 16:15