ryan/Apollo-11
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Trim whitespace

Browse Source
This commit is contained in:
James Harris
2016-12-28 16:11:25 +00:00
parent 7c33b5996c
commit 4f3a1d4374
166 changed files with 5357 additions and 5357 deletions
Download Patch File Download Diff File Expand all files Collapse all files

36
Comanche055/SYSTEM_TEST_STANDARD_LEAD_INS.agc
View File

@ -7,13 +7,13 @@
# Reference: pp. 420-422
# Contact: Onno Hommes <ohommes@cmu.edu>.
# Website: www.ibiblio.org/apollo.
# Mod history: 05/07/09 OH Transcription Batch 1 Assignment
# Mod history: 05/07/09 OH Transcription Batch 1 Assignment
#
# The contents of the "Comanche055" files, in general, are transcribed
# from scanned documents.
# The contents of the "Comanche055" files, in general, are transcribed
# from scanned documents.
#
# Assemble revision 055 of AGC program Comanche by NASA
# 2021113-051. April 1, 1969.
# 2021113-051. April 1, 1969.
#
# This AGC program shall also be referred to as Colossus 2A
#
@ -30,13 +30,13 @@
# Page 420
EBANK= XSM
BANK 33
SETLOC E/PROG1
BANK
COUNT* $$/P07
# SPECIAL PROGRAMS TO EASE THE PANGS OF ERASABLE MEMORY PROGRAMS.
#
# E/BKCALL FOR DOING BANKCALLS FROM AND RETURNING TO ERASABLE.
@ -74,7 +74,7 @@ E/BKCALL DXCH BUF2 # SAVE A,L AND GET DP RETURN.
INCR EBUF2
E/SWITCH DXCH EBUF2
DTCB
# Page 421
# E/CALL FOR CALLING A FIXED MEMORY INTERPRETIVE SUBROUTINE FROM ERASABLE AND RETURNING TO ERASABLE.
#
@ -84,7 +84,7 @@ E/SWITCH DXCH EBUF2
# E/CALL
# CADR ROUTINE # THE INTERPRETIVE SUBROUTINE YOU WANT
# # RETURNS HERE IN INTERPRETIVE.
E/CALL LXCH LOC # ADRES -1 OF CADR.
INDEX L
CA L # CADR IN A.
@ -97,7 +97,7 @@ E/CALL LXCH LOC # ADRES -1 OF CADR.
EXIT # LEAVE VIA RVQ OR EQUIVALENT.
LXCH EBUF2 +1 # PICK UP RETURN.
TCF INTPRET +2 # SET LOC AND RETURN TO CALLER.
# Page 422
# E/JOBWAK FOR WAKING UP ERASABLE MEMORY JOBS.
#
@ -116,16 +116,16 @@ E/CALL LXCH LOC # ADRES -1 OF CADR.
BANK 33
SETLOC E/PROG
BANK
COUNT* $$/P07
E/JOBWAK TC JOBWAKE # ARRIVE IWTH ADRES IN A.
CS BIT11
NDX LOCCTR
ADS LOC # KNOCK FIXED MEMORY BIT OUT OF ADRES.
TC RUPTREG3 # RETURN
# THESE PROGRAMS ARE PROVIDED TO ALLOW OVERLAY OF BANKS 30 THRU 33 OF THE 205 VERSIONS OF SYSTEM TESTS AND
# PRELAUNCH ALIGN. THE INTENT IS TO ALLOW THE STG AND HYBRID LABS TO RUN ALL THE TESTS WITH COLOSSUS.
@ -133,15 +133,15 @@ E/JOBWAK TC JOBWAKE # ARRIVE IWTH ADRES IN A.
BANK 33
SETLOC TESTLEAD
BANK
COUNT 33/COMST
EBANK= QPLACE
COMPVER TC GCOMPVER # MUST BE 33,2000.
GTSCPSS1 TC GTSCPSS # MUST BE AT 33,2001
REDO TC NEWMODEX # DISPLAY MM 07.
MM 07 # FALL INTO IMUTEST