Farkli Bir Yazı Tipi Kodu

Aytac

Developer
Yönetici
Developer
Katılım
4 Şub 2020
Mesajlar
373
Tepkime puanı
17
Puanları
18
Konum
ircland
Web sitesi
www.ircalem.net
Yazar: CesuryureK

Kodun Amacı: Kod hem özelde hem de kanalda nickleri ince yapar ve hem özelde hem de kanalda çalışacaktır aynı yazı tipi ile.

Örnek: Bu Nedir Deme CesuryureK Bu Bir Yazı Tipi Deneme Yazısıdır.


Kod:
On 1:input:*:{
  if  ($left($1,1) != /) || ($active != Status Window)  {
    if ($target == $chan) {
      if $1 isnum  { msg $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $1 $regsubex($2-,/(\S+)/gi,$iif(\1 ison #,$+($chr(2),\1,$chr(2)),$+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3)),$mid(\1,2-)))) | halt }
      else {
        msg $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $regsubex($1-,/(\S+)/gi,$iif(\1 ison #,$+($chr(2),\1,$chr(2)),$+($+($+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3),$chr(2))),$chr(2)),$mid(\1,2-)))) 
        halt
      }
    } 
    else {
      if $1 isnum  { msg $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $1 $regsubex($2-,/(\S+)/gi,$iif(\1 isin $target,$+($chr(2),\1,$chr(2)),$+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3)),$mid(\1,2-)))) | halt }
      else {
        msg $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $regsubex($1-,/(\S+)/gi,$iif(\1 isin $target,$+($chr(2),\1,$chr(2)),$+($+($+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3),$chr(2))),$chr(2)),$mid(\1,2-)))) 
        halt
      }
    }
  }
}
 
Üst