From a76977af62010a392c16010c367185e61e856ffe Mon Sep 17 00:00:00 2001 From: Dimitri Sokolyuk Date: Wed, 30 Oct 2019 20:04:56 +0100 Subject: mv to docs --- j1demo/firmware/sprite.fs | 20 -------------------- 1 file changed, 20 deletions(-) delete mode 100644 j1demo/firmware/sprite.fs (limited to 'j1demo/firmware/sprite.fs') diff --git a/j1demo/firmware/sprite.fs b/j1demo/firmware/sprite.fs deleted file mode 100644 index 877917a..0000000 --- a/j1demo/firmware/sprite.fs +++ /dev/null @@ -1,20 +0,0 @@ -( Sprite low-level JCB 15:23 11/15/10) - -: vga-line@ - begin - vga_line @ - vga_line @ - over xor - while - drop - repeat -; - -: waitblank begin vga-line@ d# 512 = until ; - -: sprite! ( x y spr -- ) - 2* cells vga_spritey + tuck ! 2- ! ; - -: hide \ hide all the sprites at (800,800) - d# 8 0do d# 800 dup i sprite! loop ; - -- cgit v1.2.3