* Proof DISPLAY_INTERFACE_ROUTINES #200 11/34 * 24/33 * done DISPLAY_INTERFACE_ROUTINES
This commit is contained in:
parent
df1dd7cf58
commit
20fcfb0938
@ -32,28 +32,28 @@
|
||||
# information. Please report any errors to info@sandroid.org.
|
||||
|
||||
# Page 1452
|
||||
# DISPLAYS CAN BE CLASSIFIED INTO THE FOLLOWING CATEGORIES --
|
||||
# 1. PRIORITY DISPLAYS -- DISPLAYS WHICH TAKE PRIORITY OVER ALL OTHER DISPLAYS. USUALLY THESE DISPLAYS ARE SENT
|
||||
# DISPLAYS CAN BE CLASSIFIED INTO THE FOLLOWING CATEGORIES-
|
||||
# 1. PRIORITY DISPLAYS- DISPLAYS WHICH TAKE PRIORITY OVER ALL OTHER DISPLAYS. USUALLY THESE DISPLAYS ARE SENT
|
||||
# OUT UNDER CRITICAL ALARM CONDITIONS.
|
||||
# 2. EXTENDED VERB DISPLAYS -- ALL EXTENDED VERBS AND MARK ROUTINES SHOULD USE EXTENDED VERB (MARK) DISPLAYS.
|
||||
# 3. NORMAL DISPLAYS -- ALL MISSION PROGRAM DISPLAYS WHICH INTERFACE WITH THE ASTRONAUT DURING THE NORMAL
|
||||
# 2. EXTENDED VERB DISPLAYS- ALL EXTENDED VERBS AND MARK ROUTINES SHOULD USE EXTENDED VERB (MARK) DISPLAYS.
|
||||
# 3. NORMAL DISPLAYS- ALL MISSION PROGRAM DISPLAYS WHICH INTERFACE WITH THE ASTRONAUT DURING THE NORMAL
|
||||
# SEQUENCE OF EVENTS.
|
||||
# 4. MISC. DISPLAYS -- ALL DISPLAYS NOT HANDLED BY THE DISPLAY INTERFACE ROUTINES. THESE INCLUDE SUCH DISPLAYS AS
|
||||
# 4. MISC. DISPLAYS- ALL DISPLAYS NOT HANDLED BY THE DISPLAY INTERFACEROUTINES. THESE INCLUDE SUCH DISPLAYS AS
|
||||
# MM DISPLAYS AND SPECIAL PURPOSE DISPLAYS HANDLED BY PINBALL.
|
||||
# 5. ASTRONAUT INITIATED DISPLAYS -- ALL DISPLAYS INITIATED EXTERNALLY.
|
||||
# 5. ASTRONAUT INITIATED DISPLAYS- ALL DISPLAYS INITIATED EXTERNALLY.
|
||||
#
|
||||
# THE FOLLOWING TERMS ARE USED TO DESCRIBE THE STATUS OF DISPLAYS --
|
||||
# 1. ACTIVE -- THE DISPLAY WHICH IS (1) BEING DISPLAYED TO THE ASTRONAUT AND WAITING FOR A RESPONSE OR
|
||||
# THE FOLLOWING TERMS ARE USED TO DESCRIBE THE STATUS OF DISPLAYS-
|
||||
# 1. ACTIVE-THE DISPLAY WHICH IS (1) BEING DISPLAYED TO THE ASTRONAUT AND WAITING FOR A RESPONSE OR
|
||||
# (2) WAITING FIRST IN LINE FOR THE ASTRONAUT TO FINISH USING THE DSKY OR (3) BEING DISPLAYED ON THE DSKY
|
||||
# BUT NOT WAITING FOR A RESPONSE.
|
||||
# 2. INACTIVE -- A DISPLAY WHICH HAS (1) BEEN ACTIVE BUT WAS INTERRUPTED BY A DISPLAY OF HIGHER PRIORITY,
|
||||
# 2. INACTIVE -A DISPLAY WHICH HAS (1) BEEN ACTIVE BUT WAS INTERRUPTED BY A DISPLAY OF HIGHER PRIORITY,
|
||||
# (2) BEEN PUT INTO THE WAITING LIST AT TIME IT WAS REQUESTED DUE TO THE FACT A HIGHER PRIORITY DISPLAY
|
||||
# WAS ALREADY DOING, (3) BEEN INTERRUPTED BY THE ASTRONAUT (CALLED A PINBRANCH CONDITION, SINCE THIS TYPE
|
||||
# WAS ALREADY GOING, (3) BEEN INTERRUPTED BY THE ASTRONAUT (CALLED A PINBRANCH CONDITION, SINCE THIS TYPE
|
||||
# OF INACTIVE DISPLAY IS USUALLY REACTIVATED ONLY BY PINBALL) OR (4) A DISPLAY WHICH HAS FINISHED BUT STILL
|
||||
# HAS INFO SAVED FOR RESTART PURPOSES.
|
||||
#
|
||||
# DISPLAY PRIORITIES WORK AS FOLLOWS --
|
||||
# INTERRUPTS --
|
||||
# DISPLAY PRIORITIES WORK AS FOLLOWS-
|
||||
# INTERRUPTS-
|
||||
# 1. THE ASTRONAUT CAN INTERRUPT ANY DISPLAY WITH AN EXTERNAL DISPLAY REQUEST.
|
||||
# 2. INTERNAL DISPLAYS CAN NOT BE SENT OUT WHEN THE ASTRONAUT IS USING THE DSKY.
|
||||
# 3. PRIORITY DISPLAYS INTERRUPT ALL OTHER TYPES OF INTERNAL DISPLAYS. A PRIORITY DISPLAY INTERRUPTING ANOTHER
|
||||
@ -61,8 +61,8 @@
|
||||
# 4. A MARK DISPLAY INTERRUPTS ANY NORMAL DISPLAY.
|
||||
# 5. A MARK THAT INTERRUPTS A MARK COMPLETELY REPLACES IT.
|
||||
#
|
||||
# ORDER OF WAITING DISPLAYS --
|
||||
# 1. ASTRONAUT
|
||||
# ORDER OF WAITING DISPLAYS-
|
||||
# 1. ASTRONAUT EXTERNAL USE
|
||||
# 2. PRIORITY
|
||||
# 3. INTERRUPTED MARK
|
||||
# 4. INTERRUPTED NORMAL
|
||||
@ -75,22 +75,21 @@
|
||||
# FOLLOWING STATEMENTS CAN BE MADE ABOUT NORMAL DISPLAYS AND PRIORITY DISPLAYS (A DESCRIPTION OF MARK ROUTINES
|
||||
# WILL FOLLOW LATER):
|
||||
# 1. ALL ROUTINES THAT END IN R HAVE AN IMMEDIATE RETURN TO THE USER. FOR ALL FLASHING DISPLAYS THIS RETURN
|
||||
# IS TO THE USER'S CALL CADR +4. FOR THE ONLY NON-FLASHING IMMEDIATE RETURN DISPLAY (GODSPR) THIS RETURN
|
||||
# IS TO THE USER'S CALLING LOC +1.
|
||||
# IS TO THE USERS CALL CADR +4. FOR THE ONLY NON FLASHING IMMEDIATE RETURN DISPLAY (GODSPR) THIS RETURN
|
||||
# IS TO THE USERS CALLING LOC +1.
|
||||
# 2. ALL ROUTINES NOT ENDING IN R DO NOT DO AN IMMEDIATE RETURN TO THE USER.
|
||||
# 3. ALL ROUTINES THAT END IN R START A SEPARATE JOB (MAKEPLAY) WITH USER'S JOB PRIORITY.
|
||||
# 3. ALL ROUTINES THAT END IN R START A SEPARATE JOB (MAKEPLAY) WITH USERS JOB PRIORITY.
|
||||
# 4. ALL ROUTINES NOT ENDING IN R BRANCH DIRECTLY TO MAKEPLAY WHICH MAKES THESE DISPLAYS A PART OF THE
|
||||
# USER'S JOB.
|
||||
# USERS JOB.
|
||||
# 5. ALL DISPLAY ROUTINES ARE CALLED VIA BANKCALL.
|
||||
# 6. TO RESTART A DISPLAY THE USER WILL GENERALLY USE A PHASE OF ONE WITH DESIRED RESTART GROUP (SEE
|
||||
# DESCRIPTION OF RESTARTS).
|
||||
# 7. ALL FLASHING DISPLAYS HAVE 3 RETURNS TO THE USER FROM ASTRONAUT RESPONSES. A TERMINATE (V34) BRANCHES
|
||||
# TO THE USER'S CALL CADR +1. A PROCEED (V33) BRANCHES TO THE USER'S CALL CADR +2. AN ENTER OR RECYCLE
|
||||
# (V32) BRANCHES TO THE USER'S CALL CADR +3.
|
||||
# 8. ALL ROUTINES MUST BE USED UNDER EXECUTIVE CONTROL
|
||||
# TO THE USERS CALL CADR +1. A PROCEED (V33) BRANCHES TO THE USERS CALL CADR +2. AN ENTER OR RECYCLE
|
||||
# (V32) BRANCHES TO THE USERS CALL CADR +3.
|
||||
# 8. ALL ROUTINES MUST BE USED UNDER EXECUTIVE CONTROL.
|
||||
#
|
||||
# A DESCRIPTION OF EACH ROUTINE WITH AN EXAMPLE FOLLOWS:
|
||||
|
||||
# GODSP IS USED TO DISPLAY A VERB NOUN ARRIVING IN A. NO RETURN IS MADE TO THE USER.
|
||||
# 1. GODSP IS NOT RESTARTABLE
|
||||
# 2. A VERB PASTE WITH GODSP ALWAYS TURNS ON THE FLASH.
|
||||
@ -105,7 +104,7 @@
|
||||
# CADR GODSPR
|
||||
# ... ... # IMMEDIATE RETURN OF GODSPR
|
||||
|
||||
# GOFLASH DISPLAYS A FLASHING VERB NOUN WITH NO IMMEDIATE RETURN TO THE USER. 3 RETURNS ARE POSSIBLE FORM
|
||||
# GOFLASH DISPLAYS A FLASHING VERB NOUN WITH NO IMMEDIATE RETURN TO THE USER. 3 RETURNS ARE POSSIBLE FORM
|
||||
# THE ASTRONAUT (SEE NO. 7 ABOVE).
|
||||
# CAF VXXNYY # VXX NYY WILL BE A FLASHING VERB NOUN.
|
||||
# TC BANKCALL
|
||||
@ -116,7 +115,7 @@
|
||||
|
||||
# GOPERF1 IS ENTERED WITH DESIRED CHECKLIST VALUE IN A. GOPERF1 WILL DISPLAY THIS VALUE IN R1 BY MEANS OF A
|
||||
# Page 1454
|
||||
# V01 N25. A FLASHING PLEASE PERFORM ON CHECKLIST (V50 N25) IS THEN DISPLAYED. NO IMMEDIATE RETURN IS MADE TO
|
||||
# V01 N25.A FLASHING PLEASE PERFORM ON CHECKLIST (V50 N25) IS THEN DISPLAYED. NO IMMEDIATE RETURN IS MADE TO
|
||||
# USER (SEE NO. 7 ABOVE).
|
||||
# GOPERF1 BLANKS REGISTERS R2 AND R3
|
||||
# CAF OCTXX # CODE FOR CHECKLIST VALUE XX
|
||||
@ -126,17 +125,17 @@
|
||||
# ... ... # PROCEED RETURN
|
||||
# ... ... # ENTER RETURN
|
||||
# GOPERF2 IS ENTERED WITH A VARIABLE NOUN AND V01 (V00 FOR N10 OR N11) IN A. GOPERF2 WILL FIRST DISPLAY THE
|
||||
# REQUESTED NOUN BY MEANS OF A V01NYY OR A V00NYY. PLEASE PERFORM ON NOUN (V50 NYY) THEN BECOMES A FLASHING
|
||||
# REQUESTED NOUN BY MEANS OF A V01NYY OR A V00NYY. PLEASE PERFORM ON NOUN (V50 NYY) THEN BECOMES A FLASHING
|
||||
# DISPLAY. NO IMMEDIATE RETURN IS MADE TO THE USER (SEE NO. 7 ABOVE).
|
||||
# GOPERF2 DOES NOT BLANK ANY REGISTERS
|
||||
# CAF VXXNYY # VARIABLE NOUN YY. XX=0 OR 01.
|
||||
# CAF VXXNYY # VARIABLE NOUN YY. XX=00 OR 01.
|
||||
# TC BANKCALL
|
||||
# CADR GOPERF2
|
||||
# ... ... # TERMINATE RETURN
|
||||
# ... ... # PROCEED RETURN
|
||||
# ... ... # ENTER RETURN
|
||||
# GOPERF3 IS USED FOR A PLEASE PERFORM ON A PROGRAM NUMBER. THE DESIRED PROGRAM NO. IS ENTERED IN A. GOPERF3
|
||||
# DISPLAYS THE NO. BY MEANS OF A V06 N07 FOLLOWED BY A FLASHING V50 N07 FOR A PLEASE PERFORM. NO IMMEDIATE RETURN
|
||||
# DISPLAYS THE NO. BY MEANS OF A V06 N07 FOLLOWED BY A FLASHING V50 N07 FOR A PLEASE PERFORM. NO IMMEDIATE RETURN
|
||||
# IS MADE TO THE USER (SEE NO. 7 ABOVE).
|
||||
# GOPERF3 BLANKS REGISTERS R2 AND R3
|
||||
# CAF DECXX # REQUEST PERFORM ON PXX
|
||||
@ -146,7 +145,7 @@
|
||||
# ... ... # PROCEED RETURN
|
||||
# ... ... # ENTER RETURN
|
||||
|
||||
# GOPERF4 IS USED FOR A PLEASE PERFORM ON AN OPTION. THE DESIRED OPTION IS ENTERED IN A AND STORED IN OPTION1.
|
||||
# GOPERF4 IS USED FOR A PLEASE PERFORM ON AN OPTION. THE DESIRED OPTION IS ENTERED IN A AND STORED IN OPTION1.
|
||||
# GOPERF4 DISPLAYS R1 AND R2 BY MEANS OF A V04N06 FOLLOWED BY A FLASHING V50N06 FOR A PLEASE PERFORM. NO
|
||||
# IMMEDIATE RETURN IS MADE TO THE USER (SEE NO. 7 ABOVE).
|
||||
# CAF OCTXX # REQUEST PERFORM ON OPTION XX
|
||||
@ -155,7 +154,7 @@
|
||||
# ... ... # TERMINATE RETURN
|
||||
# ... ... # PROCEED RETURN
|
||||
# ... ... # ENTER RETURN
|
||||
# GOPERF4 BLANKS REGISTER R3.
|
||||
# GOPERF4 BLANKS REGISTER R3
|
||||
#
|
||||
# Page 1455
|
||||
# GODSPRET IS USED TO DISPLAY A VERB NOUN ARRIVING IN A WITH A RETURN TO THE USER AFTER THE DISPLAY HAS BEEN SENT
|
||||
@ -163,9 +162,9 @@
|
||||
# CAF VXXXNYY
|
||||
# TC BANKCALL
|
||||
# CADR GODSPRET
|
||||
# ... ... # RETURN TO USER.
|
||||
# ... ... # RETURN TO USER
|
||||
|
||||
# REGODSP IS USED TO DISPLAY A VERB NOUN ARRIVING IN A. REGODSP IS THE SAME AS GODSP ONLY REGODSP REPLACES AND
|
||||
# REGODSP IS USED TO DISPLAY A VERB NOUN ARRIVING IN A. REGODSP IS THE SAME AS GODSP ONLY REGODSP REPLACES ANY
|
||||
# ACTIVE NORMAL DISPLAY IF ONE WAS ACTIVE.
|
||||
# CAF VXXNYY
|
||||
# TC BANKCALL
|
||||
@ -179,7 +178,7 @@
|
||||
# ... ... # PROCEED RETURN
|
||||
# ... ... # ENTER RETURN
|
||||
|
||||
# GOFLASHR IF SAME AS GOFLASH ONLY AN IMMEDIATE RETURN IS MADE TO THE USER'S CALL CADR +4.
|
||||
# GOFLASHR IF SAME AS GOFLASH ONLY AN IMMEDIATE RETURN IS MADE TO THE USERS CALL CADR +4.
|
||||
# CAF VXXNYY
|
||||
# TC BANKCALL
|
||||
# CADR GOFLASHR
|
||||
@ -188,7 +187,7 @@
|
||||
# ... ... # ENTER OR RECYCLE RETURN
|
||||
# ... ... # IMMEDIATE RETURN FROM GOFLASHR
|
||||
|
||||
# GOPERF1R IS THE SAME AS GOPERF1 ONLY GOPERF1R HAS AN IMMEDIATE RETURN TO USER'S CALL CADR +4.
|
||||
# GOPERF1R IS THE SAME AS GOPERF1 ONLY GOPERF1R HAS AN IMMEDIATE RETURN TO USERS CALL CADR +4.
|
||||
# GOPERF1R BLANKS REGISTERS R2 AND R3
|
||||
# CAF OCTXX # CODE FOR CHECKLIST VALUE XX.
|
||||
# TC BANKCALL
|
||||
@ -198,10 +197,10 @@
|
||||
# ... ... # ENTER RETURN
|
||||
# ... ... # IMMEDIATE RETURN FROM GOPERF1R
|
||||
|
||||
# GOPERF2R IS THE SAME AS GOPERF2 ONLY AN IMMEDIATE RETURN IS MADE TO USER'S CALL CADR +4.
|
||||
# GOPERF2R IS THE SAME AS GOPERF2 ONLY AN IMMEDIATE RETURN IS MADE TO USERS CALL CADR +4.
|
||||
# Page 1456
|
||||
# GOPERF2R DOES NOT BLANK ANY REGISTERS
|
||||
# CAF VXXXNYY # VARIABLE NOUN YY REQUESTED. XX=00 OR 01
|
||||
# CAF VXXNYY # VARIABLE NOUN YY REQUESTED. XX=00 OR 01
|
||||
# TC BANKCALL
|
||||
# CADR GOPERF2R
|
||||
# ... ... # TERMINATE RETURN
|
||||
@ -209,7 +208,7 @@
|
||||
# ... ... # ENTER RETURN
|
||||
# ... ... # IMMEDIATE RETURN HERE FROM GOPERF2R
|
||||
|
||||
# GOPERF3R IS THE SAME AS GOPERF3 ONLY AN IMMEDIATE RETURN IS MADE TO USER'S CALL CADR +4.
|
||||
# GOPERF3R IS THE SAME AS GOPERF3 ONLY AN IMMEDIATE RETURN IS MADE TO USERS CALL CADR +4.
|
||||
# GOPERF3R BLANKS REGISTERS R2 AND R3
|
||||
# CAF PROGXX # PERFORM PROGRAM XX
|
||||
# TC BANKCALL
|
||||
@ -219,7 +218,7 @@
|
||||
# ... ... # ENTER RETURN
|
||||
# ... ... # GOPERF3R IMMEDIATELY RETURNS HERE
|
||||
|
||||
# GOPERF4R IS THE SAME AS GOPERF4 ONLY AN IMMEDIATE RETURN IS MADE TO USER'S CALL CADR +4.
|
||||
# GOPERF4R IS THE SAME AS GOPERF4 ONLY AN IMMEDIATE RETURN IS MADE TO USERS CALL CADR +4.
|
||||
# CAF OCTXX # REQUEST PERFORM ON OPTIONXX
|
||||
# TC BANKCALL
|
||||
# CADR GOPERF4R
|
||||
@ -227,9 +226,9 @@
|
||||
# ... ... # PROCEED RETURN
|
||||
# ... ... # ENTER RETURN
|
||||
# ... ... # IMMEDIATE RETURN TO USER
|
||||
# GOPERF4R BLANKS REGISTER R3.
|
||||
# GOPERF4R BLANKS REGISTER R3
|
||||
#
|
||||
# REFLASHR IS THE SAME AS REFLASH ONLY AN IMMEDIATE RETURN IS MADE TO THE USER'S CALL CADR +4.
|
||||
# REFLASHR IS THE SAME AS REFLASH ONLY AN IMMEDIATE RETURN IS MADE TO THE USERS CALL CADR +4.
|
||||
# CAF VXXNYY # VXX NYY WILL BE A FLASHING VERB NOUN
|
||||
# TC BANKCALL
|
||||
# CADR REFLASHR
|
||||
@ -246,7 +245,7 @@
|
||||
# ... ... # IMMEDIATE RETURN TO USER
|
||||
|
||||
# Page 1458
|
||||
# GOMARK IS USED TO DISPLAY A MARK VERB NOUN ARRIVING IN A. NO RETURN IS MADE TO THE USER.
|
||||
# GOMARK IS USED TO DISPLAY A MARK VERB NOUN ARRIVING IN A. NO RETURN IS MADE TO THE USER.
|
||||
# GOXDSP = GOMARK
|
||||
# CAF VXXNYY # VXXNYY CONTAINS VERB AND NOUN
|
||||
# TC BANKCALL
|
||||
@ -259,7 +258,7 @@
|
||||
# CADR GOMARKR # OTHER EXTENDED VERBS USE CADR GOXDSPR
|
||||
# ... ... # IMMEDIATE RETURN OF GOMARKR
|
||||
|
||||
# GOMARKF DISPLAYS A FLASHING MARK VERB NOUN WITH NO IMMEDIATE RETURN TO THE USER. 3 RETURNS ARE POSSIBLE FORM
|
||||
# GOMARKF DISPLAYS A FLASHING MARK VERB NOUN WITH NO IMMEDIATE RETURN TO THE USER. 3 RETURNS ARE POSSIBLE FORM
|
||||
# THE ASTRONAUT (SEE NO. 7 ABOVE).
|
||||
# GOXDSPF = GOMARKF
|
||||
# CAF VXXNYY # VXXNYY WILL BE A FLASHING MARK VERB NOUN
|
||||
@ -268,7 +267,6 @@
|
||||
# ... ... # TERMINATE RETURN
|
||||
# ... ... # PROCEED RETURN
|
||||
# ... ... # ENTER OR RECYCLE RETURN
|
||||
# ... ... # IMMEDIATE RETURN TO THE USER
|
||||
|
||||
# GOMARKFR IS THE SAME AS GOMARKF ONLY AN IMMEDIATE RETURN IS MADE TO THE USER CALL CADR +4.
|
||||
# GOXDSPFR = GOMARKFR
|
||||
@ -278,23 +276,22 @@
|
||||
# ... ... # TERMINATE RETURN
|
||||
# ... ... # PROCEED RETURN
|
||||
# ... ... # ENTER OR RECYCLE RETURN
|
||||
#
|
||||
# ... ... # IMMEDIATE RETURN TO THE USER
|
||||
|
||||
# GOMARK1 IS USED FOR A PLEASE PERFORM ON A MARK REQUEST WITH ONLY 1 ASTRONAUT RETURN TO THE USER. NO IMMEDIATE
|
||||
# RETURN IS MADE. THE DESIRED MARK PLEASE PERFORM VERB AND DESIRED NOUN IS ENTERED IN A. GOMARK1 DISPLAYS R1, R2, R
|
||||
# MEANS OF A V05NYY FOLLOWED BY A FLASHING V5XNYY FOR A PLEASE PERFORM. THE ASTRONAUT WILL RESPOND WITH A MARK
|
||||
# OR MARK REJECT OR AN ENTER. THE ENTER IS THE ONLY ASTRONAUT RESPONSE THAT WILL COME BACK TO THE USER.
|
||||
# CAF V5XNYY # X=1,2,3,4 YY=NOUN
|
||||
# RETURN IS MADE. THE DESIRED MARK PLEASE PERFORM VERB AND DESIRED NOUN IS ENTERED IN A. GOMARK1 DISPLAYS R1, R2, R
|
||||
# MEANS OF A V05NYY FOLLOWED BY A FLASHING V5XNYY FOR A PLEASE PERFORM. THE ASTRONAUT WILL RESPOND WITH A MARK
|
||||
# OR MARK REJECT OR AN ENTER. THE ENTER IS THE ONLY ASTRONAUT RESPONSE THAT WILL COME BACK TO THE USER.
|
||||
# CAF V5XNYY # X=1,2,3,4 YY= NOUN
|
||||
# TC BANKCALL
|
||||
# Page 1459
|
||||
# CADR GOMARK1
|
||||
# ... ... # ENTER RETURN
|
||||
|
||||
# *** IF BLANKING DESIRED ON NON-R ROUTINES, NOTIFY DISPLAYER.
|
||||
# *** IF BLANKING DESIRED ON NON R ROUTINES, NOTIFY DISPLAYER.
|
||||
#
|
||||
# GOMARK1R IS THE SAME AS A GOMARK1 ONLY AN IMMEDIATE RETURN IS MADE TO THE USER'S CALL CADR +2.
|
||||
# CAF V5XNYY # X=1,2,3,4 YY=NOUN
|
||||
# GOMARK1R IS THE SAME AS A GOMARK1 ONLY AN IMMEDIATE RETURN IS MADE TO THE USERS CALL CADR +2.
|
||||
# CAF V5XNYY # X=1,2,3,4 YY = NOUN
|
||||
# TC BANKCALL
|
||||
# CADR GOMARK1R
|
||||
# ... ... # ASTRONAUT ENTER RETURN
|
||||
@ -311,11 +308,11 @@
|
||||
# GOMARK2R IS THE SAME AS GOMARK1R ONLY 3 ASTRONAUT RETURNS ARE MADE TO THE USER.
|
||||
# CAF V5XNYY # X=0,1,2,3,4 YY=NOUN
|
||||
# TCF BANKCALL
|
||||
# CADR GOMARK24
|
||||
# CADR GOMARK2R
|
||||
# ... ... # TERMINATE RETURN
|
||||
# ... ... # PROCEED RETURN
|
||||
# ... ... # ENTER RETURN
|
||||
# ... ... # IMMEDIATE RETURN TO THE USER.
|
||||
# ... ... # IMMEDIATE RETURN TO THE USER
|
||||
|
||||
# GOMARK3 IS USED FOR A PLEASE PERFORM ON A MARK REQUEST WITH A 3 COMP. DEC DISPLAY. THE DESIRED MARK PLEASE
|
||||
# PERFORM VERB AND NOUN ARE ENTERED IN A. GOMARK3 DISPLAYS R1, R2, R3 BY MEANS OF A V06NYY FOLLOWED BY A FLASHING
|
||||
@ -337,7 +334,7 @@
|
||||
# ... ... # ENTER RETURN
|
||||
# EXDSPRET IS USED TO DISPLAY A VERB NOUN ARRIVING IN A WITH A RETURN MADE TO THE USER AFTER THE DISPLAY HAS BEEN
|
||||
# SENT OUT.
|
||||
# CAF VXNYY
|
||||
# CAF VXXNYY
|
||||
# TC BANKCALL
|
||||
# CADR EXDSPRET
|
||||
# ... ... # RETURN TO USER
|
||||
@ -361,14 +358,14 @@
|
||||
# CADR PINBRNCH
|
||||
|
||||
# PRIODSP IS USED AS A PRIORITY DISPLAY. IT WILL DISPLAY A GOFLASH TYPE DISPLAY WITH THREE POSSIBLE RETURNS FROM
|
||||
# THE ASTRONAUT (SEE NO. 7 ABOVE).
|
||||
# THE ASTRONAUT(SEE NO.7 ABOVE).
|
||||
#
|
||||
# THE MAIN PURPOSE OF PRIODSP IS TO REPLACE THE PRESENT DISPLAY WITH A DISPLAY OF HIGHER PRIORITY AND TO
|
||||
# THE MAIN PURPOSE OF PRIODSP IS TO REPLACE THE PRESENT DISPLAY WITH A DISPLAY OF HIGHER PRIORITY AND TO
|
||||
# PROVIDE A MEANS FOR RESTORING THE OLD DISPLAY WHEN THE PRIORITY DISPLAY
|
||||
# IS RESPONDED TO BY THE ASTRONAUT.
|
||||
#
|
||||
# THE FORMER DISPLAY IS RESTORED BY AN AUTOMATIC BRANCH TO WAKE UP THE DISPLAY THAT WAS INTERRUPTED BY THE
|
||||
# PRIO DISPLAY
|
||||
# THE FORMER DISPLAY IS RESTORED BY AN AUTOMATIC BRANCH TO WAKE UP THE DISPLAY THAT WAS INTERRUPTED BY THE
|
||||
# PRIO DISPLAY.
|
||||
# CAF VXXNYY # VXXNYY WILL BE A FLASHING VERB NOUN
|
||||
# TC BANKCALL
|
||||
# CADR PRIODSP
|
||||
@ -377,7 +374,7 @@
|
||||
# Page 1461
|
||||
# ... ... # ENTER OR RECYCLE RETURN
|
||||
|
||||
# PRIODSPR IS THE SAME AS PRIODSP ONLY AN IMMEDIATE RETURN IS MADE TO THE USER'S CALL CADR +4.
|
||||
# PRIODSPR IS THE SAME AS PRIODSP ONLY AN IMMEDIATE RETURN IS MADE TO THE USERS CALL CADR +4.
|
||||
# CAF VXXNYY # VXXNYY WILL BE A FLASHING VERB NOUN
|
||||
# TC BANKCALL
|
||||
# CADR PRIODSPR
|
||||
@ -387,8 +384,7 @@
|
||||
# ... ... # IMMEDIATE RETURN
|
||||
|
||||
# PRIOLARM DOES A V05N09 PRIODSPR.
|
||||
#
|
||||
# CLEANDSP CLEANS OUT ALL NORMAL DISPLAYS (ACTIVE AND INACTIVE). A RETURN IS MADE TO THE USER AFTER NORMAL
|
||||
# CLEANDSP CLEANS OUT ALL NORMAL DISPLAYS (ACTIVE AND INACTIVE). A RETURN IS MADE TO THE USER AFTER NORMAL
|
||||
# DISPLAYS ARE CLEANED OUT.
|
||||
# TC BANKCALL
|
||||
# CADR CLEANDSP
|
||||
@ -398,51 +394,51 @@
|
||||
# GENERAL INFORMATION
|
||||
# -------------------
|
||||
#
|
||||
# ALARM OR ABORT EXIT MODE --
|
||||
# PRIOBORT TC ABORT
|
||||
# OCT 1502
|
||||
# ALARM OR ABORT EXIT MODES--
|
||||
# PRIOBORT TC ABORT
|
||||
# OCT 1502
|
||||
#
|
||||
# PRIOBORT IS BRANCHED TO WHEN (1) A NORMAL DISPLAY IS REQUESTED AND ANOTHER NORMAL DISPLAY IS ALREADY ACTIVE
|
||||
# PRIOBORT IS BRANCED TO WHEN (1) A NORMAL DISPLAY IS REQUESTED AND ANOTHER NORMAL DISPLAY IS ALREADY ACTIVE
|
||||
# (REFLASH AND REGODSP ARE EXCEPTIONS) OR (2) A PRIORITY DISPLAY IS REQUESTED WHEN ANOTHER PRIORITY DISPLAY IS
|
||||
# ALREADY ACTIVE (A PRIORITY WITH LINUS BIT14 IS AN EXCEPTION).
|
||||
#
|
||||
# ERASABLE INITIALIZATION REQUIRED --
|
||||
# ACCOMPLISHED BY FRESH START -- 1. FLAGWRD4 (USED EXCLUSIVELY BY DISPLAY INTERFACE ROUTINES)
|
||||
# ERASABLE INITIALIZATION REQUIRED--
|
||||
# ACCOMPLISHED BY FRESH START- 1. FLAGWRD4 (USED EXCLUSIVELY BY DISPLAY INTERFACE ROUTINES)
|
||||
# 2. NVSAVE = NORMAL VERB AND NOUN REGISTER.
|
||||
# 3. EBANKTEM = NORMAL INACTIVE FLAGWORD (ALSO CONTAINS NORMALS EBANK).
|
||||
# 5. R1SAVE = MARKBRAN CONTROL WORD
|
||||
# 4. RESTREG = PRIORITY 30 AND SUPERBANK 3.
|
||||
#
|
||||
# OUTPUT --
|
||||
# OUTPUT--
|
||||
# NVWORD = PRIO VERB AND NOUN
|
||||
# NVWORD +1 (MARKNV) = MARK VERB AND NOUN
|
||||
# NVWORD +2 (NVSAVE) = NORMAL VERB AND NOUN
|
||||
# DSPFLG (EBANKSAV) = PRIO FLAGWORD (INCLUDING EBANK)
|
||||
# NVWORD +1(MARKNV) = MARK VERB AND NOUN
|
||||
# NVWORD +2(NVSAVE) = NORMAL VERB AND NOUN
|
||||
# DSPFLG(EBANKSAV) = PRIO FLAGWORD (INCLUDING EBANK)
|
||||
# DSPFLG +1 (MARKEBAN) = MARK FLAGWORD (INCLUDING EBANK)
|
||||
# DSPFLG +2 (EBANKTEM) = NORMAL FLAGWORD (INCLUDING EBANK)
|
||||
# CADRFLSH = PRIO USER'S CALL CADR +1 LOCATION
|
||||
# CADRFLSH +1 (MARKFLSH) = MARK USER'S CALL CADR +1 LOCATION
|
||||
# CADRFLSH +2 (TEMPFLSH) = NORMAL USER'S CALL CADR +1 LOCATION
|
||||
# CADRFLSH = PRIO USERS CALL CADR +1 LOCATION
|
||||
# CADRFLSH +1 (MARKFLSH) = MARK USERS CALL CADR +1 LOCATION
|
||||
# CADRFLSH +2 (TEMPFLSH) = NORMAL USERS CALL CADR +1 LOCATION
|
||||
# PRIOTIME = TIME EACH PRIO REQUEST FIRST SENT OUT
|
||||
# OPTION1 = DESIRED OPTION FROM GOPERF4
|
||||
# FLAGWRD4 = BIT INFO FOR CONTROL OF ALL DISPLAY ROUTINES
|
||||
# DSPTEM1 = R1 INFO FOR ASTRONAUT FROM PERFORM DISPLAYS (NORMAL)
|
||||
# DSPTEM1 = R1 INFO FOR ASTRONAUT FROM PERFORM DISPLAYS(NORMAL)
|
||||
#
|
||||
# SUBROUTINES USED -- NVSUB, FLAGUP, FLAGDOWN, ENDOFJOB, BLANKSUB, ABORT, JOBWAKE, JOBSLEEP, FINDVAC, PRIOCHNG,
|
||||
# JAMTERM, NVSUBUSY, FLASHON, ENDIDLE, CHANG1, BANKJUMP, MAKECADR, NOVAC
|
||||
# SUBROUTINES USED-- NVSUB, FLAGUP, FLAGDOWN, ENDOFJOB, BLANKSUB, ABORT, JOBWAKE, JOBSLEEP, FINDVAC, PRIOCHNG,
|
||||
# JAMTERM, NVSUBUSY, FLASHON, ENDIDLE, CHANG1, BANKJUMP, MAKECADR, NOVAC,
|
||||
#
|
||||
# DEBRIS -- (STORED INTO)
|
||||
# TEMPORARY TEMPORARIES -- A, Q, L, MPAC +2, MPAC +3, MPAC +4, MPAC +5, MPAC +6, RUPREG2, RUPTREG3, CYL,
|
||||
# DEBRIS-- (STORED INTO)
|
||||
# TEMPORARY TEMPORARIES- A, Q, L, MPAC +2, MPAC +3, MPAC +4, MPAC +5, MPAC +6, RUPTREG2, RUPTREG3, CYL,
|
||||
# EBANK, RUPTREG4, LOC, BANKSET, MODE, MPAC, MPAC +1, FACEREG
|
||||
# ERASABLES (SHARED AND USED WITH OTHER PROGRAMS) -- CADRSTOR, DSPLIST, LOC, DSPTEM1, OPTION1
|
||||
# ERASABLES (USED ONLY BY DISPLAY ROUTINES) -- NVWORD,+1,+2, DSPFLAG,+1,+2, CADRFLSH,+1,+2, PRIOTIME, FLAGWRD4,
|
||||
# ERASABLES(SHARED AND USED WITH OTHER PROGRAMS) CADRSTOR, DSPLIST, LOC, DSPTEM1, OPTION1
|
||||
# ERASABLES(USED ONLY BY DISPLAY ROUTINES)- NVWORD,+1,+2, DSPFLAG,+1,+2, CADRFLSH,+1,+2, PRIOTIME, FLAGWRD4,
|
||||
# Page 1463
|
||||
# R1SAVE, MARK2PAC
|
||||
#
|
||||
# DEBRIS -- (USED BUT NOT STORED INTO) -- NOUNREG, VERBREG, LOCCTR, MONSAVE1
|
||||
# DEBRIS-- (USED BUT NOT STORED INTO)- NOUNREG, VERBREG, LOCCTR, MONSAVE1
|
||||
#
|
||||
# FLAGWORD DESCRIPTIONS --
|
||||
# FLAGWRD4 -- SEE DESCRIPTION UNDER LOG SECTION ERASABLE ASSIGNMENTS
|
||||
# FLAGWORD DESCRIPTIONS--
|
||||
# FLAGWRD4- SEE DESCRIPTION UNDER LOG SECTION ERASABLE ASSIGNMENTS
|
||||
#
|
||||
# DSPFLG, DSPFLG+1, DSPFLG+2
|
||||
# --------------------------
|
||||
@ -462,33 +458,33 @@
|
||||
# 14 REFLASH OR REDO ----- REFLASH OR REDO
|
||||
# 15 ----- MARK REQUEST -----
|
||||
#
|
||||
# RESTARTING DISPLAYS --
|
||||
# RESTARTING DISPLAYS--
|
||||
#
|
||||
# RULES FOR THE DSKY OPERATOR --
|
||||
# RULES FOR THE DSKY OPERATOR--
|
||||
# 1. PROCEED AND TERMINATE SERVE AS RESPONSES TO REQUESTS FOR OPERATOR RESPONSE (FLASHING Y/N). AS LONG
|
||||
# AS THERE IS ANY REQUEST AWAITING OPERATOR RESPONSE, ANY USE OF PROCEED OR TERMINATE WILL SERVE AS
|
||||
# RESPONSES TO THAT REQUEST. CARE SHOULD BE EXERCISED IN ATTEMPTING TO KILL AN OPERATOR INITIATED MONITOR
|
||||
# WITH PROCEED AND TERMINATE FOR THIS REASON.
|
||||
# 2. THE ASTRONAUT MUST RESPOND TO A PRIORITY DISPLAY NO SOONER THAN 2 SECONDS FROM THE TIME THE
|
||||
# 2. THE ASTRONAUT MUST RESPOND TO A PRIORITY DISPLAY NO SOONER THAN 5 SECS FROM THE TIME THE MISSION
|
||||
# PROGRAM SENT OUT THE REQUEST FOR OPERATOR RESPONSE (THE ASTRONAUT WOULD SEE THIS DISPLAY FOR LESS TIME
|
||||
# DUE TO TIME IT TAKES TO GET DISPLAY SENT OUT.) IF THE ASTRONAUT RESPONDS TOO SOON, THE PRIORITY DISPLAY
|
||||
# IS SENT OUT AGAIN -- AND AGAIN UNTIL AN ACCUMULATED 2 SECS FROM THE TIME THE FIRST PRIORITY DISPLAY
|
||||
# OUT. THE SAME 2 SEC. DELAY WILL OCCUR AT 163.84 SECS OR IN ANY MULTIPLE OF THAT TIME DUE TO PROGRAM
|
||||
# DUE TO TIME IT TAKES TO GET DISPLAY SENT OUT.) IF THE ASTRONAUT RESPONDS TOO SOON, THE PRIORITY DISPLAY
|
||||
# IS SENT OUT AGAIN---AND AGAIN UNTIL AN ACCUMULATED 5 SECS FROM TIME THE FIRST PRIORITY DISPLAY WAS SENT
|
||||
# OUT. THE SAME 5 SEC. DELAY WILL OCCUR AT 163.84 SECS OR IN ANY MULTIPLE OF THAT TIME DUE TO PROGRAM
|
||||
# CONSIDERATION.
|
||||
# 3. KEY RELEASE BUTTON --
|
||||
# A) IF THE KEY RELEASE LIGHT IS ON, IT SIMPLY RELEASES THE KEYBOARD AND DISPLAY FOR INTERNAL USE.
|
||||
# B) IF THE KEY RELEASE LIGHT IS OFF, AND IF SOME REQUEST FOR OPERATOR RESPONSE (FLASHING V/N) IS STILL
|
||||
# AWAITING RESPONSE THEN IT RE-ESTABLISHES THE DISPLAYS THAT ORIGINALLY REQUESTED RESPONSE.
|
||||
# 3. KEY RELEASE BUTTON-
|
||||
# A) IF THE KEY RELEASE LIGHT IS ON, IT SIMPLY RELEASES THE KEYBOARD AND DISPLAY FOR INTERNAL USE.
|
||||
# B) IF THE KEY RELEASE LIGHT IS OFF, AND IF SOME REQUEST FOR OPERATOR RESPONSE (FLASHING V/N) IS STILL
|
||||
# AWAITING RESPONSE THEN IT RE-ESTABLISHES THE DISPLAYS THAT ORIGINALLY REQUESTED RESPONSE.
|
||||
# IF AN OPERATOR WANTS THEREFORE TO RE-ESTABLISH BUT CONDITION (A) IS ENCOUNTERED, A SECOND DEPRESSION OF
|
||||
# KEY RELEASE BUTTON MAY BE NECESSARY.
|
||||
# 4. IT IS IMPORTANT TO ANSWER ALL REQUESTS FOR OPERATOR RESPONSE.
|
||||
# 5. IT IS ALWAYS GOOD PRACTICE TO TERMINATE AN EXTENDED VERB BEFORE ASKING FOR ANOTHER ONE OR THE SAME ONE
|
||||
# OVER AGAIN.
|
||||
#
|
||||
# SPECIAL CONSIDERATIONS --
|
||||
# SPECIAL CONSIDERATIONS--
|
||||
# Page 1464
|
||||
# 1. MPAC +2 SAVED ONLY IN MARK DISPLAYS
|
||||
# 2. GODSP(R), REGODSP(R), GOMARK(R) ALWAYS TURN ON THE FLASH IF ENTERED WITH A PASTE VERB REQUEST.
|
||||
# 2. GODSP(R),REGODSP(R),GOMARK(R) ALWAYS TURN ON THE FLASH IF ENTERED WITH A PASTE VERB REQUEST.
|
||||
# 3. ALL NORMAL DISPLAYS ARE RESTARTABLE EXCEPT GODSP(R), REGODSP(R)
|
||||
# 4. ALL EXTENDED VERBS WITH DISPLAYS SHOULD START WITH A TC TESTXACT AND FINISH WITH A TC ENDEXT.
|
||||
# 5. GODSP(R) AND REGODSP(R) MUST BE IN THE SAME EBANK AND SUPERBANK AS THE LAST NORMAL DISPLAY RESTARTED
|
||||
@ -502,7 +498,7 @@
|
||||
# CAF BITX # X=1,2,3 BLANK R1,R2,R3 RESPECTIVELY
|
||||
# TC BLANKET
|
||||
# ... ... # RETURN TO USER HERE
|
||||
# IN ORDER TO USE BLANKET CORRECTLY, THE USER MUST USE A DISPLAY ROUTINE THAT ENDS IN R FIRST FOLLOWED BY THE CALL
|
||||
# IN ORDER TO USE BLANKET CORRECTLY THE USER MUST USE A DISPLAY ROUTINE THAT ENDS IN R FIRST FOLLOWED BY THE CALL
|
||||
# TO BLANKET AT THE IMMEDIATE RETURN LOC.
|
||||
BLOCK 02
|
||||
SETLOC FFTAG4
|
||||
@ -597,10 +593,9 @@ MAKEMARK CAF ONE
|
||||
CCS A
|
||||
TCF CHKPRIO
|
||||
|
||||
CA FLAGWRD4 # IS MARK SLEEPING DUE TO ASTRO BUSY?
|
||||
CA FLAGWRD4 # IS MARK SLEEPING DUE TO ASTRO BUSY
|
||||
# Page 1467
|
||||
MASK BIT9
|
||||
|
||||
EXTEND
|
||||
BZF MARKPLAY # NO
|
||||
|
||||
@ -631,7 +626,7 @@ COPYPACS INDEX COPINDEX
|
||||
TS GENMASK
|
||||
|
||||
INDEX COPINDEX
|
||||
CA EBANKSAV # Was CAF --- RSB 2004.
|
||||
CAF EBANKSAV
|
||||
TS TEMPOR2 # ACTIVE EBANK AND FLAG
|
||||
|
||||
TS EBANK
|
||||
@ -639,11 +634,11 @@ COPYPACS INDEX COPINDEX
|
||||
TC Q
|
||||
|
||||
# PINCHEK CHECKS TO SEE IF THE CURRENT MARK REQUEST IS MADE BY THE ASTRONAUT WHILE INTERRUPTING A GOPLAY DISPLAY
|
||||
# (A NORMAL OR A PRIO). IF THE ASTRONAUT TRIES TO MARK DURING A PRIO, THE CHECK FAIL LIGHT GOES ON AND THE MARK
|
||||
# REQUEST IS ENDED. IF HE TRIES TO MARK DURING A NORM, THE MARK IS ALLOWED. IN THIS CASE THE NORM IS PUT TO SLEEP
|
||||
# (A NORMAL OR A PRIO). IF THE ASTRONAUT TRIES TO MARK DURING A PRIO, THE CHECK FAIL LIGHT GOES ON AND THE MARK
|
||||
# REQUEST IS ENDED. IF HE TRIES TO MARK DURING A NORM, THE MARK IS ALLOWED. IN THIS CASE THE NORM IS PUT TO SLEEP
|
||||
# UNTIL ALL MARKING IS FINISHED.
|
||||
#
|
||||
# IF THE MARK REQUEST COMES FROM THE PROGRAM DURING A TIME THE ASTRONAUT IS NOT INTERRUPTING A NORMAL OR A
|
||||
# IF THE MARK REQUEST COMES FROM THE PROGRAM DURING A TIME THE ASTRONAUT IS NOT INTERRUPTING A NORMAL OR A
|
||||
# PRIO, THE MARK REQUEST IS PUT TO SLEEP UNTIL THE PRESENT ACTIVE DISPLAY IS RESPONDED TO BY THE ASTRONAUT.
|
||||
|
||||
CHKPRIO CA FLAGWRD4 # MARK ATTEMPT DURING PRIO
|
||||
@ -678,16 +673,16 @@ GODSPR TS PLAYTEM1
|
||||
GODSPR1 CAF ZERO
|
||||
GODSPR2 TS PLAYTEM4
|
||||
|
||||
CAF ZERO # * DON'T MOVE
|
||||
CAF ZERO # * DONT MOVE
|
||||
TCF GODSPRS1
|
||||
|
||||
# CLEANDSP IS USED FOR CLEARING OUT A NORMAL DISPLAY THAT IS PRESENTLY ACTIVE OR A NORMAL DISPLAY THAT IS
|
||||
# CLEANDSP IS USED FOR CLEARING OUT A NORMAL DISPLAY THAT IS PRESENTLY ACTIVE OR A NORMAL DISPLAY THAT IS
|
||||
# SET UP TO BE STARTED OR RESTARTED.
|
||||
#
|
||||
# NORMALLY THE USER WILL NOT NEED TO USE THIS ROUTINE SINCE A NEW NORMAL DISPLAY AUTOMATICALLY CLEARS OUT AN
|
||||
# NORMALLY THE USER WILL NOT NEED TO USE THIS ROUTINE SINCE A NEW NORMAL DISPLAY AUTOMATICALLY CLEARS OUT AN
|
||||
# OLD DISPLAY.
|
||||
#
|
||||
# CALLING SEQUENCE FOR CLEANDSP --
|
||||
# CALLING SEQUENCE FOR CLEANDSP-
|
||||
#
|
||||
# TC BANKCALL
|
||||
# CADR CLEANDSP
|
||||
@ -773,7 +768,7 @@ REDOPRIO CA TIME1 # SAVE TIME PRIODSP SENT OUT
|
||||
KEEPPRIO CAF ZERO # START UP PRIO DISPLAY
|
||||
TCF PRIOPLAY
|
||||
|
||||
MAKEPLAY CA PRIORITY # SAVE USER'S PRIORITY
|
||||
MAKEPLAY CA PRIORITY # SAVE USERS PRIORITY
|
||||
MASK PRIO37
|
||||
TS USERPRIO
|
||||
|
||||
@ -817,10 +812,10 @@ OKTOPLAY TC COPIES2
|
||||
CA FLAGWRD4 # PRIO OR MARK GOING
|
||||
MASK PMMASK
|
||||
CCS A
|
||||
TCF GOSLEEPS # MARK GOING
|
||||
TCF GOSLEEPS # YES
|
||||
|
||||
TCF +2
|
||||
TCF GOSLEEPS
|
||||
TCF GOSLEEPS # MARK GOING
|
||||
|
||||
# COULD PUT NORM BUSY CHECK HERE TO SAVE TIME
|
||||
|
||||
@ -890,12 +885,12 @@ VACDSP CA BBANK
|
||||
|
||||
BOTHJOBS TC SAVELOCS # COPY TEMPS INTO PERMANENT REGISTERS
|
||||
|
||||
EXTEND # SAVE NVWORD AND USER'S MPAC +2
|
||||
EXTEND # SAVE NVWORD AND USERS MPAC +2
|
||||
DCA MPAC +1
|
||||
INDEX LOCCTR
|
||||
DXCH MPAC +1
|
||||
|
||||
EXTEND # SAVE USER'S CADR, FLAGS AND EBANK
|
||||
EXTEND # SAVE USERS CADR, FLAGS AND EBANK
|
||||
DCA MPAC +3
|
||||
INDEX LOCCTR
|
||||
DXCH MPAC +3
|
||||
@ -952,7 +947,6 @@ COPYNORM CAF ZERO
|
||||
COPIES TS COPINDEX
|
||||
COPIES2 INHINT
|
||||
CA PLAYTEM4 # FLAGWORD
|
||||
|
||||
INDEX COPINDEX
|
||||
TS EBANKSAV # EQUIV TO DSPFLG
|
||||
MASK CADRMASK # FLASH AND GODSPRET
|
||||
@ -1003,17 +997,16 @@ JOBXCHS TS FACEREG # CONTROLS TYPE OF DISPLAY PUT TO SLEEP
|
||||
INDEX FACEREG
|
||||
CA MARKOCT
|
||||
MASK IDLESLEP
|
||||
|
||||
TC DOWNENT2
|
||||
IDLEMASK OCT 74004 # * DON'T MOVE
|
||||
IDLEMASK OCT 74004 # * DONT MOVE
|
||||
INDEX FACEREG # BIT SHOWS PRIO INTERRUPTED NORM OR MARK
|
||||
CA BIT5 # BIT5 FOR MARK, BIT4 FOR NORMAL
|
||||
# Page 1475
|
||||
AD FOUR
|
||||
TC UPENT2 # FLAG ROUTINE DOES RELINT
|
||||
XCHQADD GENADR XCHSLEEP # * DON'T MOVE
|
||||
XCHQADD GENADR XCHSLEEP # * DONT MOVE
|
||||
CA FLAGWRD4
|
||||
MASK BIT3 # MARK OVER NORM?
|
||||
MASK BIT3 # IF BIT3 THEN MARK OVER NORM
|
||||
CCS A
|
||||
GENMARK TC MARKPLAY # USED AS GENADR FOR JOBWAKE
|
||||
TCF OKTOCOPY
|
||||
@ -1025,7 +1018,7 @@ WAKEPLAY TS TEMPOR2
|
||||
CA BITS5+11
|
||||
AD FOUR
|
||||
TC DOWNENT2
|
||||
MARKFMSK OCT 40010 # *** DON'T MOVE
|
||||
MARKFMSK OCT 40010 # ***DONT MOVE
|
||||
|
||||
INDEX TEMPOR2
|
||||
CAF WAKECADR
|
||||
@ -1034,10 +1027,9 @@ MARKFMSK OCT 40010 # *** DON'T MOVE
|
||||
|
||||
TCF ENDRET
|
||||
|
||||
# ALL .1 RESTARTS BRANCH DIRECTLY TO INITDSP. NORMAL DISPLAYS ARE THE ONLY DISPLAYS ALLOWED TO USE .1 RESTARTS
|
||||
# ALL .1 RESTARTS BRANCH DIRECTLY TO INITDSP. NORMAL DISPLAYS ARE THE ONLY DISPLAYS ALLOWED TO USE .1 RESTARTS
|
||||
# INITDSP FIRST RESTORES THE EBANK AND THE SUPERBANK TO THE MOST RECENT NORMAL EBANK AND SUPERBANK.
|
||||
#
|
||||
# IF THE MOST RECENT NORMAL DISPLAY REQUEST WAS NOT FINISHED, CONTROL IS SENT BACK TO THE LAST NORMAL USER.
|
||||
# IF THE MOST RECENT NORMAL DISPLAY REQUEST WAS NOT FINISHED, CONTROL IS SENT BACK TO THE LAST NORMAL USER.
|
||||
# OTHERWISE THE NORMAL DISPLAY SET UP IN THE NORMAL DISPLAY REGS IS STARTED UP IMMEDIATELY.
|
||||
|
||||
INITDSP CA EBANKTEM # RESTORE MOST RECENT NORMAL EBANK
|
||||
@ -1106,8 +1098,7 @@ NVDSP TC COPYPACS
|
||||
NVDSP1 AD ONE
|
||||
NV50DSP TC NVMONOPT
|
||||
TCF REST # IF BUSY
|
||||
|
||||
TC FLASHOFF # IN CASE OF EXTENDED VERB NON-FLASH
|
||||
TC FLASHOFF # IN CASE OF EXTENDED VERB NON FLASH
|
||||
|
||||
TC COPYTOGO # MPACS DESTROYED BY NVSUB
|
||||
TC DOWNFLAG # UNSET SLEEPING BITS
|
||||
@ -1164,7 +1155,7 @@ ISITN00 INDEX COPINDEX # IS THIS A PASTE
|
||||
EXTEND
|
||||
# Page 1478
|
||||
BZF V50PASTE
|
||||
CS NVWORD1 # NVOWRD1= -0 IS V97. NVWORD1= -400 IS V99
|
||||
CS NVWORD1 # NVOWRD1= -0 IS V97. NVWORD1= -400 IS V99
|
||||
AD V97N00
|
||||
TCF NV50DSP
|
||||
V50PASTE CAF V50N00
|
||||
@ -1175,7 +1166,7 @@ WITCHONE CS BIT5 # TURN OFF KEY RELEASE LIGHT
|
||||
WAND DSALMOUT
|
||||
|
||||
CA FLAGWRD4
|
||||
MASK NVBUSMSK # IS IT NVSUB ALEEP
|
||||
MASK NVBUSMSK # IS IT NVSUB ASLEEP
|
||||
CCS A
|
||||
CAF ONE
|
||||
TS L
|
||||
@ -1219,7 +1210,7 @@ REST CCS CADRSTOR # IS SOMEONE IN ENDIDLE
|
||||
RESTSLEP CA GENMASK # SET NVSLEEP BITS
|
||||
MASK ASTROMSK
|
||||
TC UPENT2
|
||||
OCT24100 OCT 24100 # *** DON'T MOVE
|
||||
OCT24100 OCT 24100 # *** DONT MOVE
|
||||
|
||||
INDEX COPINDEX
|
||||
CAF NVCADR
|
||||
@ -1233,7 +1224,7 @@ FLASHSUB TC FLASHON
|
||||
CA GENMASK
|
||||
MASK IDLEMASK
|
||||
TC UPENT2
|
||||
ITISMASK OCT 40040 # *** ENDIDLE ALLOW *** DON'T MOVE
|
||||
ITISMASK OCT 40040 # *** ENDIDLE ALLOW *** DONT MOVE
|
||||
|
||||
CA R1SAVE # IS THIS A REPEAT AND RETURN DISPLAY
|
||||
INDEX COPINDEX
|
||||
@ -1294,13 +1285,13 @@ ENDRET CCS OUTHERE
|
||||
CA GENMASK # REMOVE ENDIDLE AND PINBRANCH BITS
|
||||
MASK PINIDMSK
|
||||
TC DOWNENT2
|
||||
PINIDMSK OCT 74044 # *** DON'T MOVE
|
||||
PINIDMSK OCT 74044 # *** DONT MOVE
|
||||
|
||||
CS THREE # BLANK EVERYTHING EXCEPT MM
|
||||
TC NVSUB
|
||||
TCF +1
|
||||
|
||||
ENDIT CA USERPRIO # RETURN TO USER'S PRIORITY
|
||||
ENDIT CA USERPRIO # RETURN TO USERS PRIORITY
|
||||
MASK PRIO37
|
||||
TC PRIOCHNG
|
||||
CA MPAC +3
|
||||
@ -1314,7 +1305,7 @@ UNSETR1 INDEX COPINDEX # RESET REPEAT AND RETURN REQUEST
|
||||
TC SUPERSW # SUPERBANK 0
|
||||
# Page 1481
|
||||
|
||||
-1 CAF THREE # RETURN TO USER'S IMMEDIATE RETURN LOC
|
||||
-1 CAF THREE # RETURN TO USERS IMMEDIATE RETURN LOC
|
||||
IMMEDRET INDEX COPINDEX
|
||||
AD CADRFLSH
|
||||
TCF BANKJUMP
|
||||
@ -1334,21 +1325,21 @@ LINUSCHR CS PLAYTEM4 # IS THIS A LINUS
|
||||
|
||||
TC Q # NO
|
||||
CCS DSPLOCK # IS THE ASTRONAUT BUSY
|
||||
TC ENDOFJOB # END THE NEW DISPLAY, IT'S ALREADY ACTIVE
|
||||
TC ENDOFJOB # END THE NEW DISPLAY, ITS ALREADY ACTIVE
|
||||
TC Q
|
||||
|
||||
# MORE LOGIC COULD BE INCORPORATED HERE TO MAKE SURE A RECYCLE IS A RECYCLE AND CONVERSELY THAT A LOAD IS A LOAD
|
||||
# MORE LOGIC COULD BE INCORPORATED HERE TO MAKE SURE A RECYCLE IS A RECYCLE AND CONVERSELY THAT A LOAD IS A LOAD.
|
||||
|
||||
PROCEED CAF ONE # ASTRONAUT PROCEED (V33) RETURNS
|
||||
TCF ENDOUT
|
||||
|
||||
# LASTPLAY CHECKS TO SEE IF (1) THE LAST NORMAL DISPLAY WAS EITHER INTERRUPTED BY A PRIO OR A MARK (MARK
|
||||
# LASTPLAY CHECKS TO SEE IF (1) THE LAST NORMAL DISPLAY WAS EITHER INTERRUPTED BY A PRIO OR A MARK (MARK
|
||||
# COULD ONLY HAPPEN DURING PINBRANCH) OR IF (2) THE LAST NORMAL DISPLAY WAS REQUESTED WHILE A HIGHER PRIORITY
|
||||
# DISPLAY WAS GOING, RESULTING IN THE NORMAL BEING PUT TO SLEEP.
|
||||
#
|
||||
# IF EITHER OF THE ABOVE 2 CONDITIONS EXISTS, THE NORMAL DISPLAY IS AWAKENED TO GO TO PLAYJUM1 WHICH STARTS
|
||||
# IF EITHER OF THE ABOVE 2 CONDITIONS EXISTS, THE NORMAL DISPLAY IS AWAKENED TO GO TO PLAYJUM1 WHICH STARTS
|
||||
# UP THE MOST RECENT VALID NORMAL DISPLAY. IF THESE 2 CONDITIONS DO NOT EXIST, CONTROL GOES TO PLAYJUM1 WHICH IS
|
||||
# STARTED IMMEDIATELY WITH THE ASSUMPTION THAT THE MOST RECENT NORMAL DISPLAY IS ALREADY IN ENDIDLE (DURING A
|
||||
# STARTED IMMEDIATELY WITH THE ASSUMPTION THAT THE MOST RECENT NORMAL DISPLAY IS ALREADY IN-ENDIDLE (DURING A
|
||||
# PINBRNCH) OR THAT A RESTART HAS OCCURRED AND THE DISPLAY CAN BE STARTED AS A .1 RESTART.
|
||||
|
||||
MARKRET CS SIX
|
||||
@ -1413,7 +1404,7 @@ ERASER CS THREE # BLANK EVERYTHING EXCEPT MM
|
||||
TCF ENDOFJOB
|
||||
TCF ENDOFJOB
|
||||
|
||||
PERFMASK OCT 0036 # FLASH, PERFORM, BLANK R2 AND R3
|
||||
PERFMASK OCT 0036 # FLASH,PERFORM,BLANK R2 AND R3
|
||||
# Page 1483
|
||||
V01N25 VN 00125
|
||||
V06N07 VN 00607 # GOPERF3 VN DISPLAY BEFORE V50
|
||||
@ -1423,8 +1414,8 @@ V04N06 VN 00406
|
||||
PERF4MSK OCT 14 # FLASH, BLANK R3
|
||||
GOAGIN EQUALS PINBRNCH
|
||||
REDOMASK OCT 20010 # BITS 4 AND 14
|
||||
MARK3MSK OCT 40230 # MARK, DECIMAL NOUN, PERFORM, FLASH
|
||||
MARK4MSK OCT 40036 # MARK, PERFORM, FLASH, BLANK 2 AND 3
|
||||
MARK3MSK OCT 40230 # MARK,DECIMAL NOUN, PERFORM,FLASH
|
||||
MARK4MSK OCT 40036 # MARK,PERFORM,FLASH,BLANK 2 AND 3
|
||||
NVCADR CADR REDOPRIO
|
||||
WAKECADR CADR MARKPLAY
|
||||
CADR PLAYJUM1
|
||||
@ -1449,8 +1440,8 @@ BITS7+4 OCT 110
|
||||
DSPFLG EQUALS EBANKSAV
|
||||
MARKFLAG EQUALS MARKEBAN
|
||||
SAVEFLAG EQUALS EBANKTEM
|
||||
BITS5+11 OCT 2020 # * DON'T MOVE
|
||||
BITS4+10 OCT 1010 # * DON'T MOVE
|
||||
BITS5+11 OCT 2020 # * DONT MOVE
|
||||
BITS4+10 OCT 1010 # * DONT MOVE
|
||||
LOWLOAD DEC 22
|
||||
BUSYMASK OCT 77730
|
||||
CADRMASK OCT 50
|
||||
@ -1480,6 +1471,6 @@ MAKEGEN GENADR MAKEPLAY
|
||||
OCT10200 OCT 10200
|
||||
V97N00 VN 09700 # PASTE FOR V97 OR V99
|
||||
OCT20100 OCT 20100
|
||||
CLOCKCON OCT 24030
|
||||
CLOCKCON OCT 24030 # FLASH, PERFORM, V99 OR V97 PASTE,REFLASH
|
||||
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user