// starting begin resetfog ;
   0: CALL_OW 335
// Hero ;
   4: CALL 20 0 0
// saveforquickrestart ;
   8: CALL_OW 22
// changemissionobjectives ( Cel1 ) ;
  12: LD_STRING Cel1
  14: PPUSH
  15: CALL_OW 337
// end ; end_of_file
  19: END
// export postac1 , postac2 , postac4 , pojazd , postac99 , postac3 , postac5 , un , inzynier , heros , un1 , un2 , un3 , un4 , un5 , un6 ; export function Hero ; var Level ; begin
  20: LD_INT 0
  22: PPUSH
  23: PPUSH
// Level = [ 6 , 7 , 8 ] [ Difficulty ] ;
  24: LD_ADDR_VAR 0 2
  28: PUSH
  29: LD_INT 6
  31: PUSH
  32: LD_INT 7
  34: PUSH
  35: LD_INT 8
  37: PUSH
  38: EMPTY
  39: LIST
  40: LIST
  41: LIST
  42: PUSH
  43: LD_OWVAR 67
  47: ARRAY
  48: ST_TO_ADDR
// uc_side = 3 ;
  49: LD_ADDR_OWVAR 20
  53: PUSH
  54: LD_INT 3
  56: ST_TO_ADDR
// uc_nation = 3 ;
  57: LD_ADDR_OWVAR 21
  61: PUSH
  62: LD_INT 3
  64: ST_TO_ADDR
// hc_gallery =  ;
  65: LD_ADDR_OWVAR 33
  69: PUSH
  70: LD_STRING 
  72: ST_TO_ADDR
// hc_name =  ;
  73: LD_ADDR_OWVAR 26
  77: PUSH
  78: LD_STRING 
  80: ST_TO_ADDR
// hc_skills = [ rand ( 3 , 5 ) , rand ( 1 , 3 ) , rand ( 0 , 2 ) , rand ( 0 , 1 ) ] ;
  81: LD_ADDR_OWVAR 31
  85: PUSH
  86: LD_INT 3
  88: PPUSH
  89: LD_INT 5
  91: PPUSH
  92: CALL_OW 12
  96: PUSH
  97: LD_INT 1
  99: PPUSH
 100: LD_INT 3
 102: PPUSH
 103: CALL_OW 12
 107: PUSH
 108: LD_INT 0
 110: PPUSH
 111: LD_INT 2
 113: PPUSH
 114: CALL_OW 12
 118: PUSH
 119: LD_INT 0
 121: PPUSH
 122: LD_INT 1
 124: PPUSH
 125: CALL_OW 12
 129: PUSH
 130: EMPTY
 131: LIST
 132: LIST
 133: LIST
 134: LIST
 135: ST_TO_ADDR
// postac1 = CreateHuman ;
 136: LD_ADDR_EXP 1
 140: PUSH
 141: CALL_OW 44
 145: ST_TO_ADDR
// placeunitarea ( postac1 , Area04 , false ) ;
 146: LD_EXP 1
 150: PPUSH
 151: LD_INT 4
 153: PPUSH
 154: LD_INT 0
 156: PPUSH
 157: CALL_OW 49
// uc_side = 3 ;
 161: LD_ADDR_OWVAR 20
 165: PUSH
 166: LD_INT 3
 168: ST_TO_ADDR
// uc_nation = 3 ;
 169: LD_ADDR_OWVAR 21
 173: PUSH
 174: LD_INT 3
 176: ST_TO_ADDR
// hc_importance = 100 ;
 177: LD_ADDR_OWVAR 32
 181: PUSH
 182: LD_INT 100
 184: ST_TO_ADDR
// HC_gallery =  ;
 185: LD_ADDR_OWVAR 33
 189: PUSH
 190: LD_STRING 
 192: ST_TO_ADDR
// hc_name =  ;
 193: LD_ADDR_OWVAR 26
 197: PUSH
 198: LD_STRING 
 200: ST_TO_ADDR
// hc_skills = [ 6 , rand ( 0 , 2 ) , rand ( 0 , 4 ) , rand ( 1 , 3 ) ] ;
 201: LD_ADDR_OWVAR 31
 205: PUSH
 206: LD_INT 6
 208: PUSH
 209: LD_INT 0
 211: PPUSH
 212: LD_INT 2
 214: PPUSH
 215: CALL_OW 12
 219: PUSH
 220: LD_INT 0
 222: PPUSH
 223: LD_INT 4
 225: PPUSH
 226: CALL_OW 12
 230: PUSH
 231: LD_INT 1
 233: PPUSH
 234: LD_INT 3
 236: PPUSH
 237: CALL_OW 12
 241: PUSH
 242: EMPTY
 243: LIST
 244: LIST
 245: LIST
 246: LIST
 247: ST_TO_ADDR
// postac2 = CreateHuman ;
 248: LD_ADDR_EXP 2
 252: PUSH
 253: CALL_OW 44
 257: ST_TO_ADDR
// placeunitarea ( postac2 , Area04 , false ) ;
 258: LD_EXP 2
 262: PPUSH
 263: LD_INT 4
 265: PPUSH
 266: LD_INT 0
 268: PPUSH
 269: CALL_OW 49
// hc_importance = 0 ;
 273: LD_ADDR_OWVAR 32
 277: PUSH
 278: LD_INT 0
 280: ST_TO_ADDR
// uc_side = 4 ;
 281: LD_ADDR_OWVAR 20
 285: PUSH
 286: LD_INT 4
 288: ST_TO_ADDR
// uc_nation = 1 ;
 289: LD_ADDR_OWVAR 21
 293: PUSH
 294: LD_INT 1
 296: ST_TO_ADDR
// hc_gallery =  ;
 297: LD_ADDR_OWVAR 33
 301: PUSH
 302: LD_STRING 
 304: ST_TO_ADDR
// hc_name = Kryptonim Orze1 ;
 305: LD_ADDR_OWVAR 26
 309: PUSH
 310: LD_STRING Kryptonim Orze1
 312: ST_TO_ADDR
// hc_skills = [ Level , 4 , 4 , 4 ] ;
 313: LD_ADDR_OWVAR 31
 317: PUSH
 318: LD_VAR 0 2
 322: PUSH
 323: LD_INT 4
 325: PUSH
 326: LD_INT 4
 328: PUSH
 329: LD_INT 4
 331: PUSH
 332: EMPTY
 333: LIST
 334: LIST
 335: LIST
 336: LIST
 337: ST_TO_ADDR
// postac5 = CreateHuman ;
 338: LD_ADDR_EXP 7
 342: PUSH
 343: CALL_OW 44
 347: ST_TO_ADDR
// PlaceUnitarea ( postac5 , Area05 , false ) ;
 348: LD_EXP 7
 352: PPUSH
 353: LD_INT 5
 355: PPUSH
 356: LD_INT 0
 358: PPUSH
 359: CALL_OW 49
// uc_side = 3 ;
 363: LD_ADDR_OWVAR 20
 367: PUSH
 368: LD_INT 3
 370: ST_TO_ADDR
// uc_nation = 3 ;
 371: LD_ADDR_OWVAR 21
 375: PUSH
 376: LD_INT 3
 378: ST_TO_ADDR
// hc_gallery =  ;
 379: LD_ADDR_OWVAR 33
 383: PUSH
 384: LD_STRING 
 386: ST_TO_ADDR
// hc_name =  ;
 387: LD_ADDR_OWVAR 26
 391: PUSH
 392: LD_STRING 
 394: ST_TO_ADDR
// hc_skills = [ 1 , 2 , 1 , 1 ] ;
 395: LD_ADDR_OWVAR 31
 399: PUSH
 400: LD_INT 1
 402: PUSH
 403: LD_INT 2
 405: PUSH
 406: LD_INT 1
 408: PUSH
 409: LD_INT 1
 411: PUSH
 412: EMPTY
 413: LIST
 414: LIST
 415: LIST
 416: LIST
 417: ST_TO_ADDR
// un1 = Createhuman ;
 418: LD_ADDR_EXP 11
 422: PUSH
 423: CALL_OW 44
 427: ST_TO_ADDR
// uc_side = 3 ;
 428: LD_ADDR_OWVAR 20
 432: PUSH
 433: LD_INT 3
 435: ST_TO_ADDR
// uc_nation = 3 ;
 436: LD_ADDR_OWVAR 21
 440: PUSH
 441: LD_INT 3
 443: ST_TO_ADDR
// hc_gallery =  ;
 444: LD_ADDR_OWVAR 33
 448: PUSH
 449: LD_STRING 
 451: ST_TO_ADDR
// hc_name =  ;
 452: LD_ADDR_OWVAR 26
 456: PUSH
 457: LD_STRING 
 459: ST_TO_ADDR
// hc_skills = [ 2 , 2 , 1 , 1 ] ;
 460: LD_ADDR_OWVAR 31
 464: PUSH
 465: LD_INT 2
 467: PUSH
 468: LD_INT 2
 470: PUSH
 471: LD_INT 1
 473: PUSH
 474: LD_INT 1
 476: PUSH
 477: EMPTY
 478: LIST
 479: LIST
 480: LIST
 481: LIST
 482: ST_TO_ADDR
// un2 = Createhuman ;
 483: LD_ADDR_EXP 12
 487: PUSH
 488: CALL_OW 44
 492: ST_TO_ADDR
// uc_side = 3 ;
 493: LD_ADDR_OWVAR 20
 497: PUSH
 498: LD_INT 3
 500: ST_TO_ADDR
// uc_nation = 3 ;
 501: LD_ADDR_OWVAR 21
 505: PUSH
 506: LD_INT 3
 508: ST_TO_ADDR
// hc_gallery =  ;
 509: LD_ADDR_OWVAR 33
 513: PUSH
 514: LD_STRING 
 516: ST_TO_ADDR
// hc_name =  ;
 517: LD_ADDR_OWVAR 26
 521: PUSH
 522: LD_STRING 
 524: ST_TO_ADDR
// hc_skills = [ 2 , 2 , 1 , 1 ] ;
 525: LD_ADDR_OWVAR 31
 529: PUSH
 530: LD_INT 2
 532: PUSH
 533: LD_INT 2
 535: PUSH
 536: LD_INT 1
 538: PUSH
 539: LD_INT 1
 541: PUSH
 542: EMPTY
 543: LIST
 544: LIST
 545: LIST
 546: LIST
 547: ST_TO_ADDR
// un3 = Createhuman ;
 548: LD_ADDR_EXP 13
 552: PUSH
 553: CALL_OW 44
 557: ST_TO_ADDR
// uc_side = 3 ;
 558: LD_ADDR_OWVAR 20
 562: PUSH
 563: LD_INT 3
 565: ST_TO_ADDR
// uc_nation = 3 ;
 566: LD_ADDR_OWVAR 21
 570: PUSH
 571: LD_INT 3
 573: ST_TO_ADDR
// hc_gallery =  ;
 574: LD_ADDR_OWVAR 33
 578: PUSH
 579: LD_STRING 
 581: ST_TO_ADDR
// hc_name =  ;
 582: LD_ADDR_OWVAR 26
 586: PUSH
 587: LD_STRING 
 589: ST_TO_ADDR
// hc_skills = [ 1 , 2 , 0 , 1 ] ;
 590: LD_ADDR_OWVAR 31
 594: PUSH
 595: LD_INT 1
 597: PUSH
 598: LD_INT 2
 600: PUSH
 601: LD_INT 0
 603: PUSH
 604: LD_INT 1
 606: PUSH
 607: EMPTY
 608: LIST
 609: LIST
 610: LIST
 611: LIST
 612: ST_TO_ADDR
// un4 = Createhuman ;
 613: LD_ADDR_EXP 14
 617: PUSH
 618: CALL_OW 44
 622: ST_TO_ADDR
// uc_side = 3 ;
 623: LD_ADDR_OWVAR 20
 627: PUSH
 628: LD_INT 3
 630: ST_TO_ADDR
// uc_nation = 3 ;
 631: LD_ADDR_OWVAR 21
 635: PUSH
 636: LD_INT 3
 638: ST_TO_ADDR
// hc_gallery =  ;
 639: LD_ADDR_OWVAR 33
 643: PUSH
 644: LD_STRING 
 646: ST_TO_ADDR
// hc_name =  ;
 647: LD_ADDR_OWVAR 26
 651: PUSH
 652: LD_STRING 
 654: ST_TO_ADDR
// hc_skills = [ 1 , 2 , 0 , 1 ] ;
 655: LD_ADDR_OWVAR 31
 659: PUSH
 660: LD_INT 1
 662: PUSH
 663: LD_INT 2
 665: PUSH
 666: LD_INT 0
 668: PUSH
 669: LD_INT 1
 671: PUSH
 672: EMPTY
 673: LIST
 674: LIST
 675: LIST
 676: LIST
 677: ST_TO_ADDR
// un5 = Createhuman ;
 678: LD_ADDR_EXP 15
 682: PUSH
 683: CALL_OW 44
 687: ST_TO_ADDR
// uc_side = 3 ;
 688: LD_ADDR_OWVAR 20
 692: PUSH
 693: LD_INT 3
 695: ST_TO_ADDR
// uc_nation = 3 ;
 696: LD_ADDR_OWVAR 21
 700: PUSH
 701: LD_INT 3
 703: ST_TO_ADDR
// hc_gallery =  ;
 704: LD_ADDR_OWVAR 33
 708: PUSH
 709: LD_STRING 
 711: ST_TO_ADDR
// hc_name =  ;
 712: LD_ADDR_OWVAR 26
 716: PUSH
 717: LD_STRING 
 719: ST_TO_ADDR
// hc_skills = [ 2 , 2 , 1 , 1 ] ;
 720: LD_ADDR_OWVAR 31
 724: PUSH
 725: LD_INT 2
 727: PUSH
 728: LD_INT 2
 730: PUSH
 731: LD_INT 1
 733: PUSH
 734: LD_INT 1
 736: PUSH
 737: EMPTY
 738: LIST
 739: LIST
 740: LIST
 741: LIST
 742: ST_TO_ADDR
// un6 = Createhuman ;
 743: LD_ADDR_EXP 16
 747: PUSH
 748: CALL_OW 44
 752: ST_TO_ADDR
// uc_side = 3 ;
 753: LD_ADDR_OWVAR 20
 757: PUSH
 758: LD_INT 3
 760: ST_TO_ADDR
// uc_nation = 3 ;
 761: LD_ADDR_OWVAR 21
 765: PUSH
 766: LD_INT 3
 768: ST_TO_ADDR
// hc_class = class_engineer ;
 769: LD_ADDR_OWVAR 28
 773: PUSH
 774: LD_INT 2
 776: ST_TO_ADDR
// hc_gallery =  ;
 777: LD_ADDR_OWVAR 33
 781: PUSH
 782: LD_STRING 
 784: ST_TO_ADDR
// hc_name =  ;
 785: LD_ADDR_OWVAR 26
 789: PUSH
 790: LD_STRING 
 792: ST_TO_ADDR
// hc_skills = [ 1 , 3 , 2 , 1 ] ;
 793: LD_ADDR_OWVAR 31
 797: PUSH
 798: LD_INT 1
 800: PUSH
 801: LD_INT 3
 803: PUSH
 804: LD_INT 2
 806: PUSH
 807: LD_INT 1
 809: PUSH
 810: EMPTY
 811: LIST
 812: LIST
 813: LIST
 814: LIST
 815: ST_TO_ADDR
// inzynier = Createhuman ;
 816: LD_ADDR_EXP 9
 820: PUSH
 821: CALL_OW 44
 825: ST_TO_ADDR
// placeunitarea ( inzynier , Area04 , false ) ;
 826: LD_EXP 9
 830: PPUSH
 831: LD_INT 4
 833: PPUSH
 834: LD_INT 0
 836: PPUSH
 837: CALL_OW 49
// uc_side = 3 ;
 841: LD_ADDR_OWVAR 20
 845: PUSH
 846: LD_INT 3
 848: ST_TO_ADDR
// uc_nation = 3 ;
 849: LD_ADDR_OWVAR 21
 853: PUSH
 854: LD_INT 3
 856: ST_TO_ADDR
// hc_class = class_scientistic ;
 857: LD_ADDR_OWVAR 28
 861: PUSH
 862: LD_INT 4
 864: ST_TO_ADDR
// hc_gallery =  ;
 865: LD_ADDR_OWVAR 33
 869: PUSH
 870: LD_STRING 
 872: ST_TO_ADDR
// hc_name =  ;
 873: LD_ADDR_OWVAR 26
 877: PUSH
 878: LD_STRING 
 880: ST_TO_ADDR
// hc_skills = [ 1 , 3 , 2 , 1 ] ;
 881: LD_ADDR_OWVAR 31
 885: PUSH
 886: LD_INT 1
 888: PUSH
 889: LD_INT 3
 891: PUSH
 892: LD_INT 2
 894: PUSH
 895: LD_INT 1
 897: PUSH
 898: EMPTY
 899: LIST
 900: LIST
 901: LIST
 902: LIST
 903: ST_TO_ADDR
// inzynier = Createhuman ;
 904: LD_ADDR_EXP 9
 908: PUSH
 909: CALL_OW 44
 913: ST_TO_ADDR
// placeunitarea ( inzynier , Area04 , false ) ;
 914: LD_EXP 9
 918: PPUSH
 919: LD_INT 4
 921: PPUSH
 922: LD_INT 0
 924: PPUSH
 925: CALL_OW 49
// uc_side = 3 ;
 929: LD_ADDR_OWVAR 20
 933: PUSH
 934: LD_INT 3
 936: ST_TO_ADDR
// uc_nation = 3 ;
 937: LD_ADDR_OWVAR 21
 941: PUSH
 942: LD_INT 3
 944: ST_TO_ADDR
// hc_class = class_engineer ;
 945: LD_ADDR_OWVAR 28
 949: PUSH
 950: LD_INT 2
 952: ST_TO_ADDR
// hc_gallery =  ;
 953: LD_ADDR_OWVAR 33
 957: PUSH
 958: LD_STRING 
 960: ST_TO_ADDR
// hc_name =  ;
 961: LD_ADDR_OWVAR 26
 965: PUSH
 966: LD_STRING 
 968: ST_TO_ADDR
// hc_skills = [ 1 , 3 , 2 , 1 ] ;
 969: LD_ADDR_OWVAR 31
 973: PUSH
 974: LD_INT 1
 976: PUSH
 977: LD_INT 3
 979: PUSH
 980: LD_INT 2
 982: PUSH
 983: LD_INT 1
 985: PUSH
 986: EMPTY
 987: LIST
 988: LIST
 989: LIST
 990: LIST
 991: ST_TO_ADDR
// inzynier = Createhuman ;
 992: LD_ADDR_EXP 9
 996: PUSH
 997: CALL_OW 44
1001: ST_TO_ADDR
// placeunitarea ( inzynier , Area04 , false ) ;
1002: LD_EXP 9
1006: PPUSH
1007: LD_INT 4
1009: PPUSH
1010: LD_INT 0
1012: PPUSH
1013: CALL_OW 49
// uc_side = 3 ;
1017: LD_ADDR_OWVAR 20
1021: PUSH
1022: LD_INT 3
1024: ST_TO_ADDR
// uc_nation = 3 ;
1025: LD_ADDR_OWVAR 21
1029: PUSH
1030: LD_INT 3
1032: ST_TO_ADDR
// hc_class = class_engineer ;
1033: LD_ADDR_OWVAR 28
1037: PUSH
1038: LD_INT 2
1040: ST_TO_ADDR
// hc_gallery =  ;
1041: LD_ADDR_OWVAR 33
1045: PUSH
1046: LD_STRING 
1048: ST_TO_ADDR
// hc_name =  ;
1049: LD_ADDR_OWVAR 26
1053: PUSH
1054: LD_STRING 
1056: ST_TO_ADDR
// hc_skills = [ 1 , 3 , 2 , 1 ] ;
1057: LD_ADDR_OWVAR 31
1061: PUSH
1062: LD_INT 1
1064: PUSH
1065: LD_INT 3
1067: PUSH
1068: LD_INT 2
1070: PUSH
1071: LD_INT 1
1073: PUSH
1074: EMPTY
1075: LIST
1076: LIST
1077: LIST
1078: LIST
1079: ST_TO_ADDR
// inzynier = Createhuman ;
1080: LD_ADDR_EXP 9
1084: PUSH
1085: CALL_OW 44
1089: ST_TO_ADDR
// placeunitarea ( inzynier , Area04 , false ) ;
1090: LD_EXP 9
1094: PPUSH
1095: LD_INT 4
1097: PPUSH
1098: LD_INT 0
1100: PPUSH
1101: CALL_OW 49
// uc_nation = 3 ;
1105: LD_ADDR_OWVAR 21
1109: PUSH
1110: LD_INT 3
1112: ST_TO_ADDR
// hc_class = class_engineer ;
1113: LD_ADDR_OWVAR 28
1117: PUSH
1118: LD_INT 2
1120: ST_TO_ADDR
// hc_gallery =  ;
1121: LD_ADDR_OWVAR 33
1125: PUSH
1126: LD_STRING 
1128: ST_TO_ADDR
// hc_name =  ;
1129: LD_ADDR_OWVAR 26
1133: PUSH
1134: LD_STRING 
1136: ST_TO_ADDR
// hc_skills = [ 1 , 3 , 2 , 1 ] ;
1137: LD_ADDR_OWVAR 31
1141: PUSH
1142: LD_INT 1
1144: PUSH
1145: LD_INT 3
1147: PUSH
1148: LD_INT 2
1150: PUSH
1151: LD_INT 1
1153: PUSH
1154: EMPTY
1155: LIST
1156: LIST
1157: LIST
1158: LIST
1159: ST_TO_ADDR
// inzynier = Createhuman ;
1160: LD_ADDR_EXP 9
1164: PUSH
1165: CALL_OW 44
1169: ST_TO_ADDR
// placeunitarea ( inzynier , Area04 , false ) ;
1170: LD_EXP 9
1174: PPUSH
1175: LD_INT 4
1177: PPUSH
1178: LD_INT 0
1180: PPUSH
1181: CALL_OW 49
// uc_side = 4 ;
1185: LD_ADDR_OWVAR 20
1189: PUSH
1190: LD_INT 4
1192: ST_TO_ADDR
// uc_nation = 1 ;
1193: LD_ADDR_OWVAR 21
1197: PUSH
1198: LD_INT 1
1200: ST_TO_ADDR
// hc_class = class_engineer ;
1201: LD_ADDR_OWVAR 28
1205: PUSH
1206: LD_INT 2
1208: ST_TO_ADDR
// hc_gallery =  ;
1209: LD_ADDR_OWVAR 33
1213: PUSH
1214: LD_STRING 
1216: ST_TO_ADDR
// hc_name =  ;
1217: LD_ADDR_OWVAR 26
1221: PUSH
1222: LD_STRING 
1224: ST_TO_ADDR
// hc_skills = [ 1 , 3 , 2 , 1 ] ;
1225: LD_ADDR_OWVAR 31
1229: PUSH
1230: LD_INT 1
1232: PUSH
1233: LD_INT 3
1235: PUSH
1236: LD_INT 2
1238: PUSH
1239: LD_INT 1
1241: PUSH
1242: EMPTY
1243: LIST
1244: LIST
1245: LIST
1246: LIST
1247: ST_TO_ADDR
// inzynier = Createhuman ;
1248: LD_ADDR_EXP 9
1252: PUSH
1253: CALL_OW 44
1257: ST_TO_ADDR
// placeunitarea ( inzynier , Area02 , false ) ;
1258: LD_EXP 9
1262: PPUSH
1263: LD_INT 2
1265: PPUSH
1266: LD_INT 0
1268: PPUSH
1269: CALL_OW 49
// uc_side = 4 ;
1273: LD_ADDR_OWVAR 20
1277: PUSH
1278: LD_INT 4
1280: ST_TO_ADDR
// uc_nation = 1 ;
1281: LD_ADDR_OWVAR 21
1285: PUSH
1286: LD_INT 1
1288: ST_TO_ADDR
// hc_class = class_scientistic ;
1289: LD_ADDR_OWVAR 28
1293: PUSH
1294: LD_INT 4
1296: ST_TO_ADDR
// hc_gallery =  ;
1297: LD_ADDR_OWVAR 33
1301: PUSH
1302: LD_STRING 
1304: ST_TO_ADDR
// hc_name =  ;
1305: LD_ADDR_OWVAR 26
1309: PUSH
1310: LD_STRING 
1312: ST_TO_ADDR
// hc_skills = [ 1 , 3 , 2 , 1 ] ;
1313: LD_ADDR_OWVAR 31
1317: PUSH
1318: LD_INT 1
1320: PUSH
1321: LD_INT 3
1323: PUSH
1324: LD_INT 2
1326: PUSH
1327: LD_INT 1
1329: PUSH
1330: EMPTY
1331: LIST
1332: LIST
1333: LIST
1334: LIST
1335: ST_TO_ADDR
// inzynier = Createhuman ;
1336: LD_ADDR_EXP 9
1340: PUSH
1341: CALL_OW 44
1345: ST_TO_ADDR
// placeunitarea ( inzynier , Area02 , false ) ;
1346: LD_EXP 9
1350: PPUSH
1351: LD_INT 2
1353: PPUSH
1354: LD_INT 0
1356: PPUSH
1357: CALL_OW 49
// uc_side = 4 ;
1361: LD_ADDR_OWVAR 20
1365: PUSH
1366: LD_INT 4
1368: ST_TO_ADDR
// uc_nation = 1 ;
1369: LD_ADDR_OWVAR 21
1373: PUSH
1374: LD_INT 1
1376: ST_TO_ADDR
// hc_class = class_engineer ;
1377: LD_ADDR_OWVAR 28
1381: PUSH
1382: LD_INT 2
1384: ST_TO_ADDR
// hc_gallery =  ;
1385: LD_ADDR_OWVAR 33
1389: PUSH
1390: LD_STRING 
1392: ST_TO_ADDR
// hc_name =  ;
1393: LD_ADDR_OWVAR 26
1397: PUSH
1398: LD_STRING 
1400: ST_TO_ADDR
// hc_skills = [ 1 , 3 , 2 , 1 ] ;
1401: LD_ADDR_OWVAR 31
1405: PUSH
1406: LD_INT 1
1408: PUSH
1409: LD_INT 3
1411: PUSH
1412: LD_INT 2
1414: PUSH
1415: LD_INT 1
1417: PUSH
1418: EMPTY
1419: LIST
1420: LIST
1421: LIST
1422: LIST
1423: ST_TO_ADDR
// inzynier = Createhuman ;
1424: LD_ADDR_EXP 9
1428: PUSH
1429: CALL_OW 44
1433: ST_TO_ADDR
// placeunitarea ( inzynier , Area02 , false ) ;
1434: LD_EXP 9
1438: PPUSH
1439: LD_INT 2
1441: PPUSH
1442: LD_INT 0
1444: PPUSH
1445: CALL_OW 49
// say ( postac2 , dr1 ) ;
1449: LD_EXP 2
1453: PPUSH
1454: LD_STRING dr1
1456: PPUSH
1457: CALL_OW 88
// end ; end_of_file
1461: LD_VAR 0 1
1465: RET
// every 0 0$01 do var magazyn ;
1466: GO 1468
1468: DISABLE
1469: LD_INT 0
1471: PPUSH
// begin enable ;
1472: ENABLE
// magazyn := Filterallunits ( [ [ f_side , 6 ] , [ f_btype , b_depot ] ] ) ;
1473: LD_ADDR_VAR 0 1
1477: PUSH
1478: LD_INT 22
1480: PUSH
1481: LD_INT 6
1483: PUSH
1484: EMPTY
1485: LIST
1486: LIST
1487: PUSH
1488: LD_INT 30
1490: PUSH
1491: LD_INT 0
1493: PUSH
1494: EMPTY
1495: LIST
1496: LIST
1497: PUSH
1498: EMPTY
1499: LIST
1500: LIST
1501: PPUSH
1502: CALL_OW 69
1506: ST_TO_ADDR
// if GetLives ( magazyn ) <= 49 then
1507: LD_VAR 0 1
1511: PPUSH
1512: CALL_OW 256
1516: PUSH
1517: LD_INT 49
1519: LESSEQUAL
1520: IFFALSE 1529
// begin youlost ( POS1 ) ;
1522: LD_STRING POS1
1524: PPUSH
1525: CALL_OW 104
// end ; end ;
1529: PPOPN 1
1531: END
// every 0 0$01 do var magazyn1 ;
1532: GO 1534
1534: DISABLE
1535: LD_INT 0
1537: PPUSH
// begin enable ;
1538: ENABLE
// magazyn1 := Filterallunits ( [ [ f_side , 1 ] , [ f_btype , b_depot ] ] ) ;
1539: LD_ADDR_VAR 0 1
1543: PUSH
1544: LD_INT 22
1546: PUSH
1547: LD_INT 1
1549: PUSH
1550: EMPTY
1551: LIST
1552: LIST
1553: PUSH
1554: LD_INT 30
1556: PUSH
1557: LD_INT 0
1559: PUSH
1560: EMPTY
1561: LIST
1562: LIST
1563: PUSH
1564: EMPTY
1565: LIST
1566: LIST
1567: PPUSH
1568: CALL_OW 69
1572: ST_TO_ADDR
// if GetLives ( magazyn1 ) <= 49 then
1573: LD_VAR 0 1
1577: PPUSH
1578: CALL_OW 256
1582: PUSH
1583: LD_INT 49
1585: LESSEQUAL
1586: IFFALSE 1629
// begin addmedal ( med1 , 1 ) ;
1588: LD_STRING med1
1590: PPUSH
1591: LD_INT 1
1593: PPUSH
1594: CALL_OW 101
// addmedal ( med2 , 1 ) ;
1598: LD_STRING med2
1600: PPUSH
1601: LD_INT 1
1603: PPUSH
1604: CALL_OW 101
// addmedal ( med3 , 1 ) ;
1608: LD_STRING med3
1610: PPUSH
1611: LD_INT 1
1613: PPUSH
1614: CALL_OW 101
// GiveMedals ( MAIN ) ;
1618: LD_STRING MAIN
1620: PPUSH
1621: CALL_OW 102
// Youwin ;
1625: CALL_OW 103
// end ; end ; end_of_file
1629: PPOPN 1
1631: END
// export koszary1 , koszary2 , koszary3 , koszary4 , i1 , i2 ; var koszary1 , koszary2 , level ; every 0 0$20 do
1632: GO 1634
1634: DISABLE
// begin enable ;
1635: ENABLE
// koszary1 := Filterallunits ( [ [ f_side , 3 ] , [ f_btype , b_armoury ] ] ) ;
1636: LD_ADDR_LOC 1
1640: PUSH
1641: LD_INT 22
1643: PUSH
1644: LD_INT 3
1646: PUSH
1647: EMPTY
1648: LIST
1649: LIST
1650: PUSH
1651: LD_INT 30
1653: PUSH
1654: LD_INT 4
1656: PUSH
1657: EMPTY
1658: LIST
1659: LIST
1660: PUSH
1661: EMPTY
1662: LIST
1663: LIST
1664: PPUSH
1665: CALL_OW 69
1669: ST_TO_ADDR
// setside ( koszary1 , 6 ) ;
1670: LD_LOC 1
1674: PPUSH
1675: LD_INT 6
1677: PPUSH
1678: CALL_OW 235
// end ;
1682: END
// every 0 0$20 do
1683: GO 1685
1685: DISABLE
// begin enable ;
1686: ENABLE
// koszary3 := Filterallunits ( [ [ f_side , 6 ] , [ f_btype , b_armoury ] ] ) ;
1687: LD_ADDR_EXP 19
1691: PUSH
1692: LD_INT 22
1694: PUSH
1695: LD_INT 6
1697: PUSH
1698: EMPTY
1699: LIST
1700: LIST
1701: PUSH
1702: LD_INT 30
1704: PUSH
1705: LD_INT 4
1707: PUSH
1708: EMPTY
1709: LIST
1710: LIST
1711: PUSH
1712: EMPTY
1713: LIST
1714: LIST
1715: PPUSH
1716: CALL_OW 69
1720: ST_TO_ADDR
// for i1 in koszary3 do
1721: LD_ADDR_EXP 21
1725: PUSH
1726: LD_EXP 19
1730: PUSH
1731: FOR_IN
1732: IFFALSE 1928
// begin if GetLives ( koszary3 ) <= 1000 then
1734: LD_EXP 19
1738: PPUSH
1739: CALL_OW 256
1743: PUSH
1744: LD_INT 1000
1746: LESSEQUAL
1747: IFFALSE 1926
// begin Level = [ 7 , 5 , 4 ] [ Difficulty ] ;
1749: LD_ADDR_LOC 3
1753: PUSH
1754: LD_INT 7
1756: PUSH
1757: LD_INT 5
1759: PUSH
1760: LD_INT 4
1762: PUSH
1763: EMPTY
1764: LIST
1765: LIST
1766: LIST
1767: PUSH
1768: LD_OWVAR 67
1772: ARRAY
1773: ST_TO_ADDR
// uc_side = 6 ;
1774: LD_ADDR_OWVAR 20
1778: PUSH
1779: LD_INT 6
1781: ST_TO_ADDR
// uc_nation = 3 ;
1782: LD_ADDR_OWVAR 21
1786: PUSH
1787: LD_INT 3
1789: ST_TO_ADDR
// hc_gallery =  ;
1790: LD_ADDR_OWVAR 33
1794: PUSH
1795: LD_STRING 
1797: ST_TO_ADDR
// hc_name =  ;
1798: LD_ADDR_OWVAR 26
1802: PUSH
1803: LD_STRING 
1805: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
1806: LD_ADDR_OWVAR 29
1810: PUSH
1811: LD_INT 9
1813: PPUSH
1814: LD_INT 11
1816: PPUSH
1817: CALL_OW 12
1821: PUSH
1822: LD_INT 10
1824: PPUSH
1825: LD_INT 12
1827: PPUSH
1828: CALL_OW 12
1832: PUSH
1833: EMPTY
1834: LIST
1835: LIST
1836: ST_TO_ADDR
// hc_skills = [ Level , 1 , Rand ( 2 , 5 ) , Rand ( 0 , 2 ) ] ;
1837: LD_ADDR_OWVAR 31
1841: PUSH
1842: LD_LOC 3
1846: PUSH
1847: LD_INT 1
1849: PUSH
1850: LD_INT 2
1852: PPUSH
1853: LD_INT 5
1855: PPUSH
1856: CALL_OW 12
1860: PUSH
1861: LD_INT 0
1863: PPUSH
1864: LD_INT 2
1866: PPUSH
1867: CALL_OW 12
1871: PUSH
1872: EMPTY
1873: LIST
1874: LIST
1875: LIST
1876: LIST
1877: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
1878: LD_ADDR_OWVAR 27
1882: PUSH
1883: LD_INT 1
1885: PPUSH
1886: LD_INT 2
1888: PPUSH
1889: CALL_OW 12
1893: ST_TO_ADDR
// hc_class = 1 ;
1894: LD_ADDR_OWVAR 28
1898: PUSH
1899: LD_INT 1
1901: ST_TO_ADDR
// un1 := CreateHuman ;
1902: LD_ADDR_EXP 11
1906: PUSH
1907: CALL_OW 44
1911: ST_TO_ADDR
// PlaceHumanInUnit ( un1 , i1 ) ;
1912: LD_EXP 11
1916: PPUSH
1917: LD_EXP 21
1921: PPUSH
1922: CALL_OW 52
// end ; end ;
1926: GO 1731
1928: POP
1929: POP
// end ;
1930: END
// every 0 0$20 do
1931: GO 1933
1933: DISABLE
// begin enable ;
1934: ENABLE
// koszary2 := Filterallunits ( [ [ f_side , 4 ] , [ f_btype , b_armoury ] ] ) ;
1935: LD_ADDR_LOC 2
1939: PUSH
1940: LD_INT 22
1942: PUSH
1943: LD_INT 4
1945: PUSH
1946: EMPTY
1947: LIST
1948: LIST
1949: PUSH
1950: LD_INT 30
1952: PUSH
1953: LD_INT 4
1955: PUSH
1956: EMPTY
1957: LIST
1958: LIST
1959: PUSH
1960: EMPTY
1961: LIST
1962: LIST
1963: PPUSH
1964: CALL_OW 69
1968: ST_TO_ADDR
// setside ( koszary2 , 1 ) ;
1969: LD_LOC 2
1973: PPUSH
1974: LD_INT 1
1976: PPUSH
1977: CALL_OW 235
// end ;
1981: END
// every 0 0$20 do
1982: GO 1984
1984: DISABLE
// begin enable ;
1985: ENABLE
// koszary4 := Filterallunits ( [ [ f_side , 1 ] , [ f_btype , b_armoury ] ] ) ;
1986: LD_ADDR_EXP 20
1990: PUSH
1991: LD_INT 22
1993: PUSH
1994: LD_INT 1
1996: PUSH
1997: EMPTY
1998: LIST
1999: LIST
2000: PUSH
2001: LD_INT 30
2003: PUSH
2004: LD_INT 4
2006: PUSH
2007: EMPTY
2008: LIST
2009: LIST
2010: PUSH
2011: EMPTY
2012: LIST
2013: LIST
2014: PPUSH
2015: CALL_OW 69
2019: ST_TO_ADDR
// uc_side = 1 ;
2020: LD_ADDR_OWVAR 20
2024: PUSH
2025: LD_INT 1
2027: ST_TO_ADDR
// uc_nation = 1 ;
2028: LD_ADDR_OWVAR 21
2032: PUSH
2033: LD_INT 1
2035: ST_TO_ADDR
// hc_gallery =  ;
2036: LD_ADDR_OWVAR 33
2040: PUSH
2041: LD_STRING 
2043: ST_TO_ADDR
// hc_name =  ;
2044: LD_ADDR_OWVAR 26
2048: PUSH
2049: LD_STRING 
2051: ST_TO_ADDR
// for i2 in koszary4 do
2052: LD_ADDR_EXP 22
2056: PUSH
2057: LD_EXP 20
2061: PUSH
2062: FOR_IN
2063: IFFALSE 2227
// begin if GetLives ( koszary4 ) <= 1000 then
2065: LD_EXP 20
2069: PPUSH
2070: CALL_OW 256
2074: PUSH
2075: LD_INT 1000
2077: LESSEQUAL
2078: IFFALSE 2225
// begin Level = [ 4 , 5 , 7 ] [ Difficulty ] ;
2080: LD_ADDR_LOC 3
2084: PUSH
2085: LD_INT 4
2087: PUSH
2088: LD_INT 5
2090: PUSH
2091: LD_INT 7
2093: PUSH
2094: EMPTY
2095: LIST
2096: LIST
2097: LIST
2098: PUSH
2099: LD_OWVAR 67
2103: ARRAY
2104: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
2105: LD_ADDR_OWVAR 29
2109: PUSH
2110: LD_INT 9
2112: PPUSH
2113: LD_INT 11
2115: PPUSH
2116: CALL_OW 12
2120: PUSH
2121: LD_INT 10
2123: PPUSH
2124: LD_INT 12
2126: PPUSH
2127: CALL_OW 12
2131: PUSH
2132: EMPTY
2133: LIST
2134: LIST
2135: ST_TO_ADDR
// hc_skills = [ Level , 1 , Rand ( 2 , 5 ) , Rand ( 0 , 2 ) ] ;
2136: LD_ADDR_OWVAR 31
2140: PUSH
2141: LD_LOC 3
2145: PUSH
2146: LD_INT 1
2148: PUSH
2149: LD_INT 2
2151: PPUSH
2152: LD_INT 5
2154: PPUSH
2155: CALL_OW 12
2159: PUSH
2160: LD_INT 0
2162: PPUSH
2163: LD_INT 2
2165: PPUSH
2166: CALL_OW 12
2170: PUSH
2171: EMPTY
2172: LIST
2173: LIST
2174: LIST
2175: LIST
2176: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
2177: LD_ADDR_OWVAR 27
2181: PUSH
2182: LD_INT 1
2184: PPUSH
2185: LD_INT 2
2187: PPUSH
2188: CALL_OW 12
2192: ST_TO_ADDR
// hc_class = 1 ;
2193: LD_ADDR_OWVAR 28
2197: PUSH
2198: LD_INT 1
2200: ST_TO_ADDR
// un := CreateHuman ;
2201: LD_ADDR_EXP 8
2205: PUSH
2206: CALL_OW 44
2210: ST_TO_ADDR
// PlaceHumanInUnit ( un , i2 ) ;
2211: LD_EXP 8
2215: PPUSH
2216: LD_EXP 22
2220: PPUSH
2221: CALL_OW 52
// end ; end ;
2225: GO 2062
2227: POP
2228: POP
// end ; end_of_file
2229: END
// export inzynierki ; every 0 0$0.1 do
2230: GO 2232
2232: DISABLE
// begin inzynierki := Filterallunits ( [ [ f_side , 4 ] , [ f_type , unit_human ] , [ f_class , class_engineer ] ] ) ;
2233: LD_ADDR_EXP 23
2237: PUSH
2238: LD_INT 22
2240: PUSH
2241: LD_INT 4
2243: PUSH
2244: EMPTY
2245: LIST
2246: LIST
2247: PUSH
2248: LD_INT 21
2250: PUSH
2251: LD_INT 1
2253: PUSH
2254: EMPTY
2255: LIST
2256: LIST
2257: PUSH
2258: LD_INT 25
2260: PUSH
2261: LD_INT 2
2263: PUSH
2264: EMPTY
2265: LIST
2266: LIST
2267: PUSH
2268: EMPTY
2269: LIST
2270: LIST
2271: LIST
2272: PPUSH
2273: CALL_OW 69
2277: ST_TO_ADDR
// enable end ;
2278: ENABLE
2279: END
// every 0 0$01 do
2280: GO 2282
2282: DISABLE
// begin ComBuild ( inzynierki , b_solar_power , 30 , 2 , 3 ) ;
2283: LD_EXP 23
2287: PPUSH
2288: LD_INT 27
2290: PPUSH
2291: LD_INT 30
2293: PPUSH
2294: LD_INT 2
2296: PPUSH
2297: LD_INT 3
2299: PPUSH
2300: CALL_OW 145
// end ;
2304: END
// every 1 1$35 do
2305: GO 2307
2307: DISABLE
// begin enable ;
2308: ENABLE
// if inzynierki = 0 then
2309: LD_EXP 23
2313: PUSH
2314: LD_INT 0
2316: EQUAL
2317: IFFALSE 2321
// begin end else
2319: GO 2342
// ComBuild ( inzynierki , b_armoury , 15 , 17 , 0 ) ;
2321: LD_EXP 23
2325: PPUSH
2326: LD_INT 4
2328: PPUSH
2329: LD_INT 15
2331: PPUSH
2332: LD_INT 17
2334: PPUSH
2335: LD_INT 0
2337: PPUSH
2338: CALL_OW 145
// end ;
2342: END
// every 2 2$30 do
2343: GO 2345
2345: DISABLE
// begin enable ;
2346: ENABLE
// if inzynierki = 0 then
2347: LD_EXP 23
2351: PUSH
2352: LD_INT 0
2354: EQUAL
2355: IFFALSE 2359
// begin end else
2357: GO 2380
// ComBuild ( inzynierki , b_armoury , 32 , 23 , 0 ) ;
2359: LD_EXP 23
2363: PPUSH
2364: LD_INT 4
2366: PPUSH
2367: LD_INT 32
2369: PPUSH
2370: LD_INT 23
2372: PPUSH
2373: LD_INT 0
2375: PPUSH
2376: CALL_OW 145
// end ;
2380: END
// every 3 3$35 do
2381: GO 2383
2383: DISABLE
// begin enable ;
2384: ENABLE
// if inzynierki = 0 then
2385: LD_EXP 23
2389: PUSH
2390: LD_INT 0
2392: EQUAL
2393: IFFALSE 2397
// begin end else
2395: GO 2418
// ComBuild ( inzynierki , b_armoury , 27 , 26 , 0 ) ;
2397: LD_EXP 23
2401: PPUSH
2402: LD_INT 4
2404: PPUSH
2405: LD_INT 27
2407: PPUSH
2408: LD_INT 26
2410: PPUSH
2411: LD_INT 0
2413: PPUSH
2414: CALL_OW 145
// end ;
2418: END
// every 4 4$40 do
2419: GO 2421
2421: DISABLE
// begin enable ;
2422: ENABLE
// if inzynierki = 0 then
2423: LD_EXP 23
2427: PUSH
2428: LD_INT 0
2430: EQUAL
2431: IFFALSE 2435
// begin end else
2433: GO 2456
// ComBuild ( inzynierki , b_armoury , 33 , 17 , 5 ) ;
2435: LD_EXP 23
2439: PPUSH
2440: LD_INT 4
2442: PPUSH
2443: LD_INT 33
2445: PPUSH
2446: LD_INT 17
2448: PPUSH
2449: LD_INT 5
2451: PPUSH
2452: CALL_OW 145
// end ;
2456: END
// every 5 5$30 do
2457: GO 2459
2459: DISABLE
// begin enable ;
2460: ENABLE
// if inzynierki = 0 then
2461: LD_EXP 23
2465: PUSH
2466: LD_INT 0
2468: EQUAL
2469: IFFALSE 2473
// begin end else
2471: GO 2494
// ComBuild ( inzynierki , b_armoury , 21 , 8 , 0 ) ;
2473: LD_EXP 23
2477: PPUSH
2478: LD_INT 4
2480: PPUSH
2481: LD_INT 21
2483: PPUSH
2484: LD_INT 8
2486: PPUSH
2487: LD_INT 0
2489: PPUSH
2490: CALL_OW 145
// end ;
2494: END
// every 3 3$25 do
2495: GO 2497
2497: DISABLE
// begin enable ;
2498: ENABLE
// if inzynierki = 0 then
2499: LD_EXP 23
2503: PUSH
2504: LD_INT 0
2506: EQUAL
2507: IFFALSE 2511
// begin end else
2509: GO 2532
// ComBuild ( inzynierki , b_depot , 26 , 5 , 3 ) ;
2511: LD_EXP 23
2515: PPUSH
2516: LD_INT 0
2518: PPUSH
2519: LD_INT 26
2521: PPUSH
2522: LD_INT 5
2524: PPUSH
2525: LD_INT 3
2527: PPUSH
2528: CALL_OW 145
// end ; end_of_file
2532: END
// every 1 1$55 do
2533: GO 2535
2535: DISABLE
// begin enable ;
2536: ENABLE
// CreateCratesArea ( Rand ( 1 , 2 ) , Area01 , true ) ;
2537: LD_INT 1
2539: PPUSH
2540: LD_INT 2
2542: PPUSH
2543: CALL_OW 12
2547: PPUSH
2548: LD_INT 1
2550: PPUSH
2551: LD_INT 1
2553: PPUSH
2554: CALL_OW 55
// end ; end_of_file
2558: END
// export sklad , sklad2 , i4 , i3 ; var sklad , level ; every 0 0$01 do
2559: GO 2561
2561: DISABLE
// begin sklad := Filterallunits ( [ [ f_side , 4 ] , [ f_btype , b_depot ] ] ) ;
2562: LD_ADDR_LOC 4
2566: PUSH
2567: LD_INT 22
2569: PUSH
2570: LD_INT 4
2572: PUSH
2573: EMPTY
2574: LIST
2575: LIST
2576: PUSH
2577: LD_INT 30
2579: PUSH
2580: LD_INT 0
2582: PUSH
2583: EMPTY
2584: LIST
2585: LIST
2586: PUSH
2587: EMPTY
2588: LIST
2589: LIST
2590: PPUSH
2591: CALL_OW 69
2595: ST_TO_ADDR
// SetBName ( sklad , mobaus ) ;
2596: LD_LOC 4
2600: PPUSH
2601: LD_STRING mobaus
2603: PPUSH
2604: CALL_OW 500
// end ;
2608: END
// every 0 0$60 do
2609: GO 2611
2611: DISABLE
// begin enable ;
2612: ENABLE
// for i3 in sklad do
2613: LD_ADDR_EXP 27
2617: PUSH
2618: LD_LOC 4
2622: PUSH
2623: FOR_IN
2624: IFFALSE 2820
// begin if GetLives ( sklad ) <= 1000 then
2626: LD_LOC 4
2630: PPUSH
2631: CALL_OW 256
2635: PUSH
2636: LD_INT 1000
2638: LESSEQUAL
2639: IFFALSE 2818
// begin Level = [ 2 , 3 , 4 ] [ Difficulty ] ;
2641: LD_ADDR_LOC 5
2645: PUSH
2646: LD_INT 2
2648: PUSH
2649: LD_INT 3
2651: PUSH
2652: LD_INT 4
2654: PUSH
2655: EMPTY
2656: LIST
2657: LIST
2658: LIST
2659: PUSH
2660: LD_OWVAR 67
2664: ARRAY
2665: ST_TO_ADDR
// uc_side = 4 ;
2666: LD_ADDR_OWVAR 20
2670: PUSH
2671: LD_INT 4
2673: ST_TO_ADDR
// uc_nation = 1 ;
2674: LD_ADDR_OWVAR 21
2678: PUSH
2679: LD_INT 1
2681: ST_TO_ADDR
// hc_gallery =  ;
2682: LD_ADDR_OWVAR 33
2686: PUSH
2687: LD_STRING 
2689: ST_TO_ADDR
// hc_name =  ;
2690: LD_ADDR_OWVAR 26
2694: PUSH
2695: LD_STRING 
2697: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
2698: LD_ADDR_OWVAR 29
2702: PUSH
2703: LD_INT 9
2705: PPUSH
2706: LD_INT 11
2708: PPUSH
2709: CALL_OW 12
2713: PUSH
2714: LD_INT 10
2716: PPUSH
2717: LD_INT 12
2719: PPUSH
2720: CALL_OW 12
2724: PUSH
2725: EMPTY
2726: LIST
2727: LIST
2728: ST_TO_ADDR
// hc_skills = [ Level , 1 , Rand ( 2 , 5 ) , Rand ( 0 , 2 ) ] ;
2729: LD_ADDR_OWVAR 31
2733: PUSH
2734: LD_LOC 5
2738: PUSH
2739: LD_INT 1
2741: PUSH
2742: LD_INT 2
2744: PPUSH
2745: LD_INT 5
2747: PPUSH
2748: CALL_OW 12
2752: PUSH
2753: LD_INT 0
2755: PPUSH
2756: LD_INT 2
2758: PPUSH
2759: CALL_OW 12
2763: PUSH
2764: EMPTY
2765: LIST
2766: LIST
2767: LIST
2768: LIST
2769: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
2770: LD_ADDR_OWVAR 27
2774: PUSH
2775: LD_INT 1
2777: PPUSH
2778: LD_INT 2
2780: PPUSH
2781: CALL_OW 12
2785: ST_TO_ADDR
// hc_class = 2 ;
2786: LD_ADDR_OWVAR 28
2790: PUSH
2791: LD_INT 2
2793: ST_TO_ADDR
// un2 := CreateHuman ;
2794: LD_ADDR_EXP 12
2798: PUSH
2799: CALL_OW 44
2803: ST_TO_ADDR
// PlaceHumanInUnit ( un2 , i3 ) ;
2804: LD_EXP 12
2808: PPUSH
2809: LD_EXP 27
2813: PPUSH
2814: CALL_OW 52
// end ; end ;
2818: GO 2623
2820: POP
2821: POP
// end ;
2822: END
// every 0 0$01 do
2823: GO 2825
2825: DISABLE
// begin sklad2 := Filterallunits ( [ [ f_side , 3 ] , [ f_btype , b_depot ] ] ) ;
2826: LD_ADDR_EXP 25
2830: PUSH
2831: LD_INT 22
2833: PUSH
2834: LD_INT 3
2836: PUSH
2837: EMPTY
2838: LIST
2839: LIST
2840: PUSH
2841: LD_INT 30
2843: PUSH
2844: LD_INT 0
2846: PUSH
2847: EMPTY
2848: LIST
2849: LIST
2850: PUSH
2851: EMPTY
2852: LIST
2853: LIST
2854: PPUSH
2855: CALL_OW 69
2859: ST_TO_ADDR
// SetBName ( sklad2 , mobaru ) ;
2860: LD_EXP 25
2864: PPUSH
2865: LD_STRING mobaru
2867: PPUSH
2868: CALL_OW 500
// end ;
2872: END
// every 0 0$60 do
2873: GO 2875
2875: DISABLE
// begin enable ;
2876: ENABLE
// for i4 in sklad2 do
2877: LD_ADDR_EXP 26
2881: PUSH
2882: LD_EXP 25
2886: PUSH
2887: FOR_IN
2888: IFFALSE 3084
// begin if GetLives ( sklad2 ) <= 1000 then
2890: LD_EXP 25
2894: PPUSH
2895: CALL_OW 256
2899: PUSH
2900: LD_INT 1000
2902: LESSEQUAL
2903: IFFALSE 3082
// begin Level = [ 3 , 2 , 0 ] [ Difficulty ] ;
2905: LD_ADDR_LOC 5
2909: PUSH
2910: LD_INT 3
2912: PUSH
2913: LD_INT 2
2915: PUSH
2916: LD_INT 0
2918: PUSH
2919: EMPTY
2920: LIST
2921: LIST
2922: LIST
2923: PUSH
2924: LD_OWVAR 67
2928: ARRAY
2929: ST_TO_ADDR
// uc_side = 3 ;
2930: LD_ADDR_OWVAR 20
2934: PUSH
2935: LD_INT 3
2937: ST_TO_ADDR
// uc_nation = 3 ;
2938: LD_ADDR_OWVAR 21
2942: PUSH
2943: LD_INT 3
2945: ST_TO_ADDR
// hc_gallery =  ;
2946: LD_ADDR_OWVAR 33
2950: PUSH
2951: LD_STRING 
2953: ST_TO_ADDR
// hc_name =  ;
2954: LD_ADDR_OWVAR 26
2958: PUSH
2959: LD_STRING 
2961: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
2962: LD_ADDR_OWVAR 29
2966: PUSH
2967: LD_INT 9
2969: PPUSH
2970: LD_INT 11
2972: PPUSH
2973: CALL_OW 12
2977: PUSH
2978: LD_INT 10
2980: PPUSH
2981: LD_INT 12
2983: PPUSH
2984: CALL_OW 12
2988: PUSH
2989: EMPTY
2990: LIST
2991: LIST
2992: ST_TO_ADDR
// hc_skills = [ Level , 1 , Rand ( 2 , 5 ) , Rand ( 0 , 2 ) ] ;
2993: LD_ADDR_OWVAR 31
2997: PUSH
2998: LD_LOC 5
3002: PUSH
3003: LD_INT 1
3005: PUSH
3006: LD_INT 2
3008: PPUSH
3009: LD_INT 5
3011: PPUSH
3012: CALL_OW 12
3016: PUSH
3017: LD_INT 0
3019: PPUSH
3020: LD_INT 2
3022: PPUSH
3023: CALL_OW 12
3027: PUSH
3028: EMPTY
3029: LIST
3030: LIST
3031: LIST
3032: LIST
3033: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
3034: LD_ADDR_OWVAR 27
3038: PUSH
3039: LD_INT 1
3041: PPUSH
3042: LD_INT 2
3044: PPUSH
3045: CALL_OW 12
3049: ST_TO_ADDR
// hc_class = 2 ;
3050: LD_ADDR_OWVAR 28
3054: PUSH
3055: LD_INT 2
3057: ST_TO_ADDR
// un3 := CreateHuman ;
3058: LD_ADDR_EXP 13
3062: PUSH
3063: CALL_OW 44
3067: ST_TO_ADDR
// PlaceHumanInUnit ( un3 , i4 ) ;
3068: LD_EXP 13
3072: PPUSH
3073: LD_EXP 26
3077: PPUSH
3078: CALL_OW 52
// end ; end ;
3082: GO 2887
3084: POP
3085: POP
// end ; end_of_file
3086: END
// export function WOWOWO ; var i , atakujacy , broniacy , naprawiam ; begin
3087: LD_INT 0
3089: PPUSH
3090: PPUSH
3091: PPUSH
3092: PPUSH
3093: PPUSH
// broniacy = FilterAllUnits ( [ f_side , 6 ] ) ;
3094: LD_ADDR_VAR 0 4
3098: PUSH
3099: LD_INT 22
3101: PUSH
3102: LD_INT 6
3104: PUSH
3105: EMPTY
3106: LIST
3107: LIST
3108: PPUSH
3109: CALL_OW 69
3113: ST_TO_ADDR
// atakujacy = FilterAllUnits ( [ f_side , 1 ] ) ;
3114: LD_ADDR_VAR 0 3
3118: PUSH
3119: LD_INT 22
3121: PUSH
3122: LD_INT 1
3124: PUSH
3125: EMPTY
3126: LIST
3127: LIST
3128: PPUSH
3129: CALL_OW 69
3133: ST_TO_ADDR
// naprawiam = filterallunits ( [ f_side , 3 ] ) ;
3134: LD_ADDR_VAR 0 5
3138: PUSH
3139: LD_INT 22
3141: PUSH
3142: LD_INT 3
3144: PUSH
3145: EMPTY
3146: LIST
3147: LIST
3148: PPUSH
3149: CALL_OW 69
3153: ST_TO_ADDR
// for i in atakujacy do
3154: LD_ADDR_VAR 0 2
3158: PUSH
3159: LD_VAR 0 3
3163: PUSH
3164: FOR_IN
3165: IFFALSE 3224
// begin ComAttackUnit ( i , NearestUnitToUnit ( naprawiam , i ) ) ;
3167: LD_VAR 0 2
3171: PPUSH
3172: LD_VAR 0 5
3176: PPUSH
3177: LD_VAR 0 2
3181: PPUSH
3182: CALL_OW 74
3186: PPUSH
3187: CALL_OW 115
// wait ( 0 0$0.7 ) ;
3191: LD_INT 24
3193: PPUSH
3194: CALL_OW 67
// ComAttackUnit ( i , NearestUnitToUnit ( broniacy , i ) ) ;
3198: LD_VAR 0 2
3202: PPUSH
3203: LD_VAR 0 4
3207: PPUSH
3208: LD_VAR 0 2
3212: PPUSH
3213: CALL_OW 74
3217: PPUSH
3218: CALL_OW 115
// end ;
3222: GO 3164
3224: POP
3225: POP
// end ;
3226: LD_VAR 0 1
3230: RET
// every 0 0$0.3 do
3231: GO 3233
3233: DISABLE
// begin WOWOWO ;
3234: CALL 3087 0 0
// enable ;
3238: ENABLE
// end ;
3239: END
// export function OP ; var i1 , atakujacy1 , broniacy1 ; begin
3240: LD_INT 0
3242: PPUSH
3243: PPUSH
3244: PPUSH
3245: PPUSH
// broniacy1 = FilterAllUnits ( [ f_side , 1 ] ) ;
3246: LD_ADDR_VAR 0 4
3250: PUSH
3251: LD_INT 22
3253: PUSH
3254: LD_INT 1
3256: PUSH
3257: EMPTY
3258: LIST
3259: LIST
3260: PPUSH
3261: CALL_OW 69
3265: ST_TO_ADDR
// atakujacy1 = FilterAllUnits ( [ f_side , 6 ] ) ;
3266: LD_ADDR_VAR 0 3
3270: PUSH
3271: LD_INT 22
3273: PUSH
3274: LD_INT 6
3276: PUSH
3277: EMPTY
3278: LIST
3279: LIST
3280: PPUSH
3281: CALL_OW 69
3285: ST_TO_ADDR
// for i1 in atakujacy1 do
3286: LD_ADDR_VAR 0 2
3290: PUSH
3291: LD_VAR 0 3
3295: PUSH
3296: FOR_IN
3297: IFFALSE 3325
// begin ComAttackUnit ( i1 , NearestUnitToUnit ( broniacy1 , i1 ) ) ;
3299: LD_VAR 0 2
3303: PPUSH
3304: LD_VAR 0 4
3308: PPUSH
3309: LD_VAR 0 2
3313: PPUSH
3314: CALL_OW 74
3318: PPUSH
3319: CALL_OW 115
// end ;
3323: GO 3296
3325: POP
3326: POP
// end ;
3327: LD_VAR 0 1
3331: RET
// every 0 0$2 do
3332: GO 3334
3334: DISABLE
// begin OP ;
3335: CALL 3240 0 0
// enable ;
3339: ENABLE
// end ; end_of_file
3340: END
// export lab , i999 ; var lab , level ; every 0 0$30 do
3341: GO 3343
3343: DISABLE
// begin enable ;
3344: ENABLE
// lab := Filterallunits ( [ [ f_side , 3 ] , [ f_btype , b_lab ] ] ) ;
3345: LD_ADDR_LOC 6
3349: PUSH
3350: LD_INT 22
3352: PUSH
3353: LD_INT 3
3355: PUSH
3356: EMPTY
3357: LIST
3358: LIST
3359: PUSH
3360: LD_INT 30
3362: PUSH
3363: LD_INT 6
3365: PUSH
3366: EMPTY
3367: LIST
3368: LIST
3369: PUSH
3370: EMPTY
3371: LIST
3372: LIST
3373: PPUSH
3374: CALL_OW 69
3378: ST_TO_ADDR
// for i999 in lab do
3379: LD_ADDR_EXP 29
3383: PUSH
3384: LD_LOC 6
3388: PUSH
3389: FOR_IN
3390: IFFALSE 3600
// begin if GetLives ( lab ) <= 1000 then
3392: LD_LOC 6
3396: PPUSH
3397: CALL_OW 256
3401: PUSH
3402: LD_INT 1000
3404: LESSEQUAL
3405: IFFALSE 3598
// begin Level = [ 0 , 1 , 2 ] [ Difficulty ] ;
3407: LD_ADDR_LOC 7
3411: PUSH
3412: LD_INT 0
3414: PUSH
3415: LD_INT 1
3417: PUSH
3418: LD_INT 2
3420: PUSH
3421: EMPTY
3422: LIST
3423: LIST
3424: LIST
3425: PUSH
3426: LD_OWVAR 67
3430: ARRAY
3431: ST_TO_ADDR
// uc_side = 3 ;
3432: LD_ADDR_OWVAR 20
3436: PUSH
3437: LD_INT 3
3439: ST_TO_ADDR
// uc_nation = 3 ;
3440: LD_ADDR_OWVAR 21
3444: PUSH
3445: LD_INT 3
3447: ST_TO_ADDR
// hc_gallery =  ;
3448: LD_ADDR_OWVAR 33
3452: PUSH
3453: LD_STRING 
3455: ST_TO_ADDR
// hc_name =  ;
3456: LD_ADDR_OWVAR 26
3460: PUSH
3461: LD_STRING 
3463: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
3464: LD_ADDR_OWVAR 29
3468: PUSH
3469: LD_INT 9
3471: PPUSH
3472: LD_INT 11
3474: PPUSH
3475: CALL_OW 12
3479: PUSH
3480: LD_INT 10
3482: PPUSH
3483: LD_INT 12
3485: PPUSH
3486: CALL_OW 12
3490: PUSH
3491: EMPTY
3492: LIST
3493: LIST
3494: ST_TO_ADDR
// hc_skills = [ Rand ( 0 , 3 ) , Rand ( 0 , 3 ) , Rand ( 0 , 3 ) , Rand ( 0 , 3 ) ] ;
3495: LD_ADDR_OWVAR 31
3499: PUSH
3500: LD_INT 0
3502: PPUSH
3503: LD_INT 3
3505: PPUSH
3506: CALL_OW 12
3510: PUSH
3511: LD_INT 0
3513: PPUSH
3514: LD_INT 3
3516: PPUSH
3517: CALL_OW 12
3521: PUSH
3522: LD_INT 0
3524: PPUSH
3525: LD_INT 3
3527: PPUSH
3528: CALL_OW 12
3532: PUSH
3533: LD_INT 0
3535: PPUSH
3536: LD_INT 3
3538: PPUSH
3539: CALL_OW 12
3543: PUSH
3544: EMPTY
3545: LIST
3546: LIST
3547: LIST
3548: LIST
3549: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
3550: LD_ADDR_OWVAR 27
3554: PUSH
3555: LD_INT 1
3557: PPUSH
3558: LD_INT 2
3560: PPUSH
3561: CALL_OW 12
3565: ST_TO_ADDR
// hc_class = 1 ;
3566: LD_ADDR_OWVAR 28
3570: PUSH
3571: LD_INT 1
3573: ST_TO_ADDR
// un4 := CreateHuman ;
3574: LD_ADDR_EXP 14
3578: PUSH
3579: CALL_OW 44
3583: ST_TO_ADDR
// PlaceHumanInUnit ( un4 , i999 ) ;
3584: LD_EXP 14
3588: PPUSH
3589: LD_EXP 29
3593: PPUSH
3594: CALL_OW 52
// end ; end ;
3598: GO 3389
3600: POP
3601: POP
// end ; end_of_file
3602: END
// export time ; every 1 do
3603: GO 3605
3605: DISABLE
// time := 0 0$00 ;
3606: LD_ADDR_EXP 30
3610: PUSH
3611: LD_INT 0
3613: ST_TO_ADDR
3614: END
// every 0 0$01 do
3615: GO 3617
3617: DISABLE
// begin enable ;
3618: ENABLE
// time := time + 0 0$01 ;
3619: LD_ADDR_EXP 30
3623: PUSH
3624: LD_EXP 30
3628: PUSH
3629: LD_INT 35
3631: PLUS
3632: ST_TO_ADDR
// Display_Strings := [ #timer , time ] ;
3633: LD_ADDR_OWVAR 47
3637: PUSH
3638: LD_STRING #timer
3640: PUSH
3641: LD_EXP 30
3645: PUSH
3646: EMPTY
3647: LIST
3648: LIST
3649: ST_TO_ADDR
// end ; end_of_file
3650: END
// export sib_bomb , ludzie ; var sib_bomb , ludzie ; every 25 25$00 do
3651: GO 3653
3653: DISABLE
// begin say ( postac2 , dr2 ) ;
3654: LD_EXP 2
3658: PPUSH
3659: LD_STRING dr2
3661: PPUSH
3662: CALL_OW 88
// sib_bomb := FilterAllUnits ( [ [ f_side , 7 ] , [ f_weapon , ru_siberium_rocket ] ] ) ;
3666: LD_ADDR_LOC 8
3670: PUSH
3671: LD_INT 22
3673: PUSH
3674: LD_INT 7
3676: PUSH
3677: EMPTY
3678: LIST
3679: LIST
3680: PUSH
3681: LD_INT 34
3683: PUSH
3684: LD_INT 48
3686: PUSH
3687: EMPTY
3688: LIST
3689: LIST
3690: PUSH
3691: EMPTY
3692: LIST
3693: LIST
3694: PPUSH
3695: CALL_OW 69
3699: ST_TO_ADDR
// if sib_bomb = 0 then
3700: LD_LOC 8
3704: PUSH
3705: LD_INT 0
3707: EQUAL
3708: IFFALSE 3742
// begin sendsiberiterocket ( 54 , 67 ) ;
3710: LD_INT 54
3712: PPUSH
3713: LD_INT 67
3715: PPUSH
3716: CALL_OW 429
// sendsiberiterocket ( 54 , 67 ) ;
3720: LD_INT 54
3722: PPUSH
3723: LD_INT 67
3725: PPUSH
3726: CALL_OW 429
// sendsiberiterocket ( 54 , 67 ) ;
3730: LD_INT 54
3732: PPUSH
3733: LD_INT 67
3735: PPUSH
3736: CALL_OW 429
// end else
3740: GO 3757
// ComAttackPlace ( sib_bomb , 54 , 67 ) ;
3742: LD_LOC 8
3746: PPUSH
3747: LD_INT 54
3749: PPUSH
3750: LD_INT 67
3752: PPUSH
3753: CALL_OW 116
// end ; end_of_file
3757: END
// export solar1 ; var solar1 ; every 1 1$00 do
3758: GO 3760
3760: DISABLE
// begin solar1 := filterallunits ( [ [ f_side , 4 ] , [ f_btype , b_solar_power ] ] ) ;
3761: LD_ADDR_LOC 10
3765: PUSH
3766: LD_INT 22
3768: PUSH
3769: LD_INT 4
3771: PUSH
3772: EMPTY
3773: LIST
3774: LIST
3775: PUSH
3776: LD_INT 30
3778: PUSH
3779: LD_INT 27
3781: PUSH
3782: EMPTY
3783: LIST
3784: LIST
3785: PUSH
3786: EMPTY
3787: LIST
3788: LIST
3789: PPUSH
3790: CALL_OW 69
3794: ST_TO_ADDR
// setside ( solar1 , 1 ) ;
3795: LD_LOC 10
3799: PPUSH
3800: LD_INT 1
3802: PPUSH
3803: CALL_OW 235
// enable ;
3807: ENABLE
// end ; end_of_file
3808: END
// every 0 0$20 do
3809: GO 3811
3811: DISABLE
// begin comexitbuilding ( un ) ;
3812: LD_EXP 8
3816: PPUSH
3817: CALL_OW 122
// comagressivemove ( un , 61 , 66 ) ;
3821: LD_EXP 8
3825: PPUSH
3826: LD_INT 61
3828: PPUSH
3829: LD_INT 66
3831: PPUSH
3832: CALL_OW 114
// enable ;
3836: ENABLE
// end ;
3837: END
// every 0 0$20 do
3838: GO 3840
3840: DISABLE
// begin comexitbuilding ( un1 ) ;
3841: LD_EXP 11
3845: PPUSH
3846: CALL_OW 122
// comagressivemove ( un1 , 26 , 6 ) ;
3850: LD_EXP 11
3854: PPUSH
3855: LD_INT 26
3857: PPUSH
3858: LD_INT 6
3860: PPUSH
3861: CALL_OW 114
// enable ;
3865: ENABLE
// end ; end_of_file
3866: END
// every 2 2$30 do
3867: GO 3869
3869: DISABLE
// begin saveforquickrestart ;
3870: CALL_OW 22
// enable ;
3874: ENABLE
// end ;
3875: END
