( UPMODE, CPU )                                                 : UPMODE  IF MODE @ 8 AND 0= IF 8 MODE +! THEN THEN                 1 MODE @ 0F AND -DUP IF 0 DO DUP + LOOP THEN                    OVER 1+ @ AND 0= ;                                          : CPU  <BUILDS  C,  DOES>  C@  C,  MEM ;                             00 CPU BRK,   18 CPU CLC,   D8 CPU CLD,   58 CPU CLI,           B8 CPU CLV,   CA CPU DEX,   88 CPU DEY,   E8 CPU INX,           C8 CPU INY,   EA CPU NOP,   48 CPU PHA,   08 CPU PHP,           68 CPU PLA,   28 CPU PLP,   40 CPU RTI,   60 CPU RTS,           38 CPU SEC,   F8 CPU SED,   78 CPU SEI,   AA CPU TAX,           A8 CPU TAY,   BA CPU TSX,   8A CPU TXA,   9A CPU TXS,           98 CPU TYA,                                                                                                                                                                                                                                                                                                                