mirror of
https://github.com/exoticorn/microw8.git
synced 2026-01-20 11:16:42 +01:00
22 lines
515 B
Plaintext
22 lines
515 B
Plaintext
include "../include/microw8-api.cwa"
|
|
|
|
const SPRITE = 0x20000;
|
|
|
|
export fn upd() {
|
|
cls(0);
|
|
let t = time() / 2_f;
|
|
let i: i32;
|
|
loop spriteLoop {
|
|
let inline x = sin(t * -1.3 + i as f32 * (3.141 / 30_f)) * 180_f + 160_f;
|
|
let inline y = sin(t * 1.7 + i as f32 * (3.141 / 40_f)) * 140_f + 120_f;
|
|
blitSprite(SPRITE, 16, x as i32, y as i32, (i & 3) * 0x200 + 0x100);
|
|
branch_if (i +:= 1) < 100: spriteLoop;
|
|
}
|
|
}
|
|
|
|
start fn start() {
|
|
printChar('OO');
|
|
circle(8_f, 8_f, 6_f, 75);
|
|
grabSprite(SPRITE, 16, 0, 0, 0);
|
|
}
|