 PS 9308



..............................................................................

                   KK HARFLER BYK HARFE DNTRME

                                                    Ziya Bahtiyar
..............................................................................


Bu basit program, girilen mesaj iindeki kk harfleri byk harflere
dntrr. Bu programn bir benzeri de KUCULT adnda bu alanda bulunmaktadr.
Bu da ayn ilemin tersini yapar.


Programn Aklamas:

Programn banda (20. satr) ileme sokulacak mesaj istenir. Daha sonra bir
FOR/NEXT dngsu oluturulur. Mesajdaki karakterler tek tek alnp ileme
sokulur.
Eer alnan karakterin kodu 97 - 122 arasndaysa, bu karakter kk bir
harftir. Bu harfin byk bir harfe dntrlmesi iin karakter kodundan 32
karlr. Bylece harfin byk harf karl elde edilir. Her karakter daha
sonra S$ deikenine eklenerek mesajn ilenmi hali elde edilir.
Dng bittikten sonra da sonucun bulunduu S$ ekrana yazdrlr.



  BUYUT.BAS
Ŀ
 10 REM - BUYUT -                     
 20 LINE INPUT "MESAJ : ",A$          
 30 S$=""                             
 40 FOR N=1 TO LEN(A$)                
 50 K$=MID$(A$,N,1) : K=ASC(K$)       
 60 IF K>96 AND K<123 THEN K=K-32     
 70 S$=S$+CHR$(K)                     
 80 NEXT N                            
 90 PRINT A$;" -> ";S$                
