Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:input:*: { if $left($1,1) != / && !$ctrlenter && !$inpaste { var %/ = 1,%= = $numtok($1-,32),%: | while %/ <= %= { var %: = $addtok(%:,$+($upper($left($gettok($1-,%/,32),1)),$right($gettok($1-,%/,32),-1)),32) | inc %/ | haltdef } | say $replacecs(%:,l,L) } }
bi onceki mesajda verdigin koda ek olarak sadece l > L degisimi yaptim..