6502/millfork
1
0
Fork 0
mirror of https://github.com/KarolS/millfork.git synced 2025-02-06 01:30:13 +00:00
Code Issues Projects Releases Wiki Activity

more life in empty space

Browse Source
This commit is contained in:
zbyti 2020-09-23 00:04:22 +02:00
parent 86ae6de325
commit 7182f32032
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
examples/a8/horizontal_stars.mfk
View File

@ -1,5 +1,6 @@
void main(){
array(byte) stars[256] align(fast)
array(byte) speed[256] align(fast)
byte i
os_PCOLR0 = $e
@ -7,6 +8,7 @@ void main(){
for i:stars {
stars[i] = pokey_random
speed[i] = (pokey_random & 3) + 1
}
while true {
@ -14,7 +16,7 @@ void main(){
for i:stars {
antic_wsync = 1
gtia_hposm0 = stars[i]
stars[i] += 1
stars[i] += speed[i]
}
}
}