;; ======================================================================== ;;
    IF (DEFINED @@rock1) = 0
@@rock1 EQU     ((RCS1.rock1 - RCS1 + 1) SHL 8)
@@rock2 EQU     ((RCS1.rock2 - RCS1 + 1) SHL 8)
@@rock3 EQU     ((RCS1.rock3 - RCS1 + 1) SHL 8)
@@crat1 EQU     ((RCS1.crat1 - RCS1 + 1) SHL 8)
@@crat2 EQU     ((RCS1.crat2 - RCS1 + 1) SHL 8)
@@crat3 EQU     ((RCS1.crat3 - RCS1 + 1) SHL 8)
@@crat4 EQU     ((RCS1.crat4 - RCS1 + 1) SHL 8)
@@blank EQU     ((RCS1.blank - RCS1 + 1) SHL 8)
@@caut0 EQU     $1C00
@@caut1 EQU     $1D00
@@caut2 EQU     $1E00
@@caut3 EQU     $1F00
@@level EQU     $2000
@@exit  EQU     $6000
@@cue   EQU     $8000
    ENDI
;; ======================================================================== ;;
@@ckpt_0a:
    DECLE   @@blank  + ( 22 - 1)                   ; $0000    0  BLANK
    DECLE   @@crat3  + ( 12 - 1)                   ; $0001   22  CRAT3
    DECLE   @@crat2  + (  9 - 1)                   ; $0002   34  CRAT2
    DECLE   @@crat1  + ( 12 - 1)                   ; $0003   43  CRAT1
    DECLE   @@rock2  + (  7 - 1)                   ; $0004   55  ROCK2
    DECLE   @@crat1  + (  8 - 1)                   ; $0005   62  CRAT1
    DECLE   @@rock1  + (  6 - 1)                   ; $0006   70  ROCK1
    DECLE   @@rock1  + (  4 - 1)                   ; $0007   76  ROCK1
    DECLE   @@level  + (  1 - 1) + (  0 SHL 8)     ; $0008   80  LEVEL 'A'
@@ckpt_0b:
    DECLE   @@blank  + (  4 - 1)                   ; $0009   81  BLANK
    DECLE   @@caut1  + ( 10 - 1)                   ; $000A   85  CAUTION 1
    DECLE   @@cue    + ( 35 - 1) + CUE.1_pin2_a    ; $000B   95  CUE '1_pin2_a'
    DECLE   @@cue    + ( 20 - 1) + CUE.2_pin2_a    ; $000C  130  CUE '2_pin2_a'
    DECLE   @@exit   + ( 22 - 1) + EXIT.pin2_a     ; $000D  150  EXIT 'pin2_a'
    DECLE   @@exit   + (  1 - 1) + EXIT.pin2_a     ; $000E  172  EXIT 'pin2_a'
    DECLE   @@level  + (  1 - 1) + (  1 SHL 8)     ; $000F  173  LEVEL 'B'
@@ckpt_0c:
    DECLE   @@blank  + (  6 - 1)                   ; $0010  174  BLANK
    DECLE   @@rock2  + (  5 - 1)                   ; $0011  180  ROCK2
    DECLE   @@caut3  + ( 19 - 1)                   ; $0012  185  CAUTION 3
    DECLE   @@cue    + ( 16 - 1) + CUE.minelyr2    ; $0013  204  CUE 'minelyr2'
    DECLE   @@exit   + (  5 - 1) + EXIT.flexit     ; $0014  220  EXIT 'flexit'
    DECLE   @@exit   + ( 14 - 1) + EXIT.flexit     ; $0015  225  EXIT 'flexit'
    DECLE   @@exit   + ( 11 - 1) + EXIT.flexit     ; $0016  239  EXIT 'flexit'
    DECLE   @@exit   + (  5 - 1) + EXIT.flexit     ; $0017  250  EXIT 'flexit'
    DECLE   @@exit   + ( 10 - 1) + EXIT.flexit     ; $0018  255  EXIT 'flexit'
    DECLE   @@rock3  + (  2 - 1)                   ; $0019  265  ROCK3
    DECLE   @@level  + (  1 - 1) + (  2 SHL 8)     ; $001A  267  LEVEL 'C'
@@ckpt_0d:
    DECLE   @@blank  + ( 10 - 1)                   ; $001B  268  BLANK
    DECLE   @@caut1  + ( 10 - 1)                   ; $001C  278  CAUTION 1
    DECLE   @@cue    + ( 17 - 1) + CUE.1_blu2_c    ; $001D  288  CUE '1_blu2_c'
    DECLE   @@cue    + ( 15 - 1) + CUE.2_blu2_b    ; $001E  305  CUE '2_blu2_b'
    DECLE   @@exit   + (  5 - 1) + EXIT.blu2_c     ; $001F  320  EXIT 'blu2_c'
    DECLE   @@cue    + ( 10 - 1) + CUE.1_blu2_a    ; $0020  325  CUE '1_blu2_a'
    DECLE   @@exit   + ( 10 - 1) + EXIT.blu2_b     ; $0021  335  EXIT 'blu2_b'
    DECLE   @@cue    + ( 13 - 1) + CUE.2_blu2_d    ; $0022  345  CUE '2_blu2_d'
    DECLE   @@exit   + (  1 - 1) + EXIT.blu2_a     ; $0023  358  EXIT 'blu2_a'
    DECLE   @@exit   + (  1 - 1) + EXIT.blu2_d     ; $0024  359  EXIT 'blu2_d'
    DECLE   @@level  + (  1 - 1) + (  3 SHL 8)     ; $0025  360  LEVEL 'D'
@@ckpt_0e:
    DECLE   @@blank  + (  2 - 1)                   ; $0026  361  BLANK
    DECLE   @@cue    + ( 11 - 1) + CUE.1_whit_e    ; $0027  363  CUE '1_whit_e'
    DECLE   @@crat1  + (  6 - 1)                   ; $0028  374  CRAT1
    DECLE   @@cue    + ( 30 - 1) + CUE.2_whit_a    ; $0029  380  CUE '2_whit_a'
    DECLE   @@crat1  + ( 27 - 1)                   ; $002A  410  CRAT1
    DECLE   @@crat1  + ( 16 - 1)                   ; $002B  437  CRAT1
    DECLE   @@level  + (  6 - 1) + ( 36 SHL 8)     ; $002C  453  LEVEL 'k'
    DECLE   @@exit   + (  1 - 1) + EXIT.whit_a     ; $002D  459  EXIT 'whit_a'
    DECLE   @@exit   + (  1 - 1) + EXIT.whit_e     ; $002E  460  EXIT 'whit_e'
    DECLE   @@blank  + (  1 - 1)                   ; $002F  461  BLANK
                                                   ;        462  END


;; ======================================================================== ;;
;;  SUMMARY
;;      TOTAL COMMANDS             22
;;      TOTAL OBJECTS              26
;;      TOTAL WORDS                48
;; ======================================================================== ;;