retro-40

A Fantasy Computer using Forth as its system language.

About

Inspiration

Lambda/8
Jupiter ACE

Specs

256x192 screen
16-colour palettes

Usage

Forth is both the programming and the command language for
Retro-40. You can type commands or even new definitions on the
console.

Storage

TBD

Included software

Sprite editor
Snake

The language

Retro-40 software is written in Ficl, the Forth-Inspired Command Language.

Writing a program

Vocabularies
<init>
<update>
<draw>
INSTALL

Blitting variables

API

P!
P@
SP!
SP@
M!
M@
SPR
MAP
pressed?
just-pressed?
was-pressed?
MOUSEX
MOUSEY
MOUSEB

Skeleton program

17 FICL-VOCABULARY myprog-voc
ALSO myprog-voc DEFINITIONS


\ your code goes here
: ?exit     ( -- )  SCANCODE_Q pressed? IF  retro-40  THEN ;


\ these are the hooks that R40 expects to find
: <init>    ( -- )  S" myprog.spr" load-sprites  s" myprog.map" load-map  ( ... ) ;
: <update>  ( -- )  ?exit ( ... ) ;
: <draw>    ( -- )  ( ... )  ;


\ install the software ()
PREVIOUS DEFINITIONS

ALSO myprog-voc

INSTALL myprog

PREVIOUS