Initial import.
authorSimon Morgan <sjm@sjm.io>
Fri, 26 Jun 2015 17:06:01 +0000 (18:06 +0100)
committerSimon Morgan <sjm@sjm.io>
Fri, 26 Jun 2015 17:06:01 +0000 (18:06 +0100)
15 files changed:
CIRTAB78.SCR [new file with mode: 0644]
CLNTAB78.SCR [new file with mode: 0644]
CRDTAB78.SCR [new file with mode: 0644]
GOLTAB78.SCR [new file with mode: 0644]
HATRICK.SCR [new file with mode: 0644]
HOCKEY.SCR [new file with mode: 0644]
HOCKEY.SML [new file with mode: 0644]
HOKTAB78.SCR [new file with mode: 0644]
ME.TTP [new file with mode: 0644]
NGLTAB78.SCR [new file with mode: 0644]
NUMTAB78.SCR [new file with mode: 0644]
SCOTAB78.SCR [new file with mode: 0644]
TTLTAB78.SCR [new file with mode: 0644]
TWBTAB78.SCR [new file with mode: 0644]
ZAMTAB78.SCR [new file with mode: 0644]

diff --git a/CIRTAB78.SCR b/CIRTAB78.SCR
new file mode 100644 (file)
index 0000000..59aaee0
--- /dev/null
@@ -0,0 +1 @@
+009C C,  0076 C,  00D8 C,  0004 C,                              00A6 C,  0076 C,  00D8 C,  0004 C,                              
\ No newline at end of file
diff --git a/CLNTAB78.SCR b/CLNTAB78.SCR
new file mode 100644 (file)
index 0000000..7e2398d
--- /dev/null
@@ -0,0 +1 @@
+001D C,  0053 C,  00F0 C,  0002 C,                              002A C,  009C C,  00F0 C,  0002 C,                              002E C,  0082 C,  00E8 C,  0001 C,                              004C C,  0082 C,  00E8 C,  0001 C,                              006A C,  0096 C,  00E8 C,  0001 C,                              0074 C,  009C C,  00E8 C,  0001 C,                              0078 C,  007F C,  00F0 C,  0001 C,                              0079 C,  0017 C,  00E8 C,  0001 C,                              0082 C,  0017 C,  00E8 C,  0001 C,                              
\ No newline at end of file
diff --git a/CRDTAB78.SCR b/CRDTAB78.SCR
new file mode 100644 (file)
index 0000000..3dce7ba
--- /dev/null
@@ -0,0 +1 @@
+000A C,  0058 C,  00EC C,  0001 C,                              0012 C,  005D C,  00EC C,  0001 C,                              
\ No newline at end of file
diff --git a/GOLTAB78.SCR b/GOLTAB78.SCR
new file mode 100644 (file)
index 0000000..39b7ee4
--- /dev/null
@@ -0,0 +1 @@
+0060 C,  001E C,  00CE C,  0002 C,                              0062 C,  001E C,  00CE C,  0002 C,                              0064 C,  001E C,  00CE C,  0002 C,                              0066 C,  001E C,  00CE C,  0002 C,                              0068 C,  001E C,  00CE C,  0002 C,                              006A C,  001E C,  00CE C,  0002 C,                              
\ No newline at end of file
diff --git a/HATRICK.SCR b/HATRICK.SCR
new file mode 100644 (file)
index 0000000..f8b2781
--- /dev/null
@@ -0,0 +1 @@
+( ATARI 7800 operating system + FORTH          00:01 05/22/86 ) ( 6502 FORTH for ROM                           16:13 06/28/85 ) ( This file contains proprietary code and is Copyright 1986 )   ( by Ibid Inc., Hartford, CT )                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  ( SYSTEM COMPILATION FLAGS   ATARI 7800        11:24 06/27/85 )   .NOLIST                                                                                                                       HEX                                                             4000 C000         ROM   ( 8000 -UP for now...)                  1800 1000         RAM   ( 1800 -27FF -- with holes )            FFFF EQU EM                                                     -HEADERS                                                                                                                        ( FORTH VERSION NUMBER EQUATES )                                                                                                DECIMAL                                                          3 EQU LMS-REL   1 EQU LMS-VER   0 EQU LMS-REV                  06 EQU REL-MON  27 EQU REL-DAY   85 EQU REL-YR                  HEX                                                                                                                             ( ATARI 7800 DEVICE CONTROL REGISTERS - ZERO PAGE    05/22/86 ) HEX                                                             01  EQU INPTCTRL ( INPUT PORT CONTROL - VBLANK )                08  EQU IPP0     ( PADDLE RIGHT FIRE BUTTON JOY1  = 88)         09  EQU IPP1     ( PADDLE LEFT FIRE BUTTON JOY1 = 89)           0A  EQU IPP2     ( PADDLE RIGHT FIRE BUTTON JOY2 = 8A)          0B  EQU IPP3     ( PADDLE LEFT FIRE BUTTON JOY2 = 8B)           0C  EQU IPF0     ( PLAYER 0 FIRE BUTTON INPUT  )                0D  EQU IPF1     ( PLAYER 1 FIRE BUTTON INPUT  )                15  EQU AUDC0    ( AUDIO CONTROL CHANNEL 0     )                16  EQU AUDC1    ( AUDIO CONTROL CHANNEL 1     )                17  EQU AUDF0    ( AUDIO FREQUENCY CHANNEL 0   )                18  EQU AUDF1    ( AUDIO FREQUENCY CHANNEL 1   )                19  EQU AUDV0    ( AUDIO VOLUME CHANNEL 0      )                1A  EQU AUDV1    ( AUDIO VOLUME CHANNEL 1      )                                                                                ( ATARI 7800 DEVICE CONTROL REGISTERS - ZERO PAGE    05/22/86 )                                                                 20 EQU BACKGRND    ( BACKGROUND COLOR  R/W)                     24 EQU WSYNC       ( WAIT FOR SYNC STROBE)                      28 EQU MSTAT       ( MARIA STATUS RO)                           2C EQU DPPH        ( DISPLAY LIST LIST-DLL-HI ADDR POINTER WO)  30 EQU DPPL        ( DISPLAY LIST LIST-DLL-LO ADDR POINTER WO)  34 EQU CHARBASE    ( CHARACTER BASE ADDRESS - HI ADDR WO)       38 EQU OFFSETREG   ( UNUSED R/W)                                3C EQU CTRL        ( MARIA CONTROL REG WO)                                                                                                                                                                                                                                                                                                                                                                                                                      ( ATARI 7800 DEVICE CONTROL REGISTERS - ZERO PAGE    05/22/86 ) ( BELOW ARE R/W COLOR CONTROL REGS FOR PALETTES 0-7)            21 EQU P0C1    22 EQU P0C2    23 EQU P0C3                       25 EQU P1C1    26 EQU P1C2    27 EQU P1C3                       29 EQU P2C1    2A EQU P2C2    2B EQU P2C3                       2D EQU P3C1    2E EQU P3C2    2F EQU P3C3                       31 EQU P4C1    32 EQU P4C2    33 EQU P4C3                       35 EQU P5C1    36 EQU P5C2    37 EQU P5C3                       39 EQU P6C1    3A EQU P6C2    3B EQU P6C3                       3D EQU P7C1    3E EQU P7C2    3F EQU P7C3                                                                                       ( TIA -- JOYSTICK AND CONSOLE INPUT                   )         0280  EQU  SWCHA ( P0,P1 JOYSTICK DIRECTION  XXXXXXXX )         0282  EQU  SWCHB ( CONSOLE SWITCHES          XXXXXXXX )         0281  EQU  CTLSWA ( I/O CONTROL FOR SWCHA R/W--0/1)             0283  EQU  CTLSWB ( I/O CONTROL FOR SWCHB R/W--0/1)             ( FORTH VIDEO DISPLAY REGISTERS  - ZERO PAGE   11:43 04/23/86 )                                                                 7C EQU VIDSTACK-BASE                                            7D EQU DL-TAB-HOLD                                              7F EQU ELEM-TAB-HOLD       7F EQU STATUS-HOLD                   81 EQU IMAGE-TAB-HOLD      81 EQU SPRITE-HOLD                   83 EQU COUNTER                                                  85 EQU ELEM-HOLD    85 EQU DPP-HOLD                             89 EQU IMAGE-HOLD   85 EQU DPP-HOLD-LO                          8D EQU ST-ZONE      86 EQU DPP-HOLD-HI                          8E EQU ADJ-HOLD                                                 8F EQU INT-FLAG                                                                                                                                                                                                                                                                                                                 ( FORTH AUDIO AND DISPLAY REGISTERS - ZERO     12:42 11/17/86 ) 90 EQU START-VID-STACK ( POINTER TO VIDSTACK BOT )              92 EQU ^CUR-WORKAREA   94 EQU ^CUR-NOTE                         96 EQU   BONUS         97 EQU BG-SCOREAREA                      98 EQU   BG-FREE2      99 EQU BG-FREE3      9A EQU BG-TOP-ICE   9B EQU DX0             9C EQU DY0           9D EQU FB0          9F EQU DX1             A0 EQU DY1           A1 EQU FB1          A2 EQU DLI#            A3 EQU CONSOLE       A4 EQU SCROLL       A5 EQU SCOREFLASH      A6 EQU HHURTS        A7 EQU ACTION-CTR   A8 EQU SND?-FLAG       A9 EQU H-INACTIVE                        AA EQU OBJECT          AC EQU RTAB          AE EQU SYSTIMER     B0 EQU CUR-SND                                                                                                                  ( B2 EQU SND-RAM 16h Bytes -> C6h )                                                                                                                                                             (   Atari  Sound Equates                       16:49 12/05/86 ) DECIMAL                                                         (  Workarea        and            Note equates )                11 EQU WORK-SIZE               6  EQU NOTE-SIZE                 0  EQU DUR                         ( same )                     1  EQU FREQ                        ( same )                     2  EQU VOL                         ( same )                     3  EQU W-FTMR ( counter )      3  EQU N-WAVE                    4  EQU W-FRLD ( timer reload ) 4  EQU N-FSWP  ( ftmr | fchg )   5  EQU W-FCHG ( frq chg )      5  EQU N-VSWP  ( vtmr | vchg )   6  EQU W-VTMR ( counter )                                       7  EQU W-VRLD ( timer reload )                                  8  EQU W-VCHG ( frq chg )                                       9  EQU W-NXT-NOTE                                               0  EQU V0                   1  EQU V1                           HEX                                                             (   Atari  Sound Workareas                     12:42 11/17/86 )                                                                 B2 EQU SND-RAM                                                  SND-RAM                  EQU WORKAREA0                          WORKAREA0 WORK-SIZE +    EQU WORKAREA1                          WORKAREA1 WORK-SIZE +    EQU NEXT-FREE                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                          ( FORTH SYSTEM VARIBLES - N IP W & XSAVE -     12:45 11/17/86 ) 00EF        EQU ^S0          ( data stack )                     00F0        EQU N            ( EF - F7 )                        00F8        EQU IP           ( IP-LO IP-HI 6C  W-LO W-HI )      00FB        EQU W                                               00FD        EQU XSAVE                                           01FF        EQU ^R0          ( return stack )                                                                                   ( ATARI 7800 LIVING COLORS )                                    1F EQU YELLOWISH-GREEN 6F EQU PURPLE  BF EQU GREYISH-GREEN      3F EQU SALMON       7F EQU BLUE        DF EQU LIME-GREEN        4F EQU PINK         8F EQU BLUE1       CF EQU GREEN             5F EQU LAVENDER     9F EQU BLUE2       FF EQU COPPER            AF EQU GREYISH-BLUE EF EQU GREENISH-YELLOW                      2F EQU TAN          0F EQU BLUISH-GREY                                                                                          ( FORTH SYSTEM VARIBLES - PAGE 22                    05/22/86 ) 2200        EQU S0         ( base addr hold of param stack )    S0 2+       EQU R0         ( base addr hold of return stack)    R0 2+       EQU <TIB>      ( addr of terminal input buffer )    <TIB> 2+    EQU #TIB       ( length of input stream in TIB )    #TIB 2+     EQU DP         ( next usable addr in dictionary )   DP   2+     EQU VOC-LINK   ( start of vocabulary chain )        VOC-LINK 2+ EQU OUT        ( column count, output )             OUT 2+      EQU  >IN       ( offset into input stream )         >IN   2+    EQU STATE      ( 0=interpreting -1=compiling)       STATE 2+    EQU BASE       ( current system radix)              BASE  2+    EQU DPL        ( # of decimal places in DOUBLE#)    DPL   2+    EQU CSP        ( compiler security, stack position) CSP   2+    EQU HLD        ( addr of forming output string)     HLD   2+    EQU SPAN       ( length of string read with EXPECT) SPAN  2+    EQU CONTEXT    ( vocabulary first in search order)  ( FORTH MISC SYSTEM VARIBLES - PAGES 0,2 & 21  14:35 06/23/86 ) 200 ^R0 0FF AND - EQU *R0       ( offset for ,X addressing )                                                                    2100  EQU ^TIB                  ( Forth terminal input buffer )                                                                 28    EQU TIB_LEN               ( length of terminal inp buff ) 8     EQU BSIN                  ( backspace char )                                                                              DECIMAL                                                         160 EQU RIGHT-WALL                                              0   EQU LEFT-WALL                                               HEX                                                                                                                                                                                                                                                                                                                             ( GRAPHICS SCREEN DLL LAYOUT - PAGE 18         14:05 05/02/86 ) HEX 1810 EQU GBORDERA    GBORDERA 3 + EQU GBORDERB              GBORDERB 3 + EQU GBORDERC    GBORDERC 3 + EQU GLINE0            GLINE0  3 +  EQU GLINE1      GLINE1   3 + EQU GLINE2            GLINE2  3 +  EQU GLINE3      GLINE3   3 + EQU GLINE4            GLINE4  3 +  EQU GLINE5      GLINE5   3 + EQU GLINE6            GLINE6  3 +  EQU GLINE7      GLINE7   3 + EQU GLINE8            GLINE8  3 +  EQU GLINE9      GLINE9   3 + EQU GLINE10           GLINE10 3 +  EQU GLINE11     GLINE11  3 + EQU GLINE12           GLINE12 3 +  EQU GLINE13     GLINE13  3 + EQU GLINE14           GLINE14 3 +  EQU GLINE15     GLINE15  3 + EQU GLINE16           GLINE16 3 +  EQU GLINE17     GLINE17  3 + EQU GLINE18           GLINE18 3 +  EQU GLINE19     GLINE19  3 + EQU GLINE20           GLINE20 3 +  EQU GLINE21     GLINE21  3 + EQU GLINE22           GLINE22 3 +  EQU GLINE23     GLINE23  3 + EQU GBORDERD          GBORDERD 3 + EQU GBORDERE    GBORDERE 3 + EQU GBORDERF          ( GRAPHICS SCREEN DL LAYOUT -  PAGE 22         14:50 06/23/86 ) 2220         EQU GNULL     GNULL 4 + EQU DL-TABLE-START         DL-TABLE-START EQU GNE0      GNE0   3E + EQU GNE1               GNE1    3E +   EQU GNE2      GNE2   3E + EQU GNE3               GNE3    3E +   EQU GNE4      GNE4   3E + EQU GNE5               GNE5    3E +   EQU GNE6      GNE6   3E + EQU GNE7               GNE7    3E +   EQU GNE8      GNE8   3E + EQU GNE9               GNE9    3E +   EQU GNE10     GNE10  3E + EQU GNE11              GNE11   3E +   EQU GNE12     GNE12  3E + EQU GNE13              GNE13   3E +   EQU GNE14     GNE14  3E + EQU GNE15              GNE15   3E +   EQU GNE16     GNE16  3E + EQU GNE17              GNE17   3E +   EQU GNE18     GNE18  3E + EQU GNE19              GNE19   3E +   EQU GNE20     GNE20  3E + EQU GNE21              GNE21   3E +   EQU GNE22     GNE22  3E + EQU GNE23              GNE23   3E +   EQU 5BYTE                                        GBORDERA EQU ZONE-LIST                                          (                                              14:35 12/01/86 ) GBORDERF     6 +  EQU TEST-COUNT                                TEST-COUNT  10 +  EQU PLAYERS-ETAB                              PLAYERS-ETAB          EQU BLUE-ALTER  ( **PLAYERS-ETAB)         BLUE-ALTER        1+  EQU BLUE-IMAGE#                           BLUE-IMAGE#       1+  EQU BLUE-X                                BLUE-X            1+  EQU BLUE-Y                                BLUE-Y            1+  EQU REDD-ALTER                            REDD-ALTER        1+  EQU REDD-IMAGE#                           REDD-IMAGE#       1+  EQU REDD-X                                REDD-X            1+  EQU REDD-Y                                REDD-Y             1+   EQU BLUE-GOALY-ALTER                    BLUE-GOALY-ALTER   1+   EQU BLUE-GOALY-IMAGE#                   BLUE-GOALY-IMAGE#  1+   EQU BLUE-GOALY-X                        BLUE-GOALY-X       1+   EQU BLUE-GOALY-Y                                                                                        ( BURST ELEMENT-TABLE  & SCORE ELEMENT TABLE   15:27 08/25/86 ) BLUE-GOALY-Y       1+   EQU REDD-GOALY-ALTER                    REDD-GOALY-ALTER   1+   EQU REDD-GOALY-IMAGE#                   REDD-GOALY-IMAGE#  1+   EQU REDD-GOALY-X                        REDD-GOALY-X       1+   EQU REDD-GOALY-Y                        REDD-GOALY-Y       1+   EQU PUCK-ALTER                          PUCK-ALTER         1+   EQU PUCK-IMAGE#                         PUCK-IMAGE#        1+   EQU PUCK-X                              PUCK-X             1+   EQU PUCK-Y                              PUCK-Y             1+   EQU END-TABLE-PLUG  ( **GAMEVARS)       END-TABLE-PLUG    60 +  EQU SCOREBOARD-ETAB ( **SCORE-ETAB)     SCOREBOARD-ETAB   40 +  EQU NUMBERS-ETAB    ( **NUMBERS-ETAB)   NUMBERS-ETAB      40 +  EQU NETGOAL-ETAB    ( **NETGOAL-ETAB)   NETGOAL-ETAB      40 +  EQU CENTERLINES-ETAB  ( **C-LINES-ETAB) CENTERLINES-ETAB  40 +  EQU BORDER-ETAB     ( **BORDER-ETAB)                                                                    ( VARIOUS STORES AND HOLDS                     15:57 08/25/86 ) NUMBERS-ETAB EQU NUM0-A                                         NUM0-A 1+ EQU NUM0-N   NUM0-N 3 + EQU NUM1-A                    NUM1-A 1+ EQU NUM1-N   NUM1-N 3 + EQU NUM2-A                    NUM2-A 1+ EQU NUM2-N   NUM2-N 3 + EQU NUM3-A                    NUM3-A 1+ EQU NUM3-N   NUM3-N 3 + EQU NUM4-A                    NUM4-A 1+ EQU NUM4-N   NUM4-N 3 + EQU NUM5-A                    NUM5-A 1+ EQU NUM5-N   NUM5-N 3 + EQU NUM6-A                    NUM6-A 1+ EQU NUM6-N   NUM6-N 3 + EQU NUM7-A                    NUM7-A 1+ EQU NUM7-N   NUM7-N 3 + EQU NUM8-A                    NUM8-A 1+ EQU NUM8-N   NUM8-N 3 + EQU NUM9-A                    NUM9-A 1+ EQU NUM9-N   NUM9-N 3 + EQU NUMA-A                    NUMA-A 1+ EQU NUMA-N                                             ( BLUE SCORE NUMS: 0 & 1    RED SCORE NUMS: 2 & 3 )             ( CLOCK NUMS: 4, 5 & 6 )                                        ( BLUE SAVES NUMS: 7 & 8    RED SAVES NUMS: 9 & A )            ( VARIOUS STORES AND HOLDS                     15:57 08/25/86 ) NETGOAL-ETAB EQU BUT-A                                          BUT-A  1+ EQU BUT-I BUT-I 3 + EQU BLT-A                         BLT-A  1+ EQU BLT-I BLT-I 3 + EQU RUT-A                         RUT-A  1+ EQU RUT-I RUT-I 3 + EQU RLT-A                         RLT-A  1+ EQU RLT-I RLT-I 3 + EQU NETPLUG                                                                                       TEST-COUNT 1+   EQU TIMER                                       TIMER 1+        EQU SECONDS                                     SECONDS 1+      EQU MINUTES                                     MINUTES 1+      EQU PLAYER1-FEET                                PLAYER1-FEET 1+ EQU PLAYER2-FEET                                                                                                                                                                                                                                                                                                ( cold start entry point                       12:35 06/22/85 )                                                                 ASSEMBLER                                                       L: RESET    NOP ECLD JMP          ( jump to cold start )        L: NMI      VIDEO-INT-RTN JMP                                   L: IRQ      RTI                                                                                                                 FORTH                                                           L: INIT-FORTH 0 ,     ( link to top of FORTH voc )              L: INIT-S0    ^S0 ,   ( initial S0 )                            L: INIT-R0    ^R0 ,   ( initial R0 )                            L: INIT-TIB   ^TIB ,  ( initial <TIB> )                         L: INIT-DP    0 ,     ( initial DP )                                                                                            THERE LABEL NO_SKIP  2 ALLOT-RAM                                                                                                ( inner interpreter                            11:58 02/08/85 ) ASSEMBLER                                                       L: POP3         INX  INX                                        L: POP2         INX  INX                                        L: POP          INX  INX                                                        NEXT JMP                                                                                                        L: PUSH         DEX  DEX                                        L: PUT          TOS 1+ STA  PLA           TOS STA               L: NEXT         1 # LDY     IP )Y LDA     W 1+ STA                              DEY         IP )Y LDA     W STA                                 CLC                                                             IP LDA      2 # ADC       IP STA                                CS  IF      IP 1+ INC     THEN                                  W 1 - JMP                                                                                                       ( logical flags                                16:51 06/19/85 ) L: POP3-TRUE    INX  INX                                        L: POP2-TRUE    INX  INX                                        L: POP-TRUE     INX  INX  SET-TRUE JMP                          L: PUSH-TRUE    DEX  DEX                                        L: SET-TRUE     0FF # LDA  TOS STA  TOS 1+ STA                                  NEXT JMP                                                                                                        L: POP3-FALSE   INX INX                                         L: POP2-FALSE   INX INX                                         L: POP-FALSE    INX  INX  SET-FALSE JMP                         L: PUSH-FALSE   DEX  DEX                                        L: SET-FALSE    0 # LDA  TOS STA  TOS 1+ STA                                    NEXT JMP                                                                                                        FORTH                                                           ( ECLD -- 7800 STARTUP, THEN FORTH INIT        13:29 05/19/86 )                                                                 PROC ECLD                  ( 7800 STARTUP ----INSERTED  )         07 # LDA  INPTCTRL STA   ( LATCH INTO 3600 MODE )               SEI CLD                                                         7F # LDA      CTRL STA   ( CONTROL REG -- DMA OFF )             00 # LDY OFFSETREG STY   ( OFFSET -- 00 )                       01 # LDA INPTCTRL STA    ( NOW JOYSTICK ANTIFREEZE--?????)      CTLSWA STY  14 # LDA     ( 281 -- INIT JOYSTICK READ 6531)      CTLSWB STA               ( 283 -- INIT CONSOLE READ  6531)      AUDV0 STY                ( ZERO AUDIO VOLUME )                  AUDV1 STY                ( ZERO AUDIO VOLUME )                                                                                                                                                                                                                                                                                ( ECLD continued machine cold start            00:47 05/22/86 )                                                                   ( FORTH VIRTUAL MACHINE INIT )                                  ' COLD  >BODY  >HI #  LDA    IP 1+ STA       ( init IP )        ' COLD  >BODY  >LO #  LDA    IP STA                             06C # LDA   W 1- STA  ( init W with JMP-IND opcode )            0FF # LDX TXS         ( init RP )                               ^S0 # LDX             ( init SP )                               NEXT JMP END-PROC                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                             ( COLD                                         23:47 05/22/86 ) : COLD INIT-S0 @ S0 !                                                  INIT-R0 @ R0 !                                                  INIT-TIB @ <TIB> !                                              INIT-DP @ DP !                                                  INIT-FORTH @ CONTEXT !                                          STATE OFF   >IN OFF                                             DPL OFF     OUT OFF                                             SPAN OFF    NO_SKIP OFF                                         40 7F ERASE                                                     1800 [ 2000 1800 - ] LITERAL ERASE ( zero all this)             2220 [ 2800 2220 - ] LITERAL ERASE ( skip system vars )         ( AUDIO-OFF ) VIDEO DECIMAL ABORT ;                                                                                                                                                                                                                      ( INITIALIZE VIDEO & AUDIO INTERFACES          15:09 06/23/86 ) ( CODE AUDIO-OFF 0 # LDA AUDIO-CLR JSR                                         1 # LDA AUDIO-CLR JSR NEXT JMP END-CODE  )       CODE VIDEO ( -- ) XSAVE STX START-VIDEO JSR XSAVE LDX                NEXT JMP END-CODE                                                                                                          ( abort bye mon ABORT                          10:58 06/21/85 ) 0 CONSTANT ABVAR  ( INIT in open code: ' top-word ' ABVAR ! )                                                                   : abort    S0 @ SP!  DECIMAL  STATE OFF ( QUIT ) ;                                                                              : ABORT ABVAR EXECUTE ;                                                                                                         CODE GRAPHICS-MODE XSAVE STX START-VIDEO JSR XSAVE LDX               NEXT JMP END-CODE                                                                                                          HERE EQU G-WAITING-DLL  ( PRE-MADE DLL TABLE CMOVED INTO PLACE) ASSEMBLER  88 C, 5BYTE >HI C, 5BYTE >LO C, ( BORDER T1 BG-SCRAR) 07 C, GNULL >HI C, GNULL >LO C,  ( BORDER T2)                   07 C, GNULL >HI C, GNULL >LO C,  ( BORDER T3)                   07 C, GNE0  >HI C, GNE0  >LO C,  ( ZONE  0 )                    07 C, GNE1  >HI C, GNE1  >LO C,  ( ZONE  1 )                    07 C, GNE2  >HI C, GNE2  >LO C,  ( ZONE  2 )                    07 C, GNE3  >HI C, GNE3  >LO C,  ( ZONE  3 )                    87 C, GNE4  >HI C, GNE4  >LO C,  ( ZONE  4 BG-TOP-ICE)          07 C, GNE5  >HI C, GNE5  >LO C,  ( ZONE  5 )                    07 C, GNE6  >HI C, GNE6  >LO C,  ( ZONE  6 )                    07 C, GNE7  >HI C, GNE7  >LO C,  ( ZONE  7 )                    07 C, GNE8  >HI C, GNE8  >LO C,  ( ZONE  8 )                    07 C, GNE9  >HI C, GNE9  >LO C,  ( ZONE  9 )                    07 C, GNE10 >HI C, GNE10 >LO C,  ( ZONE 10 )                    07 C, GNE11 >HI C, GNE11 >LO C,  ( ZONE 11 )                    07 C, GNE12 >HI C, GNE12 >LO C,  ( ZONE 12 )                    07 C, GNE13 >HI C, GNE13 >LO C,  ( ZONE 13 )                    07 C, GNE14 >HI C, GNE14 >LO C,  ( ZONE 14 )                    07 C, GNE15 >HI C, GNE15 >LO C,  ( ZONE 15 )                    07 C, GNE16 >HI C, GNE16 >LO C,  ( ZONE 16 )                    07 C, GNE17 >HI C, GNE17 >LO C,  ( ZONE 17 )                    07 C, GNE18 >HI C, GNE18 >LO C,  ( ZONE 18 )                    07 C, GNE19 >HI C, GNE19 >LO C,  ( ZONE 19 )                    07 C, GNE20 >HI C, GNE20 >LO C,  ( ZONE 20 )                    07 C, GNE21 >HI C, GNE21 >LO C,  ( ZONE 21 )                    07 C, GNE22 >HI C, GNE22 >LO C,  ( ZONE 22 )                    87 C, GNE23 >HI C, GNE23 >LO C,  ( ZONE 23 BOTTOM-ICE)          07 C, GNULL >HI C, GNULL >LO C,  ( BORDER B1)                   07 C, GNULL >HI C, GNULL >LO C,  ( BORDER B2)                   07 C, GNULL >HI C, GNULL >LO C,  ( BORDER B3)                   07 C, GNULL >HI C, GNULL >LO C,  ( BORDER B4)                  ( COLD START VIDEO INITIALIZATION   1/3        11:08 05/07/86 ) HEX                                                             PROC  START-VIDEO                                               60 # LDA   CTRL STA ( MARIA NO DMA )                            DEX DEX DEX DEX ( MAKE ROOM ON STACK )                          G-WAITING-DLL >HI # LDA  NOS 1+ STA  ( ADDR OF ROM IMAGE )      G-WAITING-DLL >LO # LDA  NOS    STA  ( GRAPHICS DLL TABLE LODD) ZONE-LIST >HI # LDA TOS 1+ STA  ( ADDR OF RAM IMAGE OF THE)     ZONE-LIST >LO # LDA TOS    STA  ( GRAPHICS DLL TABLE LOADED)    6D # LDY BEGIN                                                           2 X) LDA 0 X) STA  ( 90 BYTE DLL TABLE TRANSFERED)              TOS INC 0= IF TOS 1+ INC THEN                                   NOS INC 0= IF NOS 1+ INC THEN                                   DEY 0= UNTIL                                                                                                                                                                           ( COLD START VIDEO INITIALIZATION  2/3         11:08 05/07/86 ) 5BYTE STY 5BYTE 5 + STY 5BYTE 6 + STY          ( SPECIAL 5BYTE) 5BYTE 8 + STY  B0 # LDY 5BYTE 7 + STY                           40 # LDY 5BYTE 1+  STY B0 # LDY 5BYTE 2+  STY  ( HEADER AT END) 1F # LDY 5BYTE 3 + STY AA # LDY 5BYTE 4 + STY  ( OF DL TABLE )  00 # LDA   INT-FLAG STA                                         7C # LDA START-VID-STACK STA  1 # LDA DLI# STA                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  ( INITIAL VBLANK VIDEO-INIT    3/3             12:36 06/03/86 ) BEGIN MSTAT BIT 0< UNTIL ( THEN WAIT FOR VBLANK )               ZONE-LIST >HI # LDA   DPPH  STA ( DPPH LOADED )                 ZONE-LIST >LO # LDA   DPPL  STA ( DPPL LOADED )                    ( 48)  40  # LDA   CTRL  STA ( MARIA DMA ON-NO BORDER XTND)  0F # LDA P0C1 STA 76 # LDA P0C2 STA 00 # LDA P0C3 STA ( PAL 0)  2F # LDA P1C1 STA 46 # LDA P1C2 STA 00 # LDA P1C3 STA ( PAL 1)  0F # LDA P2C1 STA 76 # LDA P2C2 STA 46 # LDA P2C3 STA ( PAL 2)  2F # LDA P3C1 STA 08 # LDA P3C2 STA 00 # LDA P3C3 STA ( PAL 3)  58 # LDA P4C1 STA 54 # LDA P4C2 STA 50 # LDA P4C3 STA ( PAL 4)  2F # LDA P5C1 STA 2F # LDA P5C2 STA 2F # LDA P5C3 STA ( PAL 5)  00 # LDA P6C1 STA 00 # LDA P6C2 STA 00 # LDA P6C3 STA ( PAL 6)  0A # LDA P7C1 STA 0A # LDA P7C2 STA 0A # LDA P7C3 STA ( PAL 7)  INX INX INX INX RTS END-PROC                                                                                                                                                                    ( TEXT MODE RAM DISTRIBUTION                   16:13 08/04/86 ) 1810      EQU RAM-TEXT-DLL  18F0 EQU RAM-TEXT-DLS               1A00      EQU RAM-CHARMAPS                                      18F0      EQU BLANK   1A00          EQU CM-BLANK                BLANK 7 + EQU FP1     CM-BLANK 10 + EQU CM-FP1                  FP1   7 + EQU FP2     CM-FP1   10 + EQU CM-FP2                  FP2   7 + EQU FP3     CM-FP2   10 + EQU CM-FP3                  FP3   7 + EQU FP4     CM-FP3   10 + EQU CM-FP4                  FP4   7 + EQU FP5     CM-FP4   10 + EQU CM-FP5                  FP5   7 + EQU FP6     CM-FP5   10 + EQU CM-FP6                  FP6   7 + EQU FP7     CM-FP6   10 + EQU CM-FP7                  FP7   7 + EQU FP8     CM-FP7   10 + EQU CM-FP8                  FP8   7 + EQU FP9     CM-FP8   10 + EQU CM-FP9                  FP9   7 + EQU FP10    CM-FP9   10 + EQU CM-FP10                 FP10  7 + EQU FP11    CM-FP10  10 + EQU CM-FP11                 FP11  7 + EQU FP12    CM-FP11  10 + EQU CM-FP12                 ( TEXT MODE RAM DISTRIBUTION                   16:13 08/04/86 ) FP12  7 + EQU FP13    CM-FP12  10 + EQU CM-FP13                 FP13  7 + EQU FP14    CM-FP13  10 + EQU CM-FP14                 FP14  7 + EQU FP15    CM-FP14 10 + EQU CM-FP15                  FP15  7 + EQU SP1     CM-FP15 10 + EQU CM-SP1                   SP1   7 + EQU SP2     CM-SP1  10 + EQU CM-SP2                   SP2   7 + EQU SP3     CM-SP2  10 + EQU CM-SP3                   SP3   7 + EQU SP4     CM-SP3  10 + EQU CM-SP4                   SP4   7 + EQU SP5     CM-SP4  10 + EQU CM-SP5                   SP5   7 + EQU SP6     CM-SP5  10 + EQU CM-SP6                   SP6   7 + EQU SP7     CM-SP6  10 + EQU CM-SP7                   SP7   7 + EQU SP8     CM-SP7  10 + EQU CM-SP8                   SP8   7 + EQU SP9     CM-SP8  10 + EQU CM-SP9                   SP9   7 + EQU SP10    CM-SP9  10 + EQU CM-SP10                  SP10  7 + EQU TP1     CM-SP10 10 + EQU CM-TP1                   TP1   7 + EQU TP2     CM-TP1  10 + EQU CM-TP2                   ( TEXT MODE RAM DISTRIBUTION                   16:13 08/04/86 ) TP2   7 + EQU TP3     CM-TP2  10 + EQU CM-TP3                   TP3   7 + EQU TP4     CM-TP3  10 + EQU CM-TP4                   TP4   7 + EQU TP5     CM-TP4  10 + EQU CM-TP5                   TP5   7 + EQU TP6     CM-TP5  10 + EQU CM-TP6                   TP6   7 + EQU TP7     CM-TP6  10 + EQU CM-TP7                   TP7   7 + EQU TP8     CM-TP7  10 + EQU CM-TP8                   TP8   7 + EQU TP9     CM-TP8  10 + EQU CM-TP9                   TP9   7 + EQU TP10    CM-TP9  10 + EQU CM-TP10                  TP10  7 + EQU TP11    CM-TP10 10 + EQU CM-TP11                                                                                                                                                                                                                                                                                                                                                                                                                  HERE EQU ROM-TEXT-DLL (  PRE-MADE DLL TABLE)                              ASSEMBLER                                              0B C, BLANK >HI C, BLANK >LO C,  ( ROM-IMAGE>>RAM ADDR 1810)    0B C, BLANK >HI C, BLANK >LO C,  ( LEN: 207 ENDS: 18DF     )    0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 ( PRE-MADE DLL TABLE CMOVED INTO SLOT)                          0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C, HERE EQU TITLE-DLLS             0B C, FP1   >HI C, FP1   >LO C,                                 0B C, FP2   >HI C, FP2   >LO C,                                 0B C, FP3   >HI C, FP3   >LO C,                                 0B C, FP4   >HI C, FP4   >LO C,                                 0B C, FP5   >HI C, FP5   >LO C,                                 0B C, FP6   >HI C, FP6   >LO C,                                 0B C, FP7   >HI C, FP7   >LO C,                                 0B C, FP8   >HI C, FP8   >LO C,                                 ( PRE-MADE DLL TABLE CMOVED INTO SLOT)                          0B C, FP9   >HI C, FP9   >LO C,                                 0B C, FP10  >HI C, FP10  >LO C,                                 0B C, FP11  >HI C, FP11  >LO C,                                 0B C, FP12  >HI C, FP12  >LO C,                                 0B C, FP13  >HI C, FP13  >LO C,                                 0B C, FP14  >HI C, FP14  >LO C,                                 0B C, FP15  >HI C, FP15  >LO C,                                 8B C, BLANK >HI C, BLANK >LO C,                                 8B C, SP1   >HI C, SP1   >LO C,                                 0B C, SP2   >HI C, SP2   >LO C,                                 0B C, SP3   >HI C, SP3   >LO C,                                 0B C, SP4   >HI C, SP4   >LO C,                                 0B C, SP5   >HI C, SP5   >LO C,                                 0B C, SP6   >HI C, SP6   >LO C,                                 0B C, SP7   >HI C, SP7   >LO C,                                 ( PRE-MADE DLL TABLE CMOVED INTO SLOT)                          0B C, SP8   >HI C, SP8   >LO C,                                 0B C, SP9   >HI C, SP9   >LO C,                                 0B C, SP10  >HI C, SP10  >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, TP1   >HI C, TP1   >LO C,                                 0B C, TP2   >HI C, TP2   >LO C,                                 0B C, TP3   >HI C, TP3   >LO C,                                 0B C, TP4   >HI C, TP4   >LO C,                                 0B C, TP5   >HI C, TP5   >LO C,                                 0B C, TP6   >HI C, TP6   >LO C,                                 0B C, TP7   >HI C, TP7   >LO C,                                 0B C, TP8   >HI C, TP8   >LO C,                                 0B C, TP9   >HI C, TP9   >LO C,                                 0B C, TP10  >HI C, TP10  >LO C,                                 0B C, TP11  >HI C, TP11  >LO C,                                 ( PRE-MADE DLL TABLE CMOVED INTO SLOT)                          0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                 0B C, BLANK >HI C, BLANK >LO C,                                                                                                                                                                                                                                                                                                HEX HERE EQU ROM-TEXT-DLS (  PRE-MADE DL TABLE  )               CM-BLANK >LO C, 60 C, CM-BLANK >HI C, 10 C, 14 C,   0 C, 0 C,   CM-FP1   >LO C, 60 C, CM-FP1   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-FP2   >LO C, 60 C, CM-FP2   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-FP3   >LO C, 60 C, CM-FP3   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-FP4   >LO C, 60 C, CM-FP4   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-FP5   >LO C, 60 C, CM-FP5   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-FP6   >LO C, 60 C, CM-FP6   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-FP7   >LO C, 60 C, CM-FP7   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-FP8   >LO C, 60 C, CM-FP8   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-FP9   >LO C, 60 C, CM-FP9   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-FP10  >LO C, 60 C, CM-FP10  >HI C, 10 C, 14 C,   0 C, 0 C,   CM-FP11  >LO C, 60 C, CM-FP11  >HI C, 10 C, 14 C,   0 C, 0 C,   CM-FP12  >LO C, 60 C, CM-FP12  >HI C, 10 C, 14 C,   0 C, 0 C,   CM-FP13  >LO C, 60 C, CM-FP13  >HI C, 10 C, 14 C,   0 C, 0 C,   CM-FP14  >LO C, 60 C, CM-FP14  >HI C, 10 C, 14 C,   0 C, 0 C,    ( PRE-MADE DL TABLE CMOVED INTO SLOT)                          CM-FP15  >LO C, 60 C, CM-FP15  >HI C, 10 C, 14 C,   0 C, 0 C,   CM-SP1   >LO C, 60 C, CM-SP1   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-SP2   >LO C, 60 C, CM-SP2   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-SP3   >LO C, 60 C, CM-SP3   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-SP4   >LO C, 60 C, CM-SP4   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-SP5   >LO C, 60 C, CM-SP5   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-SP6   >LO C, 60 C, CM-SP6   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-SP7   >LO C, 60 C, CM-SP7   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-SP8   >LO C, 60 C, CM-SP8   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-SP9   >LO C, 60 C, CM-SP9   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-SP10  >LO C, 60 C, CM-SP10  >HI C, 10 C, 14 C,   0 C, 0 C,   CM-TP1   >LO C, 60 C, CM-TP1   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-TP2   >LO C, 60 C, CM-TP2   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-TP3   >LO C, 60 C, CM-TP3   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-TP4   >LO C, 60 C, CM-TP4   >HI C, 10 C, 14 C,   0 C, 0 C,    ( PRE-MADE DL TABLE CMOVED INTO SLOT)                          CM-TP5   >LO C, 60 C, CM-TP5   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-TP6   >LO C, 60 C, CM-TP6   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-TP7   >LO C, 60 C, CM-TP7   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-TP8   >LO C, 60 C, CM-TP8   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-TP9   >LO C, 60 C, CM-TP9   >HI C, 10 C, 14 C,   0 C, 0 C,   CM-TP10  >LO C, 60 C, CM-TP10  >HI C, 10 C, 14 C,   0 C, 0 C,   CM-TP11  >LO C, 60 C, CM-TP11  >HI C, 10 C, 14 C,   0 C, 0 C,                                                                   ( BEGINS 18F0 LEN: 259 ENDS : 19F3 )                                                                                                                                                                                                                                                                                                                                                                                                                            HERE EQU ROM-CHARMAPS  (  PRE-MADE CHAR MAPS)                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                   (                                              16:03 09/11/86 ) ," HATRICK,  THE ATARI 7800 VERSION, BY JACK SANDBERG, SR. SOFTWARE ENGINEER, ibid inc., WEST HARTFORD, CT VER. 1.0 04/16/87 -- SECURITY STRING  DO NOT REMOVE"                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ( TEXT MODE INITIALIZATION                     12:49 08/05/86 ) 0 .IF                                                           D2 EQU TEXT-DLL-LEN  103 EQU TEXT-DLS-LEN  250 EQU CHARMAPS-LEN FORTH                                                           : TEXT-MODE                                                       BEGIN ?VBLANK UNTIL                                             60 CTRL C!  ( MARIA OFF ) 00 BACKGRND C!                        ROM-TEXT-DLL RAM-TEXT-DLL TEXT-DLL-LEN CMOVE                    ROM-TEXT-DLS RAM-TEXT-DLS TEXT-DLS-LEN CMOVE                    ROM-CHARMAPS RAM-CHARMAPS CHARMAPS-LEN 2*CMOVE                  18 DUP DPPH C!  DPP-HOLD-HI C!                                  10 DUP DPPL C!  DPP-HOLD-LO C!                                  4A 4A 4A P0C3 C! P0C2 C! P0C1 C!                                F0 CHARBASE C!                                                  BEGIN ?VBLANK UNTIL                                             50 CTRL C! ;  .THEN                                           ( TITLE MODE INITIALIZATION                    12:49 08/05/86 )  0 .IF                                                          : TITLE-MODE                                                      BEGIN ?VBLANK UNTIL                                             60 CTRL C!  ( MARIA OFF ) 00 BACKGRND C!                        ROM-TEXT-DLL RAM-TEXT-DLL TEXT-DLL-LEN CMOVE                    ROM-TEXT-DLS RAM-TEXT-DLS TEXT-DLS-LEN CMOVE                    RAM-CHARMAPS CHARMAPS-LEN 40 FILL                               TITLE-DLLS 1810 ! 1810 C@ DPPL C! 1811 C@ DPPH C!               1F 18 4A P0C3 C! P0C2 C! P0C1 C!                                F0 CHARBASE C!                                                  BEGIN ?VBLANK UNTIL                                             50 CTRL C! ;                                                                                                                  .THEN                                                                                                                           ( TITLE SCREENS DISPLAY RTN                    14:52 09/11/86 ) 0 .IF : TITLE TITLE-MODE                                          BEGIN ?VBLANK UNTIL                                             CREDIT0 CM-FP8 10 2*CMOVE                                       BEGIN ?VBLANK 0= UNTIL 100 0 DO I 0F AND 40 OR P0C3 C!           CONSOLE-CHECK 200 0 DO LOOP LOOP 4A P0C3 C!                    BEGIN ?VBLANK UNTIL                                             CREDIT1A CM-FP6 10 2*CMOVE                                      CREDIT1B CM-FP7 10 2*CMOVE                                      CM-BLANK CM-FP8 10   CMOVE                                      CREDIT2  CM-FP9 10 2*CMOVE                                      CREDIT3A CM-FP11 10 2*CMOVE                                     CREDIT3B CM-FP12 10 2*CMOVE                                     CREDIT3C CM-FP13 10 2*CMOVE                                     BEGIN ?VBLANK 0= UNTIL                                           800 0 DO CONSOLE-CHECK LOOP  ; .THEN                         ( TITLE SCREENS DISPLAY RTN CONT               15:10 09/11/86 ) 0 .IF                                                             BEGIN ?VBLANK UNTIL CREDIT4A CM-FP8 10 2*CMOVE                  CREDIT4B CM-FP9 10 2*CMOVE CREDIT4C CM-FP10 10 2*CMOVE          BEGIN ?VBLANK 0= UNTIL                                           550 0 DO CONSOLE-CHECK LOOP                                    BEGIN ?VBLANK UNTIL CREDIT5A CM-FP8 10 2*CMOVE                  CREDIT5B CM-FP9 10 2*CMOVE CREDIT5C CM-FP10 10 2*CMOVE          BEGIN ?VBLANK 0= UNTIL                                           550 0 DO CONSOLE-CHECK LOOP  ;      .THEN                                                                                                                                                                                                                                                                                                                                                                                                                    ( TEXT-MODE DEDICATED SCROLLER                 12:58 08/05/86 ) 0 .IF : SCROLL-STORY TEXT-MODE  30 0 DO                           BEGIN ?VBLANK UNTIL 0A DPP-HOLD @ C!                            BEGIN ?VBLANK NOT UNTIL 175 0 DO 0 DROP LOOP CONSOLE-CHECK      BEGIN ?VBLANK UNTIL 09 DPP-HOLD @ C!                            BEGIN ?VBLANK NOT UNTIL 175 0 DO 0 DROP LOOP CONSOLE-CHECK      BEGIN ?VBLANK UNTIL 08 DPP-HOLD @ C!                            BEGIN ?VBLANK NOT UNTIL 175 0 DO 0 DROP LOOP CONSOLE-CHECK      BEGIN ?VBLANK UNTIL 07 DPP-HOLD @ C!                            BEGIN ?VBLANK NOT UNTIL 175 0 DO 0 DROP LOOP CONSOLE-CHECK      BEGIN ?VBLANK UNTIL 06 DPP-HOLD @ C!                            BEGIN ?VBLANK NOT UNTIL 175 0 DO 0 DROP LOOP CONSOLE-CHECK      BEGIN ?VBLANK UNTIL 05 DPP-HOLD @ C!                            BEGIN ?VBLANK NOT UNTIL 175 0 DO 0 DROP LOOP CONSOLE-CHECK      BEGIN ?VBLANK UNTIL 04 DPP-HOLD @ C!                            BEGIN ?VBLANK NOT UNTIL 175 0 DO 0 DROP LOOP CONSOLE-CHECK    ( TEXT-MODE DEDICATED SCROLLER  CONT'D         12:58 08/05/86 )   BEGIN ?VBLANK UNTIL 03 DPP-HOLD @ C!                            BEGIN ?VBLANK NOT UNTIL 175 0 DO 0 DROP LOOP CONSOLE-CHECK      BEGIN ?VBLANK UNTIL 02 DPP-HOLD @ C!                            BEGIN ?VBLANK NOT UNTIL 175 0 DO 0 DROP LOOP CONSOLE-CHECK      BEGIN ?VBLANK UNTIL 01 DPP-HOLD @ C!                            BEGIN ?VBLANK NOT UNTIL 175 0 DO 0 DROP LOOP CONSOLE-CHECK      BEGIN ?VBLANK UNTIL 00 DPP-HOLD @ C!                            BEGIN ?VBLANK NOT UNTIL 175 0 DO 0 DROP LOOP CONSOLE-CHECK      DPP-HOLD @ 3 + DPP-HOLD ! BEGIN ?VBLANK UNTIL                   DPP-HOLD-HI C@ DPPH C! DPP-HOLD-LO C@ DPPL C!                   BEGIN ?VBLANK NOT UNTIL LOOP                                    1000 0 DO CONSOLE-CHECK LOOP ;                                                                                                .THEN                                                                                                                           ( INCLUDE ATARI4TH -- MC FORTH NUCLEUS         00:08 05/22/86 ) ( SETUP subroutine                             14:44 03/25/85 )                                                                 PROC SETUP                                                                      A ASL   N 1 - STA                                               BEGIN   TOS LDA                                                         N ,Y STA    INX  INY                                            N 1 - CPY   0=                                          UNTIL   0 # LDY   RTS                           END-PROC                                                                                                                           INCLUDE  F:ATARI4TH (  THE BULK OF FORTH-83 )                                                                                                                                                                                                                                                                                ( NEW-GRAPHICS RTN -VIDEO MAINTENANCE SECTION  16:17 06/03/86 ) CODE (NEW-GRAPHICS) ( DL-TABLE/IMAGE-TAB-START/ELEM-TAB-START )     COUNTER STY ( INITIALIZE TO 0)                              1$: TOS    LDA    ELEM-TAB-HOLD    STA ( REFRESH POINTERS )         TOS 1+ LDA    ELEM-TAB-HOLD 1+ STA ( TO TABLES )                NOS    LDA   IMAGE-TAB-HOLD    STA                              NOS 1+ LDA   IMAGE-TAB-HOLD 1+ STA                              NOS 2+ LDA      DL-TAB-HOLD    STA                              NOS 3 + LDA     DL-TAB-HOLD 1+ STA                          ( ***USING COUNTER TO FIND OUT WHERE ARE IN ELEMENT TABLE***)     COUNTER LDA            ( EACH ELEMENT TABLE ENTRY IS )          A ASL COUNTER 1+ ROL   ( FOUR BYTES LONG             )          A ASL COUNTER 1+ ROL CLC ( OFFSET IS ADDED TO BASE OF ELEMENT)  ELEM-TAB-HOLD ADC ELEM-TAB-HOLD STA  ( TABLE TO FIND ENTRY )    ELEM-TAB-HOLD 1+ LDA COUNTER 1+ ADC ELEM-TAB-HOLD 1+ STA        0 # AND COUNTER 1+ STA  ( NOTE THAT COUNTER NOT SHIFTED )     ( NEW-GRAPHICS RTN -VIDEO MAINTENANCE SECTION  16:17 06/03/86 ) ( LOADING ELEM-TABLE )                                            XSAVE STX         0 # LDX                                       ELEM-TAB-HOLD X) LDA                                            ELEM-HOLD STA                                                   ELEM-HOLD BIT       ( ***TEST FIRST BYTE OF ELEMENT ENTRY***)   3$ BVC  4$ JMP 3$:  ( LAST)                                     2$ BMI ( NO ALTER)  5$ JMP 2$:                                  ELEM-HOLD LDA 80 # EOR ELEM-TAB-HOLD X) STA ( RESET ALTER BIT)  3 # LDY   ( BIT 7 IS SET = NEGATIVE )                           BEGIN               ( ***FILL ELEM-HOLD FROM ELEMENT ENTRY***)    ELEM-TAB-HOLD )Y LDA                                            ELEM-HOLD ,Y STA        ( FILLS BACKWARDS )                     DEY 0=                                                        UNTIL                                                                                                                         ( NEW-GRAPHICS RTN -VIDEO MAINTENANCE SECTION  16:17 06/03/86 )   ELEM-HOLD 1+ LDA          ( ***FIND WHERE IMAGE-ENTRY IS***)    0 # LDY   N STY                                                 A ASL   N ROL   ( EACH IMAGE-TABLE-ELEMENT IS)                  A ASL   N ROL   ( FOUR BYTES LONG )                             CLC IMAGE-TAB-HOLD ADC                                          IMAGE-TAB-HOLD STA                                              IMAGE-TAB-HOLD 1+ LDA    ( ADDING IN THIS OFFSET TO BASE)                      N  ADC    ( IMAGE-TABLE ADDR TELLS WHERE TO )    IMAGE-TAB-HOLD 1+ STA    ( PULL 4 IMAGE-ENTRY BYTES FROM)       3 # LDY                                                        BEGIN                       ( ***FILL IMAGE-HOLD WITH ENTRY***)  IMAGE-TAB-HOLD )Y LDA       ( PULLING BYTES INTO IMAGE)         IMAGE-HOLD ,Y STA                ( HOLD FROM IMAGE-TABLE)       DEY 0<                           ( FILLS BACKWARDS )           UNTIL                                                          ( NEW-GRAPHICS RTN -VIDEO MAINTENANCE SECTION  16:17 06/03/86 )   ELEM-HOLD 3 + LDA    ( ***FIND START-ZONE AND ADJUSTMENT***)    PHA                ( PUSH Y )                                   7 # AND 0= NOT IF  IMAGE-HOLD 3 + INC THEN ( #ZONES 1+)         ADJ-HOLD STA   ( Y-REMAINDER IN ADDITIONAL RASTERS)             PLA A LSR A LSR A LSR                                           ST-ZONE STA        ( STARTING ZONE VIA Y /8)                    CLC IMAGE-HOLD 3 + ADC   ( ADJ ZONES # + START ZONE# )          SEC    ( SUM CANNOT BE OVER 25, IF THEN SBC DIFF FROM #ZONES)   19 # SBC 0< NOT IF N STA   IMAGE-HOLD 3 + LDA                   SEC     N SBC   IMAGE-HOLD 3 + STA THEN                         ADJ-HOLD LDA             ( ***ADJUST IMAGE BASE ADDR***)        CLC IMAGE-HOLD 2+ ADC   ( ADD STARTING ADDR OF IMAGE DOWN-)         IMAGE-HOLD 2+ STA   ( WARDS THRU MEMORY SINCE UPSIDEDN)                                                                                                                                   ( NEW-GRAPHICS RTN -VIDEO MAINTENANCE SECTION  16:17 06/03/86 )     0 # LDY  N STY      ( ***FIND START ADDR FOR DL-TABLE***)       ST-ZONE ASL   N ROL   ST-ZONE LDA   N 2+ STA ( STORE 2*)                                    N LDA   N 1+ STA                    ST-ZONE  ASL   N ROL  ST-ZONE  ASL   N ROL  ( 32 * =64*)        ST-ZONE  ASL   N ROL  ST-ZONE  ASL   N ROL  ( MULTIPLY )        ST-ZONE  ASL   N ROL  SEC  ST-ZONE LDA N 2+ SBC ST-ZONE STA     N LDA N 1+ SBC N STA  ( 62*=64*-2*)                             CLC ST-ZONE LDA  DL-TAB-HOLD ADC    DL-TAB-HOLD STA             DL-TAB-HOLD 1+ LDA    N ADC DL-TAB-HOLD 1+ STA  ( ADD=>ZONE)    ELEM-HOLD LDA  0F # AND    ( PRIORITY # )                    A ASL A ASL ( ELEM# * 4 ) CLC DL-TAB-HOLD ADC DL-TAB-HOLD STA   CS IF DL-TAB-HOLD 1+ INC THEN ( DL-ADDR=ST-ZONE*32 + ELEM#*4)                                                                                                                                                                                                  ( NEW-GRAPHICS RTN -VIDEO MAINTENANCE SECTION  16:17 06/03/86 )   ( BASE OF VID-STACK )  7C #  LDX ( STATIC STACK VS DYNAM)         IMAGE-HOLD 3 + LDA PHA TAY ( #ZONES/ITEMS FOR INT RTN)          ELEM-HOLD 2 + LDA                                               IMAGE-HOLD 3 + STA ( HORIZ EMPLACED EXACTLY AS A DL IS)         BEGIN   DEX DEX DEX DEX DEX DEX                              DL-TAB-HOLD   LDA   0 ,X STA    DL-TAB-HOLD 1+ LDA  1 ,X STA    IMAGE-HOLD    LDA   2 ,X STA    IMAGE-HOLD 1+ LDA   3 ,X STA    IMAGE-HOLD 2+ LDA   4 ,X STA    IMAGE-HOLD 3 + LDA   5 ,X STA     IMAGE-HOLD 2+ LDA  SEC 8 # SBC  IMAGE-HOLD 2+ STA               3E # LDA    CLC     DL-TAB-HOLD ADC  DL-TAB-HOLD STA             0 # LDA    DL-TAB-HOLD 1+ ADC DL-TAB-HOLD 1+ STA               DEY 0= UNTIL  ( #ZONES CONTINUOUSLY DEC'D)                      START-VID-STACK STX   PLA     INT-FLAG STA                   ( STORING LOCATION OF USERSTACK TOP AND #TIEMS ON IT )                                                                          ( NEW-GRAPHICS RTN -VIDEO MAINTENANCE SECTION  16:17 06/03/86 ) 5$: COUNTER INC    XSAVE LDX                                          ' VIDEO-UPDATE >BODY JSR    1$ JMP                        4$: XSAVE LDX    0 # LDY       COUNTER STY                          INX INX INX INX INX INX   RTS     END-CODE                  CODE NEW-GRAPHICS ( DL-TABLE/IMAGE-TABLE/ELEMENT-TABLE)              ' (NEW-GRAPHICS) >BODY JSR                                      NEXT JMP  END-CODE                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                         ( NEW-GRAPHICS RTN -VIDEO MAINTENANCE SECTION  16:17 06/03/86 ) CODE VIDEO-UPDATE     XSAVE STX                                      START-VID-STACK LDX  INT-FLAG LDY                               0= NOT IF BEGIN   ( b3-2 b1-0  DL-addr -- )                       2 ,X LDA   0 X) STA 0 ,X  INC 0= IF 1 ,X INC THEN               3 ,X LDA   0 X) STA 0 ,X  INC 0= IF 1 ,X INC THEN               4 ,X LDA   0 X) STA 0 ,X  INC 0= IF 1 ,X INC THEN               5 ,X LDA   0 X) STA 0 ,X  INC 0= IF 1 ,X INC THEN               INX INX INX INX INX INX START-VID-STACK STX                     INT-FLAG DEC 0= UNTIL THEN                                       XSAVE LDX   RTS      END-CODE                                                                                                                                                                                                                                                                                                                                                           ( VIDEO INTERRUPT RTN - VIDEO MAINTENANCE SEC. 10:00 07/03/86 ) PROC VIDEO-INT-RTN  PHA TXA PHA TYA PHA DLI# LDA                 1 # CMP 0= IF BG-SCOREAREA LDA BACKGRND STA    ( SCORE AREA )        SND?-FLAG LDA 0= IF ' UPDATE-SOUND >BODY JSR THEN               SYSTIMER INC 0= IF SYSTIMER 1+ INC THEN                                  2 # LDA DLI# STA POLL2 JMP THEN                   2 # CMP 0= IF DLI# ADC DLI# ADC DLI# ADC                                      NOP NOP NOP NOP NOP NOP NOP NOP                                 NOP NOP NOP NOP NOP NOP NOP NOP                                 NOP NOP NOP NOP NOP NOP NOP NOP                                 BG-TOP-ICE LDA BACKGRND STA  ( TOP ICE   )                      TIMER INC                                                       0 # LDA DLI# STA POLL2 JMP THEN                                                                                                                                                                                                                  ( IRQ EXTENDED -- JJT                          16:05 08/18/86 )  0 # CMP 0= IF 03 # LDY BEGIN DEY 0= UNTIL NOP NOP                             BG-SCOREAREA LDA BACKGRND STA    ( BOTTOM ICE)                  READ-JOYS JSR                                                   READ-BUTTONS JSR                                                1 # LDA DLI# STA                                            (   CONSOLE-CHECK JSR   )                                           POLL2 JMP THEN                                   L: POLL2 PLA TAY PLA TAX PLA RTI  END-PROC                                                                                                                                                                                                                                                                                                                                                                                                                                                                                      ( VBLANK-WAIT  ?VBLANK - VIDEO MAINTENANCE     15:56 06/23/86 )                                                                 PROC VBLANK-WAIT (  FOREGROUND WAIT...   .AY)                     MSTAT BIT  ( VBLANK NOW?)                                       0< IF BEGIN MSTAT BIT 0< NOT UNTIL THEN  ( WAIT FOR MARIA)      BEGIN MSTAT BIT 0< UNTIL ( THEN WAIT FOR VBLANK )               RTS END-PROC ( here, one is but a few cycles into VBLANK)                                                                     CODE ?VBLANK ( --F  TRUE if VBLANK )                               MSTAT BIT 0< IF DEY THEN                                        DEX DEX TOS STY TOS 1+ STY                                      NEXT JMP END-CODE                                                                                                                                                                                                                                                                                                            ( DL HEADER LIST INIT - VIDEO MAINTENANCE 1/2  15:14 06/10/86 ) CODE (DL-INIT) ( DL ADDR/ # DL'S --- )                               TOS LDY INX INX   ( PULL COUNT AND GET RID OF TOS)              BEGIN                                                           00 # LDA TOS X) STA  TOS INC      ( BANG ADDR LO )              0= IF TOS 1+ INC THEN      ( NEXT BYTE )                        1F # LDA TOS X) STA  TOS INC      ( BANG PALETTE0 LENGTH=1)     0= IF TOS 1+ INC THEN      ( NEXT BYTE )                        C0 # LDA TOS X) STA  TOS INC      ( BANG ADDR HI )              0= IF TOS 1+ INC THEN      ( NEXT BYTE )                        AA # LDA TOS X) STA  TOS INC      ( BANG X-COORD=OFFSCREEN)     0= IF TOS 1+ INC THEN      ( NEXT BYTE & CHECK IF COUNT=0)      DEY 0= UNTIL INX INX RTS END-CODE   ( GET RID OF TOS )                                                                                                                                                                                                     ( DL HEADER LIST INIT - VIDEO MAINTENANCE 2/2  15:14 06/10/86 ) CODE DL-INIT ( STARTING LINE ADDR/#LINES/#DL'S PER LINE )           BEGIN   ( START BY TRANSFERRING STARTLINE ADDR TO NEWTOS)       NOS 2+ LDA NOS 3 + LDY DEX DEX TOS STA TOS 1+ STY               NOS LDY DEX DEX TOS STY 0 # LDY TOS 1+ STY ( TOP-OFF W/ )       ' (DL-INIT) >BODY JSR   ( COUNTER AND RUN WITH IT )             CLC NOS 2+ LDA 3E # ADC NOS 2+ STA ( ADD X3E TO GET NEXT )      NOS 3 + LDA 0 # ADC NOS 3 + STA     ( NEW STARTLINE ADDR )      NOS LDY DEY NOS STY   ( DEC AND CHECK #LINES TO DO COUNTER)     0= UNTIL INX INX INX INX INX INX NEXT JMP END-CODE          ( MISC    VIDEO MANTENANCE WORDS               15:56 06/23/86 ) PROC RTIL  RTI END-PROC ( IRQ vector points here...)            CODE BREAK BRK END-CODE ( for EMULATOR debugging )                                                                                                                                                                                                              ( JOYSTICKS/BUTTONS MAINTENANCE RTNS           16:14 06/23/86 ) ( 08  EQU IPP0     ( PADDLE RIGHT FIRE BUTTON JOY1  = 88)       ( 09  EQU IPP1     ( PADDLE LEFT FIRE BUTTON JOY1 = 89)         ( 0A  EQU IPP2     ( PADDLE RIGHT FIRE BUTTON JOY2 = 8A)        ( 0B  EQU IPP3     ( PADDLE LEFT FIRE BUTTON JOY2 = 8B)                                                                         PROC READ-BUTTONS  ( -- .AY)                                       0 # LDY IPP0 LDA IPP1 ORA                                                        0< IF DEY THEN FB0 STY  ( RIGHT JOY1)          0 # LDY IPP2 LDA IPP3 ORA                                                        0< IF DEY THEN FB1 STY  ( LEFT JOY1)            RTS END-PROC                                                CODE NEXT-JOYS ( -- )                                                READ-JOYS JSR                                                   READ-BUTTONS JSR                                                NEXT JMP END-CODE                                          ( JOYSTICKS/BUTTONS MAINTENANCE RTNS           17:12 11/25/86 ) ( based on origin at upleft, X and Y can =01,00,FF =1-byte -1)  PROC READ-JOYS  ( -- .A)                                             0 # LDA  DX0 STA DY0 STA DX1 STA DY1 STA ( init mem to 0s)      SWCHA LDA  ( =280=directional input RLDURLDU)                    A LSR CS NOT IF DY1 DEC THEN  ( UP=-1 )                         A LSR CS NOT IF DY1 INC THEN  ( DOWN=1 )                        A LSR CS NOT IF DX1 DEC THEN  ( LEFT=-1)                        A LSR CS NOT IF DX1 INC THEN  ( RIGHT=1 )                       A LSR CS NOT IF DY0 DEC THEN  ( UP=-1 )                         A LSR CS NOT IF DY0 INC THEN  ( DOWN=1 )                        A LSR CS NOT IF DX0 DEC THEN  ( LEFT=-1)                        A LSR CS NOT IF DX0 INC THEN  ( RIGHT=1 ) RTS END-PROC                                                                                                                                                                                                    ( CONSOLE SWITCH MAINTENANCE RTNS              16:14 06/23/86 )                                                                 CODE ?RESET   ( --F) 1 # LDA CONSOLE AND 0= NOT IF DEY THEN          DEX DEX TOS STY TOS 1+ STY NEXT JMP END-CODE               CODE ?SELECT  ( --F) 2 # LDA CONSOLE AND 0= NOT IF DEY THEN          DEX DEX TOS STY TOS 1+ STY NEXT JMP END-CODE               CODE ?PAUSE   ( --F) 8 # LDA CONSOLE AND 0= NOT IF DEY THEN          DEX DEX TOS STY TOS 1+ STY NEXT JMP END-CODE               CODE ?DIFFL   ( --F) CONSOLE BIT 1$ BVC DEY 1$:                      DEX DEX TOS STY TOS 1+ STY NEXT JMP END-CODE               CODE ?DIFFR   ( --F) CONSOLE BIT 0< IF DEY THEN                      DEX DEX TOS STY TOS 1+ STY NEXT JMP END-CODE                                                                                                                                                                                                                                                                               ( CONSOLE SWITCH MAINTENANCE RTNS              16:14 06/23/86 ) CODE RESET-RTN VBLANK-WAIT JSR SEI                                             60 # LDA CTRL STA                                               RESET      JMP  END-CODE                         : GETRAW SWCHB C@ FF XOR CONSOLE C! ;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                           ( CONSOLE CHECK runs in NMI during game...     01:39 08/27/87 ) 0 .IF                                                           CODE RESET-RTN FFFC MEM ) JMP  END-CODE                         : ?RESET-RTN ?RESET                                                 IF  ['] FOREGRND-TASK EXECUTE ( RESET-RTN ) THEN ;          PROC CONSOLE-CHECK                                                   SWCHB LDA  FF # EOR CONSOLE STA                                 8 # LDA CONSOLE AND 0= NOT IF DEY THEN                                                                                                                                                                                                                                                                                                                                                                                                                                                                                     .THEN                                                           ( Atari Sound INIT-SOUND Routine               13:53 10/01/86 )                                                                 HEX                                                                                                                             CODE INIT-SOUND ( uses Y = 0 )                                          AUDV0           STY ( Y=00 )    ( Turn Off Vol )                AUDV1           STY             ( Turn Off Vol )               ^CUR-WORKAREA 1+ STY             ( Hi Byte Zero Pg Addr)                         DEY ( Y=FF )                                    WORKAREA0       STY             ( Turn Off Workareas )          WORKAREA1       STY                                             NEXT            JMP    END-CODE                                                                                                                                                                                                                                                                                         ( Atari Sound NEXT-NOTE Routine #1             16:48 12/05/86 ) HEX                                                             CODE NEXT-NOTE ( uses A, X and Y )                              ( Needs X = CUR-VOICE# )                                        ( Needs Y = ^CUR-WORKAREA )                                         ^CUR-WORKAREA     STY              ( For filling Workarea )      W-NXT-NOTE    ,Y LDA                                           ^CUR-NOTE         STA             ( Move 1st note addr to )      W-NXT-NOTE 1+ ,Y LDA                                           ^CUR-NOTE   1+    STA                                            0   #            LDY          ( 1st byte Next note = Dur )     ^CUR-NOTE      )Y LDA                                                                                                                                                                                                                                                                                                       ( Atari Sound NEXT-NOTE Routine #2             16:48 12/05/86 )     0= IF  AUDV0  ,X  STA         ( Sound over,Turn off VOL )                    FF # LDA         ( and Turn off Workarea )         ^CUR-WORKAREA )Y  STA ( Y=0 so use for 1st byte = Duration )                      RTS                                              ELSE                       ( Next Note Valid )               ^CUR-WORKAREA )Y  STA ( Y=0 so use for 1st byte = Duration )                      INY ( Y = 1 = FREQ )                          ^CUR-NOTE     )Y  LDA         ( Move 2nd byte to )               AUDF0        ,X  STA         ( FREQ )                                            PHA         ( Save Freq )                                       INY ( Y = 2 = VOL  )                          ^CUR-NOTE     )Y  LDA         ( Move 3rd byte to )               AUDV0        ,X  STA         ( VOL  )                                            PHA         ( Save Vol )                                                                                  ( Atari Sound NEXT-NOTE Routine #3             16:48 12/05/86 )                       INY ( Y = 3 = WAVE )                         ^CUR-NOTE      )Y  LDA         ( Move 4th byte to )              AUDC0         ,X  STA         ( WAVE )                         ^CUR-WORKAREA      LDX ( X = CUR-WKAREA changed to offset )     ^CUR-NOTE          LDA         ( Calc next note addr and )                         CLC         (  move to Workarea    )          NOTE-SIZE #       ADC         (  ^nxt-note hold )               W-NXT-NOTE    ,X  STA ( X = CUR-WKAREA as offset )             ^CUR-NOTE   1+     LDA                                           0 #               ADC         ( include carry flag )            W-NXT-NOTE 1+ ,X  STA                                                             PLA       ( Take care of saved Vol )          VOL           ,X  STA                                                             PLA       ( Take care of saved Freq )         FREQ          ,X  STA                                       ( Atari Sound NEXT-NOTE Routine #4             16:48 12/05/86 )                                                                                       INY ( Y = 4 = N-FSWP )                        ^CUR-NOTE     )Y  LDA       ( Move 5th byte to FTMR + FCHG)                       PHA                                               0F #          AND       ( Low nibble = degree of chg )      8 # CMP CS                                                          IF FF # EOR CLC 1 # ADC ( 4 Bit -> 8 Bit sign math )            THEN                                                        W-FCHG        ,X  STA                                                             PLA                                           A LSR A LSR A LSR A LSR     ( Move hi to low )                  W-FTMR        ,X  STA       ( Load timer count )                W-FRLD        ,X  STA       ( Save as reload count )                                                                                                                                        ( Atari Sound NEXT-NOTE Routine #5             16:48 12/05/86 )                                                                                       INY ( Y = 5 = N-VSWP )                        ^CUR-NOTE     )Y  LDA       ( Move 6th byte to VTMR + VCHG)                       PHA                                               0F #          AND       ( Low nibble = degree of chg )      8 # CMP CS                                                          IF FF # EOR CLC 1 # ADC ( 4 Bit -> 8 Bit sign math )            THEN                                                        W-VCHG        ,X  STA                                                             PLA                                           A LSR A LSR A LSR A LSR     ( Move hi nibble to low )           W-VTMR        ,X  STA       ( Load timer and reload count )     W-VRLD        ,X  STA                                              THEN                                                                           RTS    END-CODE                           ( Atari Sound START-SOUND Routine #1           16:48 12/05/86 ) HEX                                                             PROC (START-SOUND) ( Sound # in A, uses A and Y )                   A                ASL     ( * 2 for offset and clear carry )                      TAY                                            SOUND-LIST    ,Y LDA        ( Save addr at table + offset )    ^CUR-NOTE         STA          (  in ^CUR-NOTE temporarily )     SOUND-LIST 1+ ,Y LDA                                           ^CUR-NOTE   1+    STA                                            0 #              LDY                                           ^CUR-NOTE      )Y LDA         ( 1st byte of sound = Voice# )  0= IF   WORKAREA0 # LDY                                            ELSE WORKAREA1 # LDY                                            THEN                          ( Save proper Workarea in Y )                                                                                                                                 ( Atari Sound START-SOUND Routine #2           16:48 12/05/86 )                                                                     FF #              LDA       ( Turn Off Workarea to Change )     DUR           ,Y  STA              ( Y = Current workarea )    ^CUR-NOTE          LDA          ( Sound addr 1+ = 1st Note )     CLC           1 # ADC             ( Move 1st note addr to )     W-NXT-NOTE    ,Y  STA             (   Workarea ^Next Note )    ^CUR-NOTE   1+     LDA                                           0 #               ADC                ( Include carry flag )     W-NXT-NOTE 1+ ,Y  STA                                           1 #               LDA        ( Trigger NEXT-NOTE for next )     DUR           ,Y  STA               ( interrupt w/dur = 1 )                       RTS END-CODE                                                                                                                                                                                                                              (                                              14:26 08/29/87 ) CODE START-SOUND ( AREG HAS SOUND )                                  # 13 CMP CS NOT IF  ( < )                                           TAY WORKAREA0 LDA                                                   WORKAREA1 AND                                                   0FF # CMP 0= NOT IF  ( WORKAREAS ON? )                              TYA CUR-SND CMP CS NOT IF ( LOWER SOUND )                           CUR-SND STA                                                    (START-SOUND) JMP ELSE RTS THEN                          ELSE TYA CUR-SND STA (START-SOUND) JMP                          THEN                                                     ELSE                                                               CUR-SND STA                                                     (START-SOUND) JMP                                           THEN END-CODE                                                                                                              ( Atari Sound UPDATE-F/V  Routine #1           16:48 12/05/86 ) CODE UPDATE-F/V ( Needs X = CUR-VOICE#, Y = ^CUR-WORKAREA )         W-FTMR        ,Y  LDA  ( Y = Current workarea )                 SEC  1 #          SBC  ( Decrement Duration )               0< IF                                                               W-FCHG        ,Y  LDA  ( Y = Current workarea )                                   CLC                                           FREQ          ,Y  ADC  ( Y = Current workarea )                 1F #              AND  ( Maintain 5 bits Max )                  AUDF0         ,X  STA  ( X = VOICE#  )                          FREQ          ,Y  STA  ( Y = Current workarea )                 W-FRLD        ,Y  LDA  ( Reload Timer )                        THEN                                                             W-FTMR        ,Y  STA  ( Y = Current workarea )                                                                                                                                             ( Atari Sound UPDATE-F/V  Routine #1           16:48 12/05/86 )                                                                     W-VTMR        ,Y  LDA  ( Y = Current workarea )                 SEC  1 #          SBC  ( Decrement Duration )               0< IF                                                               VOL           ,Y  LDA  ( Y = Current workarea )                                   CLC                                           W-VCHG        ,Y  ADC  ( Y = Current workarea )                 0F #              AND  ( Volume = 4 Bits Max )                  AUDV0         ,X  STA  ( X = VOICE#  )                          VOL           ,Y  STA  ( Y = Current workarea )                 W-VRLD        ,Y  LDA  ( Reload Timer )                        THEN                                                             W-VTMR        ,Y  STA  ( Y = Current workarea )                                   RTS     END-CODE                                                                                          ( Atari Sound Interrupt Routine #1             16:48 12/05/86 ) CODE UPDATE-SOUND ( uses A, X and Y )                               WORKAREA0             LDA  ( Get 1st Byte of Workarea0 )        FF # CMP 0= NOT            ( Workarea inactive? )                IF  V0 #             LDX  ( Setup proper Voice# in X )               WORKAREA0     # LDY  ( Setup proper Workarea in Y )           SEC  1 #          SBC  ( Decrement Duration )               0= IF                                                               ' NEXT-NOTE >BODY JSR  ( Get the next note )                   ELSE WORKAREA0     STA  (  update 1st Byte of Workarea0 )        ' UPDATE-F/V >BODY JSR  ( update freq and vol )                THEN                                                          THEN                                                                                                                                                                                                                                                       ( Atari Sound Interrupt Routine #2             16:48 12/05/86 )                                                                     WORKAREA1             LDA  ( Get 1st Byte of Workarea1 )        FF # CMP 0= NOT            ( Workarea inactive? )                IF  V1 #             LDX  ( Setup proper Voice# in X )               WORKAREA1     # LDY  ( Setup proper Workarea in Y )           SEC  1 #          SBC  ( Decrement Duration )               0= IF                                                               ' NEXT-NOTE >BODY JMP  ( No need to come back )                ELSE WORKAREA1     STA  (  update 1st Byte of Workarea1 )        ' UPDATE-F/V >BODY JMP  ( update freq and vol )                THEN                                                          THEN                 RTS     END-CODE                                                                                                                                                      HERE EQU SOUND-LIST                                             ( Hattrick Sound LIST [L-]:   00           PMA 13:58 05/07/87 ) ( SOUND-LIST )   .NOLIST -HEADERS HEX                                    T-SERVE       ,  00 EQU  L-SERVE                                T-GOAL        ,  01 EQU  L-GOAL                                 T-WHACK       ,  02 EQU  L-WHACK                                T-PICKUP      ,  03 EQU  L-PICKUP                               T-BOUNCE      ,  04 EQU  L-BOUNCE                               T-SAVE        ,  05 EQU  L-SAVE                                 T-CHEER       ,  06 EQU  L-CHEER                                T-PL/PLYR     ,  07 EQU  L-PL/PLYR                              T-PL/EDGE     ,  08 EQU  L-PL/EDGE                              T-TIMER       ,  09 EQU  L-TIMER                                T-BUGLE       ,  0A EQU  L-BUGLE                                T-UPWHIS      ,  0B EQU  L-UPWHIS                                                                                                                                                      ( Hattrick Sound LIST [L-]:   01           PMA 13:57 04/07/87 )          T-HIKAZOO     ,  0C EQU  L-HIKAZOO                              T-MDKAZOO     ,  0D EQU  L-MDKAZOO                              T-LOKAZOO     ,  0E EQU  L-LOKAZOO                              T-SKRITCH     ,  0F EQU  L-SKRITCH                              T-RUSTLE      ,  10 EQU  L-RUSTLE                               T-HIWOLF      ,  11 EQU  L-HIWOLF                               T-LOWOLF      ,  12 EQU  L-LOWOLF                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                      ( Hattrick Sound LIST [L-]:   01           PMA 13:57 04/07/87 )          T-SOPFAN      ,  13 EQU  L-SOPFAN                               T-ALTFAN      ,  14 EQU  L-ALTFAN                               T-TOPZAM      ,  15 EQU  L-TOPZAM                               T-BOTZAM      ,  16 EQU  L-BOTZAM                               T-TOPBACH     ,  17 EQU  L-TOPBACH                              T-BOTBACH     ,  18 EQU  L-BOTBACH                              T-0ENDG       ,  19 EQU  L-0ENDG                                T-1ENDG       ,  1A EQU  L-1ENDG                                T-TOPTURK     ,  1B EQU  L-TOPTURK                              T-BOTTURK     ,  1C EQU  L-BOTTURK                              T-0OVERTM     ,  1D EQU  L-0OVERTM                              T-1OVERTM     ,  1E EQU  L-1OVERTM                                                                                                                                                                                                                     ( Random number generator, by J E Rickenbacker       08/23/82 ) ( Given an argument, returns a pseudo-random number between )   ( 0 and that argument.  The pseudo-random sequence can be )     ( altered by changing the seed. )                                                                                               FORTH DEFINITIONS DECIMAL                                       VARIABLE SEED                                                                                                                   : (RAND)        SEED @ 259 * 3 + 32767 AND DUP SEED ! ;                                                                         ( n1 --- n2 )                                                   ( return a pseudo-random number in the range 0 <= n2 < n1 )     : RANDOM        (RAND) 32767 */ ;                                                                                               HEX                                                                                                                             ( Hattrick Sound CODES [-SND]: 00          PMA 13:58 05/07/87 ) CODE RUSTLE-SND                                                    L-RUSTLE   # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE CHEER-SND                                                     L-CHEER    # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE HIWOLF-SND                                                    L-HIWOLF   # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE LOWOLF-SND                                                    L-LOWOLF   # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE UPWHIS-SND                                                    L-UPWHIS   # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE HIKAZOO-SND                                                   L-HIKAZOO  # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE MDKAZOO-SND                                                   L-MDKAZOO  # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE                                                                   ( Hattrick Sound CODES [-SND]: 01          PMA 13:57 04/07/87 ) CODE LOKAZOO-SND                                                   L-LOKAZOO  # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE BUGLE-SND                                                     L-BUGLE    # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE SERVE-SND                                                     L-SERVE    # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE BOUNCE-SND                                                    L-BOUNCE   # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE PL/EDGE-SND                                                   L-PL/EDGE  # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE PL/PLYR-SND                                                   L-PL/PLYR  # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE PICKUP-SND                                                    L-PICKUP   # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE                                                                   ( Hattrick Sound CODES [-SND]: 02          PMA 13:57 04/07/87 ) CODE WHACK-SND                                                     L-WHACK    # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE GOAL-SND                                                      L-GOAL     # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE SAVE-SND                                                      L-SAVE     # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE SKRITCH-SND                                                   L-SKRITCH  # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE TIMER-SND                                                     L-TIMER    # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE OVERTIME-SND                                                  L-0OVERTM  # LDA ' START-SOUND >BODY JSR                        L-1OVERTM  # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE                                                                                                                                   ( Hattrick Sound CODES [-SND]: 03          PMA 13:58 05/07/87 ) CODE ENDGAME-SND                                                   L-0ENDG    # LDA ' START-SOUND >BODY JSR                        L-1ENDG    # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE FANFARE-SND                                                   L-SOPFAN   # LDA ' START-SOUND >BODY JSR                        L-ALTFAN   # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE ZAMBONI-SND                                                   L-TOPZAM   # LDA ' START-SOUND >BODY JSR                        L-BOTZAM   # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE BACH-SND                                                      L-TOPBACH  # LDA ' START-SOUND >BODY JSR                        L-BOTBACH  # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   CODE TURK-SND                                                      L-TOPTURK  # LDA ' START-SOUND >BODY JSR                        L-BOTTURK  # LDA ' START-SOUND >BODY JSR NEXT JMP END-CODE   ( Hattrick Sound CODES [-SND]: 04          PMA 13:58 05/07/87 ) VARIABLE SND-CTR                                                : BEGIN-SNDS                                                         0 SND-CTR !  BEGIN SND-CTR @   DUP CASE                            0000 OF FANFARE-SND ENDOF                                       0B00 OF SERVE-SND   ENDOF   0C00 OF CHEER-SND   ENDOF           1000 OF UPWHIS-SND  ENDOF   1180 OF HIWOLF-SND  ENDOF           1480 OF LOWOLF-SND  ENDOF ( 1680 OF QUIET-SNDS  ENDOF )      ENDCASE  1 SND-CTR +!  1680 =  UNTIL ;                                                                                     : END-SNDS                                                           0 SND-CTR !  BEGIN SND-CTR @   DUP CASE                            0000 OF ENDGAME-SND ENDOF   0600 OF CHEER-SND   ENDOF           0800 OF UPWHIS-SND  ENDOF   0980 OF HIWOLF-SND  ENDOF           0C80 OF LOWOLF-SND  ENDOF   0E80 OF TURK-SND    ENDOF        ENDCASE  1 SND-CTR +!  0E80 =  UNTIL ;                     ( Hattrick Sound CODES [-SND]: 05          PMA 13:58 05/07/87 ) : ??-SND  4 RANDOM CASE                                                     0 OF   LOWOLF-SND   1D00   ENDOF                                1 OF   MDKAZOO-SND  2A00   ENDOF                                2 OF   UPWHIS-SND   0780   ENDOF                                3 OF   LOKAZOO-SND  3A00   ENDOF                              ENDCASE  0 DO LOOP ;                                                                                                  : !!-SND  6 RANDOM CASE                                                     0 OF   BUGLE-SND    5C80   ENDOF                                1 OF   HIWOLF-SND   2500   ENDOF                                2 OF   HIKAZOO-SND  3900   ENDOF                                3 OF   LOWOLF-SND   1D00   ENDOF                                4 OF   LOKAZOO-SND  3A00   ENDOF                                5 OF   UPWHIS-SND   0780   ENDOF                              ENDCASE  0 DO LOOP ;                                  ( Hattrick Sound CODES [-SND]: 06          PMA 13:58 05/07/87 ) : QUIET-SNDS  BEGIN ??-SND  FFF0 RANDOM 0 DO LOOP  AGAIN ;      : SERVE-SNDS  SERVE-SND     4000 0 DO LOOP         QUIET-SNDS ;                                                                 : WHACK-SNDS  ( interrupt pickup sequence & INIT-SOUND )                      WHACK-SND     9000 0 DO LOOP         QUIET-SNDS ;                                                                 : PICKUP-SNDS ( interrupt whack sequence & INIT-SOUND )                       PICKUP-SND    5000 0 DO LOOP         BEGIN                      !!-SND        6000 RANDOM 0 DO LOOP  AGAIN ;                                                                      HERE EQU T-DELAY                                                   V0  C, 10  C,  00  C,  00  C,  0  C,  00  C,  00  C,  00  C,                                                                                                                                                                                                 ( Hattrick Sound TABLES [T-]: 0            PMA 11:44 04/15/87 ) HERE EQU T-RUSTLE                                                 V0  C,  FF  C,  02  C,  03  C,  8  C,  00  C,  00  C,  00  C, HERE EQU T-CHEER                                                  V0  C,  FF  C,  02  C,  06  C,  8  C,  00  C,  00  C,  00  C, HERE EQU T-HIWOLF                                                 V0  C,  01  C,  0F  C,  09  C,  4  C,  00  C,  00  C,                   01  C,  0E  C,  0A  C,  4  C,  00  C,  00  C,                   01  C,  0D  C,  0B  C,  4  C,  00  C,  00  C,                   01  C,  0C  C,  0C  C,  4  C,  00  C,  00  C,                   01  C,  0B  C,  0D  C,  4  C,  00  C,  00  C,                   01  C,  0A  C,  0E  C,  4  C,  00  C,  00  C,                   02  C,  09  C,  0F  C,  4  C,  00  C,  00  C,                   03  C,  00  C,  00  C,  4  C,  00  C,  00  C,                   01  C,  10  C,  08  C,  4  C,  00  C,  00  C,                   01  C,  0F  C,  08  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 1            PMA 11:44 04/15/87 )           01  C,  0E  C,  0A  C,  4  C,  00  C,  00  C,                   01  C,  0D  C,  0B  C,  4  C,  00  C,  00  C,                   01  C,  0C  C,  0C  C,  4  C,  00  C,  00  C,                   01  C,  0B  C,  0D  C,  4  C,  00  C,  00  C,                   01  C,  0A  C,  0E  C,  4  C,  00  C,  00  C,                   02  C,  09  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  0A  C,  0E  C,  4  C,  00  C,  00  C,                   01  C,  0B  C,  0D  C,  4  C,  00  C,  00  C,                   01  C,  0C  C,  0C  C,  4  C,  00  C,  00  C,                   01  C,  0D  C,  0B  C,  4  C,  00  C,  00  C,                   01  C,  0E  C,  0A  C,  4  C,  00  C,  00  C,                   01  C,  0F  C,  09  C,  4  C,  00  C,  00  C,                   01  C,  10  C,  09  C,  4  C,  00  C,  00  C,                   01  C,  11  C,  09  C,  4  C,  00  C,  00  C,  00  C,                                                                 ( Hattrick Sound TABLES [T-]: 2            PMA 13:58 05/07/87 ) HERE EQU T-LOWOLF                                                 V0  C,  01  C,  14  C,  05  C,  5  C,  00  C,  00  C,                   01  C,  13  C,  06  C,  5  C,  00  C,  00  C,                   01  C,  12  C,  07  C,  5  C,  00  C,  00  C,                   01  C,  11  C,  08  C,  5  C,  00  C,  00  C,                   01  C,  10  C,  09  C,  5  C,  00  C,  00  C,                   02  C,  0F  C,  0A  C,  5  C,  00  C,  00  C,                   02  C,  00  C,  00  C,  5  C,  00  C,  00  C,                   01  C,  14  C,  05  C,  5  C,  00  C,  00  C,                   01  C,  13  C,  06  C,  5  C,  00  C,  00  C,                   01  C,  12  C,  07  C,  5  C,  00  C,  00  C,                   01  C,  11  C,  08  C,  5  C,  00  C,  00  C,                   01  C,  10  C,  09  C,  5  C,  00  C,  00  C,                   02  C,  0F  C,  0A  C,  5  C,  00  C,  00  C,                   01  C,  10  C,  09  C,  5  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 3            PMA 13:58 05/07/87 )           01  C,  11  C,  08  C,  5  C,  00  C,  00  C,                   01  C,  12  C,  07  C,  5  C,  00  C,  00  C,                   01  C,  13  C,  06  C,  5  C,  00  C,  00  C,                   01  C,  14  C,  05  C,  5  C,  00  C,  00  C,                   01  C,  15  C,  04  C,  5  C,  00  C,  00  C,                   01  C,  16  C,  03  C,  5  C,  00  C,  00  C,  00  C, HERE EQU T-UPWHIS                                                 V0  C,  01  C,  0E  C,  03  C,  5  C,  00  C,  00  C,                   01  C,  0D  C,  04  C,  5  C,  00  C,  00  C,                   01  C,  0C  C,  05  C,  5  C,  00  C,  00  C,                   01  C,  0B  C,  06  C,  5  C,  00  C,  00  C,                   01  C,  0A  C,  07  C,  5  C,  00  C,  00  C,                   02  C,  09  C,  09  C,  5  C,  00  C,  00  C,  00  C, HERE EQU T-HIKAZOO                                                V0  C,  35  C,  00  C,  0A  C,  F  C,  00  C,  00  C,  00  C, ( Hattrick Sound TABLES [T-]: 4            PMA 13:58 05/07/87 ) HERE EQU T-MDKAZOO                                                V0  C,  20  C,  06  C,  06  C,  1  C,  00  C,  00  C,  00  C, HERE EQU T-LOKAZOO                                                V0  C,  30  C,  03  C,  08  C,  7  C,  00  C,  00  C,  00  C, HERE EQU T-BUGLE                                                  V0  C,  01  C,  0E  C,  0F  C,  C  C,  00  C,  00  C,                   01  C,  0D  C,  0F  C,  C  C,  00  C,  00  C,                   01  C,  0E  C,  0F  C,  C  C,  00  C,  00  C,                   01  C,  0D  C,  0F  C,  C  C,  00  C,  00  C,                   01  C,  0E  C,  0F  C,  C  C,  00  C,  00  C,                   01  C,  0D  C,  0F  C,  C  C,  00  C,  00  C,                   03  C,  00  C,  00  C,  C  C,  00  C,  00  C,                   01  C,  0B  C,  0F  C,  C  C,  00  C,  00  C,                   01  C,  0A  C,  0F  C,  C  C,  00  C,  00  C,                   01  C,  0B  C,  0F  C,  C  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 5            PMA 13:58 05/07/87 )           01  C,  0A  C,  0F  C,  C  C,  00  C,  00  C,                   01  C,  0B  C,  0F  C,  C  C,  00  C,  00  C,                   01  C,  0A  C,  0F  C,  C  C,  00  C,  00  C,                   03  C,  00  C,  00  C,  C  C,  00  C,  00  C,                   01  C,  1B  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  1A  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  1B  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  1A  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  1B  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  1A  C,  0F  C,  4  C,  00  C,  00  C,                   03  C,  00  C,  00  C,  4  C,  00  C,  00  C,                   01  C,  17  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  16  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  17  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  16  C,  0F  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 6            PMA 13:58 05/07/87 )           01  C,  17  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  16  C,  0F  C,  4  C,  00  C,  00  C,                   03  C,  00  C,  00  C,  4  C,  00  C,  00  C,                   08  C,  00  C,  00  C,  4  C,  00  C,  00  C,                   01  C,  1B  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  1A  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  1B  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  1A  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  1B  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  1A  C,  0F  C,  4  C,  00  C,  00  C,                   03  C,  00  C,  00  C,  4  C,  00  C,  00  C,                   01  C,  17  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  16  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  17  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  16  C,  0F  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 7            PMA 13:58 05/07/87 )           01  C,  17  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  16  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  17  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  16  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  17  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  16  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  17  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  16  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  17  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  16  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  17  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  16  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  17  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  16  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  17  C,  0F  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 8            PMA 13:58 05/07/87 )           01  C,  16  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  17  C,  0F  C,  4  C,  00  C,  00  C,                   01  C,  16  C,  0F  C,  4  C,  00  C,  00  C,  00  C, HERE EQU T-SERVE                                                  V1  C,  0A  C,  0A  C,  0F  C,  4  C,  00  C,  00  C,                   0E  C,  0A  C,  0F  C,  4  C,  21  C,  00  C,  00  C, HERE EQU T-BOUNCE                                                 V1  C,  01  C,  03  C,  0F  C,  6  C,  00  C,  00  C,                   01  C,  03  C,  00  C,  6  C,  00  C,  00  C,                   01  C,  03  C,  07  C,  6  C,  00  C,  00  C,  00  C, HERE EQU T-PL/EDGE                                                V1  C,  02  C,  1A  C,  0F  C,  D  C,  00  C,  00  C,                   01  C,  1B  C,  0D  C,  D  C,  00  C,  00  C,  00  C, HERE EQU T-PL/PLYR                                                V1  C,  02  C,  14  C,  06  C,  8  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 9            PMA 13:58 05/07/87 )           02  C,  01  C,  0F  C,  E  C,  00  C,  00  C,                   01  C,  14  C,  08  C,  3  C,  00  C,  00  C,  00  C, HERE EQU T-PICKUP                                                 V1  C,  01  C,  06  C,  01  C,  D  C,  00  C,  00  C,                   01  C,  09  C,  02  C,  D  C,  00  C,  00  C,                   01  C,  0C  C,  03  C,  D  C,  00  C,  00  C,                   01  C,  11  C,  05  C,  D  C,  00  C,  00  C,                   01  C,  17  C,  07  C,  D  C,  00  C,  00  C,                   01  C,  1F  C,  09  C,  D  C,  00  C,  00  C,  00  C, HERE EQU T-WHACK                                                  V1  C,  02  C,  01  C,  0F  C,  3  C,  00  C,  00  C,                   02  C,  01  C,  00  C,  3  C,  00  C,  00  C,                   01  C,  01  C,  06  C,  3  C,  00  C,  00  C,                   02  C,  01  C,  00  C,  3  C,  00  C,  00  C,                   01  C,  01  C,  04  C,  3  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 10           PMA 13:58 05/07/87 )           02  C,  01  C,  00  C,  3  C,  00  C,  00  C,                   01  C,  01  C,  02  C,  3  C,  00  C,  00  C,  00  C, HERE EQU T-GOAL                                                   V1  C,  02  C,  09  C,  0F  C,  4  C,  00  C,  18  C,                   96  C,  08  C,  0F  C,  4  C,  00  C,  18  C,  00  C, HERE EQU T-SAVE                                                   V1  C,  03  C,  00  C,  0F  C,  1  C,  00  C,  00  C,                   01  C,  09  C,  0D  C,  4  C,  00  C,  00  C,                   01  C,  0C  C,  0B  C,  4  C,  00  C,  00  C,                   01  C,  11  C,  09  C,  4  C,  00  C,  00  C,                   01  C,  17  C,  07  C,  4  C,  00  C,  00  C,                   01  C,  1F  C,  05  C,  4  C,  00  C,  00  C,                   01  C,  0D  C,  03  C,  D  C,  00  C,  00  C,                   01  C,  12  C,  01  C,  D  C,  00  C,  00  C,  00  C,                                                                 ( Hattrick Sound TABLES [T-]: 11           PMA 10:45 04/16/87 ) HERE EQU T-SKRITCH                                                V1  C,  02  C,  01  C,  01  C,  8  C,  00  C,  00  C,                   02  C,  00  C,  02  C,  8  C,  00  C,  00  C,                   02  C,  01  C,  03  C,  8  C,  00  C,  00  C,                   02  C,  01  C,  01  C,  8  C,  00  C,  00  C,                   02  C,  01  C,  03  C,  8  C,  00  C,  00  C,                   10  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   02  C,  01  C,  03  C,  8  C,  00  C,  00  C,                   02  C,  01  C,  01  C,  8  C,  00  C,  00  C,                   02  C,  00  C,  02  C,  8  C,  00  C,  00  C,                   02  C,  00  C,  03  C,  8  C,  00  C,  00  C,                   02  C,  00  C,  02  C,  8  C,  00  C,  00  C,  00  C, HERE EQU T-TIMER                                                  V0  C,  02  C,  01  C,  0F  C,  1  C,  00  C,  00  C,                   01  C,  01  C,  00  C,  1  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 12           PMA 10:45 04/16/87 )           01  C,  01  C,  06  C,  1  C,  00  C,  00  C,                   17  C,  01  C,  00  C,  1  C,  00  C,  00  C,                   02  C,  01  C,  0F  C,  1  C,  00  C,  00  C,                   01  C,  01  C,  00  C,  1  C,  00  C,  00  C,                   01  C,  01  C,  06  C,  1  C,  00  C,  00  C,                   19  C,  01  C,  00  C,  1  C,  00  C,  00  C,  00  C, HERE EQU T-0OVERTM                                                V0  C,  0A  C,  06  C,  0F  C,  A  C,  00  C,  00  C,                   14  C,  06  C,  00  C,  A  C,  00  C,  00  C,                   0A  C,  06  C,  0F  C,  A  C,  00  C,  00  C,                   14  C,  06  C,  00  C,  A  C,  00  C,  00  C,                   0A  C,  06  C,  0F  C,  A  C,  00  C,  00  C,                   14  C,  06  C,  00  C,  A  C,  00  C,  00  C,                   0A  C,  06  C,  0F  C,  A  C,  00  C,  00  C,                   14  C,  06  C,  00  C,  A  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 13           PMA 11:44 04/15/87 )           0A  C,  06  C,  0F  C,  A  C,  00  C,  00  C,  00  C, HERE EQU T-1OVERTM                                                V1  C,  0A  C,  06  C,  0F  C,  7  C,  00  C,  00  C,                   14  C,  06  C,  00  C,  7  C,  00  C,  00  C,                   0A  C,  06  C,  0F  C,  7  C,  00  C,  00  C,                   14  C,  06  C,  00  C,  7  C,  00  C,  00  C,                   0A  C,  06  C,  0F  C,  7  C,  00  C,  00  C,                   14  C,  06  C,  00  C,  7  C,  00  C,  00  C,                   0A  C,  06  C,  0F  C,  7  C,  00  C,  00  C,                   14  C,  06  C,  00  C,  7  C,  00  C,  00  C,                   0A  C,  06  C,  0F  C,  7  C,  00  C,  00  C,  00  C, HERE EQU T-0ENDG                                                  V0  C,  78  C,  15  C,  0F  C,  1  C,  00  C,  00  C,  00  C, HERE EQU T-1ENDG                                                  V1  C,  78  C,  15  C,  0F  C,  1  C,  00  C,  00  C,  00  C, ( Hattrick Sound TABLES [T-]: 14           PMA 11:44 04/15/87 ) HERE EQU T-SOPFAN                                                 V0  C,  06  C,  0E  C,  0B  C,  D  C,  00  C,  00  C,                   06  C,  0C  C,  0C  C,  D  C,  00  C,  00  C,                   06  C,  09  C,  0D  C,  D  C,  00  C,  00  C,                   06  C,  08  C,  0F  C,  D  C,  00  C,  00  C,                   06  C,  09  C,  0E  C,  D  C,  00  C,  00  C,                   06  C,  0C  C,  0D  C,  D  C,  00  C,  00  C,                   06  C,  0E  C,  08  C,  D  C,  00  C,  00  C,                   06  C,  0C  C,  09  C,  D  C,  00  C,  00  C,                   06  C,  09  C,  0A  C,  D  C,  00  C,  00  C,                   06  C,  08  C,  0C  C,  D  C,  00  C,  00  C,                   06  C,  09  C,  0B  C,  D  C,  00  C,  00  C,                   06  C,  0C  C,  0A  C,  D  C,  00  C,  00  C,                   06  C,  0E  C,  09  C,  D  C,  00  C,  00  C,                   06  C,  0C  C,  0A  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 15           PMA 11:44 04/15/87 )           06  C,  09  C,  0B  C,  D  C,  00  C,  00  C,                   06  C,  0C  C,  0A  C,  D  C,  00  C,  00  C,                   06  C,  0B  C,  0B  C,  D  C,  00  C,  00  C,                   06  C,  08  C,  0C  C,  D  C,  00  C,  00  C,                   06  C,  0B  C,  0B  C,  D  C,  00  C,  00  C,                   06  C,  1F  C,  0C  C,  4  C,  00  C,  00  C,                   06  C,  17  C,  0D  C,  4  C,  00  C,  00  C,                   06  C,  1F  C,  0C  C,  4  C,  00  C,  00  C,                   06  C,  1D  C,  0D  C,  4  C,  00  C,  00  C,                   06  C,  16  C,  0E  C,  4  C,  00  C,  00  C,                   36  C,  0E  C,  0F  C,  4  C,  00  C,  00  C,  00  C, HERE EQU T-ALTFAN                                                 V1  C,  06  C,  18  C,  0B  C,  D  C,  00  C,  00  C,                   06  C,  10  C,  0C  C,  D  C,  00  C,  00  C,                   06  C,  04  C,  0D  C,  1  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 16           PMA 11:44 04/15/87 )           06  C,  0A  C,  0F  C,  D  C,  00  C,  00  C,                   06  C,  04  C,  0E  C,  1  C,  00  C,  00  C,                   06  C,  10  C,  0D  C,  D  C,  00  C,  00  C,                   06  C,  18  C,  08  C,  D  C,  00  C,  00  C,                   06  C,  10  C,  09  C,  D  C,  00  C,  00  C,                   06  C,  04  C,  0A  C,  1  C,  00  C,  00  C,                   06  C,  0A  C,  0C  C,  D  C,  00  C,  00  C,                   06  C,  04  C,  0B  C,  1  C,  00  C,  00  C,                   06  C,  10  C,  0A  C,  D  C,  00  C,  00  C,                   06  C,  18  C,  09  C,  D  C,  00  C,  00  C,                   06  C,  10  C,  0A  C,  D  C,  00  C,  00  C,                   06  C,  04  C,  0B  C,  1  C,  00  C,  00  C,                   06  C,  15  C,  0A  C,  D  C,  00  C,  00  C,                   06  C,  0E  C,  0B  C,  D  C,  00  C,  00  C,                   06  C,  0A  C,  0C  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 17           PMA 15:33 07/08/87 )           06  C,  13  C,  0B  C,  D  C,  00  C,  00  C,                   06  C,  0C  C,  0C  C,  D  C,  00  C,  00  C,                   06  C,  09  C,  0D  C,  D  C,  00  C,  00  C,                   06  C,  11  C,  0C  C,  D  C,  00  C,  00  C,                   06  C,  04  C,  0D  C,  1  C,  00  C,  00  C,                   06  C,  1B  C,  00  C,  4  C,  00  C,  00  C,                   36  C,  11  C,  0F  C,  4  C,  00  C,  00  C,  00 C,  HERE EQU T-TOPZAM  ( 0 )                                          V0  C,  0E  C,  16  C,  C   C,  4  C,  00  C,  C4  C,                   07  C,  16  C,  C   C,  4  C,  00  C,  54  C,                   07  C,  16  C,  C   C,  4  C,  00  C,  54  C,                   0E  C,  11  C,  C   C,  4  C,  00  C,  C4  C,                   0E  C,  11  C,  C   C,  4  C,  00  C,  C4  C,                   0E  C,  13  C,  C   C,  4  C,  00  C,  00  C,                   0E  C,  0C  C,  C   C,  D  C,  00  C,  A4  C,         ( Hattrick Sound TABLES [T-]: 18           PMA 15:33 07/08/87 )           07  C,  0C  C,  C   C,  D  C,  00  C,  00  C,                   07  C,  0D  C,  C   C,  D  C,  00  C,  00  C,                   07  C,  0C  C,  C   C,  D  C,  00  C,  A4  C,                   07  C,  00  C,  0   C,  0  C,  00  C,  00  C,         ( T-TOP   1a )                                                            15  C,  0B  C,  C   C,  D  C,  00  C,  00  C,                   07  C,  1B  C,  C   C,  4  C,  00  C,  00  C,                   12  C,  0B  C,  C   C,  D  C,  00  C,  00  C,                   0A  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   15  C,  0A  C,  C   C,  D  C,  00  C,  00  C,                   07  C,  07  C,  C   C,  D  C,  00  C,  00  C,                   12  C,  0B  C,  C   C,  D  C,  00  C,  00  C,                   0A  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   0E  C,  09  C,  C   C,  D  C,  00  C,  00  C,                   0E  C,  0C  C,  C   C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 19           PMA 15:33 07/08/87 )           0E  C,  1F  C,  C   C,  4  C,  00  C,  00  C,                   0E  C,  0C  C,  C   C,  D  C,  00  C,  00  C,                   0E  C,  1D  C,  C   C,  4  C,  00  C,  A4  C,                   0E  C,  1A  C,  C   C,  4  C,  00  C,  A4  C,                   14  C,  17  C,  C   C,  4  C,  00  C,  A4  C,                   08  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   15  C,  16  C,  C   C,  4  C,  00  C,  00  C,                   15  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   07  C,  16  C,  C   C,  4  C,  00  C,  54  C,                   07  C,  16  C,  C   C,  4  C,  00  C,  54  C,                   0A  C,  16  C,  C   C,  4  C,  00  C,  00  C,                   04  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   0A  C,  16  C,  C   C,  4  C,  00  C,  00  C,                   04  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   0A  C,  16  C,  C   C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 20           PMA 15:33 07/08/87 )           04  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   0A  C,  16  C,  C   C,  4  C,  00  C,  00  C,                   04  C,  00  C,  0   C,  0  C,  00  C,  00  C,         ( T-TOP    2 )                                                            0E  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   0E  C,  13  C,  C   C,  4  C,  00  C,  C4  C,                   0E  C,  1A  C,  C   C,  4  C,  00  C,  C4  C,                   0E  C,  13  C,  C   C,  4  C,  00  C,  C4  C,                   0E  C,  1D  C,  C   C,  4  C,  00  C,  C4  C,                   0E  C,  13  C,  C   C,  4  C,  00  C,  C4  C,                   07  C,  1F  C,  C   C,  4  C,  00  C,  00  C,                   07  C,  1D  C,  C   C,  4  C,  00  C,  00  C,                   07  C,  1B  C,  C   C,  4  C,  00  C,  00  C,                   07  C,  1A  C,  C   C,  4  C,  00  C,  00  C,         ( T-TOP   1b )                                                  ( Hattrick Sound TABLES [T-]: 21           PMA 15:33 07/08/87 )           15  C,  0B  C,  C   C,  D  C,  00  C,  00  C,                   07  C,  1B  C,  C   C,  4  C,  00  C,  00  C,                   12  C,  0B  C,  C   C,  D  C,  00  C,  00  C,                   0A  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   15  C,  0A  C,  C   C,  D  C,  00  C,  00  C,                   07  C,  07  C,  C   C,  D  C,  00  C,  00  C,                   12  C,  0B  C,  C   C,  D  C,  00  C,  00  C,                   0A  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   0E  C,  09  C,  C   C,  D  C,  00  C,  00  C,                   0E  C,  0C  C,  C   C,  D  C,  00  C,  00  C,                   0E  C,  1F  C,  C   C,  4  C,  00  C,  00  C,                   0E  C,  0C  C,  C   C,  D  C,  00  C,  00  C,                   0E  C,  1D  C,  C   C,  4  C,  00  C,  A4  C,                   0E  C,  1A  C,  C   C,  4  C,  00  C,  A4  C,                   12  C,  17  C,  C   C,  4  C,  00  C,  A4  C,         ( Hattrick Sound TABLES [T-]: 22           PMA 15:33 07/08/87 )           0A  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   15  C,  16  C,  C   C,  4  C,  00  C,  00  C,                   15  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   07  C,  16  C,  C   C,  4  C,  00  C,  54  C,                   07  C,  16  C,  C   C,  4  C,  00  C,  54  C,                   0A  C,  16  C,  C   C,  4  C,  00  C,  00  C,                   04  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   0A  C,  16  C,  C   C,  4  C,  00  C,  00  C,                   04  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   0A  C,  16  C,  C   C,  4  C,  00  C,  00  C,                   04  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   0A  C,  16  C,  C   C,  4  C,  00  C,  00  C,                   04  C,  00  C,  0   C,  0  C,  00  C,  00  C,         ( T-TOP   3 )                                                             0E  C,  00  C,  0   C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 23           PMA 15:33 07/08/87 )           0E  C,  0E  C,  C   C,  4  C,  00  C,  00  C,                   07  C,  0F  C,  C   C,  4  C,  00  C,  00  C,                   07  C,  13  C,  C   C,  4  C,  00  C,  00  C,                   07  C,  16  C,  C   C,  4  C,  00  C,  00  C,                   07  C,  1A  C,  C   C,  4  C,  00  C,  00  C,                   1C  C,  1D  C,  C   C,  4  C,  00  C,  00  C,                   0E  C,  1A  C,  C   C,  4  C,  00  C,  00  C,                   0E  C,  17  C,  C   C,  4  C,  00  C,  00  C,                   1C  C,  16  C,  C   C,  4  C,  00  C,  00  C,                   07  C,  16  C,  C   C,  4  C,  00  C,  00  C,                   07  C,  13  C,  C   C,  4  C,  00  C,  00  C,                   07  C,  16  C,  C   C,  4  C,  00  C,  00  C,                   07  C,  13  C,  C   C,  4  C,  00  C,  00  C,                   10  C,  11  C,  C   C,  4  C,  00  C,  C4  C,                   0C  C,  00  C,  0   C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 24           PMA 15:33 07/08/87 )           10  C,  10  C,  C   C,  4  C,  00  C,  C4  C,                   0C  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   37  C,  13  C,  C   C,  4  C,  00  C,  00  C,                   01  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   0E  C,  13  C,  C   C,  4  C,  00  C,  00  C,                   0E  C,  0C  C,  C   C,  D  C,  00  C,  C4  C,                   07  C,  0C  C,  C   C,  D  C,  00  C,  00  C,                   07  C,  0D  C,  C   C,  D  C,  00  C,  00  C,                   07  C,  0C  C,  C   C,  D  C,  00  C,  00  C,                   07  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   37  C,  1D  C,  C   C,  4  C,  00  C,  00  C,                   01  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   0E  C,  1D  C,  C   C,  4  C,  00  C,  84  C,                   2A  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   37  C,  1D  C,  C   C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 25           PMA 15:33 07/08/87 )           01  C,  00  C,  0   C,  0  C,  00  C,  00  C,                   0E  C,  1D  C,  C   C,  4  C,  00  C,  84  C,                   2A  C,  00  C,  0   C,  0  C,  00  C,  00  C,  00  C, HERE EQU T-BOTZAM  ( 0 )                                          V1  C,  1C  C,  0B  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  09  C,  08  C,  D  C,  00  C,  00  C,                   0E  C,  1F  C,  08  C,  4  C,  00  C,  00  C,                   2A  C,  00  C,  08  C,  0  C,  00  C,  00  C,         ( T-BOT   1a )                                                            1C  C,  17  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  11  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  12  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  11  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  13  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  14  C,  08  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 26           PMA 15:33 07/08/87 )           1C  C,  17  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  1A  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  1D  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  1A  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  17  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  1D  C,  08  C,  D  C,  00  C,  00  C,         ( T-BOT   2 )                                                             1C  C,  1A  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  0E  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  0F  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  11  C,  08  C,  D  C,  00  C,  00  C,         ( T-BOT   1b )                                                            1C  C,  17  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  11  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  12  C,  08  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 27           PMA 15:33 07/08/87 )           1C  C,  11  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  13  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  14  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  17  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  1A  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  1D  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  1A  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  17  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  1D  C,  08  C,  D  C,  00  C,  00  C,         ( T-BOT   3 )                                                             1C  C,  1A  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  0E  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  0F  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  13  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  0E  C,  08  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 28           PMA 15:33 07/08/87 )           1C  C,  0F  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  10  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  11  C,  08  C,  D  C,  00  C,  00  C,                   38  C,  13  C,  08  C,  D  C,  00  C,  00  C,                   0E  C,  14  C,  08  C,  D  C,  00  C,  00  C,                   2A  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   1C  C,  1D  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  0A  C,  08  C,  D  C,  00  C,  00  C,                   0E  C,  0B  C,  08  C,  D  C,  00  C,  00  C,                   2A  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   1C  C,  13  C,  08  C,  D  C,  00  C,  00  C,                   1C  C,  0E  C,  08  C,  D  C,  00  C,  00  C,                   0E  C,  0F  C,  08  C,  D  C,  00  C,  00  C,                   2A  C,  00  C,  00  C,  0  C,  00  C,  00  C,  00  C,                                                                 ( Hattrick Sound TABLES [T-]: 29           PMA 15:33 07/08/87 ) HERE EQU T-TOPBACH                                                V0  C,  0E  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 30           PMA 15:33 07/08/87 )   ( T-TOPBACH  m  2 )                                                     0E  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  0F  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  16  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  16  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  1A  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 31           PMA 15:33 07/08/87 )   ( T-TOPBACH  m  3 )                                                     0E  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 32           PMA 15:33 07/08/87 )   ( T-TOPBACH  m  4 )                                                     07  C,  0B  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  09  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0A  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  09  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  0B  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  09  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0A  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  09  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  0B  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  09  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0A  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  09  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 33           PMA 15:33 07/08/87 )   ( T-TOPBACH  m  5 )                                                     07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 34           PMA 15:33 07/08/87 )   ( T-TOPBACH  m  6 )                                                     07  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  10  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  10  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  10  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 35           PMA 15:33 07/08/87 )   ( T-TOPBACH  m  7 )                                                     0E  C,  14  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  14  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 36           PMA 15:33 07/08/87 )   ( T-TOPBACH  m  8 )                                                     07  C,  0C  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  0F  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0F  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  16  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 37           PMA 15:33 07/08/87 )   ( T-TOPBACH  m  9 )                                                     0E  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  14  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  14  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  17  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  1D  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 38           PMA 15:33 07/08/87 )   ( T-TOPBACH  m 10 )                                                     07  C,  1F  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  1F  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                                                                                   0E  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  14  C,   C  C,  4  C,  00  C,  00  C,                                                                                   0E  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  1F  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 39           PMA 15:33 07/08/87 )   ( T-TOPBACH  m 11 )                                                     0E  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  1F  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  14  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 40           PMA 15:33 07/08/87 )   ( T-TOPBACH  m 12 )                                                     1C  C,  13  C,   C  C,  4  C,  00  C,  00  C,                                                                                                                                                                                                                                                                                   1C  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                                                                                                                                                                                                                   1C  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                                                                                                                                         ( Hattrick Sound TABLES [T-]: 41           PMA 15:33 07/08/87 )   ( T-TOPBACH  m 13 )                                                     0E  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  0F  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  0C  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 42           PMA 15:33 07/08/87 )   ( T-TOPBACH  m 14 )                                                     0E  C,  09  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  0A  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  0C  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  0F  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0F  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 43           PMA 15:33 07/08/87 )   ( T-TOPBACH  m 15 )                                                     0E  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  10  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  10  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 44           PMA 15:33 07/08/87 )   ( T-TOPBACH  m 16 )                                                     07  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  10  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  10  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  10  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 45           PMA 15:33 07/08/87 )   ( T-TOPBACH  m 17 )                                                     07  C,  16  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  16  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  16  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 46           PMA 15:33 07/08/87 )   ( T-TOPBACH  m 18 )                                                     07  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  16  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  16  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  16  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  16  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  16  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  16  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 47           PMA 15:33 07/08/87 )   ( T-TOPBACH  m 19 )                                                     0E  C,  1F  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  1F  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  16  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 48           PMA 15:33 07/08/87 )   ( T-TOPBACH  m 20 )                                                     07  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  16  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  16  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0A  C,   C  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 49           PMA 15:33 07/08/87 )   ( T-TOPBACH  m 21 )                                                     07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  0F  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0F  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  16  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 50           PMA 15:33 07/08/87 )   ( T-TOPBACH  m 22 )                                                     07  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  16  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                                                                                   0E  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0F  C,   C  C,  4  C,  00  C,  00  C,                                                                                   0E  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 51           PMA 15:33 07/08/87 )   ( T-TOPBACH  m 23 )                                                     0E  C,  16  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  0F  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 52           PMA 15:33 07/08/87 )   ( T-TOPBACH  m 24 )                                                     1C  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                                                                                   1C  C,  00  C,  00  C,  0  C,  00  C,  00  C,  00  C,                                                                                                                                 HERE EQU T-BOTBACH   ( m 1 )                                      V1  C,  1C  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   1C  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   1C  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                                                                                                                                         ( Hattrick Sound TABLES [T-]: 54 [no 53]   PMA 15:33 07/08/87 )   ( T-BOTBACH  m  2 )                                                     0E  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  13  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  13  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  13  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 55           PMA 15:33 07/08/87 )   ( T-BOTBACH  m  3 )                                                     0E  C,  09  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  1F  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 56           PMA 15:33 07/08/87 )   ( T-BOTBACH  m  4 )                                                     0E  C,  13  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  09  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 57           PMA 15:33 07/08/87 )   ( T-BOTBACH  m  5 )                                                     07  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  16  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  16  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  16  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 58           PMA 15:33 07/08/87 )   ( T-BOTBACH  m  6 )                                                     07  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  17  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  17  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  17  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 59           PMA 15:33 07/08/87 )   ( T-BOTBACH  m  7 )                                                     07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  1F  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  1F  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  1F  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  1D  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 60           PMA 15:33 07/08/87 )   ( T-BOTBACH  m  8 )                                                     0E  C,  0D  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  11  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  11  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  1F  C,   C  C,  4  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 61           PMA 15:33 07/08/87 )   ( T-BOTBACH  m  9 )                                                     0E  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  1F  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  1F  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  0D  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0D  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0F  C,   C  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 62           PMA 15:33 07/08/87 )   ( T-BOTBACH  m 10 )                                                     0E  C,  11  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0D  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0D  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  13  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  14  C,   C  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 63           PMA 15:33 07/08/87 )   ( T-BOTBACH  m 11 )                                                     07  C,  17  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  14  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  17  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  1A  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  11  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  14  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  D  C,  00  C,  00  C,                                                                                   0E  C,  11  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  11  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 64           PMA 15:33 07/08/87 )   ( T-BOTBACH  m 12 )                                                     0E  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  1A  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  14  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  1A  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  11  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  1A  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 65           PMA 15:33 07/08/87 )   ( T-BOTBACH  m 13 )                                                     0E  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  0D  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  11  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  14  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  14  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  17  C,   C  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 66           PMA 15:33 07/08/87 )   ( T-BOTBACH  m 14 )                                                     0E  C,  1A  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  14  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  11  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  14  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  11  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 67           PMA 15:33 07/08/87 )   ( T-BOTBACH  m 15 )                                                     07  C,  0A  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  13  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 68           PMA 15:33 07/08/87 )   ( T-BOTBACH  m 16 )                                                     0E  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  17  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  13  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  17  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  13  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 69           PMA 15:33 07/08/87 )   ( T-BOTBACH  m 17 )                                                     07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  09  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0A  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  09  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  09  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0A  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  09  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  09  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0A  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  09  C,   C  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 70           PMA 15:33 07/08/87 )   ( T-BOTBACH  m 18 )                                                     07  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 71           PMA 15:33 07/08/87 )   ( T-BOTBACH  m 19 )                                                     07  C,  11  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  11  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  11  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 72           PMA 15:33 07/08/87 )   ( T-BOTBACH  m 20 )                                                     0E  C,  14  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  1A  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  13  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  1A  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   0E  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  1A  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 73           PMA 15:33 07/08/87 )   ( T-BOTBACH  m 21 )                                                     07  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  11  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  14  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  14  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  17  C,   C  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 74           PMA 15:33 07/08/87 )   ( T-BOTBACH  m 22 )                                                     07  C,  1A  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   07  C,  09  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  1F  C,   C  C,  4  C,  00  C,  00  C,                                                                                   07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  1F  C,   C  C,  4  C,  00  C,  00  C,                   07  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0F  C,   C  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 75           PMA 15:33 07/08/87 )   ( T-BOTBACH  m 23 )                                                     07  C,  11  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  11  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  13  C,   C  C,  D  C,  00  C,  00  C,                                                                                   07  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   07  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                                                                                   0E  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0E  C,  1A  C,   C  C,  D  C,  00  C,  00  C,                   00  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 76           PMA 15:33 07/08/87 )   ( T-BOTBACH  m 24 )                                                     1C  C,  13  C,   C  C,  D  C,  00  C,  00  C,                                                                                                                                                   1C  C,  00  C,  00  C,  0  C,  00  C,  00  C,  00  C,                                                                                                                                                                                                                                                                 HERE EQU T-TOPTURK                                                ( upbeat )                                                      V0  C,  06  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                                                                                                                                         ( Hattrick Sound TABLES [T-]: 77           PMA 15:33 07/08/87 )   ( T-TOPTURK  m  1 )                                                     08  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   08  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   06  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   06  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                                                                                   08  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 78           PMA 15:33 07/08/87 )   ( T-TOPTURK  m  > )                                                     08  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   06  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                                                                                   08  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   06  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  1A  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 79           PMA 15:33 07/08/87 )   ( T-TOPTURK  m  4 )                                                     0C  C,  17  C,   C  C,  4  C,  00  C,  00  C,                                                                                   08  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   08  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   06  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                                                                                   06  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  1F  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  1A  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 80           PMA 15:33 07/08/87 )   ( T-TOPTURK  m  > )                                                     08  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   06  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   06  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                                                                                   06  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   06  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   06  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   06  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                                                                                   08  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   06  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  1A  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 81           PMA 15:33 07/08/87 )   ( T-TOPTURK  m  7 )                                                     06  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   0C  C,  13  C,   C  C,  4  C,  00  C,  00  C,                                                                                   06  C,  11  C,   C  C,  4  C,  00  C,  00  C,                                                                                   06  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                                                                                   08  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 82           PMA 15:33 07/08/87 )   ( T-TOPTURK  m  > )                                                     0C  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                                                                                   0C  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                                                                                   06  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   0C  C,  13  C,   C  C,  4  C,  00  C,  00  C,                                                                                   06  C,  17  C,   C  C,  4  C,  00  C,  00  C,                                                                                   08  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 83           PMA 15:33 07/08/87 )   ( T-TOPTURK  m 10 )                                                     06  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   0C  C,  13  C,   C  C,  4  C,  00  C,  00  C,                                                                                   06  C,  17  C,   C  C,  4  C,  00  C,  00  C,                                                                                   18  C,  13  C,   C  C,  4  C,  00  C,  00  C,                                                                                 ( 00  C,  00  C,  00  C,  0  C,  00  C,  00  C, )                                                                                                                                                 06  C,  15  C,   C  C,  4  C,  00  C,  00  C,                   0C  C,  11  C,   C  C,  4  C,  00  C,  00  C,                                                                                   06  C,  15  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 84           PMA 15:33 07/08/87 )   ( T-TOPTURK  m  > )                                                     08  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   06  C,  15  C,   C  C,  4  C,  00  C,  00  C,                   0C  C,  11  C,   C  C,  4  C,  00  C,  00  C,                                                                                   06  C,  15  C,   C  C,  4  C,  00  C,  00  C,                                                                                   08  C,  11  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0C  C,  13  C,   C  C,  4  C,  00  C,  00  C,                                                                         ( Hattrick Sound TABLES [T-]: 85           PMA 15:33 07/08/87 )   ( T-TOPTURK  m 13 )                                                     08  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  0E  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   08  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   08  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 86           PMA 15:33 07/08/87 )   ( T-TOPTURK  m  > )                                                     0C  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                                                                                   06  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  1A  C,   C  C,  4  C,  00  C,  00  C,                                                                                   06  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   0C  C,  13  C,   C  C,  4  C,  00  C,  00  C,                                                                                   06  C,  11  C,   C  C,  4  C,  00  C,  00  C,                                                                                   06  C,  13  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  1A  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 87           PMA 15:33 07/08/87 )   ( T-TOPTURK  m 16 )                                                     08  C,  17  C,   C  C,  4  C,  00  C,  00  C,                                                                                   10  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   08  C,  1A  C,   D  C,  4  C,  00  C,  00  C,                                                                                   10  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   24  C,  1D  C,   F  C,  4  C,  00  C,  00  C,  00  C,                                                                 HERE EQU T-BOTTURK                                                ( upbeat )                                                      V1  C,  06  C,  09  C,   C  C,  D  C,  00  C,  00  C,                   06  C,  0C  C,   C  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 89  [no 88]  PMA 15:33 07/08/87 )   ( T-BOTTURK  m  1 )                                                     08  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   08  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   06  C,  13  C,   C  C,  D  C,  00  C,  00  C,                   06  C,  11  C,   C  C,  D  C,  00  C,  00  C,                                                                                   08  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 90           PMA 15:33 07/08/87 )   ( T-BOTTURK  m  > )                                                     08  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   06  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   06  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                                                                                   08  C,  09  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  09  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   06  C,  09  C,   C  C,  D  C,  00  C,  00  C,                   06  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   06  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   06  C,  0C  C,   C  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 91           PMA 15:33 07/08/87 )   ( T-BOTTURK  m  4 )                                                     0C  C,  09  C,   C  C,  D  C,  00  C,  00  C,                                                                                   08  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   08  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   06  C,  09  C,   C  C,  D  C,  00  C,  00  C,                   06  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                                                                                   08  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 92           PMA 15:33 07/08/87 )   ( T-BOTTURK  m  > )                                                     08  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   06  C,  13  C,   C  C,  D  C,  00  C,  00  C,                   06  C,  11  C,   C  C,  D  C,  00  C,  00  C,                                                                                   08  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  13  C,   C  C,  D  C,  00  C,  00  C,                                                                                   08  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   06  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   06  C,  1F  C,   C  C,  4  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 93           PMA 15:33 07/08/87 )   ( T-BOTTURK  m  7 )                                                     06  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   0C  C,  17  C,   C  C,  4  C,  00  C,  00  C,                                                                                   06  C,  14  C,   C  C,  4  C,  00  C,  00  C,                                                                                   06  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   06  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                                                                                   08  C,  09  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 94           PMA 15:33 07/08/87 )   ( T-BOTTURK  m  > )                                                     0C  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                                                                                   0C  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                                                                                   06  C,  13  C,   C  C,  D  C,  00  C,  00  C,                   0C  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                                                                                   06  C,  13  C,   C  C,  D  C,  00  C,  00  C,                                                                                   08  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 95           PMA 15:33 07/08/87 )   ( T-BOTTURK  m 10 )                                                     06  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   0C  C,  17  C,   C  C,  4  C,  00  C,  00  C,                                                                                   06  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                                                                                   18  C,  17  C,   C  C,  4  C,  00  C,  00  C,                                                                                 ( 00  C,  00  C,  00  C,  0  C,  00  C,  00  C, )                                                                                                                                                 06  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   0C  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                                                                                   06  C,  0B  C,   C  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 96           PMA 15:33 07/08/87 )   ( T-BOTTURK  m  > )                                                     08  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  0E  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   06  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   0C  C,  09  C,   C  C,  D  C,  00  C,  00  C,                                                                                   06  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                                                                                   08  C,  09  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   0C  C,  1F  C,   C  C,  4  C,  00  C,  00  C,                                                                         ( Hattrick Sound TABLES [T-]: 97           PMA 15:33 07/08/87 )   ( T-BOTTURK  m 13 )                                                     08  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   08  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   08  C,  0C  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   08  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 98           PMA 15:33 07/08/87 )   ( T-BOTTURK  m  > )                                                     08  C,  1F  C,   C  C,  4  C,  00  C,  00  C,                   04  C,  00  C,  00  C,  0  C,  00  C,  00  C,                   06  C,  0B  C,   C  C,  D  C,  00  C,  00  C,                   06  C,  1F  C,   C  C,  4  C,  00  C,  00  C,                                                                                   06  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   0C  C,  17  C,   C  C,  4  C,  00  C,  00  C,                                                                                   06  C,  15  C,   C  C,  4  C,  00  C,  00  C,                                                                                   06  C,  17  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  1D  C,   C  C,  4  C,  00  C,  00  C,                   06  C,  0F  C,   C  C,  D  C,  00  C,  00  C,                   06  C,  0C  C,   C  C,  D  C,  00  C,  00  C,         ( Hattrick Sound TABLES [T-]: 99           PMA 15:33 07/08/87 )   ( T-BOTTURK  m 16 )                                                     08  C,  09  C,   C  C,  D  C,  00  C,  00  C,                                                                                   10  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   08  C,  0C  C,   D  C,  D  C,  00  C,  00  C,                                                                                   10  C,  00  C,  00  C,  0  C,  00  C,  00  C,                                                                                   24  C,  13  C,   F  C,  D  C,  00  C,  00  C,  00  C,                                                                                                                                                                                                                                                                                                                                 ( DIRECT ERASE WORD                  P1        14:25 06/19/86 ) CODE (DIRECT-ERASE) ( PRIORITY/TOP ZONE/HOWMANY --- )            0 # LDY  NOS LDA NOS STY       ( GET TOP ZONE, ZERO NOS )       TAY 0= NOT      IF             ( TOP=COUNT TO Y-REG     )       BEGIN 3E # LDA CLC NOS ADC NOS STA    ( ADD 62 TO ZERO  )       CS IF NOS 1+ INC THEN          ( TOP ZONE TIMES, BUT    )       DEY 0= UNTIL    THEN           ( ONLY IF TOP NOT ZERO   )       NOS 2+ LDA  A ASL A ASL        ( PULL PRIORITY AND 4* IT)       CLC NOS ADC NOS STA            ( ADD IT TO ADDR IN NOS  )       CS IF NOS 1+ INC THEN          ( INC IF CARRY           )       GNE0 >LO # LDA                 ( GET DL-TAB-START LOBYTE)       CLC NOS ADC NOS STA            ( ADD TO NOS & POP BACK  )       GNE0 >HI # LDA                 ( GET DL-TAB-START HIBYTE)       NOS 1+  ADC NOS 1+ STA         ( ADD TO NOS 1+ & POPBACK)       1 # LDA CLC NOS ADC NOS STA    ( ADD 3 TO ADDR IN NOS TO)       CS IF NOS 1+ INC THEN          ( BEGIN AT DL-HEADER XBYTE)     ( DIRECT ERASE WORD                  P2        14:25 06/19/86 )  ( AA # LDA                    ( VALUE TO POKE INTO DL-HEADER)   BEGIN 1F # LDA NOS X) STA CLC 2 # LDA NOS ADC NOS STA           CS IF NOS 1+ INC THEN                                           AA # LDA  NOS X) STA        ( PHA TO SAVE COPY OF VALUE   )     CLC 3C # LDA NOS ADC NOS STA    ( ADD 62 TO GET TO NEXT   )     CS IF NOS 1+ INC THEN           ( HIGHER DL-HEADER XBYTE  )         TOS DEC 0= UNTIL        ( PULL VALUE BACK TO REINIT A )      INX INX INX INX INX INX                                        RTS END-CODE ( TOS=0 IF END )                                                                                                  CODE DIRECT-ERASE ' (DIRECT-ERASE) >BODY JSR NEXT JMP END-CODE                                                                                                                                                                                                                                                                  ( DIRECT SCROLL WORD                  P1       14:25 06/19/86 ) CODE (DIRECT-SCROLL) ( PRIORITY/TOP ZONE/HOWMANY --- )           ( ASSUMES AMOUNT TO SCROLL IS IN "SCROLL" )                     0 # LDY  NOS LDA NOS STY       ( GET TOP ZONE, ZERO NOS )       TAY 0= NOT      IF             ( TOP=COUNT TO Y-REG     )       BEGIN 3E # LDA CLC NOS ADC NOS STA    ( ADD 62 TO ZERO  )       CS IF NOS 1+ INC THEN          ( TOP ZONE TIMES, BUT    )       DEY 0= UNTIL    THEN           ( ONLY IF TOP NOT ZERO   )       NOS 2+ LDA  A ASL A ASL        ( PULL PRIORITY AND 4* IT)       CLC NOS ADC NOS STA            ( ADD IT TO ADDR IN NOS  )       CS IF NOS 1+ INC THEN          ( INC IF NOS = 0         )       GNE0 >LO # LDA                 ( GET DL-TAB-START LOBYTE)       CLC NOS ADC NOS STA            ( ADD TO NOS & POP BACK  )       GNE0 >HI # LDA                 ( GET DL-TAB-START HIBYTE)       NOS 1+  ADC NOS 1+ STA         ( ADD TO NOS 1+ & POPBACK)                                                                      ( DIRECT SCROLL WORD                  P2       11:12 08/15/86 )  3 # LDA CLC NOS ADC NOS STA    ( ADD 3 TO ADDR IN NOS TO)       CS IF NOS 1+ INC THEN          ( BEGIN AT DL-HEADER XBYTE)      SCROLL LDA                  ( VALUE TO ADD  INTO DL-HEADER)     BEGIN PHA CLC NOS X) ADC    ( PHA, ADD VALUE TO DL-HEADER X)    NOS X) STA                  ( STORE BACK ALTERED VALUE    )     CLC 3E # LDA NOS ADC NOS STA    ( ADD 62 TO GET TO NEXT   )     CS IF NOS 1+ INC THEN           ( HIGHER DL-HEADER XBYTE  )     PLA TOS DEC 0= UNTIL        ( PULL VALUE BACK TO REINIT A )      INX INX INX INX INX INX                                        RTS END-CODE ( TOS =0 IF END )                                                                                                 CODE DIRECT-SCROLL ' (DIRECT-SCROLL) >BODY JSR NEXT JMP              END-CODE                                                                                                                                                                                   ( BASIC IMAGE & ELEMENT TABLE DOCUMENTATION    10:14 05/28/86 ) (                                                            )                                                                  ( ELEMENT TABLE ENTRY FORMAT: ELEMENTS CAN BE IN ANY ORDER    ) ( SINCE DL ENTRY PLACEMENT IS DETERMINED IN ENTRY ITSELF      ) ( |   7     6    5 4 3 2 1 0  | IMAGE TABLE | X     | Y     | ) ( | ALTER  LAST  PRIORITY/DL# | ENTRY #     | COORD | COORD | )                                                                 ( IMAGE TABLE ENTRY FORMAT:  IMAGE NUMBER BY TABLE POSITION   ) ( |         |  7 6 5    4 3 2 1 0 |         |             |   ) ( | LO ADDR | PALETTE     WIDTH   | HI ADDR | #ZONES HIGH |  )                                                                                                                                                                                                                                                                                                                                  ( PLAYERS ROM VERSION OF ETAB                  16:22 11/24/86 ) 0A EQU BLUE-ALTER-BYTE 30 EQU BLUE-START-X  76 EQU BLUE-START-Y 0B EQU REDD-ALTER-BYTE 50 EQU REDD-START-X  76 EQU REDD-START-Y 0C EQU BGLY-ALTER-BYTE 09 EQU BGLY-START-X  60 EQU BGLY-START-Y 0D EQU RGLY-ALTER-BYTE 91 EQU RGLY-START-X  74 EQU RGLY-START-Y 0E EQU PUCK-ALTER-BYTE 40 EQU PUCK-START-X  76 EQU PUCK-START-Y                                                                 HERE EQU PLAYERS-ETAB-ROM                                       BLUE-ALTER-BYTE C, BPFE C, BLUE-START-X C, BLUE-START-Y C,      REDD-ALTER-BYTE C, RPFW C, REDD-START-X C, REDD-START-Y C,      BGLY-ALTER-BYTE C, BGFE C, BGLY-START-X C, BGLY-START-Y C,      RGLY-ALTER-BYTE C, RGFW C, RGLY-START-X C, RGLY-START-Y C,      PUCK-ALTER-BYTE C, PUCK C, PUCK-START-X C, PUCK-START-Y C, FF C,                                                                                                                                                                                                ( SCOREBOARD  VERSION OF ETAB                  16:22 11/24/86 ) 80 EQU SCOA-ALTER-BYTE 0D EQU SCOA-START-X  00 EQU SCOA-START-Y 81 EQU SCOB-ALTER-BYTE 6D EQU SCOB-START-X  00 EQU SCOB-START-Y 8D EQU VS-C-ALTER-BYTE 72 EQU VS-C-START-X  0E EQU VS-C-START-Y 0D EQU VS-R-ALTER-BYTE 7C EQU VS-R-START-X  0E EQU VS-R-START-Y                                                                 HERE EQU SCOREBOARD-ETAB-ROM                                    SCOA-ALTER-BYTE C, SCOREA C, SCOA-START-X C, SCOA-START-Y C,    SCOB-ALTER-BYTE C, SCOREB C, SCOB-START-X C, SCOB-START-Y C,    VS-C-ALTER-BYTE C, VS-CTR C, VS-C-START-X C, VS-C-START-Y C,    VS-R-ALTER-BYTE C, VS-RED C, VS-R-START-X C, VS-R-START-Y C,       FF C,                                                                                                                                                                                                                                                                                                                        ( NUMBERS TEST ELEMENT TABLE                   16:22 11/24/86 ) 82 EQU NUM0-ALTER-BYTE 19 EQU NUM0-START-X  04 EQU NUM0-START-Y 83 EQU NUM1-ALTER-BYTE 20 EQU NUM1-START-X  04 EQU NUM1-START-Y 84 EQU NUM2-ALTER-BYTE 7C EQU NUM2-START-X  04 EQU NUM2-START-Y 85 EQU NUM3-ALTER-BYTE 83 EQU NUM3-START-X  04 EQU NUM3-START-Y 86 EQU NUM4-ALTER-BYTE 45 EQU NUM4-START-X  0A EQU NUM4-START-Y 87 EQU NUM5-ALTER-BYTE 50 EQU NUM5-START-X  0A EQU NUM5-START-Y 88 EQU NUM6-ALTER-BYTE 57 EQU NUM6-START-X  0A EQU NUM6-START-Y 89 EQU NUM7-ALTER-BYTE 2F EQU NUM7-START-X  08 EQU NUM7-START-Y 8A EQU NUM8-ALTER-BYTE 34 EQU NUM8-START-X  08 EQU NUM8-START-Y 8B EQU NUM9-ALTER-BYTE 68 EQU NUM9-START-X  08 EQU NUM9-START-Y 8C EQU NUMA-ALTER-BYTE 6D EQU NUMA-START-X  08 EQU NUMA-START-Y                                                                                                                                                                                                                                                                 ( NUMBER SLOTS ETAB IN ROM                     14:21 12/02/86 ) HERE EQU NUMBERS-ETAB-ROM                                       NUM0-ALTER-BYTE C, Y0 C, NUM0-START-X C, NUM0-START-Y C,        NUM1-ALTER-BYTE C, Y0 C, NUM1-START-X C, NUM1-START-Y C,        NUM2-ALTER-BYTE C, Y0 C, NUM2-START-X C, NUM2-START-Y C,        NUM3-ALTER-BYTE C, Y0 C, NUM3-START-X C, NUM3-START-Y C,        NUM4-ALTER-BYTE C, Y0 C, NUM4-START-X C, NUM4-START-Y C,        NUM5-ALTER-BYTE C, Y0 C, NUM5-START-X C, NUM5-START-Y C,        NUM6-ALTER-BYTE C, Y0 C, NUM6-START-X C, NUM6-START-Y C,        NUM7-ALTER-BYTE C, W0 C, NUM7-START-X C, NUM7-START-Y C,        NUM8-ALTER-BYTE C, W0 C, NUM8-START-X C, NUM8-START-Y C,        NUM9-ALTER-BYTE C, W0 C, NUM9-START-X C, NUM9-START-Y C,        NUMA-ALTER-BYTE C, W0 C, NUMA-START-X C, NUMA-START-Y C, FF C,                                                                                                                                                                                                  ( GOAL TWIRLERS NET ELEM TABLE EQUATES         11:46 12/03/86 ) 88 EQU BU-TWIRL-ALT 02 EQU BU-TWIRL-ST-X 50 EQU BU-TWIRL-ST-Y   88 EQU BL-TWIRL-ALT 02 EQU BL-TWIRL-ST-X 88 EQU BL-TWIRL-ST-Y   89 EQU RU-TWIRL-ALT 99 EQU RU-TWIRL-ST-X 50 EQU RU-TWIRL-ST-Y   89 EQU RL-TWIRL-ALT 99 EQU RL-TWIRL-ST-X 88 EQU RL-TWIRL-ST-Y                         ( 51 ORIGINAL BUT & RUT Y-VALUES )        86 EQU BU-GOAL-ALT 08 EQU BU-GOAL-ST-X 58 EQU BU-GOAL-ST-Y      86 EQU BL-GOAL-ALT 08 EQU BL-GOAL-ST-X 70 EQU BL-GOAL-ST-Y      87 EQU RU-GOAL-ALT 8C EQU RU-GOAL-ST-X 58 EQU RU-GOAL-ST-Y      87 EQU RL-GOAL-ALT 8C EQU RL-GOAL-ST-X 70 EQU RL-GOAL-ST-Y                                                                      88 EQU BU-NETT-ALT 00 EQU BU-NETT-ST-X 58 EQU BU-NETT-ST-Y      88 EQU BL-NETT-ALT 00 EQU BL-NETT-ST-X 70 EQU BL-NETT-ST-Y      89 EQU RU-NETT-ALT 97 EQU RU-NETT-ST-X 58 EQU RU-NETT-ST-Y      89 EQU RL-NETT-ALT 97 EQU RL-NETT-ST-X 70 EQU RL-NETT-ST-Y                                                                      ( GOAL TWIRLERS NET ETAB IN ROM                11:46 12/03/86 ) HERE EQU NETGOAL-ETAB-ROM                                       BU-TWIRL-ALT C, B-TWIRLA C, BU-TWIRL-ST-X C, BU-TWIRL-ST-Y C,   BL-TWIRL-ALT C, B-TWIRLA C, BL-TWIRL-ST-X C, BL-TWIRL-ST-Y C,   RU-TWIRL-ALT C, R-TWIRLA C, RU-TWIRL-ST-X C, RU-TWIRL-ST-Y C,   RL-TWIRL-ALT C, R-TWIRLA C, RL-TWIRL-ST-X C, RL-TWIRL-ST-Y C,   BU-GOAL-ALT  C, UPGOALB  C, BU-GOAL-ST-X  C, BU-GOAL-ST-Y  C,   BL-GOAL-ALT  C, LOGOALB  C, BL-GOAL-ST-X  C, BL-GOAL-ST-Y  C,   RU-GOAL-ALT  C, UPGOALR  C, RU-GOAL-ST-X  C, RU-GOAL-ST-Y  C,   RL-GOAL-ALT  C, LOGOALR  C, RL-GOAL-ST-X  C, RL-GOAL-ST-Y  C,   BU-NETT-ALT  C, UPNET    C, BU-NETT-ST-X  C, BU-NETT-ST-Y  C,   BL-NETT-ALT  C, LONET    C, BL-NETT-ST-X  C, BL-NETT-ST-Y  C,   RU-NETT-ALT  C, UPNET    C, RU-NETT-ST-X  C, RU-NETT-ST-Y  C,   RL-NETT-ALT  C, LONET    C, RL-NETT-ST-X  C, RL-NETT-ST-Y  C,                                                                                              FF C,                                ( CENTERLINES       ELEM TABLE EQUATES         11:46 12/03/86 ) 85 EQU CLINES0-ALT 37 EQU CLINES0-ST-X 20 EQU CLINES0-ST-Y      85 EQU CLINES1-ALT 37 EQU CLINES1-ST-X 30 EQU CLINES1-ST-Y      85 EQU CLINES2-ALT 37 EQU CLINES2-ST-X 40 EQU CLINES2-ST-Y      85 EQU CLINES3-ALT 37 EQU CLINES3-ST-X 50 EQU CLINES3-ST-Y      85 EQU CLINES4-ALT 37 EQU CLINES4-ST-X 60 EQU CLINES4-ST-Y      85 EQU CLINES5-ALT 37 EQU CLINES5-ST-X 70 EQU CLINES5-ST-Y      85 EQU CLINES6-ALT 37 EQU CLINES6-ST-X 80 EQU CLINES6-ST-Y      85 EQU CLINES7-ALT 37 EQU CLINES7-ST-X 90 EQU CLINES7-ST-Y      85 EQU CLINES8-ALT 37 EQU CLINES8-ST-X A0 EQU CLINES8-ST-Y      85 EQU CLINES9-ALT 37 EQU CLINES9-ST-X B0 EQU CLINES9-ST-Y      84 EQU CIRTOP-ALT  3C EQU CIRTOP-ST-X  50 EQU CIRTOP-ST-Y       84 EQU CIRBOT-ALT  3C EQU CIRBOT-ST-X  70 EQU CIRBOT-ST-Y                                                                                                                                                                                                       ( CENTERLINES       ETAB IN ROM                11:46 12/03/86 ) HERE EQU CENTERLINES-ETAB-ROM                                   CLINES0-ALT C, CLINES   C, CLINES0-ST-X C, CLINES0-ST-Y C,      CLINES1-ALT C, CLINES   C, CLINES1-ST-X C, CLINES1-ST-Y C,      CLINES2-ALT C, CLINES   C, CLINES2-ST-X C, CLINES2-ST-Y C,      CLINES3-ALT C, CLINES   C, CLINES3-ST-X C, CLINES3-ST-Y C,      CLINES4-ALT C, CLINES   C, CLINES4-ST-X C, CLINES4-ST-Y C,      CLINES5-ALT C, CLINES   C, CLINES5-ST-X C, CLINES5-ST-Y C,      CLINES6-ALT C, CLINES   C, CLINES6-ST-X C, CLINES6-ST-Y C,      CLINES7-ALT C, CLINES   C, CLINES7-ST-X C, CLINES7-ST-Y C,      CLINES8-ALT C, CLINES   C, CLINES8-ST-X C, CLINES8-ST-Y C,      CLINES9-ALT C, CLINES   C, CLINES9-ST-X C, CLINES9-ST-Y C,      CIRTOP-ALT  C, CIRTOP C, CIRTOP-ST-X  C, CIRTOP-ST-Y  C,        CIRBOT-ALT  C, CIRBOT C, CIRBOT-ST-X  C, CIRBOT-ST-Y C, FF C,                                                                                                                                   ( BORDER ETAB EQU'S                            10:55 12/04/86 ) 82 EQU BORDER0-ALT F9 EQU BORDER0-ST-X 20 EQU BORDER0-ST-Y      83 EQU BORDRR0-ALT 97 EQU BORDRR0-ST-X 20 EQU BORDRR0-ST-Y      82 EQU BORDER1-ALT F9 EQU BORDER1-ST-X 30 EQU BORDER1-ST-Y      83 EQU BORDRR1-ALT 97 EQU BORDRR1-ST-X 30 EQU BORDRR1-ST-Y      82 EQU BORDER2-ALT F9 EQU BORDER2-ST-X 40 EQU BORDER2-ST-Y      83 EQU BORDRR2-ALT 97 EQU BORDRR2-ST-X 40 EQU BORDRR2-ST-Y      82 EQU BORDER3-ALT F9 EQU BORDER3-ST-X 90 EQU BORDER3-ST-Y      83 EQU BORDRR3-ALT 97 EQU BORDRR3-ST-X 90 EQU BORDRR3-ST-Y      82 EQU BORDER4-ALT F9 EQU BORDER4-ST-X A0 EQU BORDER4-ST-Y      83 EQU BORDRR4-ALT 97 EQU BORDRR4-ST-X A0 EQU BORDRR4-ST-Y      82 EQU BORDER5-ALT F9 EQU BORDER5-ST-X B0 EQU BORDER5-ST-Y      83 EQU BORDRR5-ALT 97 EQU BORDRR5-ST-X B0 EQU BORDRR5-ST-Y                                                                                                                                                                                                      (                                              10:59 12/04/86 ) 82 EQU BORDERH-ALT F9 EQU BORDERH-ST-X 50 EQU BORDERH-ST-Y      83 EQU BORDRRH-ALT 97 EQU BORDRRH-ST-X 50 EQU BORDRRH-ST-Y      82 EQU BORDERL-ALT F9 EQU BORDERL-ST-X 88 EQU BORDERL-ST-Y      83 EQU BORDRRL-ALT 97 EQU BORDRRL-ST-X 88 EQU BORDRRL-ST-Y                                                                      HERE EQU BORDER-ETAB-ROM                                        BORDER0-ALT C, SBORDER C, BORDER0-ST-X C, BORDER0-ST-Y C,       BORDRR0-ALT C, SBORDER C, BORDRR0-ST-X C, BORDRR0-ST-Y C,       BORDER1-ALT C, SBORDER C, BORDER1-ST-X C, BORDER1-ST-Y C,       BORDRR1-ALT C, SBORDER C, BORDRR1-ST-X C, BORDRR1-ST-Y C,       BORDER2-ALT C, SBORDER C, BORDER2-ST-X C, BORDER2-ST-Y C,       BORDRR2-ALT C, SBORDER C, BORDRR2-ST-X C, BORDRR2-ST-Y C,       BORDER3-ALT C, SBORDER C, BORDER3-ST-X C, BORDER3-ST-Y C,       BORDRR3-ALT C, SBORDER C, BORDRR3-ST-X C, BORDRR3-ST-Y C,                                                                       (                                              11:57 12/04/86 ) BORDER4-ALT C, SBORDER C, BORDER4-ST-X C, BORDER4-ST-Y C,       BORDRR4-ALT C, SBORDER C, BORDRR4-ST-X C, BORDRR4-ST-Y C,       BORDER5-ALT C, SBORDER C, BORDER5-ST-X C, BORDER5-ST-Y C,       BORDRR5-ALT C, SBORDER C, BORDRR5-ST-X C, BORDRR5-ST-Y C,       BORDERH-ALT C, GBORDER C, BORDERH-ST-X C, BORDERH-ST-Y C,       BORDRRH-ALT C, GBORDER C, BORDRRH-ST-X C, BORDRRH-ST-Y C,       BORDERL-ALT C, GBORDER C, BORDERL-ST-X C, BORDERL-ST-Y C,       BORDRRL-ALT C, GBORDER C, BORDRRL-ST-X C, BORDRRL-ST-Y C,       86 C, TBORDER C, 6 C, 20 C, 87 C, TBORDER C, 7E C, 20 C, ( TOP) 86 C, BBORDER C, 6 C, B8 C, 87 C, BBORDER C, 7E C, B8 C, ( BOT) 88 C, ULCORN  C, 1 C, 20 C, 89 C, URCORN  C, 97 C, 20 C,        88 C, LLCORN  C, 1 C, B8 C, 89 C, LRCORN  C, 97 C, B8 C,        8C C, ULDOT   C, 09 C, 28 C, 8D C, URDOT   C, 95 C, 28 C,       8C C, LLDOT   C, 09 C, B0 C, 8D C, LRDOT   C, 95 C, B0 C,       FF C,                                                           ( TITLE-SCREEN ROM-ETAB                        12:03 04/15/87 ) HERE EQU TITLE-ETAB-ROM                                           82 C,   1PLAYERR   C,   3E C, 60 C,                             83 C,   2PLAYERB   C,   3E C, 80 C,                             84 C,   EXPERTB    C,   5B C, 70 C,                             85 C,   NOVICER    C,   30 C, 70 C,                             80 C,   ATA87      C,   0F C, B0 C,                             81 C,   BALLF      C,   42 C, B0 C,                             82 C,   BALLB      C,   72 C, B0 C,                             80 C,   HAT        C,   0D C, 10 C,                             81 C,   TRICK      C,   31 C, 28 C,                             FF C,                                                                                                                                                                                                                                                                                                                         ( IMAGE TABLE FOR BLUE PLAYER - PAL0 -HATRICK 11:04 11/21/86 )  HERE EQU PLAYERS-ITAB                                           0000 C,  001C C,  00D4 C,  0003 C,  00 EQU BPFS                 0004 C,  001C C,  00D4 C,  0003 C,  01 EQU BPFSR                0008 C,  001C C,  00D4 C,  0003 C,  02 EQU BPFSL                000C C,  001C C,  00D4 C,  0003 C,  03 EQU BPFN                 0010 C,  001C C,  00D4 C,  0003 C,  04 EQU BPFNR                0014 C,  001C C,  00D4 C,  0003 C,  05 EQU BPFNL                0018 C,  001C C,  00D3 C,  0003 C,  06 EQU BPFE                 001C C,  001C C,  00D3 C,  0003 C,  07 EQU BPFER                0020 C,  001C C,  00D3 C,  0003 C,  08 EQU BPFEL                0024 C,  001C C,  00D3 C,  0003 C,  09 EQU BPFW                 0028 C,  001C C,  00D3 C,  0003 C,  0A EQU BPFWR                002C C,  001C C,  00D3 C,  0003 C,  0B EQU BPFWL                                                                                                                                                ( IMAGE TABLE FOR BLUE PLAYER - PAL0 - CONT.  11:04 11/21/86 )  0030 C,  001D C,  00D8 C,  0004 C,  0C EQU BPFNW                0033 C,  001D C,  00D8 C,  0004 C,  0D EQU BPFNWR               0036 C,  001D C,  00D8 C,  0004 C,  0E EQU BPFNWL               0039 C,  001D C,  00D8 C,  0004 C,  0F EQU BPFSE                003C C,  001D C,  00D8 C,  0004 C,  10 EQU BPFSER               003F C,  001D C,  00D8 C,  0004 C,  11 EQU BPFSEL               0042 C,  001B C,  00D1 C,  0003 C,  12 EQU BPFSW                0047 C,  001B C,  00D1 C,  0003 C,  13 EQU BPFSWR               004C C,  001B C,  00D1 C,  0003 C,  14 EQU BPFSWL               0051 C,  001B C,  00D1 C,  0003 C,  15 EQU BPFNE                0056 C,  001B C,  00D1 C,  0003 C,  16 EQU BPFNER               005B C,  001B C,  00D1 C,  0003 C,  17 EQU BPFNEL                                                                                                                                                                                                               ( IMAGE TABLE FOR REDD PLAYER - PAL1 -HATRICK 11:04 11/21/86 )  0000 C,  003C C,  00D4 C,  0003 C,  18 EQU RPFS                 0004 C,  003C C,  00D4 C,  0003 C,  19 EQU RPFSR                0008 C,  003C C,  00D4 C,  0003 C,  1A EQU RPFSL                000C C,  003C C,  00D4 C,  0003 C,  1B EQU RPFN                 0010 C,  003C C,  00D4 C,  0003 C,  1C EQU RPFNR                0014 C,  003C C,  00D4 C,  0003 C,  1D EQU RPFNL                0018 C,  003C C,  00D3 C,  0003 C,  1E EQU RPFE                 001C C,  003C C,  00D3 C,  0003 C,  1F EQU RPFER                0020 C,  003C C,  00D3 C,  0003 C,  20 EQU RPFEL                0024 C,  003C C,  00D3 C,  0003 C,  21 EQU RPFW                 0028 C,  003C C,  00D3 C,  0003 C,  22 EQU RPFWR                002C C,  003C C,  00D3 C,  0003 C,  23 EQU RPFWL                                                                                                                                                                                                                ( IMAGE TABLE FOR REDD PLAYER - PAL1 - CONT.  11:04 11/21/86 )  0030 C,  003D C,  00D8 C,  0004 C,  24 EQU RPFNW                0033 C,  003D C,  00D8 C,  0004 C,  25 EQU RPFNWR               0036 C,  003D C,  00D8 C,  0004 C,  26 EQU RPFNWL               0039 C,  003D C,  00D8 C,  0004 C,  27 EQU RPFSE                003C C,  003D C,  00D8 C,  0004 C,  28 EQU RPFSER               003F C,  003D C,  00D8 C,  0004 C,  29 EQU RPFSEL               0042 C,  003B C,  00D1 C,  0003 C,  2A EQU RPFSW                0047 C,  003B C,  00D1 C,  0003 C,  2B EQU RPFSWR               004C C,  003B C,  00D1 C,  0003 C,  2C EQU RPFSWL               0051 C,  003B C,  00D1 C,  0003 C,  2D EQU RPFNE                0056 C,  003B C,  00D1 C,  0003 C,  2E EQU RPFNER               005B C,  003B C,  00D1 C,  0003 C,  2F EQU RPFNEL                                                                                                                                                                                                               ( IMAGE TABLE FOR GOALIES PAL0 PAL1           11:04 11/21/86 )  0060 C,  001E C,  00CE C,  0002 C,  30 EQU BGFE                 0062 C,  001E C,  00CE C,  0002 C,  31 EQU BGFNE                0064 C,  001E C,  00CE C,  0002 C,  32 EQU BGFSE                0066 C,  001E C,  00CE C,  0002 C,  33 EQU BGFW                 0068 C,  001E C,  00CE C,  0002 C,  34 EQU BGFSW                006A C,  001E C,  00CE C,  0002 C,  35 EQU BGFNW                0060 C,  003E C,  00CE C,  0002 C,  36 EQU RGFE                 0062 C,  003E C,  00CE C,  0002 C,  37 EQU RGFNE                0064 C,  003E C,  00CE C,  0002 C,  38 EQU RGFSE                0066 C,  003E C,  00CE C,  0002 C,  39 EQU RGFW                 0068 C,  003E C,  00CE C,  0002 C,  3A EQU RGFSW                006A C,  003E C,  00CE C,  0002 C,  3B EQU RGFNW                                                                                                                                                                                                                ( IMAGE TABLE FOR SCOREBOARD                   16:21 11/26/86 ) 006C C,  0048 C,  00D0 C,  0003 C,    3C EQU SCOREA             0084 C,  0056 C,  00D0 C,  0003 C,    3D EQU SCOREB                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                             ( WHITE NUMBERS 0 - 9   PAL 2 P2C1=WHITE       13:25 12/02/86 ) 0000 C,  005F C,  00EE C,  0001 C,  3E  EQU W0                  0001 C,  005F C,  00EE C,  0001 C,  3F  EQU W1                  0002 C,  005F C,  00EE C,  0001 C,  40  EQU W2                  0003 C,  005F C,  00EE C,  0001 C,  41  EQU W3                  0004 C,  005F C,  00EE C,  0001 C,  42  EQU W4                  0005 C,  005F C,  00EE C,  0001 C,  43  EQU W5                  0006 C,  005F C,  00EE C,  0001 C,  44  EQU W6                  0007 C,  005F C,  00EE C,  0001 C,  45  EQU W7                  0008 C,  005F C,  00EE C,  0001 C,  46  EQU W8                  0009 C,  005F C,  00EE C,  0001 C,  47  EQU W9                                                                                                                                                                                                                                                                                                                                                  ( YELLOW NUMBERS 0 - 9   PAL 3 P3C1=YELLOW     13:25 12/02/86 ) 0000 C,  007F C,  00EE C,  0001 C,   48 EQU Y0                  0001 C,  007F C,  00EE C,  0001 C,   49 EQU Y1                  0002 C,  007F C,  00EE C,  0001 C,   4A EQU Y2                  0003 C,  007F C,  00EE C,  0001 C,   4B EQU Y3                  0004 C,  007F C,  00EE C,  0001 C,   4C EQU Y4                  0005 C,  007F C,  00EE C,  0001 C,   4D EQU Y5                  0006 C,  007F C,  00EE C,  0001 C,   4E EQU Y6                  0007 C,  007F C,  00EE C,  0001 C,   4F EQU Y7                  0008 C,  007F C,  00EE C,  0001 C,   50 EQU Y8                  0009 C,  007F C,  00EE C,  0001 C,   51 EQU Y9                                                                                  000A C,  0058 C,  00EC C,  0001 C,   52 EQU VS-CTR ( P2)        0012 C,  005D C,  00EC C,  0001 C,   53 EQU VS-RED ( P2)                                                                                                                                        ( IMAGE TABLE ENTRIES FOR GOALS AND NET        11:35 12/03/86 ) 008F C,  001D C,  00D0 C,  0003 C,   54 EQU  UPGOALB ( PAL0)    0093 C,  001D C,  00D0 C,  0003 C,   55 EQU  LOGOALB            008E C,  003D C,  00D0 C,  0003 C,   56 EQU  UPGOALR ( PAL1)    0092 C,  003D C,  00D0 C,  0003 C,   57 EQU  LOGOALR            0096 C,  007D C,  00D0 C,  0003 C,   58 EQU  UPNET  ( PAL3)     0099 C,  007D C,  00D0 C,  0003 C,   59 EQU  LONET                                                                              0015 C,  001E C,  00EE C,  0001 C,  5A EQU  B-TWIRLA  ( PAL0)   0017 C,  001E C,  00EE C,  0001 C,  5B EQU  B-TWIRLB            0019 C,  001E C,  00EE C,  0001 C,  5C EQU  B-TWIRLC            001B C,  001E C,  00EE C,  0001 C,  5D EQU  B-TWIRLD            0015 C,  003E C,  00EE C,  0001 C,  5E EQU  R-TWIRLA  ( PAL1)   0017 C,  003E C,  00EE C,  0001 C,  5F EQU  R-TWIRLB            0019 C,  003E C,  00EE C,  0001 C,  60 EQU  R-TWIRLC            001B C,  003E C,  00EE C,  0001 C,  61 EQU  R-TWIRLD            ( CENTERLINES IMAGE TABLE ENTRY                14:47 12/03/86 ) 001D C,  0053 C,  00F0 C,  0002 C, 62 EQU CLINES ( PAL2)        009C C,  0076 C,  00D8 C,  0004 C, 63 EQU CIRTOP ( PAL3)        00A6 C,  0076 C,  00D8 C,  0004 C, 64 EQU CIRBOT                002A C,  009C C,  00F0 C,  0002 C, 65 EQU SBORDER ( PAL4)       002A C,  00BC C,  00F0 C,  0001 C, 66 EQU GBORDER ( PAL5)       002E C,  0082 C,  00E8 C,  0001 C, 67 EQU TBORDER ( PAL4)       004C C,  0082 C,  00E8 C,  0001 C, 68 EQU BBORDER ( PAL4)       006A C,  009E C,  00E8 C,  0001 C, 69 EQU ULCORN  ( PAL4)       006C C,  009D C,  00E8 C,  0001 C, 6A EQU URCORN  ( P4)         006F C,  009E C,  00E8 C,  0001 C, 6B EQU LLCORN  ( P4)         0071 C,  009D C,  00E8 C,  0001 C, 6C EQU LRCORN  ( P4)         0074 C,  009F C,  00E8 C,  0001 C, 6D EQU ULDOT   ( P4)         0075 C,  009F C,  00E8 C,  0001 C, 6E EQU URDOT   ( P4)         0076 C,  009F C,  00E8 C,  0001 C, 6F EQU LLDOT   ( P4)         0077 C,  009F C,  00E8 C,  0001 C, 70 EQU LRDOT   ( P4)         ( MORE IMAGE - TABLE ENTRIES                   14:47 12/03/86 )                                                                 0078 C,  007F C,  00F0 C,  0001 C,    71 EQU PUCK ( P1)         00B0 C,  007D C,  00D7 C,  0003 C,    72 EQU ZAM1  ( P3)        00B3 C,  007D C,  00D7 C,  0003 C,    73 EQU ZAM2  ( P3)        00B6 C,  003E C,  00CB C,  0002 C,    74 EQU FELLA1  ( P0)      00B8 C,  003E C,  00CB C,  0002 C,    75 EQU FELLA2  ( P0)      00BA C,  003E C,  00CB C,  0002 C,    76 EQU FELLA3  ( P0)      00BC C,  003E C,  00CB C,  0002 C,    77 EQU FELLA4  ( P0)      00BE C,  003E C,  00CB C,  0002 C,    78 EQU FELLA5  ( P0)      0079 C,  0017 C,  00E8 C,  0001 C,    79 EQU GOVER   ( P0)      0082 C,  0017 C,  00E8 C,  0001 C,    7A EQU OVERT   ( P0)      00C0 C,  004F C,  00D8 C,  0004 C,    7B EQU HAT   ( P2)        00D1 C,  0048 C,  00D8 C,  0004 C,    7C EQU TRICK ( P2)                                                                                                                                        ( MORE IMAGE TABLE ENTRIES                     11:33 04/16/87 ) 008B C,  0016 C,  00E8 C,  0001 C,    7D EQU 1PLAYERB ( P0)     008B C,  00B6 C,  00E8 C,  0001 C,    7E EQU 1PLAYERR ( P1)     0095 C,  0016 C,  00E8 C,  0001 C,    7F EQU 2PLAYERB ( P0)     0095 C,  00B6 C,  00E8 C,  0001 C,    80 EQU 2PLAYERR ( P1)     009F C,  001A C,  00E8 C,  0001 C,    81 EQU EXPERTB  ( P0)     009F C,  00BA C,  00E8 C,  0001 C,    82 EQU EXPERTR  ( P1)     00A5 C,  001A C,  00E8 C,  0001 C,    83 EQU NOVICEB  ( P0)     00A5 C,  00BA C,  00E8 C,  0001 C,    84 EQU NOVICER  ( P1)     00AB C,  0016 C,  00E8 C,  0001 C,    85 EQU ATA87    ( P0)     00B5 C,  0006 C,  00E8 C,  0001 C,    86 EQU BALLF    ( P0)     00CF C,  0016 C,  00E8 C,  0001 C,    87 EQU BALLB    ( P0)                                                                     002E C,  00E1 C,  00E8 C,  0001 C, 88 EQU LONG-ICE   ( PAL7)    002E C,  00FB C,  00E8 C,  0001 C, 89 EQU SHORT-ICE  ( PAL7)    002E C,  00DD C,  00E8 C,  0001 C, 8A EQU NET-ICE    ( PAL6)    ( PLAYER-FRAME-DISPLAY                         11:00 04/01/87 ) CODE (PLAYER-FRAME-DISPLAY)   ( --- )                             DEX DL-TABLE-START >HI #     LDA TOS STA                        DEX DL-TABLE-START >LO #     LDA TOS STA                        DEX PLAYERS-ITAB   >HI #     LDA TOS STA                        DEX PLAYERS-ITAB   >LO #     LDA TOS STA                        DEX PLAYERS-ETAB   >HI #     LDA TOS STA                        DEX PLAYERS-ETAB   >LO #     LDA TOS STA                        ' (NEW-GRAPHICS) >BODY JMP  ( N N N--)                              END-CODE                                                                                                                                                                                  CODE PLAYER-FRAME-DISPLAY ' (PLAYER-FRAME-DISPLAY) >BODY JSR         NEXT JMP END-CODE                                                                                                                                                                          ( PLAYER-FRAME RTNS                            11:00 04/01/87 ) CODE BLUE-PLAYER-FRAME ( IMAGE DISPLACEMENT TABLE ENTRY ADDR )  ( BLUE-IMAGE# C, REDD-IMAGE# C,  )                                       TOS X) LDA BLUE-IMAGE# STA                                         8A # LDA BLUE-ALTER STA                                         8C # LDA BLUE-GOALY-ALTER STA                            ' (PLAYER-FRAME-DISPLAY) >BODY JSR                               INX INX  NEXT JMP END-CODE                                                                                                CODE REDD-PLAYER-FRAME ( IMAGE DISPLACEMENT TABLE ENTRY ADDR )  ( IMAGE ADDRESS                  )                                       TOS X) LDA REDD-IMAGE# STA                                          8B # LDA REDD-ALTER STA                                         8D # LDA REDD-GOALY-ALTER STA                           ' (PLAYER-FRAME-DISPLAY) >BODY JSR                               INX INX  NEXT JMP END-CODE                                ( DIRECT-ERASE RTNS FOR PLAYERS                10:59 04/01/87 ) CODE BLUE-ERASE                                                 0 # LDY   DEX DEX   0A # LDA TOS STA  TOS 1+ STY                          DEX DEX   03 # LDA TOS STA  TOS 1+ STY                          DEX DEX   15 # LDA TOS STA  TOS 1+ STY                          ' (DIRECT-ERASE) >BODY JSR                                           NEXT JMP END-CODE                                                                                                CODE REDD-ERASE                                                 0 # LDY   DEX DEX   0B # LDA TOS STA  TOS 1+ STY                          DEX DEX   03 # LDA TOS STA  TOS 1+ STY                          DEX DEX   15 # LDA TOS STA  TOS 1+ STY                          ' (DIRECT-ERASE) >BODY JSR                                           NEXT JMP END-CODE                                                                                                                                                                ( JOYSTICK READER - BLUE                       10:59 04/01/87 ) HERE EQU ATARI->IBM  ( JOYSTICK CONVERSION TABLE )              3 C, 4 C, 5 C, 2 C, 8 C, 6 C, 1 C, 0 C, 7 C,                    CODE (?BLUE-ACTION) ( ---N)                                          DEX TOS STY DEX TOS STY DEX TOS STY                             CLC   DX0 LDY INY TYA TOS STY A ASL TOS ADC                           DY0 LDY INY     TOS STY       TOS ADC                     INX   TAY ATARI->IBM ,Y LDA                                     TOS STA RTS END-CODE                                                                                                       CODE ?BLUE-ACTION ' (?BLUE-ACTION) >BODY JSR NEXT JMP END-CODE                                    ( 0     3    6  )                                               ( 1     4    7  )                                               ( 2     5    8  )                                                                                                                                             ( JOYSTICK READER - RED                        10:59 04/01/87 )                                                                 CODE ?REDD-ACTION DEX TOS STY DEX TOS STY DEX TOS STY                CLC   DX1 LDY INY TYA TOS STY A ASL TOS ADC                           DY1 LDY INY     TOS STY       TOS ADC                     INX   TAY ATARI->IBM ,Y LDA                                                           TOS STA NEXT JMP END-CODE                                                                                                                                                                              ( 3    2    1  )                                                ( 4    8    0  )                                                ( 5    6    7  )                                                                                                                                                                                                                                                                              ( DIRECT ERASE RTNS FOR GOALIES                13:06 12/01/86 ) CODE REDD-GOALY-ERASE                                           0 # LDY   DEX DEX   0D # LDA TOS STA  TOS 1+ STY                          DEX DEX   06 # LDA TOS STA  TOS 1+ STY                          DEX DEX   0F # LDA TOS STA  TOS 1+ STY                          ' (DIRECT-ERASE) >BODY JSR                                           NEXT JMP  END-CODE                                                                                               CODE BLUE-GOALY-ERASE                                           0 # LDY   DEX DEX   0C # LDA TOS STA  TOS 1+ STY                          DEX DEX   06 # LDA TOS STA  TOS 1+ STY                          DEX DEX   0F # LDA TOS STA  TOS 1+ STY                          ' (DIRECT-ERASE) >BODY JSR                                           NEXT JMP  END-CODE                                                                                                                                                               ( PLAYERS-ETAB-INIT                            11:01 04/01/87 ) CODE PLAYERS-ETAB-INIT ( ROM ELEMTAB/RAM ELEMTAB/LEN --- )      NOS LDA PHA NOS 1+ LDA PHA ( SAVE ELEM-TAB)                     1$: TOS LDA  TOS 1+ ORA  2$ BNE  3$ JMP         ( ADDR)         2$: TOS 4 + X) LDA  TOS 2 + X) STA                                  TOS 4 + INC  0=  IF  TOS 5 + INC  THEN                          TOS 2 + INC  0=  IF  TOS 3 + INC  THEN                          TOS LDA 0= IF  TOS 1+ DEC  THEN   TOS DEC 1$ JMP            3$: DEX DL-TABLE-START >HI #     LDA TOS STA                        DEX DL-TABLE-START >LO #     LDA TOS STA                        DEX PLAYERS-ITAB     >HI #     LDA TOS STA                      DEX PLAYERS-ITAB     >LO #     LDA TOS STA                      DEX DEX PLA TOS 1+ STA PLA TOS STA                              ' (NEW-GRAPHICS) >BODY JSR  ( N N N--)                          POP3 JMP END-CODE                                                                                                           ( PUCK DIRECT ERASE AND FRAME RTNS             11:01 04/01/87 ) CODE PUCK-FRAME                                                          PUCK # LDA PUCK-IMAGE# STA                                          8E # LDA PUCK-ALTER STA                                ( ' (PLAYER-FRAME-DISPLAY >BODY JSR   )                            NEXT JMP END-CODE                                                                                                        CODE PUCK-ERASE                                                 0 # LDY   DEX DEX   0E # LDA TOS STA  TOS 1+ STY                          DEX DEX   03 # LDA TOS STA  TOS 1+ STY                          DEX DEX   15 # LDA TOS STA  TOS 1+ STY                          ' (DIRECT-ERASE) >BODY JSR                                      NEXT JMP END-CODE                                                                                                                                                                                                                                     ( OBJECTS/GRAPHICS INIT RTNS                   11:02 04/01/87 ) : K-CLS GNE0  18 F DL-INIT ;    ( ZONE 0-23 15 HEADERS)         : NULLY ;                                                       : PLAYERS-INIT                                                    PLAYERS-ETAB-ROM PLAYERS-ETAB 17 PLAYERS-ETAB-INIT ;          : SCOREBOARD-INIT                                                 SCOREBOARD-ETAB-ROM SCOREBOARD-ETAB 1A PLAYERS-ETAB-INIT ;    : NUMBERS-INIT                                                    NUMBERS-ETAB-ROM NUMBERS-ETAB 2F PLAYERS-ETAB-INIT ;          : NETGOAL-INIT                                                    NETGOAL-ETAB-ROM NETGOAL-ETAB 33 PLAYERS-ETAB-INIT ;          : CENTERLINES-INIT                                                CENTERLINES-ETAB-ROM CENTERLINES-ETAB 33 PLAYERS-ETAB-INIT ;  : BORDER-INIT                                                     BORDER-ETAB-ROM BORDER-ETAB 73 PLAYERS-ETAB-INIT ;                                                                            ( BACKGROUND-INIT  DLI-COLORS                  18:21 05/11/87 ) CODE DLI-COLORS                                                   BG-SCOREAREA STY 0A # LDA BG-TOP-ICE STA NEXT JMP END-CODE    : BACKGROUND-INIT DLI-COLORS                                      K-CLS SCOREBOARD-INIT NUMBERS-INIT NETGOAL-INIT                 CENTERLINES-INIT BORDER-INIT PLAYERS-INIT  ;                                                                                                                                                  HERE EQU main-loop 0 ,                                          : NEW-GAME S0 @ SP! R0 @ RP! main-loop PERFORM ;                HERE EQU select-rtn 0 ,                                         : SELECT-RTN select-rtn PERFORM ;                                                                                                                                                                                                                                                                                               
\ No newline at end of file
diff --git a/HOCKEY.SCR b/HOCKEY.SCR
new file mode 100644 (file)
index 0000000..3dc0dcd
--- /dev/null
@@ -0,0 +1 @@
+( HOCKEY HI-LEVEL MAF JDS KAL PMA JJT          16:09 08/27/87 ) ( Last change:   Screen  027               MAF 10:09 04/09/87 )                                                                 .NOLIST                                                         -HEADERS                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        ( SQUARE TABLE  1/2                            12:41 02/12/87 ) DECIMAL L: SQUARE-TABLE                                         00000 , 00001 , 00004 , 00009 , 00016 , 00025 , 00036 ,         00049 , 00064 , 00081 , 00100 , 00121 , 00144 , 00169 ,         00196 , 00225 , 00256 , 00289 , 00324 , 00361 , 00400 ,         00441 , 00484 , 00529 , 00576 , 00625 , 00676 , 00729 ,         00784 , 00841 , 00900 , 00961 , 01024 , 01089 , 01156 ,         01225 , 01296 , 01369 , 01444 , 01521 , 01600 , 01681 ,         01764 , 01849 , 01936 , 02025 , 02116 , 02209 , 02304 ,         02401 , 02500 , 02601 , 02704 , 02809 , 02916 , 03025 ,         03136 , 03249 , 03364 , 03481 , 03600 , 03721 , 03844 ,         03969 , 04096 , 04225 , 04356 , 04489 , 04624 , 04761 ,         04900 , 05041 , 05184 , 05329 , 05476 , 05625 , 05776 ,         05929 , 06084 , 06241 , 06400 , 06561 , 06724 , 06889 ,         07056 , 07225 , 07396 , 07569 , 07744 , 07921 , 08100 ,         08281 , 08464 , 08649 , 08836 , 09025 , 09216 , 09409 ,         ( SQUARE TABLE  2/2                            12:41 02/12/87 ) 09604 , 09801 , 10000 , 10201 , 10404 , 10609 , 10816 ,         11025 , 11236 , 11449 , 11664 , 11881 , 12100 , 12321 ,         12544 , 12769 , 12996 , 13225 , 13456 , 13689 , 13924 ,         14161 , 14400 , 14641 , 14884 , 15129 , 15376 , 15625 ,         15876 , 16129 , 16384 , 16641 , 16900 , 17161 , 17424 ,         17689 , 17956 , 18225 , 18496 , 18769 , 19044 , 19321 ,         19600 , 19881 , 20164 , 20449 , 20736 , 21025 , 21316 ,         21609 , 21904 , 22201 , 22500 , 22801 , 23104 , 23409 ,         23716 , 24025 , 24336 , 24649 , 24964 , 25281 , 25600 ,         25921 , 26244 , 26569 , 26896 , 27225 , 27556 , 27889 ,         28224 , 28561 , 28900 , 29241 , 29584 , 29929 , 30276 ,         30625 , 30976 , 31329 , 31684 , 32041 , 32400 , 32761 ,         33124 , 33489 , 33856 , 34225 , 34596 , 34969 , 35344 ,         35721 , 36100 , 36481 , 36864 , 37249 , 37636 , 38025 ,         38416 , 38809 , 39204 , 39601 , 40000 ,                         ( RAM LOCATIONS FOR GAME PLAY                  11:18 02/05/87 ) : SQUARE 2* SQUARE-TABLE + @ ;                                                                                                  END-TABLE-PLUG 3 + EQU PLAYER1                                  PLAYER1 15 + EQU PLAYER2                                        PLAYER2 15 + EQU puck                                           puck    15 + EQU SCORE1                                         SCORE1   2 + EQU SCORE2                                         SCORE2   2 + EQU SAVES1                                         SAVES1   2 + EQU SAVES2                                         SAVES2   2+  EQU WHIZ-DONE                                      WHIZ-DONE 2 + EQU WHIZ-COUNT                                                                                                                                                                                                                                                                                                    (                                              12:00 02/19/87 ) WHIZ-COUNT 2+  EQU DX                                           DX 2+          EQU DY                                           DY 2+          EQU SHOOTFLAG1                                   SHOOTFLAG1 2+  EQU SHOOTFLAG2                                   SHOOTFLAG2 2+  EQU OLDJOY1                                      OLDJOY1 1+     EQU OLDJOY2                                      OLDJOY2 1+     EQU SKILL                                        SKILL   1+     EQU GOALIE1-Y                                    GOALIE1-Y 2+   EQU GOALIE2-Y                                    GOALIE2-Y 2+   EQU CYCLE#                                       CYCLE# 2+      EQU OLD-XY                                       OLD-XY 4 +     EQU END-OF-RAM                                                                                                                                                                                                                                   ( ANIMATION TABLES                             13:03 02/12/87 ) ( ADDRESSED BY ORIENTATION * 4 + ANIMATION 3 AND + )            L: PLAYER2-IMAGES                                               RPFE  C, RPFER  C, RPFE  C, RPFEL  C,                           RPFNE C, RPFNER C, RPFNE C, RPFNEL C,                           RPFN  C, RPFNR  C, RPFN  C, RPFNL  C,                           RPFNW C, RPFNWR C, RPFNW C, RPFNWL C,                           RPFW  C, RPFWR  C, RPFW  C, RPFWL  C,                           RPFSW C, RPFSWR C, RPFSW C, RPFSWL C,                           RPFS  C, RPFSR  C, RPFS  C, RPFSL  C,                           RPFSE C, RPFSER C, RPFSE C, RPFSEL C,                                                                                                                                                                                                                                                                                                                                                           ( ANIMATION TABLES                             13:03 02/12/87 ) ( ADDRESSED BY ORIENTATION * 4 + ANIMATION 3 AND + )            L: PLAYER1-IMAGES                                               BPFE  C, BPFER  C, BPFE  C, BPFEL  C,                           BPFNE C, BPFNER C, BPFNE C, BPFNEL C,                           BPFN  C, BPFNR  C, BPFN  C, BPFNL  C,                           BPFNW C, BPFNWR C, BPFNW C, BPFNWL C,                           BPFW  C, BPFWR  C, BPFW  C, BPFWL  C,                           BPFSW C, BPFSWR C, BPFSW C, BPFSWL C,                           BPFS  C, BPFSR  C, BPFS  C, BPFSL  C,                           BPFSE C, BPFSER C, BPFSE C, BPFSEL C,                                                                                                                                                                                                                                                                                                                                                           ( 256/ 256*                                    13:46 08/27/87 ) CODE 256/        ( note: ROUNDS & UNSIGNED! jjt)                     TOS 1+ LDY                                                      TOS LDA 0< IF INY THEN                                          TOS STY                                                         0 # LDA TOS 1+ STA                                              NEXT JMP END-CODE                                                                                                          CODE 256*                                                            TOS    LDA                                                      TOS 1+ STA                                                      TOS    STY                                                      NEXT JMP END-CODE                                                                                                                                                                                                                                          ( HOCKEY LIMIT PARAMETERS/EQUATES              13:50 02/19/87 ) DECIMAL                                                          4          EQU DIAM       ( PUCK DIAMETER )                    33          EQU LOG(FAT)   ( GIRTH OF PLAYER )                  30 ( 30 )   EQU PUCK-STICK-THRESHOLD                            120         EQU PLAYER-PLAYER-THRESHOLD                         08  256 *   EQU LEFT-LINE    151 256 *   EQU RIGHT-LINE         40  256 *   EQU TOP-LINE     184 256 *   EQU BOTTOM-LINE        TOP-LINE 50 256 *  +     EQU GOAL-TOP                           BOTTOM-LINE  52 256 *  - EQU GOAL-BOTTOM           &nbs