mirror of
https://github.com/antoinevignau/source.git
synced 2024-06-01 00:41:39 +00:00
next
This commit is contained in:
Antoine Vignau
parent
e02fefdc4e
commit
6459bbd7da
Binary file not shown.
|
|
@ -63,6 +63,7 @@ maxJOY = $3b
|
||||||
boardX = $00
|
boardX = $00
|
||||||
boardY = $01
|
boardY = $01
|
||||||
idxFOE = $19 ; current foe index
|
idxFOE = $19 ; current foe index
|
||||||
|
fgODDEVEN = 1a
|
||||||
theYSCREEN = $1b
|
theYSCREEN = $1b
|
||||||
theXSCREEN = $1c
|
theXSCREEN = $1c
|
||||||
nbLINES = $1d
|
nbLINES = $1d
|
||||||
|
|
@ -84,12 +85,17 @@ theUNITE = theDIZAINE+1 ; 8b
|
||||||
theSPEED = $8c ; 8c
|
theSPEED = $8c ; 8c
|
||||||
nbFOE = $8d ; 8d
|
nbFOE = $8d ; 8d
|
||||||
theSCORE = $8e ; 8e..8f.90..91
|
theSCORE = $8e ; 8e..8f.90..91
|
||||||
|
idxLVLDISK = $92 ; index in level buffer from disk
|
||||||
nbCHEST = $93 ; 93
|
nbCHEST = $93 ; 93
|
||||||
intLEVEL = $96 ; theLEVEL-1
|
intLEVEL = $96 ; theLEVEL-1
|
||||||
fgSOUND = $99 ; 99
|
fgSOUND = $99 ; 99
|
||||||
|
fgPLAY = $9a ; 1: alive, 0: dead
|
||||||
fgLVLMODE = $a2 ; 0: edit, <>0: game
|
fgLVLMODE = $a2 ; 0: edit, <>0: game
|
||||||
idxLADDERI = $a3
|
idxLADDERI = $a3
|
||||||
theLEVEL = $a6
|
theLEVEL = $a6
|
||||||
|
fgDEMO = $a7
|
||||||
|
fgKEYBTN0 = $ac ; 1: no key/btn0 pressed, 0: key/btn0 pressed
|
||||||
|
fgCHANGE = $ad ; 1: no change, 0: change
|
||||||
sprDATA = $df ; $df..$ff
|
sprDATA = $df ; $df..$ff
|
||||||
|
|
||||||
fgINPUT = $95 ; "J"oystick, "K"eyboard
|
fgINPUT = $95 ; "J"oystick, "K"eyboard
|
||||||
|
|
@ -147,10 +153,9 @@ HGR1 ds 8192,$20
|
||||||
HGR2 ds 8192,$40
|
HGR2 ds 8192,$40
|
||||||
|
|
||||||
*-----------------------------------
|
*-----------------------------------
|
||||||
*
|
* ENTRY POINT
|
||||||
*-----------------------------------
|
*-----------------------------------
|
||||||
|
|
||||||
|
|
||||||
L6000 JSR checkJOYSTICK
|
L6000 JSR checkJOYSTICK
|
||||||
|
|
||||||
LDA #$01 ; read score table
|
LDA #$01 ; read score table
|
||||||
|
|
@ -167,7 +172,7 @@ showTITLEPAGE
|
||||||
STA L6030+2
|
STA L6030+2
|
||||||
LDY #$00
|
LDY #$00
|
||||||
STY theY
|
STY theY
|
||||||
STY $A7
|
STY fgDEMO
|
||||||
STY intLEVEL
|
STY intLEVEL
|
||||||
LDA #>HGR1
|
LDA #>HGR1
|
||||||
STA hgrPAGE
|
STA hgrPAGE
|
||||||
|
|
@ -211,7 +216,7 @@ L6056 LDA #$00
|
||||||
STA $A8+1
|
STA $A8+1
|
||||||
LDA #nbLIVES ; 5 men to start with
|
LDA #nbLIVES ; 5 men to start with
|
||||||
STA theMEN
|
STA theMEN
|
||||||
LDA $A7
|
LDA fgDEMO
|
||||||
LSR
|
LSR
|
||||||
BEQ L6099
|
BEQ L6099
|
||||||
LDA #$01
|
LDA #$01
|
||||||
|
|
@ -233,11 +238,11 @@ L6095 STA $24
|
||||||
L6099 JSR L79AD
|
L6099 JSR L79AD
|
||||||
STA TXTPAGE1
|
STA TXTPAGE1
|
||||||
L609F LDX #modeGAME
|
L609F LDX #modeGAME
|
||||||
JSR L6238
|
JSR prepareLEVEL
|
||||||
LDA #$00
|
LDA #$00
|
||||||
STA $9E
|
STA $9E
|
||||||
STA $9F
|
STA $9F
|
||||||
LDA $A7
|
LDA fgDEMO
|
||||||
LSR
|
LSR
|
||||||
BEQ L60BF
|
BEQ L60BF
|
||||||
JSR waitKEYUP
|
JSR waitKEYUP
|
||||||
|
|
@ -265,7 +270,7 @@ L60BF LDX #$00
|
||||||
LDA L621D,Y
|
LDA L621D,Y
|
||||||
STA $5F
|
STA $5F
|
||||||
L60E4 JSR L64BD
|
L60E4 JSR L64BD
|
||||||
LDA $9A
|
LDA fgPLAY
|
||||||
BEQ L613F
|
BEQ L613F
|
||||||
JSR playMELODY
|
JSR playMELODY
|
||||||
LDA nbCHEST ; remaining chests?
|
LDA nbCHEST ; remaining chests?
|
||||||
|
|
@ -281,11 +286,11 @@ L60F5 LDA boardY
|
||||||
CMP #$FF
|
CMP #$FF
|
||||||
BEQ L611A
|
BEQ L611A
|
||||||
L6107 JSR L75F4
|
L6107 JSR L75F4
|
||||||
LDA $9A
|
LDA fgPLAY
|
||||||
BEQ L613F
|
BEQ L613F
|
||||||
JSR playMELODY
|
JSR playMELODY
|
||||||
JSR L6C82
|
JSR L6C82
|
||||||
LDA $9A
|
LDA fgPLAY
|
||||||
BEQ L613F
|
BEQ L613F
|
||||||
BNE L60E4
|
BNE L60E4
|
||||||
L611A INC theLEVEL
|
L611A INC theLEVEL
|
||||||
|
|
@ -315,7 +320,7 @@ L613F DEC theMEN ; man--
|
||||||
|
|
||||||
L6178 JSR playMELODY
|
L6178 JSR playMELODY
|
||||||
BCS L6178
|
BCS L6178
|
||||||
LDA $A7
|
LDA fgDEMO
|
||||||
LSR
|
LSR
|
||||||
BEQ L61D0
|
BEQ L61D0
|
||||||
LDA theMEN ; man
|
LDA theMEN ; man
|
||||||
|
|
@ -344,12 +349,12 @@ L61A9 LDA KBD
|
||||||
BNE L6199
|
BNE L6199
|
||||||
DEC theY
|
DEC theY
|
||||||
BNE L6199
|
BNE L6199
|
||||||
LDA $A7
|
LDA fgDEMO
|
||||||
BNE L61DE
|
BNE L61DE
|
||||||
LDX #$01
|
LDX #$01
|
||||||
STX $A7
|
STX fgDEMO
|
||||||
STX theLEVEL
|
STX theLEVEL
|
||||||
STX $AC
|
STX fgKEYBTN0
|
||||||
STX $9D
|
STX $9D
|
||||||
LDX fgSOUND
|
LDX fgSOUND
|
||||||
STX L61D0+1
|
STX L61D0+1
|
||||||
|
|
@ -359,7 +364,7 @@ L61A9 LDA KBD
|
||||||
L61D0 LDA #$00
|
L61D0 LDA #$00
|
||||||
STA fgSOUND
|
STA fgSOUND
|
||||||
LDA KBD
|
LDA KBD
|
||||||
LDX $AC
|
LDX fgKEYBTN0
|
||||||
BEQ L61F6
|
BEQ L61F6
|
||||||
JMP L618E
|
JMP L618E
|
||||||
|
|
||||||
|
|
@ -370,7 +375,7 @@ L61E4 LDA #$01
|
||||||
JSR readSCORE
|
JSR readSCORE
|
||||||
L61E9 JSR L786B
|
L61E9 JSR L786B
|
||||||
LDA #$02
|
LDA #$02
|
||||||
STA $A7
|
STA fgDEMO
|
||||||
JMP L618E
|
JMP L618E
|
||||||
L61F3 JMP showTITLEPAGE
|
L61F3 JMP showTITLEPAGE
|
||||||
|
|
||||||
|
|
@ -386,7 +391,7 @@ L6201 LDX #$00
|
||||||
STX theLEVEL
|
STX theLEVEL
|
||||||
STX $9D
|
STX $9D
|
||||||
LDA #$02
|
LDA #$02
|
||||||
STA $A7
|
STA fgDEMO
|
||||||
JMP L6056
|
JMP L6056
|
||||||
|
|
||||||
L6211 JMP enterEDITOR ; Jump to the Editor
|
L6211 JMP enterEDITOR ; Jump to the Editor
|
||||||
|
|
@ -400,10 +405,15 @@ L622A LDA $5C
|
||||||
ASL
|
ASL
|
||||||
ASL
|
ASL
|
||||||
LDX #$06
|
LDX #$06
|
||||||
JSR L87D5
|
JSR getNOTE
|
||||||
JMP playMELODY
|
JMP playMELODY
|
||||||
|
|
||||||
L6238 STX fgLVLMODE ; 0: edit, <>0: game
|
*-----------------------------------
|
||||||
|
* PREPARE LEVEL
|
||||||
|
*-----------------------------------
|
||||||
|
|
||||||
|
prepareLEVEL
|
||||||
|
STX fgLVLMODE ; 0: edit, <>0: game
|
||||||
LDX #$FF
|
LDX #$FF
|
||||||
STX boardX
|
STX boardX
|
||||||
INX
|
INX
|
||||||
|
|
@ -412,8 +422,8 @@ L6238 STX fgLVLMODE ; 0: edit, <>0: game
|
||||||
STX nbFOE
|
STX nbFOE
|
||||||
STX idxFOE
|
STX idxFOE
|
||||||
STX $A0
|
STX $A0
|
||||||
STX $92
|
STX idxLVLDISK
|
||||||
STX $1A
|
STX fgODDEVEN
|
||||||
STX theY
|
STX theY
|
||||||
TXA
|
TXA
|
||||||
|
|
||||||
|
|
@ -427,7 +437,7 @@ L625A STA L0C98,X
|
||||||
BPL L625A
|
BPL L625A
|
||||||
|
|
||||||
LDA #$01
|
LDA #$01
|
||||||
STA $9A
|
STA fgPLAY
|
||||||
JSR diskLEVEL
|
JSR diskLEVEL
|
||||||
|
|
||||||
LDY theY
|
LDY theY
|
||||||
|
|
@ -441,9 +451,9 @@ L6269 LDA tblBOARDALLL,Y
|
||||||
|
|
||||||
LDA #$00 ; vŽrifie le contenu
|
LDA #$00 ; vŽrifie le contenu
|
||||||
STA theX ; du niveau
|
STA theX ; du niveau
|
||||||
L627E LDA $1A ; que des valeurs 0-9
|
L627E LDA fgODDEVEN ; que des valeurs 0-9
|
||||||
LSR
|
LSR
|
||||||
LDY $92
|
LDY idxLVLDISK
|
||||||
LDA levelDISK,Y
|
LDA levelDISK,Y
|
||||||
BCS L628C
|
BCS L628C
|
||||||
AND #$0F
|
AND #$0F
|
||||||
|
|
@ -452,8 +462,8 @@ L628C LSR
|
||||||
LSR
|
LSR
|
||||||
LSR
|
LSR
|
||||||
LSR
|
LSR
|
||||||
INC $92
|
INC idxLVLDISK
|
||||||
L6292 INC $1A
|
L6292 INC fgODDEVEN
|
||||||
LDY theX
|
LDY theX
|
||||||
CMP #sprHERO+1
|
CMP #sprHERO+1
|
||||||
BCC L629C
|
BCC L629C
|
||||||
|
|
@ -477,7 +487,7 @@ L629C STA ($06),Y
|
||||||
STX intLEVEL
|
STX intLEVEL
|
||||||
INC $97
|
INC $97
|
||||||
DEX ; mode game
|
DEX ; mode game
|
||||||
JMP L6238
|
JMP prepareLEVEL
|
||||||
L62C3 RTS
|
L62C3 RTS
|
||||||
|
|
||||||
L62C4 JMP showTITLEPAGE
|
L62C4 JMP showTITLEPAGE
|
||||||
|
|
@ -488,8 +498,8 @@ L62C4 JMP showTITLEPAGE
|
||||||
|
|
||||||
encodeLEVEL
|
encodeLEVEL
|
||||||
LDA #$00
|
LDA #$00
|
||||||
STA $92
|
STA idxLVLDISK
|
||||||
STA $1A
|
STA fgODDEVEN
|
||||||
STA theY
|
STA theY
|
||||||
L62CF LDY theY
|
L62CF LDY theY
|
||||||
LDA tblBOARDALLL,Y
|
LDA tblBOARDALLL,Y
|
||||||
|
|
@ -498,7 +508,7 @@ L62CF LDY theY
|
||||||
STA $06+1
|
STA $06+1
|
||||||
LDY #$00
|
LDY #$00
|
||||||
STY theX
|
STY theX
|
||||||
L62DF LDA $1A
|
L62DF LDA fgODDEVEN
|
||||||
LSR
|
LSR
|
||||||
LDA ($06),Y
|
LDA ($06),Y
|
||||||
BCS L62EA
|
BCS L62EA
|
||||||
|
|
@ -509,10 +519,10 @@ L62EA ASL
|
||||||
ASL
|
ASL
|
||||||
ASL
|
ASL
|
||||||
ORA theA
|
ORA theA
|
||||||
LDY $92
|
LDY idxLVLDISK
|
||||||
STA levelDISK,Y
|
STA levelDISK,Y
|
||||||
INC $92
|
INC idxLVLDISK
|
||||||
L62F7 INC $1A
|
L62F7 INC fgODDEVEN
|
||||||
INC theX
|
INC theX
|
||||||
LDY theX
|
LDY theX
|
||||||
CPY #lvlWIDTH
|
CPY #lvlWIDTH
|
||||||
|
|
@ -529,7 +539,7 @@ L62F7 INC $1A
|
||||||
*-----------------------------------
|
*-----------------------------------
|
||||||
|
|
||||||
diskLEVEL STA LB7F4
|
diskLEVEL STA LB7F4
|
||||||
LDA $A7
|
LDA fgDEMO
|
||||||
LSR
|
LSR
|
||||||
BEQ L6345
|
BEQ L6345
|
||||||
LDA intLEVEL ; level
|
LDA intLEVEL ; level
|
||||||
|
|
@ -1209,7 +1219,7 @@ L67E7 LDY boardY ; are we on last line?
|
||||||
LDY $A0
|
LDY $A0
|
||||||
LDA L699E,Y
|
LDA L699E,Y
|
||||||
LDX L69AB,Y
|
LDX L69AB,Y
|
||||||
JSR L87D5
|
JSR getNOTE
|
||||||
LDX $A0
|
LDX $A0
|
||||||
LDA #$00
|
LDA #$00
|
||||||
CPX #$06
|
CPX #$06
|
||||||
|
|
@ -1315,7 +1325,7 @@ L68AD LDY boardY ; are we on last line?
|
||||||
LDY $A0
|
LDY $A0
|
||||||
LDA L6992,Y
|
LDA L6992,Y
|
||||||
LDX L699F,Y
|
LDX L699F,Y
|
||||||
JSR L87D5
|
JSR getNOTE
|
||||||
LDX $A0
|
LDX $A0
|
||||||
LDA #$08
|
LDA #$08
|
||||||
CPX #$12
|
CPX #$12
|
||||||
|
|
@ -1477,8 +1487,8 @@ L69B8 LDA KBD
|
||||||
BMI L69CD
|
BMI L69CD
|
||||||
LDA BUTN0
|
LDA BUTN0
|
||||||
BPL L69D6
|
BPL L69D6
|
||||||
L69CD LSR $AC
|
L69CD LSR fgKEYBTN0
|
||||||
LSR $9A
|
LSR fgPLAY
|
||||||
LDA #$01
|
LDA #$01
|
||||||
STA theMEN ; one man
|
STA theMEN ; one man
|
||||||
RTS
|
RTS
|
||||||
|
|
@ -1517,7 +1527,7 @@ L69F2 LDA $AA ; first entry is the fisrt key
|
||||||
* 0123456
|
* 0123456
|
||||||
L6A0B ASC "IJKLOU "
|
L6A0B ASC "IJKLOU "
|
||||||
|
|
||||||
L6A12 LDA $A7
|
L6A12 LDA fgDEMO
|
||||||
CMP #$01
|
CMP #$01
|
||||||
BEQ L69B8
|
BEQ L69B8
|
||||||
LDX KBD
|
LDX KBD
|
||||||
|
|
@ -1563,7 +1573,7 @@ doNEXTLEVEL
|
||||||
INC theMEN ; man++
|
INC theMEN ; man++
|
||||||
INC theLEVEL
|
INC theLEVEL
|
||||||
INC intLEVEL
|
INC intLEVEL
|
||||||
LSR $9A
|
LSR fgPLAY
|
||||||
LSR $9D
|
LSR $9D
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
|
|
@ -1581,7 +1591,7 @@ L6A67 JSR printMEN
|
||||||
|
|
||||||
INC $97
|
INC $97
|
||||||
INC theMEN ; man++
|
INC theMEN ; man++
|
||||||
LSR $9A
|
LSR fgPLAY
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
@ -1604,7 +1614,7 @@ doTERMINATE LDA #$01
|
||||||
* 81 - CTRL-A - ABORTS MAN
|
* 81 - CTRL-A - ABORTS MAN
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
||||||
doABORTMAN LSR $9A
|
doABORTMAN LSR fgPLAY
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
@ -1826,7 +1836,7 @@ L6C02 JSR L6B85
|
||||||
BEQ L6C12
|
BEQ L6C12
|
||||||
LDA $94
|
LDA $94
|
||||||
BEQ L6C12
|
BEQ L6C12
|
||||||
LSR $9A
|
LSR fgPLAY
|
||||||
L6C12 RTS
|
L6C12 RTS
|
||||||
|
|
||||||
L6C13 LDA $02
|
L6C13 LDA $02
|
||||||
|
|
@ -1899,7 +1909,7 @@ L6C92 LDA |$0060,Y
|
||||||
L6C97 LSR $63
|
L6C97 LSR $63
|
||||||
BCC L6CA2
|
BCC L6CA2
|
||||||
JSR L6CDB
|
JSR L6CDB
|
||||||
LDA $9A
|
LDA fgPLAY
|
||||||
BEQ L6CA6
|
BEQ L6CA6
|
||||||
L6CA2 LDA $63
|
L6CA2 LDA $63
|
||||||
BNE L6C97
|
BNE L6C97
|
||||||
|
|
@ -2054,7 +2064,7 @@ L6DE1 STA ($06),Y
|
||||||
LDA ($06),Y
|
LDA ($06),Y
|
||||||
CMP #sprHERO
|
CMP #sprHERO
|
||||||
BNE L6E02
|
BNE L6E02
|
||||||
LSR $9A
|
LSR fgPLAY
|
||||||
L6E02 LDA ($08),Y
|
L6E02 LDA ($08),Y
|
||||||
CMP #sprWALL
|
CMP #sprWALL
|
||||||
BNE L6E58
|
BNE L6E58
|
||||||
|
|
@ -2186,7 +2196,7 @@ L6F02 STA ($06),Y
|
||||||
LDA ($06),Y
|
LDA ($06),Y
|
||||||
CMP #sprHERO
|
CMP #sprHERO
|
||||||
BNE L6F1C
|
BNE L6F1C
|
||||||
LSR $9A
|
LSR fgPLAY
|
||||||
L6F1C LDA #$08
|
L6F1C LDA #$08
|
||||||
STA ($06),Y
|
STA ($06),Y
|
||||||
LDA #$04
|
LDA #$04
|
||||||
|
|
@ -2253,7 +2263,7 @@ L6F94 STA ($06),Y
|
||||||
LDA ($06),Y
|
LDA ($06),Y
|
||||||
CMP #sprHERO
|
CMP #sprHERO
|
||||||
BNE L6FAE
|
BNE L6FAE
|
||||||
LSR $9A
|
LSR fgPLAY
|
||||||
L6FAE LDA #$08
|
L6FAE LDA #$08
|
||||||
STA ($06),Y
|
STA ($06),Y
|
||||||
LDA #$00
|
LDA #$00
|
||||||
|
|
@ -2306,7 +2316,7 @@ L700F STA ($06),Y
|
||||||
LDA ($06),Y
|
LDA ($06),Y
|
||||||
CMP #sprHERO
|
CMP #sprHERO
|
||||||
BNE L701C
|
BNE L701C
|
||||||
LSR $9A
|
LSR fgPLAY
|
||||||
L701C LDA #$08
|
L701C LDA #$08
|
||||||
STA ($06),Y
|
STA ($06),Y
|
||||||
LDA #$04
|
LDA #$04
|
||||||
|
|
@ -2375,7 +2385,7 @@ L70A0 STA ($06),Y
|
||||||
LDA ($06),Y
|
LDA ($06),Y
|
||||||
CMP #sprHERO
|
CMP #sprHERO
|
||||||
BNE L70AD
|
BNE L70AD
|
||||||
LSR $9A
|
LSR fgPLAY
|
||||||
L70AD LDA #$08
|
L70AD LDA #$08
|
||||||
STA ($06),Y
|
STA ($06),Y
|
||||||
LDA #$00
|
LDA #$00
|
||||||
|
|
@ -2641,7 +2651,7 @@ L72A7 LDY $56
|
||||||
STA $58
|
STA $58
|
||||||
L72D3 RTS
|
L72D3 RTS
|
||||||
|
|
||||||
L72D4 STA $1A
|
L72D4 STA fgODDEVEN
|
||||||
CMP boardY
|
CMP boardY
|
||||||
BNE L72EB
|
BNE L72EB
|
||||||
CPX $12
|
CPX $12
|
||||||
|
|
@ -2651,10 +2661,10 @@ L72D4 STA $1A
|
||||||
SBC $12
|
SBC $12
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
L72E3 STX $1A
|
L72E3 STX fgODDEVEN
|
||||||
LDA $12
|
LDA $12
|
||||||
SEC
|
SEC
|
||||||
SBC $1A
|
SBC fgODDEVEN
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
L72EB BCC L72F4
|
L72EB BCC L72F4
|
||||||
|
|
@ -2666,7 +2676,7 @@ L72EB BCC L72F4
|
||||||
|
|
||||||
L72F4 LDA boardY
|
L72F4 LDA boardY
|
||||||
SEC
|
SEC
|
||||||
SBC $1A
|
SBC fgODDEVEN
|
||||||
CLC
|
CLC
|
||||||
ADC #$64
|
ADC #$64
|
||||||
RTS
|
RTS
|
||||||
|
|
@ -3112,7 +3122,7 @@ L7641 LDX tempINDEX
|
||||||
|
|
||||||
L7667 CMP #sprHERO
|
L7667 CMP #sprHERO
|
||||||
BNE L766D
|
BNE L766D
|
||||||
LSR $9A
|
LSR fgPLAY
|
||||||
L766D CMP #sprFOE
|
L766D CMP #sprFOE
|
||||||
BEQ L767A
|
BEQ L767A
|
||||||
CMP #sprCHEST
|
CMP #sprCHEST
|
||||||
|
|
@ -3526,7 +3536,7 @@ setHGRPOINTERS
|
||||||
STA $0C
|
STA $0C
|
||||||
STA $0E
|
STA $0E
|
||||||
LDA yhgr,Y
|
LDA yhgr,Y
|
||||||
ORA #$20
|
ORA #>HGR1
|
||||||
STA $0C+1
|
STA $0C+1
|
||||||
EOR #$60
|
EOR #$60
|
||||||
STA $0E+1
|
STA $0E+1
|
||||||
|
|
@ -3750,7 +3760,7 @@ enterEDITOR LDA #$00
|
||||||
STA $25
|
STA $25
|
||||||
LDA #$05
|
LDA #$05
|
||||||
STA theMEN
|
STA theMEN
|
||||||
STA $A7
|
STA fgDEMO
|
||||||
LDA fgINPUT ; save interface mode
|
LDA fgINPUT ; save interface mode
|
||||||
STA L7C76+1
|
STA L7C76+1
|
||||||
LDA #chrK ; force keyboard in editor
|
LDA #chrK ; force keyboard in editor
|
||||||
|
|
@ -3803,26 +3813,26 @@ L7C41 TXA ; yes, we know the key
|
||||||
|
|
||||||
L7C4D ASC "PCEMIS"00
|
L7C4D ASC "PCEMIS"00
|
||||||
|
|
||||||
L7C54 DA L7C60-1 ; Play level
|
L7C54 DA editPLAY-1 ; Play level
|
||||||
DA L7C8E-1 ; Clear level
|
DA editCLEAR-1 ; Clear level
|
||||||
DA L7CBC-1 ; Edit level
|
DA editEDIT-1 ; Edit level
|
||||||
DA L7CD8-1 ; Move level
|
DA editMOVE-1 ; Move level
|
||||||
DA L7D5D-1 ; Initialize
|
DA editINIT-1 ; Initialize
|
||||||
DA L7E75-1 ; Clear Score file
|
DA editCLEARSCORE-1 ; Clear Score file
|
||||||
|
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
* P - PLAY LEVEL
|
* P - PLAY LEVEL
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
||||||
L7C60 JSR printSTRING
|
editPLAY JSR printSTRING
|
||||||
ASC 8D
|
ASC 8D
|
||||||
ASC ">>PLAY LEVEL"00
|
ASC ">>PLAY LEVEL"00
|
||||||
JSR L817B
|
JSR inputLEVEL
|
||||||
BCS L7C8B
|
BCS L7C8B
|
||||||
L7C76 LDA #$00
|
L7C76 LDA #$00
|
||||||
STA fgINPUT
|
STA fgINPUT
|
||||||
LDA #$03
|
LDA #$03
|
||||||
STA $A7
|
STA fgDEMO
|
||||||
LDA #$01
|
LDA #$01
|
||||||
STA $9D
|
STA $9D
|
||||||
LDA intLEVEL
|
LDA intLEVEL
|
||||||
|
|
@ -3835,10 +3845,10 @@ L7C8B JMP L7C3B
|
||||||
* C - CLEAR LEVEL
|
* C - CLEAR LEVEL
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
||||||
L7C8E JSR printSTRING
|
editCLEAR JSR printSTRING
|
||||||
ASC 8D
|
ASC 8D
|
||||||
ASC ">>CLEAR LEVEL"00
|
ASC ">>CLEAR LEVEL"00
|
||||||
JSR L817B
|
JSR inputLEVEL
|
||||||
BCS L7CB9
|
BCS L7CB9
|
||||||
JSR L807F
|
JSR L807F
|
||||||
LDY #$00
|
LDY #$00
|
||||||
|
|
@ -3855,27 +3865,27 @@ L7CB9 JMP L7C3B
|
||||||
* E - EDIT LEVEL
|
* E - EDIT LEVEL
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
||||||
L7CBC JSR printSTRING
|
editEDIT JSR printSTRING
|
||||||
ASC 8D
|
ASC 8D
|
||||||
ASC ">>EDIT LEVEL"00
|
ASC ">>EDIT LEVEL"00
|
||||||
JSR L817B ; is level valid?
|
JSR inputLEVEL ; is level valid?
|
||||||
BCS L7CD5 ; no
|
BCS L7CD5 ; no
|
||||||
JMP L7F01 ; yes, handle edit
|
JMP editEDITLEVEL ; yes, handle edit
|
||||||
L7CD5 JMP L7C3B
|
L7CD5 JMP L7C3B
|
||||||
|
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
* M - MOVE LEVEL
|
* M - MOVE LEVEL
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
||||||
L7CD8 JSR printSTRING
|
editMOVE JSR printSTRING
|
||||||
ASC 8D
|
ASC 8D
|
||||||
ASC ">>MOVE LEVEL"00
|
ASC ">>MOVE LEVEL"00
|
||||||
JSR L817B
|
JSR inputLEVEL
|
||||||
BCS L7D5A
|
BCS L7D5A
|
||||||
STY L824F
|
STY L824F
|
||||||
JSR printSTRING
|
JSR printSTRING
|
||||||
ASC " TO LEVEL"00
|
ASC " TO LEVEL"00
|
||||||
JSR L817B
|
JSR inputLEVEL
|
||||||
BCS L7D5A
|
BCS L7D5A
|
||||||
STY L8250
|
STY L8250
|
||||||
JSR printSTRING
|
JSR printSTRING
|
||||||
|
|
@ -3903,7 +3913,7 @@ L7D5A JMP L7C3B
|
||||||
* I - INITIALIZE DISKETTE
|
* I - INITIALIZE DISKETTE
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
||||||
L7D5D JSR printSTRING
|
editINIT JSR printSTRING
|
||||||
ASC 8D
|
ASC 8D
|
||||||
ASC ">>INITIALIZE"8D
|
ASC ">>INITIALIZE"8D
|
||||||
ASC " THIS FORMATS THE DISKETTE"8D
|
ASC " THIS FORMATS THE DISKETTE"8D
|
||||||
|
|
@ -3912,7 +3922,7 @@ L7D5D JSR printSTRING
|
||||||
ASC " ENTIRE DISKETTE FIRST)"8D8D
|
ASC " ENTIRE DISKETTE FIRST)"8D8D
|
||||||
ASC " ARE YOU SURE (Y/N) "00
|
ASC " ARE YOU SURE (Y/N) "00
|
||||||
JSR L823D
|
JSR L823D
|
||||||
CMP #"Y"
|
CMP #chrY
|
||||||
BNE L7E72
|
BNE L7E72
|
||||||
NOP ; NOP
|
NOP ; NOP
|
||||||
NOP
|
NOP
|
||||||
|
|
@ -3983,7 +3993,8 @@ L7E72 JMP L7C16
|
||||||
* C - CLEAR SCORE FILE
|
* C - CLEAR SCORE FILE
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
||||||
L7E75 JSR printSTRING
|
editCLEARSCORE
|
||||||
|
JSR printSTRING
|
||||||
ASC 8D
|
ASC 8D
|
||||||
ASC ">>CLEAR SCORE FILE"8D
|
ASC ">>CLEAR SCORE FILE"8D
|
||||||
ASC " THIS CLEARS THE HIGH"8D
|
ASC " THIS CLEARS THE HIGH"8D
|
||||||
|
|
@ -4013,7 +4024,8 @@ L7EFE JMP L7C16
|
||||||
* EDIT THE LEVEL
|
* EDIT THE LEVEL
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
||||||
L7F01 JSR clearHGR2 ; clear HGR2
|
editEDITLEVEL
|
||||||
|
JSR clearHGR2 ; clear HGR2
|
||||||
LDA #>HGR2
|
LDA #>HGR2
|
||||||
STA activePAGE
|
STA activePAGE
|
||||||
JSR drawINFOBAR ; show frame
|
JSR drawINFOBAR ; show frame
|
||||||
|
|
@ -4021,16 +4033,16 @@ L7F01 JSR clearHGR2 ; clear HGR2
|
||||||
STA activePAGE
|
STA activePAGE
|
||||||
JSR L807F ; check diskette (master or data disk)
|
JSR L807F ; check diskette (master or data disk)
|
||||||
LDX #$01
|
LDX #$01
|
||||||
STX $AD
|
STX fgCHANGE
|
||||||
DEX ; mode edit
|
DEX ; mode edit
|
||||||
JSR L6238
|
JSR prepareLEVEL
|
||||||
BCC L7F1F
|
BCC L7F1F
|
||||||
JMP L7C3B
|
JMP L7C3B
|
||||||
|
|
||||||
L7F1F LDA #$00 ; cursor is at 0,0
|
L7F1F LDA #$00 ; cursor is at 0,0
|
||||||
STA theX
|
STA theX
|
||||||
STA theY
|
STA theY
|
||||||
L7F25 JSR L814B ; wait for key
|
L7F25 JSR blinkATXY ; wait for key
|
||||||
CMP #"9"+1
|
CMP #"9"+1
|
||||||
BCS L7F54 ; no sprite
|
BCS L7F54 ; no sprite
|
||||||
CMP #"0" ; means check commands
|
CMP #"0" ; means check commands
|
||||||
|
|
@ -4046,7 +4058,7 @@ L7F25 JSR L814B ; wait for key
|
||||||
LDA theA ; get sprite
|
LDA theA ; get sprite
|
||||||
EOR ($06),Y ; same as before?
|
EOR ($06),Y ; same as before?
|
||||||
BEQ L7F4A ; yes
|
BEQ L7F4A ; yes
|
||||||
LSR $AD ; no
|
LSR fgCHANGE ; no, tell there's a change
|
||||||
L7F4A LDA theA ; get sprite
|
L7F4A LDA theA ; get sprite
|
||||||
STA ($06),Y ; save it
|
STA ($06),Y ; save it
|
||||||
JSR coutHGR1 ; print sprite
|
JSR coutHGR1 ; print sprite
|
||||||
|
|
@ -4055,16 +4067,16 @@ L7F4A LDA theA ; get sprite
|
||||||
L7F54 STA theA ; same key
|
L7F54 STA theA ; same key
|
||||||
LDY #$FF
|
LDY #$FF
|
||||||
L7F58 INY
|
L7F58 INY
|
||||||
LDA L8162,Y ; is that a command?
|
LDA tblEDITKEYS,Y ; is that a command?
|
||||||
BEQ L7F6E
|
BEQ L7F6E
|
||||||
CMP theA ; same as our key?
|
CMP theA ; same as our key?
|
||||||
BNE L7F58
|
BNE L7F58
|
||||||
TYA ; yes, jump
|
TYA ; yes, jump
|
||||||
ASL
|
ASL
|
||||||
TAY
|
TAY
|
||||||
LDA L816B+1,Y
|
LDA tblEDITCODE+1,Y
|
||||||
PHA
|
PHA
|
||||||
LDA L816B,Y
|
LDA tblEDITCODE,Y
|
||||||
PHA
|
PHA
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
|
|
@ -4075,7 +4087,7 @@ L7F6E JSR doBEEP ; beep
|
||||||
* I - MOVE CURSOR UP
|
* I - MOVE CURSOR UP
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
||||||
L7F74 LDA theY
|
editUP LDA theY
|
||||||
BEQ L7F6E
|
BEQ L7F6E
|
||||||
DEC theY
|
DEC theY
|
||||||
BPL L7F25
|
BPL L7F25
|
||||||
|
|
@ -4084,7 +4096,7 @@ L7F74 LDA theY
|
||||||
* J - MOVE CURSOR LEFT
|
* J - MOVE CURSOR LEFT
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
||||||
L7F7C LDA theX
|
editLEFT LDA theX
|
||||||
BEQ L7F6E
|
BEQ L7F6E
|
||||||
DEC theX
|
DEC theX
|
||||||
BPL L7F25
|
BPL L7F25
|
||||||
|
|
@ -4093,7 +4105,7 @@ L7F7C LDA theX
|
||||||
* K - MOVE CURSOR RIGHT
|
* K - MOVE CURSOR RIGHT
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
||||||
L7F84 LDA theX
|
editRIGHT LDA theX
|
||||||
CMP #lvlWIDTH-1
|
CMP #lvlWIDTH-1
|
||||||
BCS L7F6E
|
BCS L7F6E
|
||||||
INC theX
|
INC theX
|
||||||
|
|
@ -4103,7 +4115,7 @@ L7F84 LDA theX
|
||||||
* M - MOVE CURSOR DOWN
|
* M - MOVE CURSOR DOWN
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
||||||
L7F8E LDA theY
|
editDOWN LDA theY
|
||||||
CMP #lvlHEIGHT-1
|
CMP #lvlHEIGHT-1
|
||||||
BCS L7F6E
|
BCS L7F6E
|
||||||
INC theY
|
INC theY
|
||||||
|
|
@ -4137,7 +4149,7 @@ L7FB7 JSR encodeLEVEL ; prepare the level & save it
|
||||||
PLA
|
PLA
|
||||||
STA theY
|
STA theY
|
||||||
LDA #$01
|
LDA #$01
|
||||||
STA $AD
|
STA fgCHANGE
|
||||||
RTS ; and return
|
RTS ; and return
|
||||||
|
|
||||||
L7FC5 LDA #$00
|
L7FC5 LDA #$00
|
||||||
|
|
@ -4149,40 +4161,46 @@ L7FC5 LDA #$00
|
||||||
* CTRL-S - SAVE YOUR GAME
|
* CTRL-S - SAVE YOUR GAME
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
||||||
L7FCE JSR saveLEVEL
|
editSAVE JSR saveLEVEL
|
||||||
JMP L7F25
|
JMP L7F25
|
||||||
|
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
* CTRL-U - NEXT LEVEL
|
* CTRL-U - NEXT LEVEL
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
||||||
L7FD4 LDA intLEVEL
|
editLOAD LDA intLEVEL
|
||||||
CMP #maxLEVEL-1 ; 150-1
|
CMP #maxLEVEL-1 ; 150-1
|
||||||
L7FD8 BEQ L7F6E
|
L7FD8 BEQ L7F6E
|
||||||
JSR L7FF8
|
JSR editSAVECHANGES
|
||||||
INC intLEVEL
|
INC intLEVEL
|
||||||
INC theLEVEL
|
INC theLEVEL
|
||||||
JMP L7F01
|
JMP editEDITLEVEL
|
||||||
|
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
* CTRL-H - PREVIOUS LEVEL
|
* CTRL-H - PREVIOUS LEVEL
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
||||||
L7FE4 LDA intLEVEL
|
editPREVIOUS
|
||||||
|
LDA intLEVEL
|
||||||
BEQ L7FD8
|
BEQ L7FD8
|
||||||
JSR L7FF8
|
JSR editSAVECHANGES
|
||||||
DEC theLEVEL
|
DEC theLEVEL
|
||||||
DEC intLEVEL
|
DEC intLEVEL
|
||||||
JMP L7F01
|
JMP editEDITLEVEL
|
||||||
|
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
* CTRL-Q - QUIT GAME GENERATOR
|
* CTRL-Q - QUIT GAME GENERATOR
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
||||||
L7FF2 JSR L7FF8
|
editQUIT JSR editSAVECHANGES
|
||||||
JMP L7BB2
|
JMP L7BB2
|
||||||
|
|
||||||
L7FF8 LDA $AD
|
*-------------------------------
|
||||||
|
* WANT TO SAVE CHANGES
|
||||||
|
*-------------------------------
|
||||||
|
|
||||||
|
editSAVECHANGES
|
||||||
|
LDA fgCHANGE
|
||||||
BNE L8075
|
BNE L8075
|
||||||
JSR clearHGR2
|
JSR clearHGR2
|
||||||
LDA #>HGR2
|
LDA #>HGR2
|
||||||
|
|
@ -4269,7 +4287,12 @@ tellNODATADISK
|
||||||
ASC "LODE RUNNER DATA DISK."00
|
ASC "LODE RUNNER DATA DISK."00
|
||||||
JMP L80D8
|
JMP L80D8
|
||||||
|
|
||||||
L814B LDY theY
|
*-----------------------------------
|
||||||
|
* BLINK AT XY
|
||||||
|
*-----------------------------------
|
||||||
|
|
||||||
|
blinkATXY
|
||||||
|
LDY theY
|
||||||
LDA tblBOARDALLL,Y
|
LDA tblBOARDALLL,Y
|
||||||
STA $06
|
STA $06
|
||||||
LDA tblBOARDALLH,Y
|
LDA tblBOARDALLH,Y
|
||||||
|
|
@ -4280,23 +4303,24 @@ L814B LDY theY
|
||||||
STA KBDSTROBE
|
STA KBDSTROBE
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
L8162 ASC "JIKM"
|
tblEDITKEYS ASC "JIKM"
|
||||||
HEX 9395889100
|
HEX 9395889100
|
||||||
|
|
||||||
L816B DA L7F7C-1 ; J move left
|
tblEDITCODE DA editLEFT-1 ; J move left
|
||||||
DA L7F74-1 ; I move up
|
DA editUP-1 ; I move up
|
||||||
DA L7F84-1 ; K move right
|
DA editRIGHT-1 ; K move right
|
||||||
DA L7F8E-1 ; M move down
|
DA editDOWN-1 ; M move down
|
||||||
DA L7FCE-1 ; CTRL-S to save your game
|
DA editSAVE-1 ; CTRL-S to save your game
|
||||||
DA L7FD4-1 ; CTRL-U to load next level
|
DA editLOAD-1 ; CTRL-U to load next level
|
||||||
DA L7FE4-1 ; CTRL-H to load previous level
|
DA editPREVIOUS-1 ; CTRL-H to load previous level
|
||||||
DA L7FF2-1 ; CTRL-Q to quit game generator
|
DA editQUIT-1 ; CTRL-Q to quit game generator
|
||||||
|
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
* CHECK REQUIRED LEVEL NUMBER
|
* INPUT LEVEL NUMBER
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
||||||
L817B LDY intLEVEL
|
inputLEVEL
|
||||||
|
LDY intLEVEL
|
||||||
INY
|
INY
|
||||||
TYA
|
TYA
|
||||||
JSR hex2dec
|
JSR hex2dec
|
||||||
|
|
@ -4888,16 +4912,16 @@ L85E7 LDA #>HGR1
|
||||||
JSR readSCORE
|
JSR readSCORE
|
||||||
JMP L618E
|
JMP L618E
|
||||||
|
|
||||||
L85F3 STA L8745
|
L85F3 STA bsDATA
|
||||||
L85F6 LDA #$68
|
L85F6 LDA #$68
|
||||||
STA $A1
|
STA $A1
|
||||||
LDA L8745
|
LDA bsDATA
|
||||||
BNE L8601
|
BNE L8601
|
||||||
LDA #$0A
|
LDA #$0A
|
||||||
L8601 JSR coutHGR2
|
L8601 JSR coutHGR2
|
||||||
L8604 LDA KBD
|
L8604 LDA KBD
|
||||||
BMI L8628
|
BMI L8628
|
||||||
JSR L876D
|
JSR checkMOVEMENT
|
||||||
DEC $A1
|
DEC $A1
|
||||||
BNE L8604
|
BNE L8604
|
||||||
LDA #$00
|
LDA #$00
|
||||||
|
|
@ -4906,13 +4930,13 @@ L8604 LDA KBD
|
||||||
STA $A1
|
STA $A1
|
||||||
L8619 LDA KBD
|
L8619 LDA KBD
|
||||||
BMI L8628
|
BMI L8628
|
||||||
JSR L876D
|
JSR checkMOVEMENT
|
||||||
DEC $A1
|
DEC $A1
|
||||||
BNE L8619
|
BNE L8619
|
||||||
JMP L85F6
|
JMP L85F6
|
||||||
|
|
||||||
L8628 PHA
|
L8628 PHA
|
||||||
LDA L8745
|
LDA bsDATA
|
||||||
JSR coutHGR2
|
JSR coutHGR2
|
||||||
PLA
|
PLA
|
||||||
RTS
|
RTS
|
||||||
|
|
@ -5063,7 +5087,7 @@ L8703 LDA #$68
|
||||||
L8710 JSR coutHGR1 ; output empty
|
L8710 JSR coutHGR1 ; output empty
|
||||||
L8713 LDA KBD ; key pressed?
|
L8713 LDA KBD ; key pressed?
|
||||||
BMI L873C ; yes
|
BMI L873C ; yes
|
||||||
JSR L876D ; buttons pressed?
|
JSR checkMOVEMENT ; buttons pressed?
|
||||||
BCS L873C ; yes
|
BCS L873C ; yes
|
||||||
DEC $A1
|
DEC $A1
|
||||||
BNE L8713
|
BNE L8713
|
||||||
|
|
@ -5073,14 +5097,14 @@ L8713 LDA KBD ; key pressed?
|
||||||
STA $A1
|
STA $A1
|
||||||
L872B LDA KBD
|
L872B LDA KBD
|
||||||
BMI L873C
|
BMI L873C
|
||||||
JSR L876D
|
JSR checkMOVEMENT
|
||||||
BCS L873C
|
BCS L873C
|
||||||
DEC $A1
|
DEC $A1
|
||||||
BNE L872B
|
BNE L872B
|
||||||
JMP L8703
|
JMP L8703
|
||||||
|
|
||||||
L873C PHA ; exit with
|
L873C PHA ; exit with
|
||||||
LDA L8745 ; sprite
|
LDA bsDATA ; sprite
|
||||||
JSR coutHGR1
|
JSR coutHGR1
|
||||||
PLA
|
PLA
|
||||||
RTS
|
RTS
|
||||||
|
|
@ -5112,7 +5136,12 @@ L8769 NOP
|
||||||
BPL L8758
|
BPL L8758
|
||||||
L876C RTS
|
L876C RTS
|
||||||
|
|
||||||
L876D LDA fgINPUT
|
*-----------------------------------
|
||||||
|
* CHECK MOVEMENT
|
||||||
|
*-----------------------------------
|
||||||
|
|
||||||
|
checkMOVEMENT
|
||||||
|
LDA fgINPUT
|
||||||
CMP #chrK
|
CMP #chrK
|
||||||
BEQ L8798
|
BEQ L8798
|
||||||
JSR readJOYSTICK
|
JSR readJOYSTICK
|
||||||
|
|
@ -5135,9 +5164,9 @@ L876D LDA fgINPUT
|
||||||
L8796 SEC
|
L8796 SEC
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
L8798 LDX #$02
|
L8798 LDX #$02 ; wait routine
|
||||||
L879A DEY
|
L879A DEY ; to compensate
|
||||||
BNE L879A
|
BNE L879A ; the skipped code above
|
||||||
DEX
|
DEX
|
||||||
BNE L879A
|
BNE L879A
|
||||||
CLC
|
CLC
|
||||||
|
|
@ -5162,7 +5191,7 @@ L87A7 LDA PADDL0
|
||||||
L87B9 RTS
|
L87B9 RTS
|
||||||
|
|
||||||
*-----------------------------------
|
*-----------------------------------
|
||||||
*
|
* PLAY A SOUND
|
||||||
*-----------------------------------
|
*-----------------------------------
|
||||||
|
|
||||||
playSOUND STA $0A
|
playSOUND STA $0A
|
||||||
|
|
@ -5181,10 +5210,10 @@ L87CC DEX
|
||||||
L87D4 RTS
|
L87D4 RTS
|
||||||
|
|
||||||
*-----------------------------------
|
*-----------------------------------
|
||||||
*
|
* GET NOTE
|
||||||
*-----------------------------------
|
*-----------------------------------
|
||||||
|
|
||||||
L87D5 INC $54
|
getNOTE INC $54
|
||||||
LDY $54
|
LDY $54
|
||||||
STA L0E80,Y
|
STA L0E80,Y
|
||||||
TXA
|
TXA
|
||||||
|
|
@ -5276,7 +5305,7 @@ L884B LDA tblBOARDALLL,Y
|
||||||
*-------------------------------
|
*-------------------------------
|
||||||
|
|
||||||
getXY LDA ytable,Y ; in: board X/Y
|
getXY LDA ytable,Y ; in: board X/Y
|
||||||
PHA : out: hgr X/Y
|
PHA ; out: hgr X/Y
|
||||||
LDA xtable,X
|
LDA xtable,X
|
||||||
TAX
|
TAX
|
||||||
PLA
|
PLA
|
||||||
|
|
|
||||||
File diff suppressed because it is too large
Load Diff
8506
loderunner/error_output.txt
Normal file
8506
loderunner/error_output.txt
Normal file
File diff suppressed because it is too large
Load Diff
Loading…
Reference in New Issue
Block a user