Çevrimdışı

#yazıstil on
on *:input:*:{
if ($left($1,1) != /) {
var %Jnk
var %e = 0
while %e != $numtok($1-,32) {
inc %e 1
var %Jnk = %Jnk $upper($left($token($1-,%e,32),1)) $+ $lower($right($gettok($1-,%e,32),-1))
}
msg $active $replace(%Jnk,I,i,l,L,ALLah,ALLAH)
halt
}
}
#yazıstil end
menu query,channel {
.Yazı Stil
..Aç:.enable #yazıstil
..Kapa:.disable #yazıstil
}




selam alone bu kodu senden almıştım bu kodda her kelime başı büyük yazıyor bunu her cümle başı büyük yapmak istiyorum. örnek Sohbet sitelerine hoş geLdiniz. gibi olsun istiyorum yardımcı olabilirmisin hoccam..