Added files
This commit is contained in:
Patryk Gensch
220
dane/game/debug/mathtest/Math_test.cnv
Normal file
220
dane/game/debug/mathtest/Math_test.cnv
Normal file
@@ -0,0 +1,220 @@
|
||||
OBJECT=ARIAL14
|
||||
ARIAL14:TYPE=FONT
|
||||
ARIAL14:DEF_ARIAL_STANDARD_14=$COMMON\ARIAL14.FNT
|
||||
|
||||
OBJECT=BEHNO
|
||||
BEHNO:TYPE=INTEGER
|
||||
BEHNO:VALUE=1
|
||||
|
||||
OBJECT=TEST_SET
|
||||
TEST_SET:TYPE=INTEGER
|
||||
TEST_SET:VALUE=1
|
||||
|
||||
OBJECT=KEYBOARD
|
||||
KEYBOARD:TYPE=KEYBOARD
|
||||
KEYBOARD:ONKEYDOWN^LEFT={DEBUG_VALUE^DEC();DEBUG^GOTO("STRUCT_TEST");}
|
||||
KEYBOARD:ONKEYDOWN^RIGHT={DEBUG_VALUE^INC();DEBUG^GOTO("LOGIC_TEST");}
|
||||
KEYBOARD:ONKEYDOWN^UP={@IF("BEHNO",">","1","{BEHNO^DEC();}","");@IF("BEHNO'4||BEHNO'5",{*[MATHTEST+BEHNO+"_"+TEST_SET]^RUN();},{*[MATHTEST+BEHNO]^RUN();});}
|
||||
KEYBOARD:ONKEYDOWN^DOWN={@IF("BEHNO","<","12","{BEHNO^INC();}","");@IF("BEHNO'4||BEHNO'5",{*[MATHTEST+BEHNO+"_"+TEST_SET]^RUN();},{*[MATHTEST+BEHNO]^RUN();});}
|
||||
KEYBOARD:ONKEYDOWN^1={TEST_SET^SET(1);BEH_SWITCH_TEST_SETS^RUN();BEH_SWITCH_TEST_SETS2^RUN();@IF("BEHNO'4||BEHNO'5",{*[MATHTEST+BEHNO+"_"+TEST_SET]^RUN();},{*[MATHTEST+BEHNO]^RUN();});}
|
||||
KEYBOARD:ONKEYDOWN^2={TEST_SET^SET(2);BEH_SWITCH_TEST_SETS^RUN();BEH_SWITCH_TEST_SETS2^RUN();@IF("BEHNO'4||BEHNO'5",{*[MATHTEST+BEHNO+"_"+TEST_SET]^RUN();},{*[MATHTEST+BEHNO]^RUN();});}
|
||||
KEYBOARD:ONKEYDOWN^3={TEST_SET^SET(3);BEH_SWITCH_TEST_SETS^RUN();BEH_SWITCH_TEST_SETS2^RUN();@IF("BEHNO'4||BEHNO'5",{*[MATHTEST+BEHNO+"_"+TEST_SET]^RUN();},{*[MATHTEST+BEHNO]^RUN();});}
|
||||
KEYBOARD:ONKEYDOWN^4={TEST_SET^SET(4);BEH_SWITCH_TEST_SETS^RUN();BEH_SWITCH_TEST_SETS2^RUN();@IF("BEHNO'4||BEHNO'5",{*[MATHTEST+BEHNO+"_"+TEST_SET]^RUN();},{*[MATHTEST+BEHNO]^RUN();});}
|
||||
KEYBOARD:ONKEYDOWN^ESC={EXITPROGRAM^RUN();}
|
||||
|
||||
OBJECT=TEST
|
||||
TEST:TYPE=STRING
|
||||
TEST:VALUE=Test
|
||||
|
||||
OBJECT=TEST2
|
||||
TEST2:TYPE=BOOL
|
||||
TEST2:VALUE=TRUE
|
||||
|
||||
OBJECT=TEST3
|
||||
TEST3:TYPE=DOUBLE
|
||||
TEST3:VALUE=1.5
|
||||
|
||||
OBJECT=TEST4
|
||||
TEST4:TYPE=INTEGER
|
||||
TEST4:VALUE=1
|
||||
|
||||
OBJECT=TEST_COMPARE
|
||||
TEST_COMPARE:TYPE=STRING
|
||||
TEST_COMPARE:VALUE=Test
|
||||
|
||||
OBJECT=TEST2_COMPARE
|
||||
TEST2_COMPARE:TYPE=BOOL
|
||||
TEST2_COMPARE:VALUE=TRUE
|
||||
|
||||
OBJECT=TEST3_COMPARE
|
||||
TEST3_COMPARE:TYPE=DOUBLE
|
||||
TEST3_COMPARE:VALUE=1.5
|
||||
|
||||
OBJECT=TEST4_COMPARE
|
||||
TEST4_COMPARE:TYPE=INTEGER
|
||||
TEST4_COMPARE:VALUE=1
|
||||
|
||||
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=LEFT
|
||||
TXTMSG2:VJUSTIFY=BOTTOM
|
||||
TXTMSG2:MONITORCOLLISION=FALSE
|
||||
TXTMSG2:MONITORCOLLISIONALPHA=FALSE
|
||||
|
||||
OBJECT=TXTMSG3
|
||||
TXTMSG3:TYPE=TEXT
|
||||
TXTMSG3:VISIBLE=TRUE
|
||||
TXTMSG3:HYPERTEXT=
|
||||
TXTMSG3:FONT=ARIAL14
|
||||
TXTMSG3:TOCANVAS=TRUE
|
||||
TXTMSG3:RECT=0,0,800,250
|
||||
TXTMSG3:PRIORITY=10000
|
||||
TXTMSG3:HJUSTIFY=RIGHT
|
||||
TXTMSG3:VJUSTIFY=BOTTOM
|
||||
TXTMSG3:MONITORCOLLISION=FALSE
|
||||
TXTMSG3:MONITORCOLLISIONALPHA=FALSE
|
||||
|
||||
OBJECT=TEMP_BOOL
|
||||
TEMP_BOOL:TYPE=BOOL
|
||||
TEMP_BOOL:VALUE=FALSE
|
||||
|
||||
OBJECT=DEBUG_TXT
|
||||
DEBUG_TXT:TYPE=STRING
|
||||
DEBUG_TXT:VALUE=""
|
||||
|
||||
OBJECT=DEBUG_TXT2
|
||||
DEBUG_TXT2:TYPE=STRING
|
||||
|
||||
OBJECT=BEH_APPEND_TEXT
|
||||
BEH_APPEND_TEXT:TYPE=BEHAVIOUR
|
||||
BEH_APPEND_TEXT:CODE={$1^SET([$1^GET(0, $1^LENGTH())+"|"+$2]);}
|
||||
|
||||
OBJECT=BEH_SET_TRUE
|
||||
BEH_SET_TRUE:TYPE=BEHAVIOUR
|
||||
BEH_SET_TRUE:CODE={TEMP_BOOL^SET(TRUE);}
|
||||
|
||||
OBJECT=BEH_SET_FALSE
|
||||
BEH_SET_FALSE:TYPE=BEHAVIOUR
|
||||
BEH_SET_FALSE:CODE={TEMP_BOOL^SET(FALSE);}
|
||||
|
||||
OBJECT=BEH_SWITCH_TEST_SETS
|
||||
BEH_SWITCH_TEST_SETS:TYPE=BEHAVIOUR
|
||||
BEH_SWITCH_TEST_SETS:CODE={@IF("TEST_SET", "_", "1", {TEST_COMPARE^SET("Test");TEST2_COMPARE^SET(TRUE);TEST3_COMPARE^SET(1.5);TEST4_COMPARE^SET(1);}, {@IF("TEST_SET", "_", "2", {TEST_COMPARE^SET("Test2");TEST2_COMPARE^SET(FALSE);TEST3_COMPARE^SET(2.5);TEST4_COMPARE^SET(3);}, {@IF("TEST_SET", "_", "3", {TEST_COMPARE^SET("3");TEST2_COMPARE^SET(2);TEST3_COMPARE^SET(-2.5);TEST4_COMPARE^SET(-3);}, {TEST_COMPARE^SET("TEST3");TEST2_COMPARE^SET(0);TEST3_COMPARE^SET(1.00001);TEST4_COMPARE^SET(-5);});});});}
|
||||
|
||||
OBJECT=BEH_SWITCH_TEST_SETS2
|
||||
BEH_SWITCH_TEST_SETS2:TYPE=BEHAVIOUR
|
||||
BEH_SWITCH_TEST_SETS2:CODE={@IF("TEST_SET", "_", "4", {TEST^SET("Zzz");TEST2^SET(FALSE);TEST3^SET(6.5);TEST4^SET(1);}, {TEST^SET("Test");TEST2^SET(TRUE);TEST3^SET(1.5);TEST4^SET(1);});}
|
||||
|
||||
|
||||
OBJECT=MATHTEST1
|
||||
MATHTEST1:TYPE=BEHAVIOUR
|
||||
MATHTEST1:CODE={TXTMSG2^SETTEXT([TEST_DODAWANIA+"|"+BOOL_Z_BOOLEM__+[TEST2+TEST2_COMPARE]+"|"+BOOL_ZE_STRINGIEM__+[TEST2+TEST_COMPARE]+"|"+BOOL_Z_INTEGEREM__+[TEST2+TEST4_COMPARE]+"|"+BOOL_Z_DOUBLEM__+[TEST2+TEST3_COMPARE]+"|"+STRING_ZE_STRINGIEM__+[TEST+TEST_COMPARE]+"|"+STRING_Z_INTEGEREM__+[TEST+TEST4_COMPARE]+"|"+STRING_Z_DOUBLEM__+[TEST+TEST3_COMPARE]+"|"+STRING_Z_BOOLEM__+[TEST+TEST2_COMPARE]]);TXTMSG3^SETTEXT([INTEGER_ZE_STRINGIEM__+[TEST4+TEST_COMPARE]+"|"+INTEGER_Z_INTEGEREM__+[TEST4+TEST4_COMPARE]+"|"+INTEGER_Z_DOUBLEM__+[TEST4+TEST3_COMPARE]+"|"+INTEGER_Z_BOOLEM__+[TEST4+TEST2_COMPARE]+"|"+DOUBLE_ZE_STRINGIEM__+[TEST3+TEST_COMPARE]+"|"+DOUBLE_Z_INTEGEREM__+[TEST3+TEST4_COMPARE]+"|"+DOUBLE_Z_DOUBLEM__+[TEST3+TEST3_COMPARE]+"|"+DOUBLE_Z_BOOLEM__+[TEST3+TEST2_COMPARE]]);}
|
||||
MATHTEST1:DESCRIPTION=TEN_TEST_SPRAWDZA_ZWRACANE_WYNIKI_PRZY_DODAWANIU
|
||||
|
||||
OBJECT=MATHTEST2
|
||||
MATHTEST2:TYPE=BEHAVIOUR
|
||||
MATHTEST2:CODE={TXTMSG2^SETTEXT([TEST_ODEJMOWANIA+"|"+BOOL_Z_BOOLEM__+[TEST2-TEST2_COMPARE]+"|"+BOOL_ZE_STRINGIEM__+[TEST2-TEST_COMPARE]+"|"+BOOL_Z_INTEGEREM__+[TEST2-TEST4_COMPARE]+"|"+BOOL_Z_DOUBLEM__+[TEST2-TEST3_COMPARE]+"|"+STRING_ZE_STRINGIEM__+[TEST-TEST_COMPARE]+"|"+STRING_Z_INTEGEREM__+[TEST-TEST4_COMPARE]+"|"+STRING_Z_DOUBLEM__+[TEST-TEST3_COMPARE]+"|"+STRING_Z_BOOLEM__+[TEST-TEST2_COMPARE]]);TXTMSG3^SETTEXT([INTEGER_ZE_STRINGIEM__+[TEST4-TEST_COMPARE]+"|"+INTEGER_Z_INTEGEREM__+[TEST4-TEST4_COMPARE]+"|"+INTEGER_Z_DOUBLEM__+[TEST4-TEST3_COMPARE]+"|"+INTEGER_Z_BOOLEM__+[TEST4-TEST2_COMPARE]+"|"+DOUBLE_ZE_STRINGIEM__+[TEST3-TEST_COMPARE]+"|"+DOUBLE_Z_INTEGEREM__+[TEST3-TEST4_COMPARE]+"|"+DOUBLE_Z_DOUBLEM__+[TEST3-TEST3_COMPARE]+"|"+DOUBLE_Z_BOOLEM__+[TEST3-TEST2_COMPARE]]);}
|
||||
MATHTEST2:DESCRIPTION=TEN_TEST_SPRAWDZA_ZWRACANE_WYNIKI_PRZY_ODEJMOWANIU
|
||||
|
||||
OBJECT=MATHTEST3
|
||||
MATHTEST3:TYPE=BEHAVIOUR
|
||||
MATHTEST3:CODE={TXTMSG2^SETTEXT([TEST_MNOZENIA+"|"+BOOL_Z_BOOLEM__+[TEST2*TEST2_COMPARE]+"|"+BOOL_ZE_STRINGIEM__+[TEST2*TEST_COMPARE]+"|"+BOOL_Z_INTEGEREM__+[TEST2*TEST4_COMPARE]+"|"+BOOL_Z_DOUBLEM__+[TEST2*TEST3_COMPARE]+"|"+STRING_ZE_STRINGIEM__+[TEST*TEST_COMPARE]+"|"+STRING_Z_INTEGEREM__+[TEST*TEST4_COMPARE]+"|"+STRING_Z_DOUBLEM__+[TEST*TEST3_COMPARE]+"|"+STRING_Z_BOOLEM__+[TEST*TEST2_COMPARE]]);TXTMSG3^SETTEXT([INTEGER_ZE_STRINGIEM__+[TEST4*TEST_COMPARE]+"|"+INTEGER_Z_INTEGEREM__+[TEST4*TEST4_COMPARE]+"|"+INTEGER_Z_DOUBLEM__+[TEST4*TEST3_COMPARE]+"|"+INTEGER_Z_BOOLEM__+[TEST4*TEST2_COMPARE]+"|"+DOUBLE_ZE_STRINGIEM__+[TEST3*TEST_COMPARE]+"|"+DOUBLE_Z_INTEGEREM__+[TEST3*TEST4_COMPARE]+"|"+DOUBLE_Z_DOUBLEM__+[TEST3*TEST3_COMPARE]+"|"+DOUBLE_Z_BOOLEM__+[TEST3*TEST2_COMPARE]]);}
|
||||
MATHTEST3:DESCRIPTION=TEN_TEST_SPRAWDZA_ZWRACANE_WYNIKI_PRZY_MNOZENIU
|
||||
|
||||
OBJECT=MATHTEST4_1
|
||||
MATHTEST4_1:TYPE=BEHAVIOUR
|
||||
MATHTEST4_1:CODE={TXTMSG2^SETTEXT([TEST_DZIELENIA+"|"+BOOL_Z_BOOLEM__+[TEST2@TEST2_COMPARE]+"|"+BOOL_ZE_STRINGIEM__+[NULL]+"|"+BOOL_Z_INTEGEREM__+[TEST2@TEST4_COMPARE]+"|"+BOOL_Z_DOUBLEM__+[TEST2@TEST3_COMPARE]+"|"+STRING_ZE_STRINGIEM__+[NULL]+"|"+STRING_Z_INTEGEREM__+[TEST@TEST4_COMPARE]+"|"+STRING_Z_DOUBLEM__+[TEST@TEST3_COMPARE]+"|"+STRING_Z_BOOLEM__+[TEST@TEST2_COMPARE]]);TXTMSG3^SETTEXT([INTEGER_ZE_STRINGIEM__+[NULL]+"|"+INTEGER_Z_INTEGEREM__+[TEST4@TEST4_COMPARE]+"|"+INTEGER_Z_DOUBLEM__+[TEST4@TEST3_COMPARE]+"|"+INTEGER_Z_BOOLEM__+[TEST4@TEST2_COMPARE]+"|"+DOUBLE_ZE_STRINGIEM__+[NULL]+"|"+DOUBLE_Z_INTEGEREM__+[TEST3@TEST4_COMPARE]+"|"+DOUBLE_Z_DOUBLEM__+[TEST3@TEST3_COMPARE]+"|"+DOUBLE_Z_BOOLEM__+[TEST3@TEST2_COMPARE]]);}
|
||||
MATHTEST4_1:DESCRIPTION=TEN_TEST_SPRAWDZA_ZWRACANE_WYNIKI_PRZY_DZIELENIU__PRZY_DZIELENIACH_PRZEZ_STRINGA_WSTAWIONO_NULL_Z_RACJI_CRASHOWANIA_SILNIKA
|
||||
|
||||
OBJECT=MATHTEST4_2
|
||||
MATHTEST4_2:TYPE=BEHAVIOUR
|
||||
MATHTEST4_2:CODE={TXTMSG2^SETTEXT([TEST_DZIELENIA+"|"+BOOL_Z_BOOLEM__+[NULL]+"|"+BOOL_ZE_STRINGIEM__+[NULL]+"|"+BOOL_Z_INTEGEREM__+[TEST2@TEST4_COMPARE]+"|"+BOOL_Z_DOUBLEM__+[TEST2@TEST3_COMPARE]+"|"+STRING_ZE_STRINGIEM__+[NULL]+"|"+STRING_Z_INTEGEREM__+[TEST@TEST4_COMPARE]+"|"+STRING_Z_DOUBLEM__+[TEST@TEST3_COMPARE]+"|"+STRING_Z_BOOLEM__+[NULL]]);TXTMSG3^SETTEXT([INTEGER_ZE_STRINGIEM__+[NULL]+"|"+INTEGER_Z_INTEGEREM__+[TEST4@TEST4_COMPARE]+"|"+INTEGER_Z_DOUBLEM__+[TEST4@TEST3_COMPARE]+"|"+INTEGER_Z_BOOLEM__+[NULL]+"|"+DOUBLE_ZE_STRINGIEM__+[NULL]+"|"+DOUBLE_Z_INTEGEREM__+[TEST3@TEST4_COMPARE]+"|"+DOUBLE_Z_DOUBLEM__+[TEST3@TEST3_COMPARE]+"|"+DOUBLE_Z_BOOLEM__+[NULL]]);}
|
||||
MATHTEST4_2:DESCRIPTION=TEN_TEST_SPRAWDZA_ZWRACANE_WYNIKI_PRZY_DZIELENIU__PRZY_DZIELENIACH_PRZEZ_STRINGA_WSTAWIONO_NULL_Z_RACJI_CRASHOWANIA_SILNIKA
|
||||
|
||||
OBJECT=MATHTEST4_3
|
||||
MATHTEST4_3:TYPE=BEHAVIOUR
|
||||
MATHTEST4_3:CODE={TXTMSG2^SETTEXT([TEST_DZIELENIA+"|"+BOOL_Z_BOOLEM__+[TEST2@TEST2_COMPARE]+"|"+BOOL_ZE_STRINGIEM__+[TEST2@TEST_COMPARE]+"|"+BOOL_Z_INTEGEREM__+[TEST2@TEST4_COMPARE]+"|"+BOOL_Z_DOUBLEM__+[TEST2@TEST3_COMPARE]+"|"+STRING_ZE_STRINGIEM__+[TEST@TEST_COMPARE]+"|"+STRING_Z_INTEGEREM__+[TEST@TEST4_COMPARE]+"|"+STRING_Z_DOUBLEM__+[TEST@TEST3_COMPARE]+"|"+STRING_Z_BOOLEM__+[TEST@TEST2_COMPARE]]);TXTMSG3^SETTEXT([INTEGER_ZE_STRINGIEM__+[TEST4@TEST_COMPARE]+"|"+INTEGER_Z_INTEGEREM__+[TEST4@TEST4_COMPARE]+"|"+INTEGER_Z_DOUBLEM__+[TEST4@TEST3_COMPARE]+"|"+INTEGER_Z_BOOLEM__+[TEST4@TEST2_COMPARE]+"|"+DOUBLE_ZE_STRINGIEM__+[TEST3@TEST_COMPARE]+"|"+DOUBLE_Z_INTEGEREM__+[TEST3@TEST4_COMPARE]+"|"+DOUBLE_Z_DOUBLEM__+[TEST3@TEST3_COMPARE]+"|"+DOUBLE_Z_BOOLEM__+[TEST3@TEST2_COMPARE]]);}
|
||||
MATHTEST4_3:DESCRIPTION=TEN_TEST_SPRAWDZA_ZWRACANE_WYNIKI_PRZY_DZIELENIU__PRZY_DZIELENIACH_PRZEZ_STRINGA_WSTAWIONO_NULL_Z_RACJI_CRASHOWANIA_SILNIKA
|
||||
|
||||
OBJECT=MATHTEST4_4
|
||||
MATHTEST4_4:TYPE=BEHAVIOUR
|
||||
MATHTEST4_4:CODE={TXTMSG2^SETTEXT([TEST_DZIELENIA+"|"+BOOL_Z_BOOLEM__+[NULL]+"|"+BOOL_ZE_STRINGIEM__+[NULL]+"|"+BOOL_Z_INTEGEREM__+[TEST2@TEST4_COMPARE]+"|"+BOOL_Z_DOUBLEM__+[TEST2@TEST3_COMPARE]+"|"+STRING_ZE_STRINGIEM__+[NULL]+"|"+STRING_Z_INTEGEREM__+[TEST@TEST4_COMPARE]+"|"+STRING_Z_DOUBLEM__+[TEST@TEST3_COMPARE]+"|"+STRING_Z_BOOLEM__+[NULL]]);TXTMSG3^SETTEXT([INTEGER_ZE_STRINGIEM__+[NULL]+"|"+INTEGER_Z_INTEGEREM__+[TEST4@TEST4_COMPARE]+"|"+INTEGER_Z_DOUBLEM__+[TEST4@TEST3_COMPARE]+"|"+INTEGER_Z_BOOLEM__+[NULL]+"|"+DOUBLE_ZE_STRINGIEM__+[NULL]+"|"+DOUBLE_Z_INTEGEREM__+[TEST3@TEST4_COMPARE]+"|"+DOUBLE_Z_DOUBLEM__+[TEST3@TEST3_COMPARE]+"|"+DOUBLE_Z_BOOLEM__+[NULL]]);}
|
||||
MATHTEST4_4:DESCRIPTION=TEN_TEST_SPRAWDZA_ZWRACANE_WYNIKI_PRZY_DZIELENIU__PRZY_DZIELENIACH_PRZEZ_STRINGA_WSTAWIONO_NULL_Z_RACJI_CRASHOWANIA_SILNIKA
|
||||
|
||||
OBJECT=MATHTEST5_1
|
||||
MATHTEST5_1:TYPE=BEHAVIOUR
|
||||
MATHTEST5_1:CODE={TXTMSG2^SETTEXT([TEST_MODULO+"|"+BOOL_Z_BOOLEM__+[TEST2%TEST2_COMPARE]+"|"+BOOL_ZE_STRINGIEM__+[NULL]+"|"+BOOL_Z_INTEGEREM__+[TEST2%TEST4_COMPARE]+"|"+BOOL_Z_DOUBLEM__+[TEST2%TEST3_COMPARE]+"|"+STRING_ZE_STRINGIEM__+[NULL]+"|"+STRING_Z_INTEGEREM__+[TEST%TEST4_COMPARE]+"|"+STRING_Z_DOUBLEM__+[TEST%TEST3_COMPARE]+"|"+STRING_Z_BOOLEM__+[TEST%TEST2_COMPARE]]);TXTMSG3^SETTEXT([INTEGER_ZE_STRINGIEM__+[NULL]+"|"+INTEGER_Z_INTEGEREM__+[TEST4%TEST4_COMPARE]+"|"+INTEGER_Z_DOUBLEM__+[TEST4%TEST3_COMPARE]+"|"+INTEGER_Z_BOOLEM__+[TEST4%TEST2_COMPARE]+"|"+DOUBLE_ZE_STRINGIEM__+[NULL]+"|"+DOUBLE_Z_INTEGEREM__+[TEST3%TEST4_COMPARE]+"|"+DOUBLE_Z_DOUBLEM__+[TEST3%TEST3_COMPARE]+"|"+DOUBLE_Z_BOOLEM__+[TEST3%TEST2_COMPARE]]);}
|
||||
MATHTEST5_1:DESCRIPTION=TEN_TEST_SPRAWDZA_ZWRACANE_WYNIKI_PRZY_MODULO__PRZY_MODULO_PRZEZ_STRINGA_WSTAWIONO_NULL_Z_RACJI_CRASHOWANIA_SILNIKA
|
||||
|
||||
OBJECT=MATHTEST5_2
|
||||
MATHTEST5_2:TYPE=BEHAVIOUR
|
||||
MATHTEST5_2:CODE={TXTMSG2^SETTEXT([TEST_MODULO+"|"+BOOL_Z_BOOLEM__+[NULL]+"|"+BOOL_ZE_STRINGIEM__+[NULL]+"|"+BOOL_Z_INTEGEREM__+[TEST2%TEST4_COMPARE]+"|"+BOOL_Z_DOUBLEM__+[TEST2%TEST3_COMPARE]+"|"+STRING_ZE_STRINGIEM__+[NULL]+"|"+STRING_Z_INTEGEREM__+[TEST%TEST4_COMPARE]+"|"+STRING_Z_DOUBLEM__+[TEST%TEST3_COMPARE]+"|"+STRING_Z_BOOLEM__+[NULL]]);TXTMSG3^SETTEXT([INTEGER_ZE_STRINGIEM__+[NULL]+"|"+INTEGER_Z_INTEGEREM__+[TEST4%TEST4_COMPARE]+"|"+INTEGER_Z_DOUBLEM__+[TEST4%TEST3_COMPARE]+"|"+INTEGER_Z_BOOLEM__+[NULL]+"|"+DOUBLE_ZE_STRINGIEM__+[NULL]+"|"+DOUBLE_Z_INTEGEREM__+[TEST3%TEST4_COMPARE]+"|"+DOUBLE_Z_DOUBLEM__+[TEST3%TEST3_COMPARE]+"|"+DOUBLE_Z_BOOLEM__+[NULL]]);}
|
||||
MATHTEST5_2:DESCRIPTION=TEN_TEST_SPRAWDZA_ZWRACANE_WYNIKI_PRZY_MODULO__PRZY_MODULO_PRZEZ_STRINGA_WSTAWIONO_NULL_Z_RACJI_CRASHOWANIA_SILNIKA
|
||||
|
||||
OBJECT=MATHTEST5_3
|
||||
MATHTEST5_3:TYPE=BEHAVIOUR
|
||||
MATHTEST5_3:CODE={TXTMSG2^SETTEXT([TEST_MODULO+"|"+BOOL_Z_BOOLEM__+[TEST2%TEST2_COMPARE]+"|"+BOOL_ZE_STRINGIEM__+[TEST2%TEST_COMPARE]+"|"+BOOL_Z_INTEGEREM__+[TEST2%TEST4_COMPARE]+"|"+BOOL_Z_DOUBLEM__+[TEST2%TEST3_COMPARE]+"|"+STRING_ZE_STRINGIEM__+[TEST%TEST_COMPARE]+"|"+STRING_Z_INTEGEREM__+[TEST%TEST4_COMPARE]+"|"+STRING_Z_DOUBLEM__+[TEST%TEST3_COMPARE]+"|"+STRING_Z_BOOLEM__+[TEST%TEST2_COMPARE]]);TXTMSG3^SETTEXT([INTEGER_ZE_STRINGIEM__+[TEST4%TEST_COMPARE]+"|"+INTEGER_Z_INTEGEREM__+[TEST4%TEST4_COMPARE]+"|"+INTEGER_Z_DOUBLEM__+[TEST4%TEST3_COMPARE]+"|"+INTEGER_Z_BOOLEM__+[TEST4%TEST2_COMPARE]+"|"+DOUBLE_ZE_STRINGIEM__+[TEST3%TEST_COMPARE]+"|"+DOUBLE_Z_INTEGEREM__+[TEST3%TEST4_COMPARE]+"|"+DOUBLE_Z_DOUBLEM__+[TEST3%TEST3_COMPARE]+"|"+DOUBLE_Z_BOOLEM__+[TEST3%TEST2_COMPARE]]);}
|
||||
MATHTEST5_3:DESCRIPTION=TEN_TEST_SPRAWDZA_ZWRACANE_WYNIKI_PRZY_MODULO__PRZY_MODULO_PRZEZ_STRINGA_WSTAWIONO_NULL_Z_RACJI_CRASHOWANIA_SILNIKA
|
||||
|
||||
OBJECT=MATHTEST5_4
|
||||
MATHTEST5_4:TYPE=BEHAVIOUR
|
||||
MATHTEST5_4:CODE={TXTMSG2^SETTEXT([TEST_MODULO+"|"+BOOL_Z_BOOLEM__+[NULL]+"|"+BOOL_ZE_STRINGIEM__+[NULL]+"|"+BOOL_Z_INTEGEREM__+[TEST2%TEST4_COMPARE]+"|"+BOOL_Z_DOUBLEM__+[TEST2%TEST3_COMPARE]+"|"+STRING_ZE_STRINGIEM__+[NULL]+"|"+STRING_Z_INTEGEREM__+[TEST%TEST4_COMPARE]+"|"+STRING_Z_DOUBLEM__+[TEST%TEST3_COMPARE]+"|"+STRING_Z_BOOLEM__+[NULL]]);TXTMSG3^SETTEXT([INTEGER_ZE_STRINGIEM__+[NULL]+"|"+INTEGER_Z_INTEGEREM__+[TEST4%TEST4_COMPARE]+"|"+INTEGER_Z_DOUBLEM__+[TEST4%TEST3_COMPARE]+"|"+INTEGER_Z_BOOLEM__+[NULL]+"|"+DOUBLE_ZE_STRINGIEM__+[NULL]+"|"+DOUBLE_Z_INTEGEREM__+[TEST3%TEST4_COMPARE]+"|"+DOUBLE_Z_DOUBLEM__+[TEST3%TEST3_COMPARE]+"|"+DOUBLE_Z_BOOLEM__+[NULL]]);}
|
||||
MATHTEST5_4:DESCRIPTION=TEN_TEST_SPRAWDZA_ZWRACANE_WYNIKI_PRZY_MODULO__PRZY_MODULO_PRZEZ_STRINGA_WSTAWIONO_NULL_Z_RACJI_CRASHOWANIA_SILNIKA
|
||||
|
||||
OBJECT=MATHTEST6
|
||||
MATHTEST6:TYPE=BEHAVIOUR
|
||||
MATHTEST6:CODE={DEBUG_TXT^SET([TEST_POROWNANIA_JEST_ROWNE]);DEBUG_TXT2^SET("");@IF("TEST2", "_", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_Z_BOOLEM__+TEMP_BOOL]);@IF("TEST2", "_", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST2", "_", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST2", "_", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST", "_", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST", "_", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST", "_", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST", "_", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_Z_BOOLEM__+TEMP_BOOL]);@IF("TEST4", "_", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST4", "_", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST4", "_", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST4", "_", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_Z_BOOLEM__+TEMP_BOOL]);@IF("TEST3", "_", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST3", "_", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST3", "_", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST3", "_", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_Z_BOOLEM__+TEMP_BOOL]);TXTMSG2^SETTEXT(DEBUG_TXT);TXTMSG3^SETTEXT(DEBUG_TXT2);}
|
||||
MATHTEST6:DESCRIPTION=TEN_TEST_SPRAWDZA_ZWRACANE_WYNIKI_PRZY_POROWNANIU_JEST_ROWNE
|
||||
|
||||
OBJECT=MATHTEST7
|
||||
MATHTEST7:TYPE=BEHAVIOUR
|
||||
MATHTEST7:CODE={DEBUG_TXT^SET([TEST_POROWNANIA_NIE_JEST_ROWNE]);DEBUG_TXT2^SET("");@IF("TEST2", "!_", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_Z_BOOLEM__+TEMP_BOOL]);@IF("TEST2", "!_", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST2", "!_", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST2", "!_", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST", "!_", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST", "!_", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST", "!_", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST", "!_", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_Z_BOOLEM__+TEMP_BOOL]);@IF("TEST4", "!_", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST4", "!_", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST4", "!_", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST4", "!_", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_Z_BOOLEM__+TEMP_BOOL]);@IF("TEST3", "!_", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST3", "!_", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST3", "!_", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST3", "!_", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_Z_BOOLEM__+TEMP_BOOL]);TXTMSG2^SETTEXT(DEBUG_TXT);TXTMSG3^SETTEXT(DEBUG_TXT2);}
|
||||
MATHTEST7:DESCRIPTION=TEN_TEST_SPRAWDZA_ZWRACANE_WYNIKI_PRZY_POROWNANIU_NIE_JEST_ROWNE
|
||||
|
||||
OBJECT=MATHTEST8
|
||||
MATHTEST8:TYPE=BEHAVIOUR
|
||||
MATHTEST8:CODE={DEBUG_TXT^SET([TEST_POROWNANIA_MNIEJSZE_LUB_ROWNE]);DEBUG_TXT2^SET("");@IF("TEST2", "<_", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_Z_BOOLEM__+TEMP_BOOL]);@IF("TEST2", "<_", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST2", "<_", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST2", "<_", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST", "<_", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST", "<_", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST", "<_", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST", "<_", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_Z_BOOLEM__+TEMP_BOOL]);@IF("TEST4", "<_", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST4", "<_", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST4", "<_", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST4", "<_", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_Z_BOOLEM__+TEMP_BOOL]);@IF("TEST3", "<_", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST3", "<_", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST3", "<_", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST3", "<_", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_Z_BOOLEM__+TEMP_BOOL]);TXTMSG2^SETTEXT(DEBUG_TXT);TXTMSG3^SETTEXT(DEBUG_TXT2);}
|
||||
MATHTEST8:DESCRIPTION=TEN_TEST_SPRAWDZA_ZWRACANE_WYNIKI_PRZY_POROWNANIU_MNIEJSZE_LUB_ROWNE
|
||||
|
||||
OBJECT=MATHTEST9
|
||||
MATHTEST9:TYPE=BEHAVIOUR
|
||||
MATHTEST9:CODE={DEBUG_TXT^SET([TEST_POROWNANIA_MNIEJSZE_NIZ]);DEBUG_TXT2^SET("");@IF("TEST2", "<", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_Z_BOOLEM__+TEMP_BOOL]);@IF("TEST2", "<", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST2", "<", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST2", "<", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST", "<", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST", "<", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST", "<", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST", "<", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_Z_BOOLEM__+TEMP_BOOL]);@IF("TEST4", "<", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST4", "<", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST4", "<", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST4", "<", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_Z_BOOLEM__+TEMP_BOOL]);@IF("TEST3", "<", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST3", "<", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST3", "<", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST3", "<", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_Z_BOOLEM__+TEMP_BOOL]);TXTMSG2^SETTEXT(DEBUG_TXT);TXTMSG3^SETTEXT(DEBUG_TXT2);}
|
||||
MATHTEST9:DESCRIPTION=TEN_TEST_SPRAWDZA_ZWRACANE_WYNIKI_PRZY_POROWNANIU_MNIEJSZE_NIZ
|
||||
|
||||
OBJECT=MATHTEST10
|
||||
MATHTEST10:TYPE=BEHAVIOUR
|
||||
MATHTEST10:CODE={DEBUG_TXT^SET([TEST_POROWNANIA_WIEKSZE_LUB_ROWNE]);DEBUG_TXT2^SET("");@IF("TEST2", ">_", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_Z_BOOLEM__+TEMP_BOOL]);@IF("TEST2", ">_", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST2", ">_", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST2", ">_", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST", ">_", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST", ">_", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST", ">_", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST", ">_", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_Z_BOOLEM__+TEMP_BOOL]);@IF("TEST4", ">_", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST4", ">_", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST4", ">_", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST4", ">_", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_Z_BOOLEM__+TEMP_BOOL]);@IF("TEST3", ">_", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST3", ">_", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST3", ">_", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST3", ">_", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_Z_BOOLEM__+TEMP_BOOL]);TXTMSG2^SETTEXT(DEBUG_TXT);TXTMSG3^SETTEXT(DEBUG_TXT2);}
|
||||
MATHTEST10:DESCRIPTION=TEN_TEST_SPRAWDZA_ZWRACANE_WYNIKI_PRZY_POROWNANIU_WIEKSZE_LUB_ROWNE
|
||||
|
||||
OBJECT=MATHTEST11
|
||||
MATHTEST11:TYPE=BEHAVIOUR
|
||||
MATHTEST11:CODE={DEBUG_TXT^SET([TEST_POROWNANIA_WIEKSZE_NIZ]);DEBUG_TXT2^SET("");@IF("TEST2", ">", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_Z_BOOLEM__+TEMP_BOOL]);@IF("TEST2", ">", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST2", ">", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST2", ">", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [BOOL_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST", ">", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST", ">", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST", ">", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST", ">", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT", [STRING_Z_BOOLEM__+TEMP_BOOL]);@IF("TEST4", ">", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST4", ">", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST4", ">", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST4", ">", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [INTEGER_Z_BOOLEM__+TEMP_BOOL]);@IF("TEST3", ">", "TEST_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_ZE_STRINGIEM__+TEMP_BOOL]);@IF("TEST3", ">", "TEST4_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_Z_INTEGEREM__+TEMP_BOOL]);@IF("TEST3", ">", "TEST3_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_Z_DOUBLEM__+TEMP_BOOL]);@IF("TEST3", ">", "TEST2_COMPARE", "BEH_SET_TRUE", "BEH_SET_FALSE");BEH_APPEND_TEXT^RUN("DEBUG_TXT2", [DOUBLE_Z_BOOLEM__+TEMP_BOOL]);TXTMSG2^SETTEXT(DEBUG_TXT);TXTMSG3^SETTEXT(DEBUG_TXT2);}
|
||||
MATHTEST11:DESCRIPTION=TEN_TEST_SPRAWDZA_ZWRACANE_WYNIKI_PRZY_POROWNANIU_WIEKSZE_NIZ
|
||||
|
||||
OBJECT=MATHTEST12
|
||||
MATHTEST12:TYPE=BEHAVIOUR
|
||||
MATHTEST12:CODE={DEBUG_TXT^SET([TEST_WYSWIETLANIA_WARTOSCI]);DEBUG_TXT2^SET("");@DOUBLE("VALUE1", 0.25252525);@DOUBLE("VALUE2", 0.52525252);DEBUG_TXT2^ADD(VALUE1);DEBUG_TXT2^ADD(["|"+VALUE2]);TXTMSG2^SETTEXT(DEBUG_TXT);TXTMSG3^SETTEXT(DEBUG_TXT2);}
|
||||
MATHTEST12:DESCRIPTION=TEN_TEST_SPRAWDZA_ZWRACANE_WYNIKI_PRZY_POROWNANIU_WIEKSZE_NIZ
|
||||
|
||||
OBJECT=__INIT__
|
||||
__INIT__:TYPE=BEHAVIOUR
|
||||
__INIT__:CODE={TXTMSG^SETTEXT(["Test"+DEBUG_VALUE+"_Test_obliczen"]);TXTMSG^SHOW();TXTMSG2^SHOW();TXTMSG3^SHOW();MATHTEST1^RUN();}
|
||||
Reference in New Issue
Block a user