mirror of
https://github.com/irmen/prog8.git
synced 2024-12-24 01:29:28 +00:00
corrections
This commit is contained in:
parent
446fc35d5c
commit
7c701bdf3f
@ -3,9 +3,6 @@
|
||||
%import textio
|
||||
%zeropage basicsafe
|
||||
|
||||
; TODO balloon only goes down now
|
||||
|
||||
|
||||
main {
|
||||
|
||||
ubyte perform_scroll = false
|
||||
@ -48,7 +45,9 @@ main {
|
||||
|
||||
perform_scroll = false
|
||||
txt.scroll_left(true)
|
||||
if c64.RASTER & 1
|
||||
|
||||
; float the balloon
|
||||
if rnd() & %10000
|
||||
c64.SPXY[1] ++
|
||||
else
|
||||
c64.SPXY[1] --
|
||||
|
@ -5,8 +5,6 @@
|
||||
|
||||
; This example shows the directory contents of disk drive 8.
|
||||
|
||||
; TODO why is this larger than on the previous compiler version?
|
||||
|
||||
main {
|
||||
sub start() {
|
||||
txt.print("directory of disk drive #8:\n\n")
|
||||
|
@ -4,8 +4,6 @@
|
||||
; This example computes the first 20 values of the Fibonacci sequence.
|
||||
; Note: this program is compatible with C64 and CX16.
|
||||
|
||||
; TODO why is this larger than on the previous compiler version?
|
||||
|
||||
main {
|
||||
sub start() {
|
||||
txt.print("fibonacci sequence\n")
|
||||
|
@ -5,8 +5,6 @@
|
||||
|
||||
; Note: this program is compatible with C64 and CX16.
|
||||
|
||||
; TODO why is this larger than on the previous compiler version?
|
||||
|
||||
main {
|
||||
|
||||
sub start() {
|
||||
|
@ -3,9 +3,6 @@
|
||||
|
||||
; Note: this program is compatible with C64 and CX16.
|
||||
|
||||
; TODO why is this larger than on the previous compiler version?
|
||||
|
||||
|
||||
main {
|
||||
const uword screenwidth = txt.DEFAULT_WIDTH
|
||||
const uword screenheight = txt.DEFAULT_HEIGHT
|
||||
|
@ -1,22 +1,11 @@
|
||||
%import syslib
|
||||
; %import graphics
|
||||
%target c64
|
||||
%import textio
|
||||
%import floats
|
||||
%import syslib
|
||||
%zeropage basicsafe
|
||||
|
||||
|
||||
main {
|
||||
|
||||
sub start() {
|
||||
|
||||
byte bb= -22
|
||||
ubyte ubb = 22
|
||||
word ww= -2222
|
||||
uword uww = 2222
|
||||
float ff = -2.2
|
||||
|
||||
|
||||
; @($c000) *= 99 ; TODO implement
|
||||
sub start() {
|
||||
|
||||
}
|
||||
}
|
||||
|
@ -2,9 +2,6 @@
|
||||
%import syslib
|
||||
%zeropage basicsafe
|
||||
|
||||
; TODO fix code that has become slower (should be fixed after all the new comparison expression code is done)
|
||||
|
||||
|
||||
spritedata $0a00 {
|
||||
; this memory block contains the sprite data
|
||||
; it must start on an address aligned to 64 bytes.
|
||||
@ -58,7 +55,7 @@ irq {
|
||||
ubyte @zp y = cos8u(angle*3-spri*16) / 2 + 70
|
||||
c64.SPXYW[spri] = mkword(y, lsb(x))
|
||||
c64.MSIGX <<= 1
|
||||
if msb(x) c64.MSIGX++ ; TODO has this become badly translated to asm?? it makes the loop quite slow
|
||||
if msb(x) c64.MSIGX++
|
||||
}
|
||||
c64.EXTCOL-=8
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user