nick RenkLendırme
 

on 1:INPUT:*: {
set %purp $replace(%purp,b,B)
if ( $left($1,1) == / ) { goto son }
if ($ctrlenter) { goto son }
if ($active == Status Window) { Echo -a %logo2 11,1Statusa Birşey Yazamazsınız. | goto halt }
if ($active == @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) { goto halt }
set %Var3 $1-
unset %Var1 %Var2
set %Var1 1 | set %Var2 $upper($mid(%Var3,1,1))
if ($mid(%Var3,1,1) == $chr(47)) { goto ServerCommand }
if ($len(%Var3) == 1) { set %Var2 $upper(%Var2) | say %Var2 | halt }
:Start1
inc %Var1 1
if ($mid(%Var3,%Var1,1) != $chr(32)) { set %var2 $replace(%Var2,b,ß,l,L) $+ $mid(%Var3,%Var1,1) | if ($len(%Var3) < %Var1) { goto Start1 } }
if ($mid(%Var3,%Var1,1) == $chr(32)) { set %var2 %var2 $+ $upper($mid(%Var3,%Var1,2)) | inc %Var1 1 | if ($len(%Var3) < %Var1) { goto Start1 } }
if ($len(%Var3) != %Var1) { goto Start1 }
say 1 $+ $chr(2) $+ %Var2 $+ $chr(2)
:ServerCommand
:halt
halt

ELımde SoyLe Bır Adon Var Sorum SoyLe Kod Gayet Iyı Calısıyor Sadece Nıcke SesLendıgımde Nıck FarkLı Renk Ve Buna Extradan Konusma Ayrı RenK Cıksın Sımıden Tesekur Ederım

Cevap: nick RenkLendırme
 

Alıntı:

AsaF Nickli Üyeden Alıntı (Mesaj 1041918090) on 1:INPUT:*: { set %purp $replace(%purp,b,B) if ( $left($1,1) == / ) { goto son } if ($ctrlenter) { goto son } if ($active == Status Window) { Echo -a %logo2 11,1Statusa Birşey Yazamazsınız. | goto halt } if ($active == @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) { goto halt } set %Var3 $1- unset %Var1 %Var2 set %Var1 1 | set %Var2 $upper($mid(%Var3,1,1)) if ($mid(%Var3,1,1) == $chr(47)) { goto ServerCommand } if ($len(%Var3) == 1) { set %Var2 $upper(%Var2) | say %Var2 | halt } :Start1 inc %Var1 1 if ($mid(%Var3,%Var1,1) != $chr(32)) { set %var2 $replace(%Var2,b,ß,l,L) $+ $mid(%Var3,%Var1,1) | if ($len(%Var3) < %Var1) { goto Start1 } } if ($mid(%Var3,%Var1,1) == $chr(32)) { set %var2 %var2 $+ $upper($mid(%Var3,%Var1,2)) | inc %Var1 1 | if ($len(%Var3) < %Var1) { goto Start1 } } if ($len(%Var3) != %Var1) { goto Start1 } say 1 $+ $chr(2) $+ %Var2 $+ $chr(2) :ServerCommand :halt halt ELımde SoyLe Bır Adon Var Sorum SoyLe Kod Gayet Iyı Calısıyor Sadece Nıcke SesLendıgımde Nıck FarkLı Renk Ve Buna Extradan Konusma Ayrı RenK Cıksın Sımıden Tesekur Ederım

Ben sorunuzu anlamadım? Addonu atmışsınız da, neyini sordunuz ki

Cevap: nick RenkLendırme
 

Nicke SesLendıgımde Nick Altı Cızgılı Ve Mavı Renkte Olsun Bu vermıs Koda Extradan Onu NasıL Ekleyebılırız

Cevap: nick RenkLendırme
 

Kod:

---

on *:input:#:{
  if (/* iswm $1) || (!* iswm $1) { return }
  var %a 0, %b, %c
  while (%a < $numtok($1-,32)) {
    inc %a
    %c = $gettok($1-,%a,32)
    if ($remove(%c,!,?,:,;,.,$chr(44),?) ison #) { %b = $iif(%b,%b) $+(,%c,) }
    else { %b = %b %c }
  }
  if (!%b) { %b = $1- }
  say %b
  halt
}

---

Kırmızıyla belirtilen virgüllü yerlere renkli olmasını istediğin nickleri yazabilirsin.
Kod sahibi: Xclusive (HaLiL)

Cevap: nick RenkLendırme
 

Koda Kırmızı Olan Yerı Guremedım Her Taraf VirguL

Cevap: nick RenkLendırme
 

if ($remove(%c,!,?,:,;,.,$chr(44),?) ison #) { %b = $iif(%b,%b) $+(4,%c,2) }

Ben örnek verdim burada arkadaşın verdiği kodda ctrl b kodu ile sadece bold yazı rengi verilmiş ben oraya nickleri yazınca 4 yanı kırmızı 2 mavi ise nickten sonra yazılan kelimeye verilen renk kodu

Cevap: nick RenkLendırme
 

Tmm Elıne SagLık Ve Kodu payLasaşn Arakadasa Tesekur Ederım

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 22:30 -->-> Daha önceki mesaj 22:29 --




on *:input:#:{
if (/* iswm $1) || (!* iswm $1) { return }
var %a 0, %b, %c
while (%a < $numtok($1-,32)) {
inc %a
%c = $gettok($1-,%a,32)
if ($remove(%c,!,?,:,;,.,$chr(44),?) ison #) { %b = $iif(%b,%b) $+(4,%c,2) }
else { %b = %b %c }
}
if (!%b) { %b = $1- }
say %b
halt
}




Cok Tesekur Ederım Suan NormaL HaLı Yardımınız Icın SaoLun Kulanmak Isteyen varsa Suankı Son HaLı İyi İfLer