Kendi yazdıklarının aynı şekilde çıkması için yine on input kullanacaksın.
Lakin,
/say yerine
/msg kullanmalısın, şöyleki(kodu biraz daha değiştirdim ama açıklamamı istediğin kısım aynı);
Kod:
on *:input:*: {
if ($left($1,1) != /) {
haltdef | var %1 = 1,%2 = $1-,%v1,%t,%3
while ($gettok(%2,%1,32)) { %v1 = $v1 | if ($active = %v1 || %v1 ison #) { %3 = $v1 | break } | inc %1 }
%t = $regsubex(%2,$+(/\b,%3,\b/gi),$+($chr(3),4,$chr(31),%3,$chr(3),$chr(31)))
.msg $target %t | echo $color(own text) $target $timestamp $+($me,:) %t
}
} -
Ek olarak, $regsubex kısmını açıklayabilirim evet: $regsubex(%2,$+(/\b,%3,\b/gi),$+($chr(3),4,$chr(31),%3,$chr(3),$chr(31))) Burada diyoruzki: %2 değişkenine atanan verinin içerisinde(ki bu $1-(senin kedi text-inin tamamı) oluyor) %3 değişkenine atanan(buda eşleşen nick oluyor) verininin yerine
$+($chr(3),4,$chr(31),%3,$chr(3),$chr(31)) verisini değiştir.
-
$+(/\b,%3,\b/gi): \b bir konum/yer karşılaştırmasıdır. Kelime sınırı anlamına gelir. Burada diyoruzki;
/(karşılaştırma başlatıyoruz)\b(herhangi bir kelime? veya yok)
%3(eşleşen veri =>)
\b((%3) ile bitiyorsa)
/gi(büyük küçük harf ayırt edilmeksizin kaç adet eşleşme varsa?)
-
$chr(3): Renk kodu - ctrl+k
4: Default olarak kırmızı renk(değişebilirsin)
$chr(31): Underline kodu - ctrl+u
%3: Eşleşen veri - search edilen nick
-
Edit: İlk verdiğim kodların $color kısmındaki renk isimlerini düzenledim daha sağlıklı oldu.
$color içerisine girilen,
"normal text" karşıdan gelen text-e atanan default veya değiştirilen rengin kodunu/rakamını verir.
Yine
$color içerisine girilen,
"own text" senin karşıya gönderdiğin text-e atanan default veya değiştirilen rengin kodunu/rakamını verir.