github.com/rzzzwilson.pymlac
1
0
Fork 0
mirror of https://github.com/rzzzwilson/pymlac.git synced 2025-06-10 09:32:41 +00:00
Code Issues Releases Wiki Activity

Type in code for upper memeory test

Browse Source
This commit is contained in:
Ross Wilson
2016-02-22 16:09:41 +07:00
parent 0329a05e57
commit 09b09d9e20
1 changed files with 93 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

93
images/imlacdocs/uppermemorytest.asm Normal file
View File

@@ -0,0 +1,93 @@
; typed in from uppermemorytest.pdf
org 0100
s law 1 ; 0100
dac twd
s1 lac twd
ral 1
dac twd
lwc 1
dac 010010
l1 lac twd
dac *010010 ; 0110
cma
dac *010010
lac lit1
sam 010010
jmp l1
lwc 1
dac 010010
l2 lac twd ; 0120
sam *010010
jms e
cma
sam *010010
jms e
lac lit1
sam 010010
jmp l2 ; 0130
jmp s1
e bss 1
dac sav
lac 010010
hlt
dac tmp
lac *tmp
hlt ; 0140
lac sav
jmp *e ; 0142
#s2 bss 020
twd data 0
sav data 0
tmp data 0
sva data 0
svb data 0
sve data 0
svc data 0
blm data 0
lit1 data 007771
lit2 data 007776
lit3 data 010000
lit4 data 010006
org 0163
p lwc 1 ; 0163
xam *lit2
dac sva
lac lit2 ; (007776)
dac svb
dac sve ; 0170
l4 dac svb
add lit3 ; (010000)
dac svb
cla
xam *svb
dac svc
lac *sve
asm ; 0200
jmp l3
lac svc
dac *svb
jmp l4
l3 lac sva
dac *lit2 ; (007776)
lac svb
sub lit4 ; 0210 (010006)
dac blm
jmp s
rel 007714
jmp 007400
rel 007400
hof
jmp *.+1
zro p ; 010163
rel s2
end