Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:input:*: {
if /* !iswm $1- && !$inpaste && status !isin $active && @* !iswm $active {
say $regsubex($1-,/(?<=^|\s)(.)/g,04\1)
halt
}
}
ben burda kirmizi kullandigim degistimekte özgürsün tabiki $upper() identifierini kullanarak hem kirmizi hem büyük harf yapabilirsin