glm94/pdp7-unix
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Add handwritten notes to st1.s.

Browse Source
This commit is contained in:
Sebastian Rasmussen
2019-11-12 21:55:34 +01:00
parent 312f8a507f
commit c45fba954f
2 changed files with 26 additions and 26 deletions
Download Patch File Download Diff File Expand all files Collapse all files
scans/st1.s
+13 -13
View File
@@ -3,7 +3,7 @@
t = 0 t = 0
start: start: "[------ stuff for gravity - scan markup]
law 13 law 13
sys sysloc sys sysloc
dac .pbson dac .pbson
@@ -40,9 +40,9 @@ start:
dzm .pbsint dzm .pbsint
dzm forflg dzm forflg
dzm bacflg dzm bacflg
dzm dspflg dzm dspflg "[line connecting this instruction to... - scan markup]
dzm locflg dzm locflg
dzm locpar dzm locpar "[... this instruction - scan markup]
lac d1 lac d1
dac par dac par
jms dispname jms dispname
@@ -68,13 +68,13 @@ start:
loop: loop:
law dspl-1 law dspl-1
dac clistp dac clistp
jms contrl jms contrl "[arrow from below points to this instruction - scan markup]
lac par lac par
jms absxy jms absxy
jms shipxy jms shipxy
lac goflg lac goflg
spa spa
jmp loop3 jmp loop3 "[long dash after loop3 - scan markup]
fld; fpzero fld; fpzero
fst; ax fst; ax
fst; ay fst; ay
@@ -107,8 +107,8 @@ loop2:
sma sma
jms updshp jms updshp
loop3: loop3:
fld; horizv fld; horizv "[a box enclosing all code from loop3 to loop4 - scan markup]
lac scale lac scale "[arrow drawn from box up to location above - scan markup]
cma cma
tad vscale tad vscale
tad aexp tad aexp
@@ -116,12 +116,12 @@ loop3:
jms inscr jms inscr
jmp loop4 jmp loop4
tad o141577 tad o141577
dac i clistp dac i clistp "[crossed out with an arrow pointint to "dac dspvel" - scan markup]
lac o164372 lac o164372 "[crossed out - scan markup]
dac clistp i dac clistp i "[crossed out - scan markup]
cla cla "[crossed out - scan markup]
jms dsplanet jms dsplanet "[crossed out - scan markup]
loop4: loop4: "[inside a drawn box - scan markup]
sys time "put delay here..... sys time "put delay here.....
"** 12-92-119.pdf page 3 "** 12-92-119.pdf page 3
dzm dispcl dzm dispcl
src/cmd/st1.s
+13 -13
View File
@@ -3,7 +3,7 @@
t = 0 t = 0
start: start: "[------ stuff for gravity - scan markup]
law 13 law 13
sys sysloc sys sysloc
dac .pbson dac .pbson
@@ -40,9 +40,9 @@ start:
dzm .pbsint dzm .pbsint
dzm forflg dzm forflg
dzm bacflg dzm bacflg
dzm dspflg dzm dspflg "[line connecting this instruction to... - scan markup]
dzm locflg dzm locflg
dzm locpar dzm locpar "[... this instruction - scan markup]
lac d1 lac d1
dac par dac par
jms dispname jms dispname
@@ -68,13 +68,13 @@ start:
loop: loop:
law dspl-1 law dspl-1
dac clistp dac clistp
jms contrl jms contrl "[arrow from below points to this instruction - scan markup]
lac par lac par
jms absxy jms absxy
jms shipxy jms shipxy
lac goflg lac goflg
spa spa
jmp loop3 jmp loop3 "[long dash after loop3 - scan markup]
fld; fpzero fld; fpzero
fst; ax fst; ax
fst; ay fst; ay
@@ -107,8 +107,8 @@ loop2:
sma sma
jms updshp jms updshp
loop3: loop3:
fld; horizv fld; horizv "[a box enclosing all code from loop3 to loop4 - scan markup]
lac scale lac scale "[arrow drawn from box up to location above - scan markup]
cma cma
tad vscale tad vscale
tad aexp tad aexp
@@ -116,12 +116,12 @@ loop3:
jms inscr jms inscr
jmp loop4 jmp loop4
tad o141577 tad o141577
dac i clistp dac i clistp "[crossed out with an arrow pointint to "dac dspvel" - scan markup]
lac o164372 lac o164372 "[crossed out - scan markup]
dac clistp i dac clistp i "[crossed out - scan markup]
cla cla "[crossed out - scan markup]
jms dsplanet jms dsplanet "[crossed out - scan markup]
loop4: loop4: "[inside a drawn box - scan markup]
sys time "put delay here..... sys time "put delay here.....
"** 12-92-119.pdf page 3 "** 12-92-119.pdf page 3
dzm dispcl dzm dispcl