mirror of
https://github.com/pkali/scorch_src.git
synced 2026-05-20 22:34:21 +02:00
Hovercraft opty (11 bytes :) )
This commit is contained in:
+8
-10
@@ -985,27 +985,25 @@ ToHighToParachute
|
|||||||
;
|
;
|
||||||
; this proc change xdraw, ydraw and temp!
|
; this proc change xdraw, ydraw and temp!
|
||||||
;--------------------------------------------------
|
;--------------------------------------------------
|
||||||
|
lda XtankstableL,x
|
||||||
|
sta xdraw
|
||||||
|
lda XtankstableH,x
|
||||||
|
sta xdraw+1
|
||||||
; one pixel under tank
|
; one pixel under tank
|
||||||
clc
|
clc
|
||||||
lda Ytankstable,x
|
lda Ytankstable,x
|
||||||
adc #1
|
adc #1
|
||||||
sta ydraw
|
sta ydraw
|
||||||
mva #0 ydraw+1
|
mva #0 ydraw+1
|
||||||
lda XtankstableL,x
|
; plot one (first - clear) and 6 random color pixels
|
||||||
sta xdraw
|
mvy #7 temp
|
||||||
lda XtankstableH,x
|
|
||||||
sta xdraw+1
|
|
||||||
; clear first pixel under tank
|
; clear first pixel under tank
|
||||||
mva #0 color
|
bne @pl ; A=0
|
||||||
jsr plot
|
|
||||||
inw xdraw
|
|
||||||
; plot 6 random color pixels
|
|
||||||
mva #6 temp
|
|
||||||
@ lda Erase
|
@ lda Erase
|
||||||
eor #%00000001
|
eor #%00000001
|
||||||
and random
|
and random
|
||||||
and #%00000001
|
and #%00000001
|
||||||
sta color
|
@pl sta color
|
||||||
jsr plot
|
jsr plot
|
||||||
inw xdraw
|
inw xdraw
|
||||||
dec temp
|
dec temp
|
||||||
|
|||||||
BIN
Binary file not shown.
Reference in New Issue
Block a user