Bir arkadaşın fikri üzerine yapmıştım. Özelde ve Kanalda çalışır. Cümlenin ilk harfini ve noktadan sonraki gelen kelimenin ilk harfini büyük yapar. Punct karakterleri de renklendirir.
Farklılık olsun diye paylaşıyorum. İyi forumlar.
Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:input:*: { if $regex($1-,/^(?!\.|\41|\/)/S) { haltdef
if $window($active).type == channel { msg $active $regsubex($regsubex($regsubex($1-,/(\S+)/Sg, $&
$iif(\1 ison #,$+(,,$r(2,6),\1,),\1)),/([[:punct:]])/g,$+(,$r(2,6),\1,)),/(^.|[0-9[:cntrl:]]\x2E\xF\s?.)/g,$upper(\1)) }
if $window($active).type == query { msg $active $regsubex($regsubex($regsubex($1-,/(\S+)/Sg, $&
$iif(\1 == $active,$+(,$r(2,6),\1,),\1)),/([[:punct:]])/g,$+(,$r(2,6),\1,)),/(^.|[0-9[:cntrl:]]\x2E\xF\s?.)/g,$upper(\1)) } } }