Apple-2-SW/prog8
1
0
Fork 0
mirror of https://github.com/irmen/prog8.git synced 2025-02-16 22:30:46 +00:00
Code Issues Projects Releases Wiki Activity

example TODOs

Browse Source
This commit is contained in:
Irmen de Jong 2021-03-16 01:02:29 +01:00
parent 824b41d457
commit d2ab5f230d
4 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/src/prog8/compiler/target/cpu6502/codegen/ExpressionsAsmGen.kt
View File

@ -686,7 +686,7 @@ internal class ExpressionsAsmGen(private val program: Program, private val asmge
code("#>${rightConstVal.number}", "#<${rightConstVal.number}") code("#>${rightConstVal.number}", "#<${rightConstVal.number}")
} }
else { else {
// TODO is this correct? word > 0 // TODO is this correct? word > 0 can be shorter as well?
val name = asmgen.asmVariableName(left) val name = asmgen.asmVariableName(left)
asmgen.out(""" asmgen.out("""
lda #0 lda #0

3
examples/cx16/kefrenbars.p8
View File

@ -5,6 +5,9 @@
; Vertical rasterbars a.k.a. "Kefren bars" ; Vertical rasterbars a.k.a. "Kefren bars"
; also see: rasterbars.p8 ; also see: rasterbars.p8
; TODO exhibits tearing since recent compiler changes????
main { main {
sub start() { sub start() {

2
examples/rasterbars.p8
View File

@ -17,7 +17,7 @@ main {
irq { irq {
const ubyte barheight = 4 ; should be big enough to re-trigger the Raster irq properly. const ubyte barheight = 3 ; should be big enough to re-trigger the Raster irq properly.
ubyte[] colors = [6,2,4,5,15,7,1,13,3,12,8,11,9] ubyte[] colors = [6,2,4,5,15,7,1,13,3,12,8,11,9]
ubyte color = 0 ubyte color = 0
ubyte yanim = 0 ubyte yanim = 0

3
examples/wizzine.p8
View File

@ -2,6 +2,9 @@
%import syslib %import syslib
%zeropage basicsafe %zeropage basicsafe
; TODO seems slightly slower since recent compiler changes????
spritedata $0a00 { spritedata $0a00 {
; this memory block contains the sprite data ; this memory block contains the sprite data
; it must start on an address aligned to 64 bytes. ; it must start on an address aligned to 64 bytes.