Revert a few commas to fullstops

This commit is contained in:
James Harris 2020-10-14 18:07:59 +01:00
parent 65bef40ca7
commit 7c7680fcc4

View File

@ -303,14 +303,14 @@ NBDONLY CCS GCOMPSW # BYPASS IF GCOMPSW NEGATIVE
TCF ENDOFJOB TCF ENDOFJOB
TCF +1 TCF +1
CA FLAGWRD8 # IF SURFACE FLAG IS SET. SET TEM1 CA FLAGWRD8 # IF SURFACE FLAG IS SET, SET TEM1
MASK BIT8 # POSITIVE SO THAT THE ACCELERATION TERMS MASK BIT8 # POSITIVE SO THAT THE ACCELERATION TERMS
TS TEM1 # WILL BE COMPENSATED. TS TEM1 # WILL BE COMPENSATED.
EXTEND EXTEND
BZF +3 # ARE WE ON THE SURFACE BZF +3 # ARE WE ON THE SURFACE
TC IBNKCALL # ON THE SURFACE TC IBNKCALL # ON THE SURFACE
CADR PIPASR +3 # READ PIPAS. BUT DO NOT SCALE THEM CADR PIPASR +3 # READ PIPAS, BUT DO NOT SCALE THEM
CA TIME1 # (CS) X 2(+14) CA TIME1 # (CS) X 2(+14)
XCH 1/PIPADT # PREVIOUS TIME XCH 1/PIPADT # PREVIOUS TIME
@ -319,7 +319,7 @@ NBDONLY CCS GCOMPSW # BYPASS IF GCOMPSW NEGATIVE
AD 1/PIPADT # PRESENT TIME - PREVIOUS TIME AD 1/PIPADT # PRESENT TIME - PREVIOUS TIME
NBD2 AD HALF # CORRECT FOR POSSIBLE TIME1 TICK NBD2 AD HALF # CORRECT FOR POSSIBLE TIME1 TICK
AD HALF AD HALF
XCH L # IF TIME1 DID NOT TICK. REMOVE RESULTING XCH L # IF TIME1 DID NOT TICK, REMOVE RESULTING
XCH L # OVERFLOW. XCH L # OVERFLOW.
NBD3 EXTEND # C(A) = DELTAT (CS) X 2(+14) NBD3 EXTEND # C(A) = DELTAT (CS) X 2(+14)
@ -328,9 +328,9 @@ NBD3 EXTEND # C(A) = DELTAT (CS) X 2(+14)
CA ZERO CA ZERO
TS GCOMPSW # INDICATE COMMANDS 2 PULSES OR LESS. TS GCOMPSW # INDICATE COMMANDS 2 PULSES OR LESS.
TS BUF # INDEX X. Y, Z. TS BUF # INDEX X, Y, Z.
CCS TEM1 # IF SURFACE FLAG IS SET. CCS TEM1 # IF SURFACE FLAG IS SET,
TC IRIGX # COMPENSATE ACCELERATION TERMS. TC IRIGX # COMPENSATE ACCELERATION TERMS.
EXTEND EXTEND