1
0
mirror of https://github.com/DoctorWkt/pdp7-unix.git synced 2026-01-25 19:57:20 +00:00

ed comments

This commit is contained in:
Phil Budne
2016-03-25 22:55:21 -04:00
parent 7ae26994e9
commit e29d8fca30
2 changed files with 15 additions and 15 deletions

View File

@@ -36,13 +36,13 @@ advanc:
jms rline
lac linep
dac tal
dzm adrflg
jms addres
jmp comand
dzm adrflg " clear address flag
jms addres " get address?
jmp comand " no: check if command
-1
dac adrflg
dac adrflg " set address flag
lac addr
dac addr1
dac addr1 " set both addr1 & 2
dac addr2
1:
lac char
@@ -53,7 +53,7 @@ advanc:
jmp chkwrp
lac addr
dac dot
2:
2: " here for address range
jms addres
jmp error
lac addr2
@@ -105,7 +105,7 @@ ca1:
jms append
jmp ca1
cc: cd: " c(change) and d(elete)?
cc: cd: " c(change) and d(elete)
jms newline
jms setdd
lac addr1
@@ -349,9 +349,9 @@ ad2:
jms betwen; d47; d58 " digit?
skp
jmp numb
sad o40 "[o40 circled in scan]
sad o40 "[o40 circled in scan] " space?
jmp ad1 "[hand drawn check mark follows operand in scan]
sad o11
sad o11 " tab?
jmp ad1 "[hand drawn check mark follows operand in scan]
"[check mark underlined in scan]
sad o55 " -?
@@ -364,7 +364,7 @@ ad2:
jmp adol "[hand drawn check mark follows operand in scan]
sad o57 " /?
jmp fsrch "[hand drawn check mark follows operand in scan]
sad o77 " ??
sad o77 " '?'?
jmp bsrch "[hand drawn check mark follows operand in scan]
dac char
lac minflg

View File

@@ -190,15 +190,15 @@ cadvanc:
"** 08-rest.pdf page 24
"[handwritten page number top right of scan - 17]
dzm lastre
sad o12
sad o12 " newline
jmp error
"sad o133
"sad o133 " [
"jmp chrcls
sad o136
sad o136 " ^?
jmp beglin
sad o44
sad o44 " $
jmp endlin
"sad o52
"sad o52 " * (disabled)
"jmp clsure
dac 1f
jms comp