Çevrimdışı

Hocam her kelimenin ilk harfi ve S L harfleri büyük olmak kaydıyla ancak ince yazı şeklinde yazan bir kod arıyordum yardımcı olabilirmisiniz. tşkler.

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 20:32 -->-> Daha önceki mesaj 20:29 --

#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,s,S,l,L,b,ß,B,ß,g,q,?,¿,g,q,ş,$,Ş,$)
halt
}
}
#yazıstil end
menu query,channel {
.Yazı Stil
..Aç:.enable #yazıstil
..Kapa:.disable #yazıstil
}


hocam bu koddur. Burda kalın ben ince yazanını arıyorum tşkler.