OBJECT=MOUSE
MOUSE:TYPE=MOUSE
MOUSE:RAW=0

OBJECT=CNVLOADER
CNVLOADER:TYPE=CNVLOADER

OBJECT=CANVASOBSERVER
CANVASOBSERVER:TYPE=CANVAS_OBSERVER

OBJECT=KEYBOARD
KEYBOARD:TYPE=KEYBOARD
KEYBOARD:ONKEYDOWN^LEFT={DEBUG_VALUE^DEC();DEBUG^GOTO("FONT_EXPERIMENT");TXTMSG2^HIDE();TXTMSG3^HIDE();}
KEYBOARD:ONKEYDOWN^RIGHT={TXTMSG^SETTEXT(["Przejscie_do_test_"+[DEBUG_VALUE+1]]);TXTMSG2^HIDE();TXTMSG3^HIDE();DEBUG_VALUE^INC();DEBUG^GOTO("STRUCT_TEST");}
KEYBOARD:ONKEYDOWN^ESC={EXITPROGRAM^RUN();}

OBJECT=ARIAL14
ARIAL14:TYPE=FONT
ARIAL14:DEF_ARIAL_STANDARD_14=$COMMON\ARIAL14.FNT

OBJECT=ARIAL14_ALPHAEXP
ARIAL14_ALPHAEXP:TYPE=FONT
ARIAL14_ALPHAEXP:DEF_ARIAL_STANDARD_14=ARIAL14_ALPHAEXP.FNT

OBJECT=TXTMSG
TXTMSG:TYPE=TEXT
TXTMSG:VISIBLE=TRUE
TXTMSG:HYPERTEXT=
TXTMSG:FONT=ARIAL14
TXTMSG:TOCANVAS=TRUE
TXTMSG:RECT=0,0,800,250
TXTMSG:PRIORITY=10000
TXTMSG:HJUSTIFY=CENTER
TXTMSG:VJUSTIFY=TOP
TXTMSG:MONITORCOLLISION=FALSE
TXTMSG:MONITORCOLLISIONALPHA=FALSE

OBJECT=TXTMSG2
TXTMSG2:TYPE=TEXT
TXTMSG2:VISIBLE=TRUE
TXTMSG2:HYPERTEXT=
TXTMSG2:FONT=ARIAL14
TXTMSG2:TOCANVAS=TRUE
TXTMSG2:RECT=0,0,800,250
TXTMSG2:PRIORITY=10000
TXTMSG2:HJUSTIFY=CENTER
TXTMSG2:VJUSTIFY=BOTTOM
TXTMSG2:MONITORCOLLISION=FALSE
TXTMSG2:MONITORCOLLISIONALPHA=FALSE

OBJECT=TXTMSG3
TXTMSG3:TYPE=TEXT
TXTMSG3:VISIBLE=TRUE
TXTMSG3:HYPERTEXT=
TXTMSG3:FONT=ARIAL14_ALPHAEXP
TXTMSG3:TOCANVAS=TRUE
TXTMSG3:RECT=0,350,800,600
TXTMSG3:PRIORITY=10000
TXTMSG3:HJUSTIFY=CENTER
TXTMSG3:VJUSTIFY=TOP
TXTMSG3:MONITORCOLLISION=FALSE
TXTMSG3:MONITORCOLLISIONALPHA=FALSE

OBJECT=MOJAARRAJKA
MOJAARRAJKA:TYPE=ARRAY

OBJECT=__INIT__
__INIT__:TYPE=BEHAVIOUR
__INIT__:CODE={TXTMSG^SETTEXT(["Test"+DEBUG_VALUE+"_Test_font_alpha"]);TXTMSG^SHOW();TXTMSG2^SETTEXT("Test_1234567890a¹bcædeêfghijkl³mnñoóprsœtuwxyz¿ŸA¥BCÆDEÊFGHIJKL£MNÑOÓPRSŒTUWXYZ¯�");TXTMSG2^SHOW();TXTMSG3^SETTEXT("Test_1234567890a¹bcædeêfghijkl³mnñoóprsœtuwxyz¿ŸA¥BCÆDEÊFGHIJKL£MNÑOÓPRSŒTUWXYZ¯�");TXTMSG3^SHOW();}