doğrudur şimdiki halinde sorun olmayacaktır..
Buyrun
Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:input:*: {
if ( $left($1,1) != /) && ($active != Status Window) {
say $regsubex($1-,/(.)/g,$iif(2 \\ \n,$+($chr(3),4,\1,$chr(3),1),\1))
halt
}
}
Halilim yeterki sen iste
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
kodun açıklaması ise,
yazılan her (g) karakteri (.) algılayıp harf diziliminde 2'nin katını siyah yapar
2'nin katı olmayanları da kırmızı
Selam kelimesini düşünün
S : birici harf doğal olarak 1 ' 2'nin katı olmadığı için kırmızı olacak
e : ikinci harf doğal olarak 2' 2'nin birinci katı olduğundan siyah olacak
l : üçüncü harf ve kırmızı olacak
kısacası harfin çift tek sırada olmasına göre işlem.