sasm: fix typo error; examples: add fire demo

This commit is contained in:
slederer 2025-11-30 23:49:44 +01:00
parent 87ec71bd6d
commit 8f4d017668
5 changed files with 492 additions and 1 deletions

5
examples/fastfire.inc Normal file
View file

@ -0,0 +1,5 @@
const FIREWIDTH = 319; FIREHEIGHT = 79; (* keep in sync with fastfire.s! *)
type FireBuf = array [0..FIREHEIGHT, 0..FIREWIDTH] of integer;
procedure FastFireUpdate(var f:FireBuf); external;
procedure FastFireDraw(var f:FireBuf;screenx, screeny:integer); external;