FORM ID 1000 AT (0 0 160 160)
USABLE
NOFRAME
MENUID 1000
BEGIN
	TITLE "Forth"
	GRAFFITISTATEINDICATOR 135 3
END

MENU 1000
BEGIN
	PULLDOWN "Main"
	BEGIN
		MENUITEM "About" 1001 "A"
	END
END

ALERT ID 2000
WARNING
BEGIN
    TITLE "Forth Error"
    MESSAGE "An Error Occurred\n"
    BUTTONS "Sorry"
END

ALERT ID 3000
INFORMATION
BEGIN
    TITLE "Forth for Pilot"
    MESSAGE "PilotForth v0.1\n\nCopyright © 1997\nIvan A. Curtis\nicurtis@radlogic.com.au\n\n"
    BUTTONS "Ok"
END

VERSION 1 "0.0"
