\ Additional definitions for 32bit values            cas 26jan06                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                \ 2Words Loadscreen                                  cas 26jan06                                                                hex                                                              &2  &3 thru                                                    decimal                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                         \ 2! 2@ 2VARIABLE 2CONSTANT   08JUL85RE)                                                                                        CODE 2!  ( D ADR --)                                             TYA  SETUP JSR  3 # LDY                                         [[  SP )Y LDA  N )Y STA  DEY  0< ?]                             1 # LDY  POPTWO JMP  END-CODE                                                                                                  CODE 2@  ( ADR -- D)                                             SP X) LDA  N STA  SP )Y LDA  N 1+ STA                           SP 2DEC  3 # LDY                                                [[  N )Y LDA  SP )Y STA  DEY  0< ?]                             XYNEXT JMP  END-CODE                                                                                                                                                                                                                                                                                                           \                                                                                                                               : 2VARIABLE  ( --)   CREATE 4 ALLOT ;                                        ( -- ADR)                                                                                                          : 2CONSTANT  ( D --)   CREATE , ,   DOES> ( -- D)   2@ ;                                                                        \ 2DUP  EXISTS                                                  \ 2SWAP EXISTS                                                  \ 2DROP EXISTS                                                                                                                                                                                                                                                                                                                                                                                                                                                  