diff --git a/Luminary099/PHASE_TABLE_MAINTENANCE.agc b/Luminary099/PHASE_TABLE_MAINTENANCE.agc index 7645e26..a35c9d4 100644 --- a/Luminary099/PHASE_TABLE_MAINTENANCE.agc +++ b/Luminary099/PHASE_TABLE_MAINTENANCE.agc @@ -256,14 +256,14 @@ ONEORTWO LXCH TEMPBBCN MASK OCT14000 # SEE WHAT KIND OF PHASE CHANGE IT IS CCS A - TCF CHECKB # IT IS OF TYPE `B'. + TCF CHECKB # IT IS OF TYPE :B: CA TEMPP MASK BIT7 - CCS A # SHALL WE USE THE OLD PRIORITY - TCF GETPRIO # NO GET A NEW PRIORITY (OR DELTA T) + CCS A # SHALL WE USE THE OLD PRIORITY + TCF GETPRIO # NO GET A NEW PRIORITY (OR DELTA T) -OLDPRIO NDX TEMPG # USE THE OLD PRIORITY (OR DELTA T) +OLDPRIO NDX TEMPG # USE THE OLD PRIORITY (OR DELTA T) CA PHSPRDT1 -2 TS TEMPPR @@ -275,7 +275,7 @@ CON1 CA TEMPP # SEE IF A 2CADR IS GIVEN CA Q TS TEMPNM CA BB - EXTEND # PICK UP USER'S SUPERBANK + EXTEND # PICK UP USERS SUPERBANK ROR SUPERBNK TS TEMPBB @@ -285,7 +285,7 @@ TOCON2 CA CON2ADR # BACK TO SWITCHED BANK CON2ADR GENADR CON2 -GETPRIO NDX Q # DON'T CARE IF DIRECT OR INDIRECT +GETPRIO NDX Q # DON:T CARE IF DIRECT OR INDIRECT CA 0 # LEAVE THAT DECISION TO RESTARTS INCR Q # OBTAIN RETURN ADDRESS # Page 1300