Home » Personal collection » Commodore disks » disk32a_commodore_disk_user_3_7.d64 » maze.memorychk
maze.memorychk
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Personal collection » Commodore disks » disk32a_commodore_disk_user_3_7.d64 |
Filename: | maze.memorychk |
Read OK: | ✔ |
File size: | 0260 bytes |
Load address: | 0801 |
Exec address: | 0000 |
Duplicates
There is 1 duplicate copy of this file in the archive:
- Arnold website » magazines_cdu » magazines_cdu_cdu307_cdu307.d64 » maze.memorychk
- Personal collection » Commodore disks » disk32a_commodore_disk_user_3_7.d64 » maze.memorychk
File contents
10 REM MEMORY CHECKER 100 POKE 53280,0:POKE 53281,11 110 PRINT"<clr><cursor down><cursor right><text mode><white>╲EMORY 🭸HECKER" 120 PRINT"<cursor right>🮂🮂🮂🮂🮂🮂🮂🮂🮂🮂🮂🮂🮂🮂" 130 PRINT"<cursor down><cursor right>○HAT ARE THE DIMENSIONS OR YOUR MAZE:" 140 INPUT"<cursor down><cursor right>HORIZONTAL:";H 150 INPUT"<cursor down><cursor right>VERTICAL :";V 160 IF H>63 OR V>255 THEN PRINT"<cursor down><cursor right>🭰OO 🭲IG ! 🭰RY AGAIN!":GOTO 140 170 IF H<1 OR V<1 THEN PRINT"<cursor down><cursor right>🭰OO ♥MALL ! 🭰RY ♠GAIN!":GOTO 140 180 C=1 190 IF H<C THEN 210 200 C=C*2:GOTO 190 210 PRINT"<cursor down><cursor down><cursor right>🭰HIS"H"X"V"MAZE FITS INTO THE:" 220 PRINT"<cursor down><cursor right>0 -";C-1;"CATEGORY." 230 PRINT"<cursor down><cursor right>♠ND SO WILL NEED:" 240 PRINT"<cursor down>";C"X"V+1"BYTES ("C*(V+1)") 250 PRINT"<cursor down><cursor right>WHICH IS<black>"INT(C*(V+1)/256+.99)*256"<white>BYTES TO THE NEAREST 256." 1000 INPUT "<cursor down><cursor right>🭰RY ANOTHER Y<cursor left><cursor left><cursor left>";YN$ 1010 IF LEFT$(YN$,1)="Y" THEN RUN 1020 PRINT"<clr><cursor down><cursor right>🭲YE !"
� MEMORY CHECKER /d � 53280,0:� 53281,11 Jn �"��EMORY �HECKER"