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:
@@ -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
|
||||
|
||||
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user