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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   Kufur Gecistirici(Güncel Kullanım) (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/29874-kufur-gecistiriciguncel-kullanim.html)

djiNn 08 Nisan 2007 04:38

Kufur Gecistirici(Güncel Kullanım)
 
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
}


Silencer 08 Nisan 2007 12:54

Cevap: Kufur Gecistirici
 
Alıntı:

[12:48:23] <helyanwe> B
[12:48:23] <helyanwe> u
[12:48:23] <helyanwe> r
[12:48:23] <helyanwe> a
[12:48:23] <helyanwe> d
[12:48:23] <helyanwe> a
[12:48:23] <helyanwe> Y
[12:48:23] <helyanwe> a
[12:48:23] <helyanwe> z
[12:48:23] <helyanwe> i
[12:48:24] <helyanwe> y
[12:48:25] <helyanwe> i
[12:48:25] <helyanwe> K
[12:48:26] <helyanwe> a
[12:48:27] <helyanwe> y
[12:48:28] <helyanwe> d
[12:48:29] <helyanwe> i
[12:48:30] <helyanwe> r
[12:48:31] <helyanwe> a
[12:48:32] <helyanwe> n
[12:48:33] <helyanwe> 4
[12:48:34] <helyanwe> 0
[12:48:35] <helyanwe> s
[12:48:36] <helyanwe> a
[12:48:37] <helyanwe> t
[12:48:38] <helyanwe> i
[12:48:39] <helyanwe> r
[12:48:40] <helyanwe> l
[12:48:41] <helyanwe> i
[12:48:42] <helyanwe> k
[12:48:43] <helyanwe> Y
[12:48:44] <helyanwe> a
[12:48:45] <helyanwe> z
[12:48:46] <helyanwe> i
[12:48:47] <helyanwe> V
[12:48:48] <helyanwe> a
[12:48:49] <helyanwe> r
[12:48:50] <helyanwe> B
[12:48:51] <helyanwe> a
[12:48:52] <helyanwe> k
:) Eline saglik karde$im.

djiNn 08 Nisan 2007 14:18

Cevap: Kufur Gecistirici
 
Tüm Sorunlar düzeltilmiştir Güle Güle Kullanın Artık. :)

BuLuTREiS 17 Mayıs 2007 19:15

Cevap: Kufur Gecistirici
 
jin abi bu kaydırma sistemi güzel ama geliştirebilirmisin az ben harflere renk atmayı denedim hata verdi mesela her harfe bir renk atmayı denesek bi örnek versen yine yeter gerisini hallederiM.;painter

carliione 25 Ekim 2007 05:25

Cevap: Kufur Gecistirici
 
az önce denedim cok güzel olmus tskler.:D

TISSOT 03 Kasım 2007 01:44

Cevap: Kufur Gecistirici
 
40 sayısını nasıl 15 satıra düşürebılırım

djiNn 13 Mayıs 2008 17:41

Cevap: Kufur Gecistirici
 
kodu eklerken sanırım hata yapmışsın.

TuqbA 13 Mayıs 2008 17:53

Cevap: Kufur Gecistirici
 
wayssss :):) Harika Calısıyorrrr eLLerine Sağlık :)

Lyki0n 23 Mayıs 2008 00:39

Yanıt: Kufur Gecistirici
 
eline sağlık süpersinn [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

djiNn 08 Temmuz 2008 01:19

Cevap: Kufur Gecistirici
 
Güncel.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 09:21.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk