mirror of
https://github.com/rzzzwilson/pymlac.git
synced 2025-06-10 09:32:41 +00:00
20 lines
1.1 KiB
Plaintext
20 lines
1.1 KiB
Plaintext
# run the "blockpunch" program
|
|
bootrom ptr; mount ptr dumpmem_test.ptp; setreg pc 040; rununtil 0 # load the test program into 0100-0110
|
|
mount ptr blockpunch.ptp; setreg pc 040; rununtil 0 # then load blockpunch
|
|
mount ttyout xyzzy.ptp # punch the test program to xyzzy.ptp
|
|
setmem 0100 [data 0177776|data 0177776|data 0177776|data 0177776|data 0177776|data 0177776|data 0177776|data 0177776]
|
|
trace 03540,03700
|
|
setreg pc 03660; rununtil 0 # punch leader
|
|
setreg pc 03640; rununtil 0 # punch block loader
|
|
setreg pc 03660; rununtil 0 # punch leader
|
|
setreg ds 0100; rununtil 0 # feed in start address 0100
|
|
setreg ds 0107; rununtil 0 # and end address 0107
|
|
setreg pc 03670; rununtil 0 # punch memory and end leader
|
|
checkreg pc 03541 # stop address must be in low 2KW, not 037541
|
|
checkreg l 01
|
|
|
|
## now see if we can run the punched memory
|
|
#bootrom ptr; mount ptr xyzzy.ptp; trace 040,045:050,077; setreg pc 040; rununtil 0 # load the blockpunch output PTP
|
|
# setreg pc 0100; trace 0100,0110; rununtil 0 # run it with trace
|
|
|