|
|
 |
Anasayfa
HTML Kodları
İRC Komutları
Oyunlar
Nick Karşılama Paneli
menu * {
Nick Karşılama: {
dialog -dm greet greet
}
}
dialog Greet {
title "Karşılama Paneli"
size -1 -1 125 167
option dbu
box "Nick Karşılama Mesajı", 13, 33 8 59 10
button "Nick 1 ", 1, 10 23 50 15
button "Nick 2 ", 2, 10 40 50 15
Kodun Devamı İçin Tıklayınız.
Clone Koruması
on *:snotice:*Client connecting on*:{
.timer 1 15 unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]
inc %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]
if %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] >= 4 {
.gline $+(*@,$gettok($gettok($10,2,64),1,41)) 3600 2 Ozel koruma sistemi ; 4 AkasyaFM 2 aynı IP'den 4'den fazla giris tespit etmistir.
unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]
}
}
Kanal Şifreleme
on *:text:*:#KANAL: {
if ($1 == !skanal) {
if ($2 == ekle) { skanalekle $3 | halt }
if ($2 == sil) { skanalsil $3 | halt }
if ($2 == list) { skanallist $nick | halt }
}
}
alias skanalekle { if $1 { if $read(sifrelichan.txt,w,$1) { .msg $chan - $1 - bu kanal zaten listede. | halt } | else { write sifrelichan.txt $1 | .msg $chan - $1 - kanal listeye eklendi. } } }
alias skanallist {
Kodun Devamı İçin Tıklayınız.
Raw Kodları & Whois
on ^*:MODE:#:{
echo $chan 3[ $+ $time $+ ] 12* $nick 12Kanal 12Modu 12Degistirdi: 12[ $1- ]
haltdef
updatenl
}
raw 376:*:{
echo -
echo %c 4«[ 2 Server Motd Sonu 4]»
echo -
halt
}
raw 471:*: { echo -a 14> 2 $2 Kanalında limit var ve şu anda kanal limiti dolu. Daha sonra tekrar deneyiniz... | halt }
Kodun Devamı İçin Tıklayınız.
Renkli Nickler Addonu
dialog cnl {
title "Renkli nickler"
size -1 -1 0 0
button "&Tamam",1, 30 245 50 25,ok,default
button "iptal",2, 80 245 50 25,cancel
text "Kralalemi.Com " ,99, 30 280 1000 1000
box "Ben",3, 30 10 100 50
combo 4, 40 30 80 100,drop
box "Oplar",5, 170 10 100 50psd
combo 6, 180 30 80 100,drop
box "Helperlar",7, 170 80 100 50
Kodun Devamı İçin Tıklayınız.
Özel Karşılama Addonu
on *:open:?:*:{
msg $nick 4,1 15Selam 4 $nick 15>>>>>
msg $nick 4,1 15Bugün 4 $date 15ve Saat 4 $time(HH:nn.ss) 15>>>
msg $nick 4,1 15Konuşmadığım Süre 4 $duration($idle) 15 >>>
msg $nick 4,1 15Toplam Açılan Özel Pencerem 4Sayısı %q! 15 >>
inc %q!
msg $nick 4,1 15Şu an Özelimdeki 4 $+($query(0),.) 15Kişisin Müsait Olduğumda Cevap Verilecektir
msg $nick 4,1 15. Lütfen Görüşmek istediginiz konuyu 4,1 (Örnek !Aşk ) 4,1 15 Şeklinde yazınız. 4KonuLar : 4 !Aşk 15 , 4 !Sohbet 15 , 4 !Help 15 , 4 !access 15 , 4 !Diger 15 , 15Uygunsuz İstekler Durumunda Direk Olarak ignore Edileceksiniz 4. 9Servisler iLe iLgiLi Sorunlariniz için 4/join #help 9 Yaziniz. 4 Zline , Kline , Akill , Nick , Kanal 9 ve 4$ifre 9Sorunlariniz icin 4 /join #OperHelp 9Yaziniz...
inc %q!
if !Diger iswm $1 { msg $nick 1,1 8 4,1 ßuyrun Sizi DinLiyorum ¿ ? }
if !şikayet iswm $1 { msg $nick 1,1 9 !Şikayet 0Edene EttiĞiniz Kişiye EttiĞiniz Konuya ßaqLı oLarak DeqerLendiriLiCekdir. }
if !Help iswm $1 { msg $nick 1,1 11 !help 0Komut SorCaksanız HeLp KanaLını KuLLanınız. O KanaL Sizin İçin Var. /join #help YapaßiLirsiniz. }
if !sohbet iswm $1 { msg $nick 1,1 7 !Sohbet 0iStiOsan ßoSuna ßekLeme GLoßaL KanaLLarı KuLLan. /Join #sohbet  }
if !aşk iswm $1 { msg $nick 1,1 13 !Aşk'a 0 ayırıCak vakdIm yoq  }
if !access iswm $1 { msg $nick 1,1 8 !Access 0iStediĞiniz KanaLın HeLp KanaLına ve/veya SopLarına Giriniz.
}
Away Addonu
alias awayon {
if ($readini(away.ini,settings,nickchange) == on) {
/nick $readini(away.ini,settings,awaynick)
set %timeaway $time
set %timeaway2 $ctime
/away $readini(away.ini,settings,awayreason) $chr(166) %version
/ame Away: $readini(away.ini,settings,awayreason) $chr(166) %version
}
else {
set %timeaway $time
set %timeaway2 $ctime
/away $readini(away.ini,settings,awayreason) $chr(166) %version
/ame Away: $readini(away.ini,settings,awayreason) $chr(166) %version
}
Kodun Devamı İçin Tıklayınız.
Badnick Koruması
on *:start:{ $iif(!$isfile(badnick.tprk),.write badnick.tprk) | .hmake badnick 100 | .hload badnick badnick.tprk }
on @*:join:#:{
if $hfind(badnick,$nick,1,W).data {
mode # +b $nick
kick # $nick 1Nick değiştirip(/nick yeninick) tekrar kanala giriş yapabilirsiniz..
if !$hget(bdnck,$nick) {
.hinc -msu20 bdnck $nick
msg #Opers [ JOIN ] $nick nicki badnick olarak tespit edildi. $+([,$chr(32),$hget(badnick,$hfind(badnick,$nick,1,W).data),$chr(32),])
}
}
}
on *:nick:{
Kodun Devamı İçin Tıklayınız.
1. Sayfadasınız.
1
2
3
4
5
6
7
8
9
10
Facebook Yorum
Reklam
Katagori
Anasayfa
SOHBET
MİRC Addonları
İRC Komutları
Ziyaretçi Defteri
Programlar
Fıkralar
Blog
Çizgi Filimler
Oyunlar
Resimler
HTML Kodları
Şiirler
Burçlar
Rüya Tabirleri
Bebek isimleri
Sağlık
Yemek Tarifleri
Mesajlar Sözler
Meraklısına
Türk Yalanları
Önemli Tlfnlar
Doğum Günü Hesaplama
Karikatürler
Bilmeceler
Hareketli Gifler
Atasözleri
ilginç Bilgiler
Aşk Testi
Büyük Aşklar
Aşkın 50 işareti
1829 Seni Seviyorum
Hakkında
İletişim
Facebook
bodrum escortistanbul escortbursa escortizmir escorteskisehir escortadana escortgaziantep escortmersin escortsamsun escortkusadas� escort
Popüler Sayfalar
-----------------------------------
-----------------------------------
-----------------------------------
-----------------------------------
-----------------------------------
-----------------------------------
Ekle Hit Kazan
Kralalemi
© - 2017 KraLeMSaLSiZ.Tr.Gg
Designed By : öMeR - EmSaLSiZ
Kaynak: EmS
|
|
 |
|
|
|
|
EmSaLSiZ DUYURU PANOSU
|
|
|
|
|
|
|
 |
|
| |
|
|
}
if !aşk iswm $1 { msg $nick 1,1 13 !Aşk'a 0 ayırıCak vakdIm yoq 
}
if !access iswm $1 { msg $nick 1,1 8 !Access 0iStediĞiniz KanaLın HeLp KanaLına ve/veya SopLarına Giriniz.
}
Away Addonu
alias awayon {
if ($readini(away.ini,settings,nickchange) == on) {
/nick $readini(away.ini,settings,awaynick)
set %timeaway $time
set %timeaway2 $ctime
/away $readini(away.ini,settings,awayreason) $chr(166) %version
/ame Away: $readini(away.ini,settings,awayreason) $chr(166) %version
}
else {
set %timeaway $time
set %timeaway2 $ctime
/away $readini(away.ini,settings,awayreason) $chr(166) %version
/ame Away: $readini(away.ini,settings,awayreason) $chr(166) %version
}
Kodun Devamı İçin Tıklayınız.
Badnick Koruması
on *:start:{ $iif(!$isfile(badnick.tprk),.write badnick.tprk) | .hmake badnick 100 | .hload badnick badnick.tprk }
on @*:join:#:{
if $hfind(badnick,$nick,1,W).data {
mode # +b $nick
kick # $nick 1Nick değiştirip(/nick yeninick) tekrar kanala giriş yapabilirsiniz..
if !$hget(bdnck,$nick) {
.hinc -msu20 bdnck $nick
msg #Opers [ JOIN ] $nick nicki badnick olarak tespit edildi. $+([,$chr(32),$hget(badnick,$hfind(badnick,$nick,1,W).data),$chr(32),])
}
}
}
on *:nick:{
Kodun Devamı İçin Tıklayınız.
1. Sayfadasınız.
1
2
3
4
5
6
7
8
9
10
Facebook Yorum
Reklam
Katagori
Anasayfa
SOHBET
MİRC Addonları
İRC Komutları
Ziyaretçi Defteri
Programlar
Fıkralar
Blog
Çizgi Filimler
Oyunlar
Resimler
HTML Kodları
Şiirler
Burçlar
Rüya Tabirleri
Bebek isimleri
Sağlık
Yemek Tarifleri
Mesajlar Sözler
Meraklısına
Türk Yalanları
Önemli Tlfnlar
Doğum Günü Hesaplama
Karikatürler
Bilmeceler
Hareketli Gifler
Atasözleri
ilginç Bilgiler
Aşk Testi
Büyük Aşklar
Aşkın 50 işareti
1829 Seni Seviyorum
Hakkında
İletişim
Facebook
bodrum escortistanbul escortbursa escortizmir escorteskisehir escortadana escortgaziantep escortmersin escortsamsun escortkusadas� escort
Popüler Sayfalar
-----------------------------------
-----------------------------------
-----------------------------------
-----------------------------------
-----------------------------------
-----------------------------------
Ekle Hit Kazan
Kralalemi
© - 2017 KraLeMSaLSiZ.Tr.Gg
Designed By : öMeR - EmSaLSiZ
Kaynak: EmS
