( This file creates a standalone version of the
  Breakout game in a file called "Break" )

FLOAD" BREAKOUT"
32 STRING WINDTITLE
32 STRING TASKTITLE
WINDTITLE STRCPY" Rob's Breakout Demo"
TASKTITLE STRCPY" Breakout"
0 VARIABLE WIN-INFO
70 CONSTANT COLS
20 CONSTANT ROWS
100 CONSTANT VISMINX
100 CONSTANT VISMINY
0 0 0 0 0 0 HEX 33333333 119
DECIMAL 0 COLS 16 * ROWS 32 * NEGATE 0
HEX 000F0A09 00080D0B
DECIMAL 15 -1 0 0
VISMINY ROWS 32 * +
VISMINX COLS 16 * +
VISMINY VISMINX
SP@ WIN-INFO !
WINDTITLE TASKTITLE ' TEST WIN-INFO @ 2 CREATE-PROG" Break"
SP!
