[Coco] 64k test

Rietveld Rietveld rietveldh at hotmail.com
Sun Jul 16 23:38:59 EDT 2017


This program will test for 64k memory on a Coco 1/2

After running the program the 'OK' prompt at the top of the screen will be replaced with 'OY' if you have 64k else it will stay 'OK' if you have less than 64k


10 READ A$:IF A$="X" THEN 35
20 POKE 20000+N,VAL("&H"+A$)
30 N=N+1:GOTO10
35 EXEC 20000:POKE &HABEF,89:END
40 DATA 34,01,1A,50,10,8E,80,00
50 DATA B7,FF,DE,EC,A4,AE,22,EE
60 DATA 24,B7,FF,DF,ED,A1,AF,A1
70 DATA EF,A1,10,8C,FE,FC,25,E8
80 DATA 10,8C,FF,00,24,0C,B7,FF
90 DATA DE,EC,A4,B7,FF,DF,ED,A1
100 DATA 20,EE,35,01,39
110 DATA X




Sent from my BlackBerry Passport Red Edition.


More information about the Coco mailing list