Bu sayfadaki yazılar
Sayfanın metni
Sayfa 17
PROGRAM ADI © PANKART YAPICI
©0100 PRİNT “PANKART YAPICI * ©0186 PRİNT *PROMPTLARDA RETURNE BA8* <058> 00130 PRİNT “EN 3.YÜKSEKLİK 60146 PRİNT “ACMAK İCİN SHİFTECOMMODORE T USLARINI KULLANIN" <160>
©0150 PRİNT “TABAN VE TAVAN <100> ©0160 PRİNT “EKRANDA GÖRÜNENLER BASILICAK ©0170 CLOSE İtOPEN S3200.01P0 e (#35296
©0190 INPUT LINPUT "YÜKSEKLİK PRİNT KOPYALACDOKN> MS IF THEN <213> FOR TELENCMS) TO 1 STEP FOR TO TIFOR TO 7 ©0240 POKE AND 6334.1 IF THEN 276 <cesa> ©0270 NEKT FOR Zal TO THEN ©0200 1 NEKT
1 ©0290 PRINT "BASKA BIR 188. 00300 GET ASe*Y* THEN RUN cesa>
ELEKTRONİK SANAYİ VE TİCARET A.Ş. Anadolu Liselerine Hazırlık 17
Klavyeyle gezinmek için ← ve → tuşları.
Sayfa 16
TAKVİM DÜZENLEYİCİ
Bu küçük program M.S. 24 yılından başlayacak tüm yıllar için bir sayfalık bir takvim yazmaktadır.
64 PANKART YAPICI
Bu görebileceğiniz en güçlü kısa programlardan biri. Çocuk partileri, mal satışı gibi olaylar için göze çarpan, büyük pankartlar hazırlanmasını kolaylaştırıyor. Programın çalışması oldukça basit. Önce karakterlerin enini yüksekliğini saptıyorsunuz. Bu 1 ve 9 arasında olabilir. Hiçbir şey girmeden RETURN'e basarsanız, harfler 3 en ve 8 yükseklikte olur. Ondan sonra pankarta yazacaklarınızı girmeniz için çağrı (prompt) alırsınız. Mesajınızı girerken, kasetlerinizi değiştirmek için, SHIFT ve COMMODORE tuşlarına aynı anda basın. Ekranda gördükleriniz yazıcınızdan çıkacaktır: Metninizi girdikten sonra, RETURN'e basarken yazıcınızın açık olmasına dikkat edin. Yazınız son karakterden yazılmaya başlayacaktır. O sırada yazılmakta olan karakter de ekranın sağ üst köşesinde sergilenecektir.
PROGRAM ADI: TAKVİM DÜZENLEYİCİ
00100 PRİNT .CRVSOFF > .CGSPACE YTAKVI cize> ©0110 PRİNT SAYFAYI HESAPLAYIP HAZIRLAR" <016> ©0120 PRİNT "YILLIK TAKVİM. CİKMAK İCİN R ETURN'İ e 60130 OPEN IM CBSPACE )CCBSPACE
00148 INPUT THEN cisa>
00160 BeINTCB-(781NTCB/7)))1FOR Mel TO KUIF THEN ©0170 Kel TO NEXT 00100 Ce0 THEN <635> 60196 FOR Esi TO TO ©0200 : * “İF THEN IF Z>K THEN #0220 NEXT Gel TO 18 STEP YAPRİNT G1 <065> 60230 PRİNT
<146> ©0230 DATA 321.20.31.30.31,30.31.31.30.31 ."OCAKCSSPACE)" ."SUBATLASPACE >*. "MART <084> ©8260 DATA ."MAYISCASPACE 27 "HAZ C3SPACE >".
TOSCASPACE >" DATA ."KASIMCASPACE> *