yazı şekline eklenti
S.a arkadaslar burdan aldıqım bi kodda biraz oynama yaptım ama istediğim qibi olmadı
bu kodda ilk kelimenin başındakı harf büyük ve nick yazınca ince altı cizqili cıkıyor.. ben buna ilaveten l=L s=S bu iki harf i eklemek istiyorum kücük l kücük s Büyüge döncek
ilqinz için teşekkür ederim
#yazıstil on
on *:input:#:{
if (/* !iswm $1) || ($ctrlenter) {
var %^ = 1, %'
while %^ <= $0 {
%' = %' $iif($remove($gettok($1-,%^,32),!,:,;,$chr(44)) ison #,$+(1,$gettok($1-,%^,32),),$gettok($1-,%^,32))
inc %^
}
msg # $+ $regsubex(%',/(?<=^|\s)(.)/, $+ $upper(\1) $+ )
halt
}
}
#yazıstil end
menu query,channel {
.Yazı Stil
..Aç:.enable #yazıstil
..Kapa:.disable #yazıstil
} |