![]() |
|
|
#1 (permalink) |
|
Kanaldaki Edilen Küfürler Için Çoğumuz Bir Şekilde Korumalar Ile Atmışız veya attiktan sonra sayfayi dolduracaka şekilde .... işareti yapmışızdır bir 3 4 saat once aklima
gelen birşeyi gerçekleştirmek istedim öyle bir code yazayimki hemn manuel hem de ban attiktan sonra otomatikman kullanilabilsin.. Nasıl Kullanılır : 3 çeşit genel Kullanma Türü Vardır A- küfür reklam vs kişiyi attiktan sonra ; 1- /kaydır #kanal Yazacaginiz Mesaj 2- /kaydır #kanal B- Direk Kanalda Bir küfür Edildiğinde ; 1- /kaydır 2- /kaydır mesajınız C- Ozeldede Kullanabilirsiniz.. Gerekli Bilgiler ; 1. Addonda Karakter Sınırı 40 ' tır Az Veya Cok Oldugunda Kendisi Ekleme Yapar Veya Siler. 2. Mesaj Gönderme Araliği Uymazsa %tim3 verisini değiştirip kendinize uyarlayabilirsiniz.. 3. Işinize Yarayacağınıza umuyorum.. Addonun Adı Tamamen Dogaclamadır.. Şimdilik Bu Kadar.. Sabah Oldu Uyucam 08/04/07 - 04:34 Written Set By djiNn.. Kod:
alias kaydır {
$iif($1-,$iif($left($gettok($1-,1,32),1) == $chr(35),set %kaydd. [ $+ [ $gettok($1-,1,32) ] ] $remove($1-,$gettok($1-,1,32)),set %kaydd $remove($1-,$chr(32))),set %kaydd BuradaYaziyiKaydiran40satirlikYaziVarBak)
if (!%kaydd) { %kaydd = %kaydd. [ $+ [ $gettok($1-,1,32) ] ] }
if (%kaydd == $null) { .set %kaydd BuradaYaziyiKaydiran40satirlikYaziVarBak }
if ($len($remove(%kaydd,$chr(32))) < 40) { %kaydd = $remove($+(%kaydd,$str(.,$calc(40 - $len(%kaydd)))),$chr(32)) }
else { if ($len($remove(%kaydd,$chr(32))) > 40) { set %kaydd $left($remove(%kaydd,$chr(32)),40) } }
var %;ü 1
var %b. $len(%kaydd)
var %tim3 1
while (%;ü <= %b.) {
$iif($left($gettok($1-,1,32),1) == $chr(35),%activech = $gettok($1-,1,32),$iif($active != Status Window,%activech = $active,return))
if (%;ü <= 10) { msg %activech $right($left(%kaydd,%;ü),1) }
else {
if ((%;ü >= 10) && (%;ü <= 20)) { .timer 1 %tim3 msg %activech $right($left(%kaydd,%;ü),1) }
elseif ((%;ü >= 20) && (%;ü <= 30)) { .timer 1 %tim3 msg %activech $right($left(%kaydd,%;ü),1) }
elseif ((%;ü >= 30) && (%;ü <= 40)) { .timer 1 %tim3 msg %activech $right($left(%kaydd,%;ü),1) }
}
inc %;ü
}
unset %kaydd
unset %kaydd. [ $+ [ $gettok($1-,1,32) ] ]
unset %q-
unset %activech
}
_______________________ |
|
|
|
|
![]() |
| Sosyal Paylaşım Kısayolları |
| Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
| Seçenekler | |
| Stil | |
|
|
Sitemiz bir forum sitesi
olduğu için kullanıcılar her türlü görüşlerini önceden onay olmadan anında
siteye yazabilmektedir,
bu yazılardan dolayı doğabilecek her türlü sorumluluk
yazan kullanıcılara aittir,
yine de sitemizde yasalara aykırı unsurlar
bulursanız buradan bize bildirebilirsiniz, şikayetiniz incelendikten sonra en kısa sürede
gereken yapılacaktır.
Report Abuse, Harassment, Scamming, Hacking, Warez, Crack, Divx, Mp3 or any Illegal Activity to
here
Reklam vermek için bize
buradan ulaşabilirsiniz.