Then type NEW, and use the -following checksum program to enable you to
identify and locate any errors:
100 REM EXTRAM0N64 CHECKSUM PROGRAM
110 DAT A 10170,13676,15404,14997,15136,16221,16696
115 DATA12816,16228,14554
120 DAT A 14677,15039,14551,15104,15522,16414,15914
125 DAT A89 58,11945:S=2048
130 F0RB= 1 T O 19:R E A D X :FORI = 1T O S : N =PEEK<I):V=Y+N
140 NEXT I:IFY< >XTHEN?"ERROR IN BLOCK "B:G0T0160
150 PRINT"BLOCK "B" CORRECT"
160 S = I :Y=0:N E X T B :REM CHECK LAST BLOCK BY HAND
This program must be run after the first set of POKEs, and before the
second set.
If errors are found, type NEW (you won't lose E x t ramon!), re-load Tiny
Pe e k e r/P oker, enter block of memory again, type NEW, re-load checksum
program, run it, if errors found type NEW and re-load Tiny
Pe e k e r/P oker, and so on until no errors remain. Then, issue last set
of POKEs and SAVE Extramon!
Extramon Instruction Set
This will be given in the form COMMAND, followed bv the syntax.
1) Simple Assembler
.A 2000 LDA£12
start assembly at 2000 hex.
2) Disassembler
.D 2000
disassemble hex from 2000 onwards.
3) Printing Disassembler
.P 2000,2040
engage printer beforehand with 0PE N 4 ,4:CMD4.
4) Fill memor v
•F 1000 1100 FF
fill memory from 1000 to 1100 hex with the byte F F .
5) Go run
.G 1000
go to hex 1000 and executre program there.
6) Hunt memory
.H C000 D000 READ
look from C000 to D000 for the ASCII string READ.
7) Load
.L "FRED",08
8) Memory display
.M 0800 0820
display memory from hex 0800 to 0820.
9) Register display
.R
displays register values when Extramon was entered.
10) Save
.S "0:F R E D ",08,0800,0820
save memory from hex 0800 to 0820 onto device 08 drive 1, and call
that portion of memory FRED.
38
To Next Page
Loading...
