mirror of https://github.com/falsovsky/z80.git
Better values for effect. 100 Stars on screen 10 different speeds
This commit is contained in:
parent
e980dd0170
commit
0dca2aed2c
|
@ -14,7 +14,7 @@ clr_screen EQU $0daf ; ROM routine to clear the screen
|
||||||
; Speed 1 Byte $1 - $3
|
; Speed 1 Byte $1 - $3
|
||||||
; PrevX
|
; PrevX
|
||||||
; PrevY
|
; PrevY
|
||||||
MAX_STARS EQU 60
|
MAX_STARS EQU 100
|
||||||
|
|
||||||
start
|
start
|
||||||
xor a
|
xor a
|
||||||
|
@ -167,7 +167,7 @@ initRandomX
|
||||||
push hl
|
push hl
|
||||||
push bc
|
push bc
|
||||||
ld d, 1
|
ld d, 1
|
||||||
ld e, 250
|
ld e, 255
|
||||||
call get_rnd ; Get a random value <= 255
|
call get_rnd ; Get a random value <= 255
|
||||||
pop bc
|
pop bc
|
||||||
pop hl
|
pop hl
|
||||||
|
@ -207,7 +207,7 @@ initRandomSpeed
|
||||||
push hl
|
push hl
|
||||||
push bc
|
push bc
|
||||||
ld d, 1
|
ld d, 1
|
||||||
ld e, 4
|
ld e, 10
|
||||||
call get_rnd ; Get a random value <= 255
|
call get_rnd ; Get a random value <= 255
|
||||||
pop bc
|
pop bc
|
||||||
pop hl
|
pop hl
|
||||||
|
|
Loading…
Reference in New Issue