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

add test program for char_draw

Browse source
This commit is contained in:
hugova 2025-05-02 22:35:12 +02:00
parent 19b9feb02d
commit 09d7701c15
3 changed files with 25 additions and 11 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
wip-hugo/routines/text/char.inc Normal file
View file

@ -0,0 +1,11 @@
Character_generator_ROM = $D000
Y_pos_offset = $F9 ; 16-bit value (uses F8), reuses from Y_pos
X_pos_offset = $FA ; 16-bit value (uses F7)
X_pos = $FA
Y_pos = $F9
charset = $FB
code = $FE
petski_position = $FE ; 16-bit value (uses FF),reuses code:s memory
screen_position = $FC ; 16-bit value (uses FD)
;; copy
VIC_bank = $4000

14
wip-hugo/routines/text/char_draw.s
View file

@ -1,19 +1,11 @@
;;; -*- Mode: asm; indent-tabs-mode: t; tab-width: 8 -*- ;;; -*- Mode: asm; indent-tabs-mode: t; tab-width: 8 -*-
;; petski: https://www.c64-wiki.com/wiki/File:ASCII-Codes.gif ;; petscii: https://www.c64-wiki.com/wiki/File:ASCII-Codes.gif
;;https://www.c64-wiki.com/wiki/Character_set ;;https://www.c64-wiki.com/wiki/Character_set
;; Takes in a PETSKI-code in CODE ;; Takes in a PETSCII-code in CODE
;; And prints it ON X_pos, Y_pos ;; And prints it ON X_pos, Y_pos
;; Note that this is the real positions divided by 8 ;; Note that this is the real positions divided by 8
.proc char_draw; user-procedure :clobbers (A Y) :clobbers-arguments (0 3) .proc char_draw; user-procedure :clobbers (A Y) :clobbers-arguments (0 3)
Character_generator_ROM = $D000 .include "char.inc"
Y_pos_offset = $F9 ; 16-bit value (uses F8), reuses from Y_pos
X_pos_offset = $FA ; 16-bit value (uses F7)
X_pos = $FA
Y_pos = $F9
charset = $FB
code = $FE
petski_position = $FE ; 16-bit value (uses FF),reuses code:s memory
screen_position = $FC ; 16-bit value (uses FD)
;#### TEMP INIT DATA #### ;#### TEMP INIT DATA ####
LDA #$10 LDA #$10

11
wip-hugo/routines/text/char_draw_test.s Normal file
View file

@ -0,0 +1,11 @@
.scope char_draw_test
.include "char.inc"
LDA #$10
STA code
LDA #$10
LDA #04
STA X_pos
LDA #02
STA Y_pos
JSR char_drawj
.endscope