Çevrimdışı

on 1:INPUT:*:{
unset %elit
set %elit $1-
if ( $chr(47) == $mid(%elit,1,1) ) { %elit | unset %elit* | halt }
%elit = $replacecs(%elit,a,14a,b,14b,c,14c,ç,14ç,d,14 d,e,14e,f,14f,g,14g,ğ,14ğ,h,14h,ı,14ı,i,14i ,j,14j,k,14k,l,14l,m,14m,n,14n,o,14o,p,14p, r,14r,s,14s,ş,14ş,t,14t,u,14u,ü,14ü,v,14v,y ,14y,z,14z,w,14w,q,14q,x,14x,b,14ß,B,14ß,D, 14D,l,14L)
say %elit
unset %elit
halt
}
}

Böyle Bir Kod düzenledim Ama Her Kelimenin Başında Büyük Harf iLE başlasın İstiyorum ama olmuor mesele "Bugün Eve Ne Zaman Gidiceksin" Böle Yazsın İstiyorum Bu Koda Onu eklermisiniz Teşekkürler