41 lines
1.1 KiB
Plaintext
41 lines
1.1 KiB
Plaintext
OBJECT=MOUSE
|
|
MOUSE:TYPE=MOUSE
|
|
MOUSE:RAW=0
|
|
MOUSE:ONMOVE={TXTMSG^SETTEXT(["Test2_test_gryzonia_("+MOUSE^GETPOSX()+","+MOUSE^GETPOSY()+")"]);}
|
|
|
|
OBJECT=CNVLOADER
|
|
CNVLOADER:TYPE=CNVLOADER
|
|
|
|
OBJECT=CANVASOBSERVER
|
|
CANVASOBSERVER:TYPE=CANVAS_OBSERVER
|
|
|
|
OBJECT=KEYBOARD
|
|
KEYBOARD:TYPE=KEYBOARD
|
|
KEYBOARD:ONKEYDOWN^LEFT={DEBUG_VALUE^DEC();DEBUG^GOTO("ARRAJKI");}
|
|
KEYBOARD:ONKEYDOWN^RIGHT={TXTMSG^SETTEXT(["Przejscie_do_test_"+[DEBUG_VALUE+1]]);DEBUG_VALUE^INC();DEBUG^GOTO("FONT_EXPERIMENT");}
|
|
KEYBOARD:ONKEYDOWN^ESC={EXITPROGRAM^RUN();}
|
|
|
|
OBJECT=ARIAL14
|
|
ARIAL14:TYPE=FONT
|
|
ARIAL14:DEF_ARIAL_STANDARD_14=$COMMON\ARIAL14.FNT
|
|
|
|
OBJECT=TXTMSG
|
|
TXTMSG:TYPE=TEXT
|
|
TXTMSG:VISIBLE=TRUE
|
|
TXTMSG:HYPERTEXT=
|
|
TXTMSG:FONT=ARIAL14
|
|
TXTMSG:TOCANVAS=TRUE
|
|
TXTMSG:RECT=0,0,800,600
|
|
TXTMSG:PRIORITY=10000
|
|
TXTMSG:HJUSTIFY=CENTER
|
|
TXTMSG:VJUSTIFY=CENTER
|
|
TXTMSG:MONITORCOLLISION=FALSE
|
|
TXTMSG:MONITORCOLLISIONALPHA=FALSE
|
|
|
|
OBJECT=MOJAARRAJKA
|
|
MOJAARRAJKA:TYPE=ARRAY
|
|
|
|
OBJECT=__INIT__
|
|
__INIT__:TYPE=BEHAVIOUR
|
|
__INIT__:CODE={__KEYBOARD_AUTOCLICK_DISABLE__^RUN();TXTMSG^SETTEXT(["Test"+DEBUG_VALUE+"_test_gryzonia"]);@MSGBOX("MASLO");}
|