Added files
This commit is contained in:
47
dane/game/debug/structtest/Struct_test.cnv
Normal file
47
dane/game/debug/structtest/Struct_test.cnv
Normal file
@@ -0,0 +1,47 @@
|
||||
OBJECT=SOBJECT
|
||||
SOBJECT:TYPE=STRUCT
|
||||
SOBJECT:FIELDS=NAME<STRING>,IDNAME<STRING>,TYPE<INTEGER>,SPARAM0<STRING>,SPARAM1<STRING>,SPARAM2<STRING>,IPARAM0<INTEGER>,IPARAM1<INTEGER>, IPARAM2<INTEGER>
|
||||
|
||||
OBJECT=ARIAL14
|
||||
ARIAL14:TYPE=FONT
|
||||
ARIAL14:DEF_ARIAL_STANDARD_14=$COMMON\ARIAL14.FNT
|
||||
|
||||
OBJECT=KEYBOARD
|
||||
KEYBOARD:TYPE=KEYBOARD
|
||||
KEYBOARD:ONKEYDOWN^LEFT={DEBUG_VALUE^DEC();DEBUG^GOTO("FONT_EXPERIMENT2");}
|
||||
KEYBOARD:ONKEYDOWN^RIGHT={TXTMSG^SETTEXT(["Przejscie_do_test_"+[DEBUG_VALUE+1]]);TXTMSG2^HIDE();TXTMSG3^HIDE();DEBUG_VALUE^INC();DEBUG^GOTO("MATH_TEST");}
|
||||
KEYBOARD:ONKEYDOWN^ESC={EXITPROGRAM^RUN();}
|
||||
|
||||
OBJECT=TEST
|
||||
TEST:TYPE=STRING
|
||||
TEST:VALUE=Masło
|
||||
|
||||
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=FALSE
|
||||
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=__INIT__
|
||||
__INIT__:TYPE=BEHAVIOUR
|
||||
__INIT__:CODE={TXTMSG^SETTEXT(["Test"+DEBUG_VALUE+"_Test_struct"]);TXTMSG^SHOW();TEST^SET(SOBJECT^GETFIELD(1));TXTMSG2^SETTEXT(TEST);TXTMSG2^SHOW();}
|
||||
Reference in New Issue
Block a user