| Cevap: Mirc yazı adonu
#yazidrk on
on 1:INPUT:*:{
unset %yazidrk
set %yazidrk $1-
if ( $chr(48) == $mid(%yazidrk,1,1) ) { %yazidrk | unset %yazidrk* | halt }
%yazidrk = $replace(%yazidrk,l,L)
%yazidrk = $replace(%yazidrk,s,S)
%yazidrk = $replace(%yazidrk,r,R)
say %yazidrk
unset %yazidrk
halt
}
#yazidrk end
--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 17:56 -->-> Daha önceki mesaj 17:55 --
Kod yukarda arkadaşlar ama hala bir yardım alamadım lütfen yardımcı olurmusunuz.
|