Stacken/c64-livecoding
6
0
Fork 0
Code Issues 1 Pull requests Projects Releases Packages Wiki Activity Actions

found place were old 16-bit zeropage format was used, fix that!

Browse source
This commit is contained in:
hugova 2025-05-08 20:11:04 +02:00
parent 75bbe83a01
commit a553549b18
2 changed files with 7 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
wip-hugo/routines/memory/mem.inc
View file

@ -6,7 +6,7 @@
B_end = $FE ; 16-bit value (uses FF)
;;In use of by pixel_draw
Y_pos = $FB
X_pos = $FCFD
X_pos = $FC ; 16-bit value (uses FD)
byte_to_paint = $FE
btp_mem_pos = $F9 ; 16-bit value (uses FA), byte to paint memory position
C = $F7 ; 16-bit value (uses F8)

10
wip-hugo/routines/memory/pixel_draw.s
View file

@ -1,13 +1,13 @@
;;; -*- Mode: asm; indent-tabs-mode: t; tab-width: 8 -*-
;;Screen print. Draws a pixel at a specified position.
;; Destroys A X Y
.proc pixel_draw;; Draws a pixel at [Y = FB , X = FC, FD]. Y = 0 - 320, X= 0 - 200
.proc pixel_draw; user-procedure :clobbers (A X Y) :clobbers-arguments 0
;; Draws a pixel at Y_pos, X_pos se mem.inc
.include "mem.inc"
Bitmap = $4000
Bitmap_end = $5F3F
;; X = X_pos (mod 8)
LDA >X_pos ; X (mod 8)
LDA X_pos ; X (mod 8)
AND #%00000111
TAX
@ -33,10 +33,10 @@ end__:
;;pos = x_offset
LDA #%11111000
AND >X_pos
AND X_pos
STA btp_mem_pos
LDA <X_pos
LDA X_pos + 1
STA btp_mem_pos + 1
;;The y_pos adds offset because chunk offsets + inside chunk offset.