1
0
mirror of https://github.com/DoctorWkt/pdp7-unix.git synced 2026-01-22 10:32:37 +00:00

Merge pull request #202 from sebras/pagecomments/init.s

Add page comments to init.s.
This commit is contained in:
Tom Everett 2020-03-14 14:54:33 -06:00 committed by GitHub
commit 894beec3db
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 10 additions and 0 deletions

View File

@ -1,4 +1,5 @@
" init
"** 07-13-19.pdf page 47
-1
sys intrp
@ -60,6 +61,7 @@ login:
sad o72
skp
jmp 2b
"** 07-13-19.pdf page 48
lac 9 i
sad o72
jmp 1f
@ -120,6 +122,7 @@ login:
cll; als 3
omq
dac nchar
"** 07-13-19.pdf page 49
jmp 1b
2:
lac nchar
@ -181,6 +184,7 @@ rline: 0
sad 8
jmp 1b
-1
"** 07-13-19.pdf page 50
tad 8
dac 8
jmp 1b
@ -242,6 +246,7 @@ m1:
m1s = .-m1
m2:
<?; 012
"** 07-13-19.pdf page 51
m2s = .-m2
m3:
<pa>;<ss>;<wo>;<rd>;<: 040

View File

@ -1,4 +1,5 @@
" init
"** 07-13-19.pdf page 47
-1
sys intrp
@ -60,6 +61,7 @@ login:
sad o72
skp
jmp 2b
"** 07-13-19.pdf page 48
lac 9 i
sad o72
jmp 1f
@ -120,6 +122,7 @@ login:
cll; als 3
omq
dac nchar
"** 07-13-19.pdf page 49
jmp 1b
2:
lac nchar
@ -182,6 +185,7 @@ rline: 0
sad 8
jmp 1b " and loop back
-1
"** 07-13-19.pdf page 50
tad 8 " Otherwise, move the pointer in location 8 back one
dac 8
jmp 1b " and loop back
@ -243,6 +247,7 @@ m1:
m1s = .-m1
m2:
<?; 012
"** 07-13-19.pdf page 51
m2s = .-m2
m3:
<pa>;<ss>;<wo>;<rd>;<: 040