mirror of https://github.com/cybernesto/VBMP.git
Replaced hi-res address calculation
Replaced hi-res address calculation with the optimized new Woz calculation <http://www.txbobsc.com/aal/1986/aal8612.html#a9> Swapped the order of Y and X register initialisation in SAVEDST because Y is used in the Woz routine. Added the image of Jonathan Mak in the ProDOS Disk image and the samples folder.
This commit is contained in:
parent
4daa2c94df
commit
f6d6f4fb3f
36
DISPLAY.S
36
DISPLAY.S
|
@ -24,25 +24,21 @@ SOURCE EQU $4000
|
||||||
JMP DEBUT
|
JMP DEBUT
|
||||||
|
|
||||||
CALC TXA ; CALCUL ADRESSE LIGNE (X) HIRES
|
CALC TXA ; CALCUL ADRESSE LIGNE (X) HIRES
|
||||||
AND #$C0
|
ASL
|
||||||
|
TAY
|
||||||
|
AND #$F0
|
||||||
|
BPL C1
|
||||||
|
ORA #$05
|
||||||
|
C1 BCC C2
|
||||||
|
ORA #$0A
|
||||||
|
C2 ASL
|
||||||
|
ASL
|
||||||
STA MEM
|
STA MEM
|
||||||
LSR
|
TYA
|
||||||
LSR
|
AND #$0E
|
||||||
ORA MEM
|
ADC #$10
|
||||||
STA MEM
|
ASL MEM
|
||||||
TXA
|
ROL
|
||||||
STA MEM+1
|
|
||||||
ASL
|
|
||||||
ASL
|
|
||||||
ASL
|
|
||||||
ROL MEM+1
|
|
||||||
ASL
|
|
||||||
ROL MEM+1
|
|
||||||
ASL
|
|
||||||
ROR MEM
|
|
||||||
LDA MEM+1
|
|
||||||
AND #$1F
|
|
||||||
ORA #$20
|
|
||||||
STA MEM+1
|
STA MEM+1
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
|
@ -57,9 +53,9 @@ S1 STY SRCY
|
||||||
STA COMPTS
|
STA COMPTS
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
SAVEDST LDY DESTY
|
SAVEDST LDX DESTX
|
||||||
LDX DESTX
|
|
||||||
JSR CALC
|
JSR CALC
|
||||||
|
LDY DESTY
|
||||||
LDA BUFFDST
|
LDA BUFFDST
|
||||||
LSR ; DERNIER DECALLAGE POUR 7EMEBIT
|
LSR ; DERNIER DECALLAGE POUR 7EMEBIT
|
||||||
STA (MEM),Y
|
STA (MEM),Y
|
||||||
|
|
BIN
Images/VBMP.po
BIN
Images/VBMP.po
Binary file not shown.
Binary file not shown.
After Width: | Height: | Size: 7.0 KiB |
Loading…
Reference in New Issue