Sayfa 23

SİMETRİ-2 e $0032

Sibel KUZGUN ADI SİMETRİ-2 Bu program, ekranın üst yarısının simetriğini alt yarı- REN KUZCUN sına alır. Simetri | programından tek farkı budur. Kul- 00020 FNP 1-52224 TO &2440:READ |, lanımıda aynı şekildedir. Gaza SYS 52224: Karakter setinin ilk 128'ini iti- 00040 STS 52206 ; <029> 00050 PRİNT "<CLR>":FOR 1-1 TO İ50:POKE 5 baren yerleştirir. 120011NTCRHDCİ | <009> SYS 52296: İlk 128 karakterin simetriklerini alır ve GET meli $C400'dan itibaren yerleştirir. Ekranı $C800'a koyar. Bu- 00080 SYS 52375 <099> nu Basic programlama alanını kullanmak için yaptım. m 100,8, 92, SYS 52374: Simetri alma (ekran). 00110 DATA 173,14,220,41,254, 2205 65,1 <084> 00120 DATA 41,251,133,1,160,0, 132, 251,169 Tuncay arkadaşımız ise bize “günü gününe yaş . <075> ç . . e ey 00130 DATA 133,252,132, 253, 169, 208, 179, 25 ve “makina dili programı İisteleyicisi” programlarını yollamış. kendisine çok teşekkür ediyorum ve hemen prog- ©0140 251,200, 192,0,208,247, 230, 3 <152> ramın açıklamasına geçiyorum. 00150 DATA 254,165,252,201,196,208,237,16 <246> 00160 DATA 4,133,1,173,14, 220,9, <15B> 00170 DATA 220,234, 160, O; 169, taz, 281, 133,252 00180 DATA 169,7,133,253,169, 196, 133, 254, 162,0 <253> 00190 DATA 208, 230,252 <057> 00200 DATA 198,253, 165, 253,201, 208, 2, 198,254 <247> 00210 DATA 232,224,8,208,231,165,253, Za, 1 05,16 00220 DATA 133,253,144,2,230, 165, 232, O <228> 00230 DATA 208, 212, 179, 262, lar, o <188> 002'40 DATA 169, 200; 136,2, 169, 4,208 : <15a> 00250 DATA 86, 169; 40; 133, 251, 169, 200, Yaz, 252,168 002860 DATA 169, 203, 183, (254,16 <046> 00270 DATA 2,182, 0,177, abı, 24) 105, 128, 145 1253 - 00280 DATA 230,251,;206, 2 230, 230, 253, 208,2 DATA 230,264; 232,224,40, Yaa, "232, 165 1253,56

00300

DATA 233, 80; 133, 253, 176, 2, 198, | 25: 30, 2 DATA, 165; 2; 201, 32, 211, Ba

M.D.P. LIST e $0033 Tuncay GÖKSU

Bu programla hafızadaki makina dili programların listesini döküm ekinde olduğu gibi ekranda görebilir ya da yazıcıya yollayabilirsiniz. Programın bir dezavantajı biraz yavaş oluşu.

Bu ay bilgisayarı en şişman olan Abur Cubur'cu arkadaşımız ise Ersin arkadaşımız. Bize tam 9 adet Abur Cubur yollamış ve onuncu yerine de bir not bırakmış. No- 5 tunu aynen size iletiyorum. Efendim, niye herkes herşeyi tam 10 sayısında yapmak ister? Benden de 9 program, Varsa itirazı olan, Eklesin bir program! Fakat malesef “teknik bir arıza” (kasedinin postada rahatsızlanması) sebebiyle sadece altı tanesini yayınlayabiliyoruz. Benim suçum değil fakat ben yine de hem sizden hem de arkada özür diliyorum. Kendisine çok teşekkür ediyor ve aynı şekilde devam etmesini temenni ediyorum.