Kara Liste Kodları

T

The Cry

Kıdemli Üye
19 Eki 2007
3,111
10
"-Her Yerden-"
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 $nick | kick $chan $nick 5 $+ # Kanalına Girişin 12Karaliste4/12Badnick4/12Inviter5 Sebebinden Dolayı Yasaklanmı$tır...
}
}
}
#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 12Karaliste4/12Badnick4/12Inviter5 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 12Karaliste4/12Badnick4/12Inviter5 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 12Karaliste4/12Badnick4/12Inviter5 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 12Karaliste4/12Badnick4/12Inviter5 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 12Karaliste4/12Badnick4/12Inviter10 Sebebinden Dolayı Yasaklanmıştır...
.Çıkar:/.ruser $$1 | /echo -a 10 $+ $$1 4Karalisteden Çıkarıldı...
.At:/mode # +b $$1 | /kick # $$1 10 $+ # Kanalına Girişin 12Karaliste4/12Badnick4/12Inviter10 Sebebinden Dolayı Yasaklanmıştır...
}

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ı
 
F

FaTiH-68

Yeni üye
4 Ara 2007
15
0
Bune YAws :D Arkadaşım Birazdaha Açıklama Yaparmısın lütfen Teşekkürler Eğeme Saygı... ;)
 
Cevap yazmak için giriş yap yada kayıt ol.
Üst

Turkhackteam.org internet sitesi 5651 sayılı kanun’un 2. maddesinin 1. fıkrasının m) bendi ile aynı kanunun 5. maddesi kapsamında "Yer Sağlayıcı" konumundadır. İçerikler ön onay olmaksızın tamamen kullanıcılar tarafından oluşturulmaktadır. Turkhackteam.org; Yer sağlayıcı olarak, kullanıcılar tarafından oluşturulan içeriği ya da hukuka aykırı paylaşımı kontrol etmekle ya da araştırmakla yükümlü değildir. Türkhackteam saldırı timleri Türk sitelerine hiçbir zararlı faaliyette bulunmaz. Türkhackteam üyelerinin yaptığı bireysel hack faaliyetlerinden Türkhackteam sorumlu değildir. Sitelerinize Türkhackteam ismi kullanılarak hack faaliyetinde bulunulursa, site-sunucu erişim loglarından bu faaliyeti gerçekleştiren ip adresini tespit edip diğer kanıtlarla birlikte savcılığa suç duyurusunda bulununuz.