V205

[fast-forth/master.git] / MSP430-FORTH / PROG100k.f

diff --git a/MSP430-FORTH/PROG100k.f b/MSP430-FORTH/PROG100k.f
index fd4de83..106690e 100644 (file)
--- a/MSP430-FORTH/PROG100k.f
+++ b/MSP430-FORTH/PROG100k.f
@@ -1,10 +1,13 @@
-; -----------------------------------
-; prog100k.4th, to test speed of downloading
-; -----------------------------------
-    \
-WIPE
-NOECHO      ; if an error occurs during download, comment this line then download again
-    \
+; --------------------------------------------------------------
+; prog100k.4th, compile 100 kbytes, to test speed of compilation
+; --------------------------------------------------------------
+\ TARGET SELECTION
+\ MSP_EXP430FR5739  MSP_EXP430FR5969    MSP_EXP430FR5994    MSP_EXP430FR6989
+\ MSP_EXP430FR4133  MSP_EXP430FR2355    CHIPSTICK_FR2433
+
+\ MY_MSP430FR5738_1 MY_MSP430FR5738     MY_MSP430FR5948     MY_MSP430FR5948_1   
+\ JMJ_BOX
+
 \ Copyright (C) <2016>  <J.M. THOORENS>
 \
 \ This program is free software: you can redistribute it and/or modify
@@ -37,10 +40,12 @@ NOECHO      ; if an error occurs during download, comment this line then downloa
 \ POPM  order :  R4, R5, R6, R7,  Y,  X,  W,  T,  S, IP,TOS,PSP
 \ example : POPM Y,IP
 
-\ ASSEMBLER conditionnal usage after IF UNTIL WHILE : S< S>= U< U>= 0= 0<> 0>=
-\ ASSEMBLER conditionnal usage before ?JMP ?GOTO    : S< S>= U< U>= 0= 0<> 0< 
+\ FORTH conditionnals:  unary{ 0= 0< 0> }, binary{ = < > U< }
+
+\ ASSEMBLER conditionnal usage with IF UNTIL WHILE  S<  S>=  U<   U>=  0=  0<>  0>=
+
+\ ASSEMBLER conditionnal usage with ?JMP ?GOTO      S<  S>=  U<   U>=  0=  0<>  <0
 
-\ FORTH conditionnal    : 0= 0< = < > U<
 
 \ display on a LCD 2x20 CHAR the code sent by an IR remote under philips RC5 protocol
 \ target : any TI MSP-EXP430FRxxxx launchpad (FRAM)
@@ -83,6 +88,10 @@ NOECHO      ; if an error occurs during download, comment this line then downloa
 \ rc5   <--- OUT IR_Receiver (1 TSOP32236)
 
 
+PWR_STATE
+    \
+[DEFINED] ASM [IF]
+    \
 CODE MAX    \    n1 n2 -- n3       signed maximum
             CMP     @PSP,TOS    \ n2-n1
             S<      ?GOTO FW1   \ n2<n1
@@ -328,13 +337,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -497,7 +506,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -745,13 +754,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -914,7 +923,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -1162,13 +1171,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -1331,7 +1340,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -1579,13 +1588,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -1748,7 +1757,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -1996,13 +2005,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -2165,7 +2174,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -2413,13 +2422,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -2582,7 +2591,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -2830,13 +2839,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -2999,7 +3008,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -3247,13 +3256,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -3416,7 +3425,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -3664,13 +3673,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -3833,7 +3842,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -4081,13 +4090,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -4250,7 +4259,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -4498,13 +4507,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -4667,7 +4676,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -4915,13 +4924,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -5084,7 +5093,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -5332,13 +5341,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -5501,7 +5510,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -5749,13 +5758,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -5918,7 +5927,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -6166,13 +6175,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -6335,7 +6344,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -6583,13 +6592,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -6752,7 +6761,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -7000,13 +7009,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -7169,7 +7178,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -7417,13 +7426,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -7586,7 +7595,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -7834,13 +7843,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -8003,7 +8012,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -8251,13 +8260,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -8420,7 +8429,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -8668,13 +8677,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -8837,7 +8846,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -9085,13 +9094,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -9254,7 +9263,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -9502,13 +9511,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -9671,7 +9680,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -9919,13 +9928,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -10088,7 +10097,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -10336,13 +10345,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -10505,7 +10514,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -10753,13 +10762,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -10922,7 +10931,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -11170,13 +11179,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -11339,7 +11348,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -11587,13 +11596,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -11756,7 +11765,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -12004,13 +12013,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -12173,7 +12182,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -12421,13 +12430,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -12590,7 +12599,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -12838,13 +12847,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -13007,7 +13016,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -13255,13 +13264,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -13424,7 +13433,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -13672,13 +13681,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -13841,7 +13850,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -14089,13 +14098,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -14258,7 +14267,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -14506,13 +14515,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -14675,7 +14684,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -14923,13 +14932,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -15092,7 +15101,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -15340,13 +15349,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -15509,7 +15518,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -15757,13 +15766,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -15926,7 +15935,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -16174,13 +16183,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -16343,7 +16352,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -16591,13 +16600,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -16760,7 +16769,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -17008,13 +17017,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -17177,7 +17186,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -17425,13 +17434,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -17594,7 +17603,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -17842,13 +17851,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -18011,7 +18020,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -18259,13 +18268,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -18428,7 +18437,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -18676,13 +18685,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -18845,7 +18854,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -19093,13 +19102,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -19262,7 +19271,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -19510,13 +19519,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -19679,7 +19688,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -19927,13 +19936,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -20096,7 +20105,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -20344,13 +20353,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -20513,7 +20522,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -20761,13 +20770,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -20930,7 +20939,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -21178,13 +21187,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -21347,7 +21356,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -21595,13 +21604,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -21764,7 +21773,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -22012,13 +22021,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -22181,7 +22190,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -22429,13 +22438,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -22598,7 +22607,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -22846,13 +22855,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -23015,7 +23024,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -23263,13 +23272,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -23432,7 +23441,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -23680,13 +23689,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -23849,7 +23858,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -24097,13 +24106,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -24266,7 +24275,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -24514,13 +24523,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -24683,7 +24692,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -24931,13 +24940,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -25100,7 +25109,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -25348,13 +25357,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -25517,7 +25526,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -25765,13 +25774,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -25934,7 +25943,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -26182,13 +26191,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -26351,7 +26360,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -26599,13 +26608,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -26768,7 +26777,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -27016,13 +27025,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -27185,7 +27194,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -27433,13 +27442,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -27602,7 +27611,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -27850,13 +27859,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -28019,7 +28028,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -28267,13 +28276,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -28436,7 +28445,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -28684,13 +28693,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -28853,7 +28862,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -29101,13 +29110,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -29270,7 +29279,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -29518,13 +29527,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -29687,7 +29696,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -29935,13 +29944,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -30104,7 +30113,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -30352,13 +30361,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -30521,7 +30530,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -30769,13 +30778,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -30938,7 +30947,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -31186,13 +31195,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -31355,7 +31364,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -31603,13 +31612,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -31772,7 +31781,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -32020,13 +32029,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -32189,7 +32198,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -32437,13 +32446,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -32606,7 +32615,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -32854,13 +32863,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -33023,7 +33032,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -33271,13 +33280,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -33440,7 +33449,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -33688,13 +33697,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -33857,7 +33866,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -34105,13 +34114,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -34274,7 +34283,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -34522,13 +34531,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -34691,7 +34700,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -34939,13 +34948,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -35108,7 +35117,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -35356,13 +35365,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -35525,7 +35534,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -35773,13 +35782,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -35942,7 +35951,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -36190,13 +36199,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -36359,7 +36368,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -36607,13 +36616,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -36776,7 +36785,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -37024,13 +37033,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -37193,7 +37202,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -37441,13 +37450,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -37610,7 +37619,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -37858,13 +37867,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -38027,7 +38036,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -38275,13 +38284,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -38444,7 +38453,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -38692,13 +38701,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -38861,7 +38870,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -39109,13 +39118,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -39278,7 +39287,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -39526,13 +39535,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -39695,7 +39704,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -39943,13 +39952,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -40112,7 +40121,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -40360,13 +40369,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -40529,7 +40538,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -40777,13 +40786,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -40946,7 +40955,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -41194,13 +41203,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -41363,7 +41372,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -41611,13 +41620,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -41780,7 +41789,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -42028,13 +42037,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -42197,7 +42206,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -42445,13 +42454,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -42614,7 +42623,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -42862,13 +42871,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -43031,7 +43040,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -43279,13 +43288,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -43448,7 +43457,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -43696,13 +43705,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -43865,7 +43874,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -44113,13 +44122,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -44282,7 +44291,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -44530,13 +44539,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -44699,7 +44708,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -44947,13 +44956,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -45116,7 +45125,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -45364,13 +45373,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -45533,7 +45542,7 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     \
 
 
-RST_STATE   ;
+PWR_STATE   ;
 
 
 CODE MAX    \    n1 n2 -- n3       signed maximum
@@ -45781,13 +45790,13 @@ RLAM    #1,IP                   \ IP =  x /C6 Tg A4 A3 A2|A1 A0 C5 C4 C3 C2 C1 C
 \ ******************************\
 \ Only New_RC5_Command ADD_ON   \ use SR(9) bit as toggle bit
 \ ******************************\
-MOV     @RSP,X                  \ retiSR(9)  = old UF1 = old RC5 toggle bit
+MOV     @RSP,X                  \ retiSR(9)  = old UF9 = old RC5 toggle bit
 RLAM    #4,X                    \ retiSR(11,10,9)= X(11,10,9) --> X(15,14,13)
 XOR     IP,X                    \ (new XOR old) Toggle bit (13)
 BIT     #BIT13,X                \ X(13) = New_RC5_command
 0= IF RETI                      \ case of repeated RC5_command : RETI without SR(9) change
 THEN                            \
-XOR     #UF1,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
+XOR     #UF9,0(RSP)             \ change Toggle bit memory, UserFlag1 = SR(9) = 1
 \ ******************************\
 \ RC5_ComputeNewRC5word         \
 \ ******************************\
@@ -45948,10 +45957,6 @@ LO2HI                           \ no need to push IP because (WARM) resets the R
     ECHO COLD           \ reset CPU, interrupt vectors, and start FORTH
 ;
     \
-
-
-
+[THEN]  \ ASM
+    \
 ECHO
-            ; download is done
-RST_HERE    ; this app is protected against <reset>,
-\ START