Meteors as compilation option

This commit is contained in:
Pecusx
2023-09-09 20:34:49 +02:00
parent 4489f1ef32
commit 9f9bf04cda
4 changed files with 7 additions and 3 deletions
+3 -1
View File
@@ -161,12 +161,14 @@ ClearPlot
rts
.endp
.IF METEORS = 1
; -----------------------------------------
.proc ExPlot ;ExPlot (EplotX, EplotY)
; EOR plot:
; Inverts color of a pixel
; Note: No coordinate control!!!
; With off-screen coordinates, it can damage main program.
; only for ingame meteors
; -----------------------------------------
; let's calculate coordinates from xdraw and ydraw
;xbyte = xbyte/8
@@ -190,7 +192,7 @@ ClearPlot
sta (EplotByte),y
rts
.endp
.ENDIF
; -----------------------------------------
.proc point_plot
; -----------------------------------------
+2 -2
View File
@@ -143,7 +143,7 @@ lab2
; ------- RMT -------
SkipRMTVBL
; ------ meteors ------ start
.IF TARGET = 5200 .OR CART_VERSION = 1
.IF METEORS = 1
ldx #0
bit Mcounter
bpl MeteorOnSky
@@ -287,7 +287,7 @@ exit
rti
.ENDIF
; ------ meteors plot/flight subroutine ------ start
.IF TARGET = 5200 .OR CART_VERSION = 1
.IF METEORS = 1
GoMplot
lda Mpoint1Y,x
cmp #64