Mirrors/Apollo-11
1
0
Fork 0
mirror of https://github.com/chrislgarry/Apollo-11.git synced 2025-12-24 20:36:20 +00:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Readd some typos based on the original scans

Browse Source
This commit is contained in:
James Harris
2016-07-12 18:52:11 -05:00
committed by oldmud0
parent afa13e7364
commit 2f62a05a56
37 changed files with 54 additions and 55 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
Comanche055/INTERPRETER.s
View File

@@ -97,7 +97,7 @@ LOW7 OCT 177
MASK LOW7 # WHERE CCS EDOP WILL HONOR IT NEXT.
OPJUMP TS CYR # LOWWD ENTERS HERE IF A RIGHT-HAND OP
CCS CYR # CODE IS TO BE PROCESSED. TEST PREFIXES.
CCS CYR # CODE IS TO BE PROCESSED. TEST PREFICES.
TCF OPJUMP2 # TEST SECOND PREFIX BIT.
TCF EXIT # +0 OP CODE IS EXIT
@@ -401,7 +401,7 @@ STADR CA BANKSET # THE STADR CODE (PUSHUP UP ON STORE
INCR LOC
ITR1 INDEX LOC # THE STORECODE WAS STORED COMPLEMENTED TO
CS 0 # MAKE IT LOOK LIKE AN OPCODE PAIR.
AD NEGONE # (YUL CAN'T REMOVE 1 BECAUSE OF EARLY CCS)
AD NEGONE # (YUL CANT REMOVE 1 BECAUSE OF EARLY CCS)
DOSTORE TS ADDRWD
MASK LOW11 # ENTRY FROM DISPATCHER. SAVE THE ERASABLE
@@ -1336,8 +1336,8 @@ UPPOS XCH L # SAVE DECREMENTED UPPER PART.
AD HALF
TS A # SKIPS ON OVERFLOW
TCF +2
INCR L # RESTORE UPPER TO ORIGINAL VALUE
XCH L # SWAP A + L BANK.
INCR L # RESTORE UPPER TO ROIGINAL VALUE
XCH L # SWAP A + L BACK.
TC Q
UPNEG XCH L # SAVE COMPLEMENTED + DECREMENTED UPPER PT