Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Proof T4RUPT_PROGRAM #642 (pages 172-189) #837

Open
wants to merge 1 commit into
base: master
Choose a base branch
from
Open
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
28 changes: 14 additions & 14 deletions Luminary099/T4RUPT_PROGRAM.agc
Original file line number Diff line number Diff line change
Expand Up @@ -696,7 +696,7 @@ TEMPOK TC LAMPTEST # IF TEMP NOW OK, DON'T TURN OFF LAMP IF
#
# FUNCTIONAL DESCRIPTION: THIS PROGRAM IS CALLED BY IMUMON WHEN A CHANGE OF BIT 14 OF CHANNEL 30 (ISS TURN-ON
# REQUEST) IS DETECTED. UPON ENTRY, ITURNON CHECKS IF A TURN-ON DELAY SEQUENCE HAS FAILED, AND IF SO, IT EXITS.
# IF NOT, IT CHECKS WHETHER THE TURN-ON REQUEST CHANGE IS TO ON OR OFF. IF ON, IT SETS BIT7 OF IMODES30 TO 1 SO
# IF NOT, IT CHECKS WHETHER THE TURN-ON REQUEST CHANGE IS TO ON OR OFF. IF ON, IT SETS BIT 7 OF IMODES30 TO 1 SO
# THAT TNONTEST WILL INITIATE THE ISS INITIALIZATION SEQUENCE. IF OFF, THE TURN-ON DELAY SIGNAL, CHANNEL 12 BIT
# 15, IS CHECKED AND IF IT IS ON, ITURNON EXITS. IF THE DEALY SIGNAL IS OFF, PROGRAM ALARM 00207 IS ISSUED, BIT 2
# OF IMODES30 IS SET TO 1 AND THE PROGRAM EXITS.
Expand Down Expand Up @@ -757,7 +757,7 @@ RRINIT OCT 00102
# Page 174
# PROGRAM NAME: IMUCAGE.
#
# FUNCTIONAL DESCRIPTION: THIS PROGRAM PROCESSES CHANGES OF THE IMUCAGE INBIT, CHANNEL 30 BITS 11. IF THE BIT
# FUNCTIONAL DESCRIPTION: THIS PROGRAM PROCESSES CHANGES OF THE IMUCAGE INBIT, CHANNEL 30 BIT 11. IF THE BIT
# CHANGES TO 0 (CAGE BUTTON PRESSED), THE ISS IS CAGED (ICDU ZERO + COARSE ALIGN + NO ATT LAMP) UNTIL THE
# ASTRONAUT SELECTS ANOTHER PROGRAM TO ALIGN THE ISS. ANY PULSE TRAINS TO THE ICDU'S AND GYRO'S ARE TERMINATED,
# THE ASSOCIATE OUTCOUNTERS ARE ZEROED AND THE GYRO'S ARE DE-SELECTED. NO ACTION OCCURS WHEN THE BUTTON IS
Expand All @@ -777,7 +777,7 @@ RRINIT OCT 00102
#
# OUTPUT: ISS CAGED, COUNTERS ZEROED, PULSE TRAINS TERMINATED AND NO ATT LAMP LIT.

IMUCAGE CCS A # NO ACTION OF GOING OFF.
IMUCAGE CCS A # NO ACTION IF GOING OFF.
TCF ISSZERO
CS OCT77000 # TERMINATE ICDU, RCDU, GYRO PULSE TRAINS
EXTEND
Expand Down Expand Up @@ -811,7 +811,7 @@ IMUCAGE CCS A # NO ACTION OF GOING OFF.

CS OCT740 # HAVING WAITED AT LEAST 27 MCT FROM
EXTEND # GYRO PULSE TRAIN TERMINATION, WE CAN
WAND CHAN14 # DE-SELECT THE GYROS.
WAND CHAN14 # DE-SELECT THE GYROS
TCF NXTIFAIL

# Page 176
Expand Down Expand Up @@ -871,15 +871,15 @@ IMUOP2 CAF BIT2 # SEE IF FAILED ISS TURN-ON SEQ IN PROG.
#
# FUNCITONAL DESCRIPTION: THIS PROGRAM PROCESSES CHANGES OF BIT 13 OF CHANNEL 33, PIPA FAIL. IT SETS BIT 10 OF
# IMODES30 TO AGREE. IT CALLS SETISSW IN CASE A PIPA FAIL NECESSITATES AN ISS WARNING. IF NOT, I.E., IMODES30
# BIT 1 = 1, AND A PIPA FAIL IS PRESENT AND THE ISS NOT BEING INITIALIZED, PROGRAM ALARM 0212 IS ISSUED.
# BIT 1 = 1, AND A PIPA FAIL IS PRESENT AND THE ISS NOT BEING INITIALIZED, PROGRAM ALARM 00212 IS ISSUED.
#
# CALLING SEQUENCE: BY C33TEST ON CHANGES OF CHANNEL 33 BIT 13.
#
# JOBS OR TASKS INITIATED: NONE.
#
# SUBROUTINES CALLED: 1) SETISSW, AND 2) ALARM (SEE FUNCITONAL DESCRIPTION).
#
# ERASABLE INITIALZIZATION: SEE IMUMON FOR INITIALIZATION OF IMODES30. THE RELEVANT BITS ARE 5, 7, 8, 9, AND 10.
# ERASABLE INITIALIZATION: SEE IMUMON FOR INITIALIZATION OF IMODES30. THE RELEVANT BITS ARE 5, 7, 8, 9, AND 10.
#
# ALARMS: PROGRAM ALARM 00212 IF PIPA FAIL IS PRESENT BUT NEITHER ISS WARNING IS TO BE ISSUED NOR THE ISS IS
# BEING INITIALIZED.
Expand Down Expand Up @@ -927,7 +927,7 @@ PIPFAIL CCS A # SET BIT10 IN IMODES30 SO ALL ISS WARNING
#
# ERASABLE INITIALIZATION: FRESH START OR RESTART, BITS 12 AND 11 OF IMODES33 ARE SET TO 1.
#
# ALARMS: SET FUNCTGIONAL DESCRIPTION.
# ALARMS: SEE FUNCTIONAL DESCRIPTION.
#
# EXIT: NXTFL33.
#
Expand Down Expand Up @@ -1096,10 +1096,10 @@ GLOCKOK EQUALS RESUME
# T4RUPT EVERY 480 MILLISECONDS
#
# ERASABLE INITIALIZATION REQUIRED:
# RADMODES, STATE.
# RADMODES, STATE
#
# SUBROUTINES CALLED:
# WAITLIST.
# WAITLIST
#
# JOBS OR TASKS INITIATED:
# RRTURNON
Expand Down Expand Up @@ -1145,15 +1145,15 @@ OCT05776 OCT 5776
# RR CDU FAIL BIT IS SAMPLED (CHAN 30 BIT 7). IF NO CHANGE, THE
# PROGRAM EXITS TO RRGIMON. IF A CHANGE, THE RR AUTO MODE
# (RADMODES BIT 2) BIT IS CHECKED. IF NOT IN RR AUTO MODE, THE
# PROGRAM EXITS TO NORRGMO0N. IF IN AUTO MODE, RADMODES BIT 7
# PROGRAM EXITS TO NORRGMON. IF IN AUTO MODE, RADMODES BIT 7
# (RR CDU OK) IS UPDATED AND IF P-20 IS OPERATING PROGRAM ALARM 00515 IS
# REQUESTED. CONTROL IS TRANSFERRED TO SETTRKF TO UPDATE
# THE TRACKER FAIL LAMP (DSPTAB+11D BIT 8). CONTROL RETURNS TO
# RRGIMON.
#
# CALLING SEQUENCE:
# EVERY 480 MILLISECONDS FROM RRAUTCHK (VIA T4RUPT) UNLESS A
# TURN-ON SEQUENCE HAS JUST BE INITIATED.
# TURN-ON SEQUENCE HAS JUST BEEN INITIATED.
#
# ERASABLE INITIALIZATION REQUIRED:
# RADMODES
Expand Down Expand Up @@ -1204,14 +1204,14 @@ RRCDUCHK CA RADMODES # LAST SAMPLED BIT IN RADMODES.
TCF TRKFLCDU # NO
TC ALARM # YES
OCT 00515
TRKFLCDU TC SETTRKF # UPDATE TRAKER FAIL LAMP ON DSKY.
TRKFLCDU TC SETTRKF # UPDATE TRACKER FAIL LAMP ON DSKY.

# Page 186
# PROGRAM NAME: RRGIMON
#
# FUNCTIONAL DESCRIPTION:
# RRGIMON IS THE RR GIMBAL LIMIT MONITOR. INITIALLY THE FOLLOWING IS
# CHECKED: REMOD, RR CDU'S BEING ZEROED, REPOSITION, AND RR
# CHECKED: REMODE, RR CDU'S BEING ZEROED, REPOSITION, AND RR
# NOT IN AUTO MODE (RADMODES BITS 14, 13, 11, 2). IF ANY OF THESE
# EXIST THE PROGRAM EXITS TO GPMATRIX. IF NONE ARE PRESENT RRLIMCHK
# IS CALLED TO SEE IF THE PRESENT RR CDU ANGLES (OPTY, OPTX) ARE WITHIN
Expand Down Expand Up @@ -1351,4 +1351,4 @@ GPMATRIX CAE CDUZ # SINGLE ENTRY POINT
TC RESUME

NORRGMON EQUALS DAPT4S
ENDDAPT4 EQUALS RESUME
ENDDAPT4 EQUALS RESUME