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

modify linetest to highlight out of bound bad behaviour of line

Browse source
This commit is contained in:
hugova 2025-07-24 21:46:31 +02:00
parent 0168fb4079
commit 25e65d8197
1 changed files with 44 additions and 34 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

48
wip-hugo/routines/line/line_test_extensive.s
View file

@ -6,16 +6,16 @@
.include "../memory/mem.inc"
Y_pos_ = $0D
X_pos_ = $0E
Y_end_ = $10
X_end_ = $11
Y_end_ = $0F
X_end_ = $0C
LDA #$d2
STA X_pos_
LDA #$62
STA Y_pos_
LDA #$ff
STA X_end
STA X_end_
LDA #$0
STA Y_end
STA Y_end_
;; Full angle test
@loop:
@ -23,16 +23,17 @@
STA Y_pos
LDA X_pos_
STA X_pos
LDA X_end_
STA X_end
LDA Y_end_
STA Y_end
jsr line
INC Y_end
LDA Y_end
CMP #$bb
INC Y_end_
LDA Y_end_
CMP #$ff
bne @loop
hihi:
jmp hihi
clear_screen:
;;Lets clear bitmap
VIC_bank = $4000
@ -48,18 +49,23 @@ long_line_test_a:
LDA #$60
STA Y_pos_
LDA #$ff
STA X_end
STA X_end_
LDA #$0
STA Y_end
STA Y_end_
@loop:
LDA Y_pos_
STA Y_pos
LDA X_pos_
STA X_pos
LDA X_end_
STA X_end
LDA Y_end_
STA Y_end
jsr line
INC Y_end
LDA Y_end
CMP #$bb
INC Y_end_
LDA Y_end_
CMP #$ff
BNE @loop
clear_screen_:
@ -68,24 +74,28 @@ clear_screen_:
Mov_16 length, length + 1, #<$1f40, #>$1f40
LDA #$00
jsr memset
long_line_test_b:
LDA #$00
STA X_pos_
LDA #$00
STA Y_pos_
LDA #$ff
STA X_end
STA X_end_
LDA #$60
STA Y_end
STA Y_end_
@loop:
LDA Y_pos_
STA Y_pos
LDA X_pos_
STA X_pos
LDA X_end_
STA X_end
LDA Y_end_
STA Y_end
jsr line
INC Y_pos_
LDA Y_pos_
CMP #$bb
CMP #$ff
BNE @loop
.endscope