videogamepreservation
/
centipede-7800
镜像自地址 https://github.com/videogamepreservation/centipede-7800


			
							123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308
							*** CTABLES.S ***
* KGO     8/30    TUNE TABLES

COLORTBL
          DB      $BA,$54,$57
          DB      $17,$49,$15
          DB      $6A,$C5,$C3            ;COLOR DEFINITIONS      1
          DB      $89,$38,$31            ;RED

          DB      $4B,$15,$17
          DB      $64,$1A,$65
          DB      $9A,$46,$43            ;COLOR DEFINITIONS      2
          DB      $DA,$58,$52            ;

          DB      $1C,$62,$64
          DB      $C5,$6A,$84
          DB      $4B,$36,$34            ;COLOR DEFINITIONS      3
          DB      $69,$1C,$12            ;YELLOW

          DB      $9A,$42,$45
          DB      $85,$4A,$C6
          DB      $1C,$26,$24            ;COLOR DEFINITIONS      4
          DB      $1B,$88,$82            ;DARK BLUE

          DB      $4A,$C3,$B6
          DB      $E7,$69,$E7
          DB      $6A,$C5,$C3            ;COLOR DEFINITIONS      5
          DB      $EB,$67,$62            ;PURPLE?

          DB      $6B,$C2,$C4
          DB      $59,$39,$66
          DB      $4A,$A7,$A5            ;COLOR DEFINITIONS      6
          DB      $89,$36,$31            ;ORANGE

          DB      $39,$E4,$E7
          DB      $B7,$A9,$C8
          DB      $6B,$57,$65            ;COLOR DEFINITIONS      7
          DB      $1B,$99,$93            ;PURPLE?

          DB      $AD,$56,$69
          DB      $86,$59,$85
          DB      $4B,$18,$15            ;COLOR DEFINITIONS      8
          DB      $8C,$48,$21            ;RED

          DB      $5B,$83,$86
          DB      $D6,$1A,$D7
          DB      $AA,$57,$65            ;COLOR DEFINITIONS      9
          DB      $3C,$D9,$D2            ;GREEN

          DB      $5D,$D3,$D6
          DB      $1A,$AB,$18
          DB      $5B,$98,$95            ;COLOR DEFINITIONS      10
          DB      $CC,$26,$21            ;RED

          DB      $5B,$87,$8A
          DB      $46,$9A,$47
          DB      $1B,$76,$74            ;COLOR DEFINITIONS      11
          DB      $8C,$38,$51            ;RED

          DB      $9A,$43,$46
          DB      $97,$BA,$96
          DB      $AB,$C6,$B4            ;COLOR DEFINITIONS      12
          DB      $3B,$A9,$A3            ;PURPLE


* ROM:
*   DURTABL       ONE DURATION IN FRAMES PER TUNE
*   TBASE         LOW ADDRESS OF THE START OF FREQ DATA BY TUNE NUMBER
*   TBASEH        DITTO FOR HIGH ADDRESS
*   VBASE         LOW ADDRESS OF THE START OF VOL DATA BY TUNE NUMBER
*   VBASEH        DITTO FOR HIGH ADDRESS
*   CBASE         LOW ADDRESS OF THE START OF CTRL DATA BY TUNE NUMBER
*   CBASEH        DITTO FOR HIGH ADDRESS
*   PRYOR         PRIORITY BY TUNE NUMBERS  --  ZERO THE LOWEST
*   VOLTABL       VOLUMES
*   FREQTABL      FREQUENCIES
*   CTLTABL       CONTROLS


TBASE     DB      L(SHTSND),L(SPDRSND),L(EXP1SND),L(PLYDTHS),L(FLEASND)
          DB      L(SCRPSND),L(XTRAMAN),L(PEDEWLK)
TBASEH    DB      H(SHTSND),H(SPDRSND),H(EXP1SND),H(PLYDTHS),H(FLEASND)
          DB      H(SCRPSND),H(XTRAMAN),H(PEDEWLK)
VBASE     DB      L(SHTSNDV),L(SPDRSNDV),L(EXP1SNDV),L(PLYDTHSV),L(FLEASNDV)
          DB      L(SCRPSNDV),L(XTRAMANV),L(PEDEWLKV)
VBASEH    DB      H(SHTSNDV),H(SPDRSNDV),H(EXP1SNDV),H(PLYDTHSV),H(FLEASNDV)
          DB      H(SCRPSNDV),H(XTRAMANV),H(PEDEWLKV)
CBASE     DB      L(SHTSNDC),L(SPDRSNDC),L(EXP1SNDC),L(PLYDTHSC),L(FLEASNDC)
          DB      L(SCRPSNDC),L(XTRAMANC),L(PEDEWLKC)
CBASEH    DB      H(SHTSNDC),H(SPDRSNDC),H(EXP1SNDC),H(PLYDTHSC),H(FLEASNDC)
          DB      H(SCRPSNDC),H(XTRAMANC),H(PEDEWLKC)
DURTABL   DB      $00,$01,$00,$01,$06,$03,$07,$01
PRYOR     DB      2,1,2,8,8,3,9,0

FREQTABL
SHTSND    DB      $01,$02,$03,$04,$05,$06,$07,$08,$09,$0A,$0B,$0C,$0D,$0E,$0F
          DB      $10,$FF
SPDRSND   DB      $00,$10,$00,$0E,$01,$09,$00,$00,$00,$09,$01,$0E,$00,$10,$01
          DB      $0E,$00,$09,$00,$FE    ;REPEATS
EXP1SND   DB      $1A,$1A,$1B,$1C,$1D,$1E,$1F,$1F,$FF
PLYDTHS   DB      $14,$15,$16,$17,$18,$19,$1A,$1B,$1C,$1D,$1E,$1F,$1F,$1F,$1F
          DB      $1F,$FF
FLEASND   DB      $0E,$0F,$10,$11,$12,$13,$14,$15,$16,$17,$18,$19,$1A,$1B,$1C
          DB      $1D,$1E,$1F,$FF
SCRPSND   DB      $11,$1B,$11,$14,$18,$14,$FE    ;REPEATS
XTRAMAN   DB      $1B,$14,$10,$0D,$0D,$10,$0D,$0D,$0D,$0D,$1F,$18,$14,$14,$18
          DB      $14,$14,$FF
PEDEWLK   DB      $1F,$1F,$1F,$1F,$1F,$1F,$1F,$1F,$FE    ;REPEATS


VOLTABL
SHTSNDV   DB      $88

SPDRSNDV  DB      $00,$08,$01,$08,$01,$08,$01,$00,$00,$08,$01,$08,$01,$08,$01
          DB      $08,$01,$08,$01,$FE    ;REPEATS
EXP1SNDV  DB      $0C,$0C,$0B,$0A,$09,$08,$07,$06,$FF
PLYDTHSV  DB      $0C,$0C,$0C,$0B,$0A,$09,$08,$07,$07,$07,$07,$07,$06,$06,$06
          DB      $06,$FF
FLEASNDV  DB      $88

SCRPSNDV  DB      $88
XTRAMANV  DB      $8B

PEDEWLKV  DB      $0A,$0A,$09,$00,$06,$00,$00,$00,$FE    ;REPEATS

CTLTABL
SHTSNDC   DB      $89

SPDRSNDC  DB      $84

EXP1SNDC  DB      $88
PLYDTHSC  DB      $88

FLEASNDC  DB      $8D

SCRPSNDC  DB      $8D
XTRAMANC  DB      $0D,$0D,$0D,$0D,$0D,$0D,$0D,$0D,$0D,$0D,$04,$04,$04,$04,$04
          DB      $04,$04,$FF
PEDEWLKC  DB      $8F

********************************************************************************
*                         DLL TABLE FOR HSC LOGO                               *
********************************************************************************


;         PAD THE TOP
HSCDLL    DB      $2E,H(TPDL),L(TPDL)
          DB      $A8,H(TPDL),L(TPDL)

          DB      $27,H(DL6),L(DL6)
          DB      $27,H(DL7),L(DL7)
          DB      $27,H(DL8),L(DL8)
          DB      $27,H(DL9),L(DL9)
          DB      $27,H(DL10),L(DL10)
          DB      $26,H(DL16),L(DL16)    ;GAME TYPE
          DB      $26,H(DL19),L(DL19)    ;DIFF. LEVEL
          DB      $A0,H(TPDL),L(TPDL)


******************************************
* ASSEMBLE INTO GRAPHICS BLOCK
******************************************
          ORG     $C098                  ;TO $C0FF
HDLTBL    DB      H(DL1),H(DL2),H(DL3),H(DL4)            ;24
          DB      H(DL5),H(DL6),H(DL7),H(DL8)
          DB      H(DL9),H(DL10),H(DL11),H(DL12)
          DB      H(DL13),H(DL14),H(DL15),H(DL16)
          DB      H(DL17),H(DL18),H(DL19),H(DL20)
          DB      H(DL21),H(DL22),H(DL23),H(DL24)

LDLTBL    DB      L(DL1),L(DL2),L(DL3),L(DL4)            ;24
          DB      L(DL5),L(DL6),L(DL7),L(DL8)
          DB      L(DL9),L(DL10),L(DL11),L(DL12)
          DB      L(DL13),L(DL14),L(DL15),L(DL16)
          DB      L(DL17),L(DL18),L(DL19),L(DL20)
          DB      L(DL21),L(DL22),L(DL23),L(DL24)

MMAPTBLH  DB      H(MUSHMAP),H(MUSHMAP+ZONELEN),H(MUSHMAP+2*ZONELEN)     ;24
          DB      H(MUSHMAP+3*ZONELEN),H(MUSHMAP+4*ZONELEN),H(MUSHMAP+5*ZONELEN)
          DB      H(MUSHMAP+6*ZONELEN),H(MUSHMAP+7*ZONELEN),H(MUSHMAP+8*ZONELEN)
          DB      H(MUSHMAP+9*ZONELEN),H(MUSHMAP+10*ZONELEN)
          DB      H(MUSHMAP+11*ZONELEN),H(MUSHMAP+12*ZONELEN)
          DB      H(MUSHMAP+13*ZONELEN),H(MUSHMAP+14*ZONELEN)
          DB      H(MUSHMAP+15*ZONELEN),H(MUSHMAP+16*ZONELEN)
          DB      H(MUSHMAP+17*ZONELEN),H(MUSHMAP+18*ZONELEN)
          DB      H(MUSHMAP+19*ZONELEN),H(MUSHMAP+20*ZONELEN)
          DB      H(MUSHMAP+21*ZONELEN),H(MUSHMAP+22*ZONELEN)

MMAPTBLL  DB      L(MUSHMAP),L(MUSHMAP+ZONELEN),L(MUSHMAP+2*ZONELEN)     ;24
          DB      L(MUSHMAP+3*ZONELEN),L(MUSHMAP+4*ZONELEN),L(MUSHMAP+5*ZONELEN)
          DB      L(MUSHMAP+6*ZONELEN),L(MUSHMAP+7*ZONELEN),L(MUSHMAP+8*ZONELEN)
          DB      L(MUSHMAP+9*ZONELEN),L(MUSHMAP+10*ZONELEN)
          DB      L(MUSHMAP+11*ZONELEN),L(MUSHMAP+12*ZONELEN)
          DB      L(MUSHMAP+13*ZONELEN),L(MUSHMAP+14*ZONELEN)
          DB      L(MUSHMAP+15*ZONELEN),L(MUSHMAP+16*ZONELEN)
          DB      L(MUSHMAP+17*ZONELEN),L(MUSHMAP+18*ZONELEN)
          DB      L(MUSHMAP+19*ZONELEN),L(MUSHMAP+20*ZONELEN)
          DB      L(MUSHMAP+21*ZONELEN),L(MUSHMAP+22*ZONELEN)

BITTABLE  DB      $01,$02,$04,$08,$10,$20,$40,$80


********************************************************************************
*                        MARIA 2 DLL INTIALIZATION TABLE                       *
********************************************************************************
******************************************
* ASSEMBLE INTO GRAPHICS BLOCK
******************************************
          ORG     $C198                  ;TO $C1F5

DLLTABLE  DB      $2F,H(TPDL),L(TPDL)    ;TOP OF SCREEN INTERRUPT(WHO NEEDS IT?)
          DB      $27,H(TPDL),L(TPDL)
; 25 LINES PADDING ON TOP AND BOTTOM FOR NOW. SOME STANDARD SHOULD BE SET.

          DB      $27,H(DL1),L(DL1)
          DB      $00,H(HLINEDL),L(HLINEDL)
          DB      $A7,H(DL2),L(DL2)      ;CHANGE MODE TO 160 (AFTER SCORE)
          DB      $27,H(DL3),L(DL3)
          DB      $27,H(DL4),L(DL4)
          DB      $27,H(DL5),L(DL5)
          DB      $27,H(DL6),L(DL6)
          DB      $27,H(DL7),L(DL7)
          DB      $27,H(DL8),L(DL8)
          DB      $27,H(DL9),L(DL9)
          DB      $27,H(DL10),L(DL10)
          DB      $27,H(DL11),L(DL11)
          DB      $27,H(DL12),L(DL12)
          DB      $27,H(DL13),L(DL13)
          DB      $27,H(DL14),L(DL14)
          DB      $27,H(DL15),L(DL15)
          DB      $27,H(DL16),L(DL16)
          DB      $27,H(DL17),L(DL17)
          DB      $27,H(DL18),L(DL18)
          DB      $27,H(DL19),L(DL19)
          DB      $27,H(DL20),L(DL20)
          DB      $27,H(DL21),L(DL21)
          DB      $27,H(DL22),L(DL22)
          DB      $27,H(DL23),L(DL23)
          DB      $27,H(DL24),L(DL24)
          DB      $00,H(HLINEDL),L(HLINEDL)
          DB      $AE,H(TPDL),L(TPDL)    ;VERTICAL BLANK INTERRUPT
          DB      $27,H(TPDL),L(TPDL)
          DB      $A0,H(TPDL),L(TPDL)    ;REAL VB INTERRUPT
          DB      0
ENDLL


******************************************
* ASSEMBLE INTO GRAPHICS BLOCK
******************************************
          ORG     $C598                  ;100 BYTES
ALOW      DB      L(A1PLYR),L(AALTERN),L(ACOMPET),L(ATEAM)
AHIGH     DB      H(A1PLYR),H(AALTERN),H(ACOMPET),H(ATEAM)

ACOMPET   DB      L(D),L(U),L(A),L(L),L(EMPTY),L(P),L(L),L(A),L(Y),L(E),L(R)
          DB      L(EMPTY),L(C),L(O),L(M),L(P),L(E),L(T),L(I)
          DB      L(T),L(I),L(O),L(N)
AALTERN   DB      L(T),L(W),L(O),L(EMPTY),L(P),L(L),L(A),L(Y),L(E),L(R),L(EMPTY)
          DB      L(A),L(L),L(T),L(E),L(R),L(N),L(A),L(T),L(I),L(N),L(G)
ATEAM     DB      L(EMPTY),L(EMPTY),L(EMPTY),L(EMPTY),L(EMPTY),L(EMPTY),L(EMPTY)
          DB      L(T),L(E),L(A),L(M),L(EMPTY),L(P),L(L),L(A),L(Y)
          DB      L(EMPTY)
A1PLYR    DB      L(EMPTY),L(EMPTY),L(EMPTY),L(EMPTY),L(EMPTY),L(EMPTY)
          DB      L(O),L(N),L(E),L(EMPTY),L(P),L(L),L(A),L(Y),L(E),L(R)
          DB      L(EMPTY),L(EMPTY),L(EMPTY),L(EMPTY),L(EMPTY),L(EMPTY),L(EMPTY)


******************************************
* ASSEMBLE INTO GRAPHICS BLOCK
******************************************
          ORG     $C698                  ;100 BYTES
;WOCTRLS  DB      L(T),L(W),L(O),L(EMPTY),L(C),L(O),L(N),L(T),L(R),L(O),L(L)
;         DB      L(L),L(E),L(R),L(S)
SHRTRCKB  DB      L(S),L(H),L(A),L(R),L(E),L(EMPTY),L(T),L(R),L(A),L(C),L(K)
          DB      L(B),L(A),L(L),L(L)

DFLVLLOW  DB      L(DFNOVICE),L(DFINTRMD),L(DFADVNCD),L(DFEXPERT)
DFLVLHGH  DB      H(DFNOVICE),H(DFINTRMD),H(DFADVNCD),H(DFEXPERT)

DFNOVICE  DB      L(N),L(O),L(V),L(I),L(C),L(E)
DFINTRMD  DB      L(S),L(T),L(A),L(N),L(D),L(A),L(R),L(D)
DFADVNCD  DB      L(A),L(D),L(V),L(A),L(N),L(C),L(E),L(D)
DFEXPERT  DB      L(E),L(X),L(P),L(E),L(R),L(T)

DFPOS     DB      5,15,24,30
DFLNGTH   DB      5,7,7,5


******************************************
* MESSAGES ("PLAYER", "ONE", "TWO", "GAME  OVER"
* AND ROUTINES TO DISPLAY THEM
******************************************
MPLAYER   DB      L(P),L(L),L(A),L(Y),L(E),L(R)
          DB      L(EMPTY),L(EMPTY),L(DGT1)
          DB      L(W),L(I),L(N),L(S)
MGMOVER   DB      L(G),L(A),L(M),L(E),L(EMPTY)
          DB      L(O),L(V),L(E),L(R)
MTIE      DB      L(Y),L(O),L(U),L(EMPTY),L(H),L(A),L(V),L(E),L(EMPTY)
          DB      L(T),L(I),L(E),L(D)

POINTSPR  DB      L(POINT300),L(POINT600),L(POINT900)
MULT3SP   DB      3,6,9