// export enemyattack ; starting begin disable ( 1 ) ;
   0: LD_INT 1
   2: DISABLE_MARKED
// resetfog ;
   3: CALL_OW 335
// ChangeSide ;
   7: CALL 281 0 0
// enemyattack = 0 ;
  11: LD_ADDR_EXP 1
  15: PUSH
  16: LD_INT 0
  18: ST_TO_ADDR
// SaveForQuickRestart ;
  19: CALL_OW 22
// CenteronUnits ( AL ) ;
  23: LD_INT 292
  25: PPUSH
  26: CALL_OW 85
// Ingameon ;
  30: CALL_OW 8
// Dialogueon ;
  34: CALL_OW 6
// Say ( AL , d1 ) ;
  38: LD_INT 292
  40: PPUSH
  41: LD_STRING d1
  43: PPUSH
  44: CALL_OW 88
// SayRadio ( AB , d2 ) ;
  48: LD_INT 296
  50: PPUSH
  51: LD_STRING d2
  53: PPUSH
  54: CALL_OW 94
// Say ( AL , d3 ) ;
  58: LD_INT 292
  60: PPUSH
  61: LD_STRING d3
  63: PPUSH
  64: CALL_OW 88
// SayRadio ( AB , d4 ) ;
  68: LD_INT 296
  70: PPUSH
  71: LD_STRING d4
  73: PPUSH
  74: CALL_OW 94
// Say ( AL , d5 ) ;
  78: LD_INT 292
  80: PPUSH
  81: LD_STRING d5
  83: PPUSH
  84: CALL_OW 88
// SayRadio ( AB , d6 ) ;
  88: LD_INT 296
  90: PPUSH
  91: LD_STRING d6
  93: PPUSH
  94: CALL_OW 94
// Dialogueoff ;
  98: CALL_OW 7
// Ingameoff ;
 102: CALL_OW 9
// wait ( 0 0$01 ) ;
 106: LD_INT 35
 108: PPUSH
 109: CALL_OW 67
// ChangeMissionObjectives ( CEL1 ) ;
 113: LD_STRING CEL1
 115: PPUSH
 116: CALL_OW 337
// ChangeMissionObjectives ( CEL4 ) ;
 120: LD_STRING CEL4
 122: PPUSH
 123: CALL_OW 337
// wait ( 0 0$01 ) ;
 127: LD_INT 35
 129: PPUSH
 130: CALL_OW 67
// SayRadio ( AB , d6a ) ;
 134: LD_INT 296
 136: PPUSH
 137: LD_STRING d6a
 139: PPUSH
 140: CALL_OW 94
// Say ( AL , d6b ) ;
 144: LD_INT 292
 146: PPUSH
 147: LD_STRING d6b
 149: PPUSH
 150: CALL_OW 88
// wait ( 15 15$0 ) ;
 154: LD_INT 31500
 156: PPUSH
 157: CALL_OW 67
// enable ( 1 ) ;
 161: LD_INT 1
 163: ENABLE_MARKED
// ChangeMissionObjectives ( CEL3 ) ;
 164: LD_STRING CEL3
 166: PPUSH
 167: CALL_OW 337
// ChangeMissionObjectives ( CEL2 ) ;
 171: LD_STRING CEL2
 173: PPUSH
 174: CALL_OW 337
// ChangeMissionObjectives ( CEL5 ) ;
 178: LD_STRING CEL5
 180: PPUSH
 181: CALL_OW 337
// ChangeMissionObjectives ( CEL6 ) ;
 185: LD_STRING CEL6
 187: PPUSH
 188: CALL_OW 337
// EnemyAttack = 1 ;
 192: LD_ADDR_EXP 1
 196: PUSH
 197: LD_INT 1
 199: ST_TO_ADDR
// SayRadio ( AB , d6c ) ;
 200: LD_INT 296
 202: PPUSH
 203: LD_STRING d6c
 205: PPUSH
 206: CALL_OW 94
// SayRadio ( C , d9 ) ;
 210: LD_INT 301
 212: PPUSH
 213: LD_STRING d9
 215: PPUSH
 216: CALL_OW 94
// SayRadio ( KD , d10 ) ;
 220: LD_INT 306
 222: PPUSH
 223: LD_STRING d10
 225: PPUSH
 226: CALL_OW 94
// SayRadio ( AB , d11 ) ;
 230: LD_INT 296
 232: PPUSH
 233: LD_STRING d11
 235: PPUSH
 236: CALL_OW 94
// wait ( 10 10$0 ) ;
 240: LD_INT 21000
 242: PPUSH
 243: CALL_OW 67
// arabattack ;
 247: CALL 3354 0 0
// wait ( 0 0$1 ) ;
 251: LD_INT 35
 253: PPUSH
 254: CALL_OW 67
// SayRadio ( soldat1 , d7 ) ;
 258: LD_EXP 24
 262: PPUSH
 263: LD_STRING d7
 265: PPUSH
 266: CALL_OW 94
// SayRadio ( AB , d8 ) ;
 270: LD_INT 296
 272: PPUSH
 273: LD_STRING d8
 275: PPUSH
 276: CALL_OW 94
// end ;
 280: END
// export function ChangeSide ; var un , kinlist ; begin
 281: LD_INT 0
 283: PPUSH
 284: PPUSH
 285: PPUSH
// kinlist = FilterAllUnits ( [ f_side , 8 ] ) ;
 286: LD_ADDR_VAR 0 3
 290: PUSH
 291: LD_INT 22
 293: PUSH
 294: LD_INT 8
 296: PUSH
 297: EMPTY
 298: LIST
 299: LIST
 300: PPUSH
 301: CALL_OW 69
 305: ST_TO_ADDR
// for un in kinlist do
 306: LD_ADDR_VAR 0 2
 310: PUSH
 311: LD_VAR 0 3
 315: PUSH
 316: FOR_IN
 317: IFFALSE 333
// begin SetSide ( un , 2 ) ;
 319: LD_VAR 0 2
 323: PPUSH
 324: LD_INT 2
 326: PPUSH
 327: CALL_OW 235
// end ;
 331: GO 316
 333: POP
 334: POP
// end ; end_of_file
 335: LD_VAR 0 1
 339: RET
// export rp1 , rp2 , rp3 , rp4 , rp5 , rp6 , rp7 , rp8 ; export function AmericanAttack1 ; var ap1 , ap2 , ap3 , ap4 , ap5 , ap6 , ap7 , ap8 ; begin
 340: LD_INT 0
 342: PPUSH
 343: PPUSH
 344: PPUSH
 345: PPUSH
 346: PPUSH
 347: PPUSH
 348: PPUSH
 349: PPUSH
 350: PPUSH
// uc_side = 1 ;
 351: LD_ADDR_OWVAR 20
 355: PUSH
 356: LD_INT 1
 358: ST_TO_ADDR
// uc_nation = 1 ;
 359: LD_ADDR_OWVAR 21
 363: PUSH
 364: LD_INT 1
 366: ST_TO_ADDR
// vc_chassis = 5 ;
 367: LD_ADDR_OWVAR 37
 371: PUSH
 372: LD_INT 5
 374: ST_TO_ADDR
// vc_engine = 3 ;
 375: LD_ADDR_OWVAR 39
 379: PUSH
 380: LD_INT 3
 382: ST_TO_ADDR
// vc_control = 3 ;
 383: LD_ADDR_OWVAR 38
 387: PUSH
 388: LD_INT 3
 390: ST_TO_ADDR
// vc_weapon = 4 ;
 391: LD_ADDR_OWVAR 40
 395: PUSH
 396: LD_INT 4
 398: ST_TO_ADDR
// ap1 = CreateVehicle ;
 399: LD_ADDR_VAR 0 2
 403: PUSH
 404: CALL_OW 45
 408: ST_TO_ADDR
// ap2 = CreateVehicle ;
 409: LD_ADDR_VAR 0 3
 413: PUSH
 414: CALL_OW 45
 418: ST_TO_ADDR
// ap3 = CreateVehicle ;
 419: LD_ADDR_VAR 0 4
 423: PUSH
 424: CALL_OW 45
 428: ST_TO_ADDR
// ap4 = CreateVehicle ;
 429: LD_ADDR_VAR 0 5
 433: PUSH
 434: CALL_OW 45
 438: ST_TO_ADDR
// vc_weapon = 6 ;
 439: LD_ADDR_OWVAR 40
 443: PUSH
 444: LD_INT 6
 446: ST_TO_ADDR
// ap5 = CreateVehicle ;
 447: LD_ADDR_VAR 0 6
 451: PUSH
 452: CALL_OW 45
 456: ST_TO_ADDR
// ap6 = CreateVehicle ;
 457: LD_ADDR_VAR 0 7
 461: PUSH
 462: CALL_OW 45
 466: ST_TO_ADDR
// ap7 = CreateVehicle ;
 467: LD_ADDR_VAR 0 8
 471: PUSH
 472: CALL_OW 45
 476: ST_TO_ADDR
// ap8 = CreateVehicle ;
 477: LD_ADDR_VAR 0 9
 481: PUSH
 482: CALL_OW 45
 486: ST_TO_ADDR
// PlaceUnitArea ( ap1 , AmericanSpawn1 , false ) ;
 487: LD_VAR 0 2
 491: PPUSH
 492: LD_INT 3
 494: PPUSH
 495: LD_INT 0
 497: PPUSH
 498: CALL_OW 49
// PlaceUnitArea ( ap2 , AmericanSpawn1 , false ) ;
 502: LD_VAR 0 3
 506: PPUSH
 507: LD_INT 3
 509: PPUSH
 510: LD_INT 0
 512: PPUSH
 513: CALL_OW 49
// PlaceUnitArea ( ap3 , AmericanSpawn1 , false ) ;
 517: LD_VAR 0 4
 521: PPUSH
 522: LD_INT 3
 524: PPUSH
 525: LD_INT 0
 527: PPUSH
 528: CALL_OW 49
// PlaceUnitArea ( ap4 , AmericanSpawn1 , false ) ;
 532: LD_VAR 0 5
 536: PPUSH
 537: LD_INT 3
 539: PPUSH
 540: LD_INT 0
 542: PPUSH
 543: CALL_OW 49
// PlaceUnitArea ( ap5 , AmericanSpawn1 , false ) ;
 547: LD_VAR 0 6
 551: PPUSH
 552: LD_INT 3
 554: PPUSH
 555: LD_INT 0
 557: PPUSH
 558: CALL_OW 49
// PlaceUnitArea ( ap6 , AmericanSpawn1 , false ) ;
 562: LD_VAR 0 7
 566: PPUSH
 567: LD_INT 3
 569: PPUSH
 570: LD_INT 0
 572: PPUSH
 573: CALL_OW 49
// PlaceUnitArea ( ap7 , AmericanSpawn1 , false ) ;
 577: LD_VAR 0 8
 581: PPUSH
 582: LD_INT 3
 584: PPUSH
 585: LD_INT 0
 587: PPUSH
 588: CALL_OW 49
// PlaceUnitArea ( ap8 , AmericanSpawn1 , false ) ;
 592: LD_VAR 0 9
 596: PPUSH
 597: LD_INT 3
 599: PPUSH
 600: LD_INT 0
 602: PPUSH
 603: CALL_OW 49
// ComAgressiveMove ( [ ap1 , ap2 , ap3 , ap4 , ap5 , ap6 , ap7 , ap8 ] , 126 , 113 ) ;
 607: LD_VAR 0 2
 611: PUSH
 612: LD_VAR 0 3
 616: PUSH
 617: LD_VAR 0 4
 621: PUSH
 622: LD_VAR 0 5
 626: PUSH
 627: LD_VAR 0 6
 631: PUSH
 632: LD_VAR 0 7
 636: PUSH
 637: LD_VAR 0 8
 641: PUSH
 642: LD_VAR 0 9
 646: PUSH
 647: EMPTY
 648: LIST
 649: LIST
 650: LIST
 651: LIST
 652: LIST
 653: LIST
 654: LIST
 655: LIST
 656: PPUSH
 657: LD_INT 126
 659: PPUSH
 660: LD_INT 113
 662: PPUSH
 663: CALL_OW 114
// end ;
 667: LD_VAR 0 1
 671: RET
// export function AmericanAttack2 ; var ap1 , ap2 , ap3 , ap4 , ap5 , ap6 , ap7 , ap8 ; begin
 672: LD_INT 0
 674: PPUSH
 675: PPUSH
 676: PPUSH
 677: PPUSH
 678: PPUSH
 679: PPUSH
 680: PPUSH
 681: PPUSH
 682: PPUSH
// uc_side = 4 ;
 683: LD_ADDR_OWVAR 20
 687: PUSH
 688: LD_INT 4
 690: ST_TO_ADDR
// uc_nation = 1 ;
 691: LD_ADDR_OWVAR 21
 695: PUSH
 696: LD_INT 1
 698: ST_TO_ADDR
// vc_chassis = 5 ;
 699: LD_ADDR_OWVAR 37
 703: PUSH
 704: LD_INT 5
 706: ST_TO_ADDR
// vc_engine = 3 ;
 707: LD_ADDR_OWVAR 39
 711: PUSH
 712: LD_INT 3
 714: ST_TO_ADDR
// vc_control = 3 ;
 715: LD_ADDR_OWVAR 38
 719: PUSH
 720: LD_INT 3
 722: ST_TO_ADDR
// vc_weapon = 6 ;
 723: LD_ADDR_OWVAR 40
 727: PUSH
 728: LD_INT 6
 730: ST_TO_ADDR
// ap1 = CreateVehicle ;
 731: LD_ADDR_VAR 0 2
 735: PUSH
 736: CALL_OW 45
 740: ST_TO_ADDR
// ap2 = CreateVehicle ;
 741: LD_ADDR_VAR 0 3
 745: PUSH
 746: CALL_OW 45
 750: ST_TO_ADDR
// ap3 = CreateVehicle ;
 751: LD_ADDR_VAR 0 4
 755: PUSH
 756: CALL_OW 45
 760: ST_TO_ADDR
// ap4 = CreateVehicle ;
 761: LD_ADDR_VAR 0 5
 765: PUSH
 766: CALL_OW 45
 770: ST_TO_ADDR
// vc_weapon = 4 ;
 771: LD_ADDR_OWVAR 40
 775: PUSH
 776: LD_INT 4
 778: ST_TO_ADDR
// ap5 = CreateVehicle ;
 779: LD_ADDR_VAR 0 6
 783: PUSH
 784: CALL_OW 45
 788: ST_TO_ADDR
// ap6 = CreateVehicle ;
 789: LD_ADDR_VAR 0 7
 793: PUSH
 794: CALL_OW 45
 798: ST_TO_ADDR
// ap7 = CreateVehicle ;
 799: LD_ADDR_VAR 0 8
 803: PUSH
 804: CALL_OW 45
 808: ST_TO_ADDR
// ap8 = CreateVehicle ;
 809: LD_ADDR_VAR 0 9
 813: PUSH
 814: CALL_OW 45
 818: ST_TO_ADDR
// PlaceUnitArea ( ap1 , AmericanSpawn2 , false ) ;
 819: LD_VAR 0 2
 823: PPUSH
 824: LD_INT 4
 826: PPUSH
 827: LD_INT 0
 829: PPUSH
 830: CALL_OW 49
// PlaceUnitArea ( ap2 , AmericanSpawn2 , false ) ;
 834: LD_VAR 0 3
 838: PPUSH
 839: LD_INT 4
 841: PPUSH
 842: LD_INT 0
 844: PPUSH
 845: CALL_OW 49
// PlaceUnitArea ( ap3 , AmericanSpawn2 , false ) ;
 849: LD_VAR 0 4
 853: PPUSH
 854: LD_INT 4
 856: PPUSH
 857: LD_INT 0
 859: PPUSH
 860: CALL_OW 49
// PlaceUnitArea ( ap4 , AmericanSpawn2 , false ) ;
 864: LD_VAR 0 5
 868: PPUSH
 869: LD_INT 4
 871: PPUSH
 872: LD_INT 0
 874: PPUSH
 875: CALL_OW 49
// PlaceUnitArea ( ap5 , AmericanSpawn2 , false ) ;
 879: LD_VAR 0 6
 883: PPUSH
 884: LD_INT 4
 886: PPUSH
 887: LD_INT 0
 889: PPUSH
 890: CALL_OW 49
// PlaceUnitArea ( ap6 , AmericanSpawn2 , false ) ;
 894: LD_VAR 0 7
 898: PPUSH
 899: LD_INT 4
 901: PPUSH
 902: LD_INT 0
 904: PPUSH
 905: CALL_OW 49
// PlaceUnitArea ( ap7 , AmericanSpawn2 , false ) ;
 909: LD_VAR 0 8
 913: PPUSH
 914: LD_INT 4
 916: PPUSH
 917: LD_INT 0
 919: PPUSH
 920: CALL_OW 49
// PlaceUnitArea ( ap8 , AmericanSpawn2 , false ) ;
 924: LD_VAR 0 9
 928: PPUSH
 929: LD_INT 4
 931: PPUSH
 932: LD_INT 0
 934: PPUSH
 935: CALL_OW 49
// ComAgressiveMove ( [ ap1 , ap2 , ap3 , ap4 , ap5 , ap6 , ap7 , ap8 ] , 157 , 112 ) ;
 939: LD_VAR 0 2
 943: PUSH
 944: LD_VAR 0 3
 948: PUSH
 949: LD_VAR 0 4
 953: PUSH
 954: LD_VAR 0 5
 958: PUSH
 959: LD_VAR 0 6
 963: PUSH
 964: LD_VAR 0 7
 968: PUSH
 969: LD_VAR 0 8
 973: PUSH
 974: LD_VAR 0 9
 978: PUSH
 979: EMPTY
 980: LIST
 981: LIST
 982: LIST
 983: LIST
 984: LIST
 985: LIST
 986: LIST
 987: LIST
 988: PPUSH
 989: LD_INT 157
 991: PPUSH
 992: LD_INT 112
 994: PPUSH
 995: CALL_OW 114
// ComAgressiveMove ( [ ap1 , ap2 , ap3 , ap4 , ap5 , ap6 , ap7 , ap8 ] , 157 , 112 ) ;
 999: LD_VAR 0 2
1003: PUSH
1004: LD_VAR 0 3
1008: PUSH
1009: LD_VAR 0 4
1013: PUSH
1014: LD_VAR 0 5
1018: PUSH
1019: LD_VAR 0 6
1023: PUSH
1024: LD_VAR 0 7
1028: PUSH
1029: LD_VAR 0 8
1033: PUSH
1034: LD_VAR 0 9
1038: PUSH
1039: EMPTY
1040: LIST
1041: LIST
1042: LIST
1043: LIST
1044: LIST
1045: LIST
1046: LIST
1047: LIST
1048: PPUSH
1049: LD_INT 157
1051: PPUSH
1052: LD_INT 112
1054: PPUSH
1055: CALL_OW 114
// end ;
1059: LD_VAR 0 1
1063: RET
// export hg5 , hg6 , hg7 , hg8 , hg9 , hg10 ; export function ruattack ; begin
1064: LD_INT 0
1066: PPUSH
// uc_side = 3 ;
1067: LD_ADDR_OWVAR 20
1071: PUSH
1072: LD_INT 3
1074: ST_TO_ADDR
// uc_nation = nation_russian ;
1075: LD_ADDR_OWVAR 21
1079: PUSH
1080: LD_INT 3
1082: ST_TO_ADDR
// vc_chassis = ru_heavy_tracked ;
1083: LD_ADDR_OWVAR 37
1087: PUSH
1088: LD_INT 24
1090: ST_TO_ADDR
// vc_engine = engine_siberite ;
1091: LD_ADDR_OWVAR 39
1095: PUSH
1096: LD_INT 3
1098: ST_TO_ADDR
// vc_control = control_computer ;
1099: LD_ADDR_OWVAR 38
1103: PUSH
1104: LD_INT 3
1106: ST_TO_ADDR
// vc_weapon = ru_heavy_gun ;
1107: LD_ADDR_OWVAR 40
1111: PUSH
1112: LD_INT 46
1114: ST_TO_ADDR
// hg5 = CreateVehicle ;
1115: LD_ADDR_EXP 10
1119: PUSH
1120: CALL_OW 45
1124: ST_TO_ADDR
// hg6 = CreateVehicle ;
1125: LD_ADDR_EXP 11
1129: PUSH
1130: CALL_OW 45
1134: ST_TO_ADDR
// hg7 = CreateVehicle ;
1135: LD_ADDR_EXP 12
1139: PUSH
1140: CALL_OW 45
1144: ST_TO_ADDR
// PlaceUnitArea ( hg5 , sojuszru , false ) ;
1145: LD_EXP 10
1149: PPUSH
1150: LD_INT 2
1152: PPUSH
1153: LD_INT 0
1155: PPUSH
1156: CALL_OW 49
// PlaceUnitArea ( hg6 , sojuszru , false ) ;
1160: LD_EXP 11
1164: PPUSH
1165: LD_INT 2
1167: PPUSH
1168: LD_INT 0
1170: PPUSH
1171: CALL_OW 49
// PlaceUnitArea ( hg7 , sojuszru , false ) ;
1175: LD_EXP 12
1179: PPUSH
1180: LD_INT 2
1182: PPUSH
1183: LD_INT 0
1185: PPUSH
1186: CALL_OW 49
// comagressivemove ( [ hg5 , hg6 , hg7 ] , 142 , 52 ) ;
1190: LD_EXP 10
1194: PUSH
1195: LD_EXP 11
1199: PUSH
1200: LD_EXP 12
1204: PUSH
1205: EMPTY
1206: LIST
1207: LIST
1208: LIST
1209: PPUSH
1210: LD_INT 142
1212: PPUSH
1213: LD_INT 52
1215: PPUSH
1216: CALL_OW 114
// uc_nation = nation_russian ;
1220: LD_ADDR_OWVAR 21
1224: PUSH
1225: LD_INT 3
1227: ST_TO_ADDR
// vc_chassis = ru_heavy_tracked ;
1228: LD_ADDR_OWVAR 37
1232: PUSH
1233: LD_INT 24
1235: ST_TO_ADDR
// vc_engine = engine_siberite ;
1236: LD_ADDR_OWVAR 39
1240: PUSH
1241: LD_INT 3
1243: ST_TO_ADDR
// vc_control = control_computer ;
1244: LD_ADDR_OWVAR 38
1248: PUSH
1249: LD_INT 3
1251: ST_TO_ADDR
// vc_weapon = ru_rocket_launcher ;
1252: LD_ADDR_OWVAR 40
1256: PUSH
1257: LD_INT 45
1259: ST_TO_ADDR
// hg8 = CreateVehicle ;
1260: LD_ADDR_EXP 13
1264: PUSH
1265: CALL_OW 45
1269: ST_TO_ADDR
// hg9 = CreateVehicle ;
1270: LD_ADDR_EXP 14
1274: PUSH
1275: CALL_OW 45
1279: ST_TO_ADDR
// hg10 = CreateVehicle ;
1280: LD_ADDR_EXP 15
1284: PUSH
1285: CALL_OW 45
1289: ST_TO_ADDR
// PlaceUnitArea ( hg8 , sojuszru , false ) ;
1290: LD_EXP 13
1294: PPUSH
1295: LD_INT 2
1297: PPUSH
1298: LD_INT 0
1300: PPUSH
1301: CALL_OW 49
// PlaceUnitArea ( hg9 , sojuszru , false ) ;
1305: LD_EXP 14
1309: PPUSH
1310: LD_INT 2
1312: PPUSH
1313: LD_INT 0
1315: PPUSH
1316: CALL_OW 49
// PlaceUnitArea ( hg10 , sojuszru , false ) ;
1320: LD_EXP 15
1324: PPUSH
1325: LD_INT 2
1327: PPUSH
1328: LD_INT 0
1330: PPUSH
1331: CALL_OW 49
// comagressivemove ( [ hg8 , hg9 , hg10 ] , 150 , 82 ) ;
1335: LD_EXP 13
1339: PUSH
1340: LD_EXP 14
1344: PUSH
1345: LD_EXP 15
1349: PUSH
1350: EMPTY
1351: LIST
1352: LIST
1353: LIST
1354: PPUSH
1355: LD_INT 150
1357: PPUSH
1358: LD_INT 82
1360: PPUSH
1361: CALL_OW 114
// end ;
1365: LD_VAR 0 1
1369: RET
// every 5 5$0 trigger enemyattack = 1 do
1370: LD_EXP 1
1374: PUSH
1375: LD_INT 1
1377: EQUAL
1378: IFFALSE 1396
1380: GO 1382
1382: DISABLE
// begin enable ;
1383: ENABLE
// AmericanAttack1 ;
1384: CALL 340 0 0
// AmericanAttack2 ;
1388: CALL 672 0 0
// ruattack ;
1392: CALL 1064 0 0
// end ; end_of_file
1396: END
// every 0 0$01 trigger isDead ( D ) do
1397: LD_INT 282
1399: PPUSH
1400: CALL_OW 301
1404: IFFALSE 1416
1406: GO 1408
1408: DISABLE
// begin YouLost ( Demi_nie_zyje ) ;
1409: LD_STRING Demi_nie_zyje
1411: PPUSH
1412: CALL_OW 104
// end ;
1416: END
// every 0 0$01 trigger isDead ( MO ) do
1417: LD_INT 287
1419: PPUSH
1420: CALL_OW 301
1424: IFFALSE 1436
1426: GO 1428
1428: DISABLE
// begin YouLost ( Monalisa_nie_zyje ) ;
1429: LD_STRING Monalisa_nie_zyje
1431: PPUSH
1432: CALL_OW 104
// end ;
1436: END
// every 0 0$01 trigger isDead ( KI ) do
1437: LD_INT 294
1439: PPUSH
1440: CALL_OW 301
1444: IFFALSE 1456
1446: GO 1448
1448: DISABLE
// begin YouLost ( Kimiko_nie_zyje ) ;
1449: LD_STRING Kimiko_nie_zyje
1451: PPUSH
1452: CALL_OW 104
// end ;
1456: END
// every 0 0$01 trigger isDead ( K ) do
1457: LD_INT 307
1459: PPUSH
1460: CALL_OW 301
1464: IFFALSE 1476
1466: GO 1468
1468: DISABLE
// begin YouLost ( Karen_nie_zyje ) ;
1469: LD_STRING Karen_nie_zyje
1471: PPUSH
1472: CALL_OW 104
// end ;
1476: END
// every 0 0$01 trigger isDead ( J ) do
1477: LD_INT 289
1479: PPUSH
1480: CALL_OW 301
1484: IFFALSE 1496
1486: GO 1488
1488: DISABLE
// begin YouLost ( John_nie_zyje ) ;
1489: LD_STRING John_nie_zyje
1491: PPUSH
1492: CALL_OW 104
// end ;
1496: END
// every 0 0$01 trigger isDead ( AL ) do
1497: LD_INT 292
1499: PPUSH
1500: CALL_OW 301
1504: IFFALSE 1516
1506: GO 1508
1508: DISABLE
// begin YouLost ( Alex_nie_zyje ) ;
1509: LD_STRING Alex_nie_zyje
1511: PPUSH
1512: CALL_OW 104
// end ;
1516: END
// every 0 0$01 trigger isDead ( rudep1 ) and isDead ( rudep2 ) and isDead ( rudep3 ) do
1517: LD_INT 127
1519: PPUSH
1520: CALL_OW 301
1524: PUSH
1525: LD_INT 128
1527: PPUSH
1528: CALL_OW 301
1532: AND
1533: PUSH
1534: LD_INT 272
1536: PPUSH
1537: CALL_OW 301
1541: AND
1542: IFFALSE 1608
1544: GO 1546
1546: DISABLE
// begin Say ( AL , d12 ) ;
1547: LD_INT 292
1549: PPUSH
1550: LD_STRING d12
1552: PPUSH
1553: CALL_OW 88
// SayRadio ( AB , d13 ) ;
1557: LD_INT 296
1559: PPUSH
1560: LD_STRING d13
1562: PPUSH
1563: CALL_OW 94
// wait ( 0 0$01 ) ;
1567: LD_INT 35
1569: PPUSH
1570: CALL_OW 67
// AddMedal ( medal1 , 1 ) ;
1574: LD_STRING medal1
1576: PPUSH
1577: LD_INT 1
1579: PPUSH
1580: CALL_OW 101
// AddMedal ( medal2 , 1 ) ;
1584: LD_STRING medal2
1586: PPUSH
1587: LD_INT 1
1589: PPUSH
1590: CALL_OW 101
// AddMedal ( medal3 , 1 ) ;
1594: LD_STRING medal3
1596: PPUSH
1597: LD_INT 1
1599: PPUSH
1600: CALL_OW 101
// EndCampaing ;
1604: CALL 1609 0 0
// end ;
1608: END
// function EndCampaing ; begin
1609: LD_INT 0
1611: PPUSH
// case Query ( Koniec ) of 1 :
1612: LD_STRING Koniec
1614: PPUSH
1615: CALL_OW 97
1619: PUSH
1620: LD_INT 1
1622: DOUBLE
1623: EQUAL
1624: IFTRUE 1628
1626: GO 1635
1628: POP
// begin DLC1 ;
1629: CALL 1678 0 0
// end ; 2 :
1633: GO 1673
1635: LD_INT 2
1637: DOUBLE
1638: EQUAL
1639: IFTRUE 1643
1641: GO 1650
1643: POP
// begin DLC2 ;
1644: CALL 1740 0 0
// end ; 3 :
1648: GO 1673
1650: LD_INT 3
1652: DOUBLE
1653: EQUAL
1654: IFTRUE 1658
1656: GO 1672
1658: POP
// begin GiveMedals ( Main ) ;
1659: LD_STRING Main
1661: PPUSH
1662: CALL_OW 102
// YouWin ;
1666: CALL_OW 103
// end ; end ;
1670: GO 1673
1672: POP
// end ;
1673: LD_VAR 0 1
1677: RET
// function DLC1 ; begin
1678: LD_INT 0
1680: PPUSH
// case Query ( Wybr1 ) of 1 :
1681: LD_STRING Wybr1
1683: PPUSH
1684: CALL_OW 97
1688: PUSH
1689: LD_INT 1
1691: DOUBLE
1692: EQUAL
1693: IFTRUE 1697
1695: GO 1704
1697: POP
// begin DLC1Continue ;
1698: CALL 1802 0 0
// end ; 2 :
1702: GO 1735
1704: LD_INT 2
1706: DOUBLE
1707: EQUAL
1708: IFTRUE 1712
1710: GO 1719
1712: POP
// begin DLC1t ;
1713: CALL 1866 0 0
// end ; 3 :
1717: GO 1735
1719: LD_INT 3
1721: DOUBLE
1722: EQUAL
1723: IFTRUE 1727
1725: GO 1734
1727: POP
// begin EndCampaing ;
1728: CALL 1609 0 0
// end ; end ;
1732: GO 1735
1734: POP
// end ;
1735: LD_VAR 0 1
1739: RET
// function DLC2 ; begin
1740: LD_INT 0
1742: PPUSH
// case Query ( Wybr2 ) of 1 :
1743: LD_STRING Wybr2
1745: PPUSH
1746: CALL_OW 97
1750: PUSH
1751: LD_INT 1
1753: DOUBLE
1754: EQUAL
1755: IFTRUE 1759
1757: GO 1766
1759: POP
// begin DLC2Continue ;
1760: CALL 1834 0 0
// end ; 2 :
1764: GO 1797
1766: LD_INT 2
1768: DOUBLE
1769: EQUAL
1770: IFTRUE 1774
1772: GO 1781
1774: POP
// begin DLC2t ;
1775: CALL 1898 0 0
// end ; 3 :
1779: GO 1797
1781: LD_INT 3
1783: DOUBLE
1784: EQUAL
1785: IFTRUE 1789
1787: GO 1796
1789: POP
// begin EndCampaing ;
1790: CALL 1609 0 0
// end ; end ;
1794: GO 1797
1796: POP
// end ;
1797: LD_VAR 0 1
1801: RET
// function DLC1Continue ; begin
1802: LD_INT 0
1804: PPUSH
// case Query ( Komunikat1 ) of 1 :
1805: LD_STRING Komunikat1
1807: PPUSH
1808: CALL_OW 97
1812: PUSH
1813: LD_INT 1
1815: DOUBLE
1816: EQUAL
1817: IFTRUE 1821
1819: GO 1828
1821: POP
// begin DLC1 ;
1822: CALL 1678 0 0
// end ; end ;
1826: GO 1829
1828: POP
// end ;
1829: LD_VAR 0 1
1833: RET
// function DLC2Continue ; begin
1834: LD_INT 0
1836: PPUSH
// case Query ( Komunikat2 ) of 1 :
1837: LD_STRING Komunikat2
1839: PPUSH
1840: CALL_OW 97
1844: PUSH
1845: LD_INT 1
1847: DOUBLE
1848: EQUAL
1849: IFTRUE 1853
1851: GO 1860
1853: POP
// begin DLC2 ;
1854: CALL 1740 0 0
// end ; end ;
1858: GO 1861
1860: POP
// end ;
1861: LD_VAR 0 1
1865: RET
// function DLC1t ; begin
1866: LD_INT 0
1868: PPUSH
// case Query ( DLC1t ) of 1 :
1869: LD_STRING DLC1t
1871: PPUSH
1872: CALL_OW 97
1876: PUSH
1877: LD_INT 1
1879: DOUBLE
1880: EQUAL
1881: IFTRUE 1885
1883: GO 1892
1885: POP
// begin DLC1 ;
1886: CALL 1678 0 0
// end ; end ;
1890: GO 1893
1892: POP
// end ;
1893: LD_VAR 0 1
1897: RET
// function DLC2t ; begin
1898: LD_INT 0
1900: PPUSH
// case Query ( DLC2t ) of 1 :
1901: LD_STRING DLC2t
1903: PPUSH
1904: CALL_OW 97
1908: PUSH
1909: LD_INT 1
1911: DOUBLE
1912: EQUAL
1913: IFTRUE 1917
1915: GO 1924
1917: POP
// begin DLC2 ;
1918: CALL 1740 0 0
// end ; end ;
1922: GO 1925
1924: POP
// end ;
1925: LD_VAR 0 1
1929: RET
// every 0 0$1 trigger IsInArea ( AL , ucieczka ) marked 1 do
1930: LD_INT 292
1932: PPUSH
1933: LD_INT 8
1935: PPUSH
1936: CALL_OW 308
1940: IFFALSE 1952
1942: GO 1944
1944: DISABLE
// begin YouLost ( Uciekles ) ;
1945: LD_STRING Uciekles
1947: PPUSH
1948: CALL_OW 104
// end ; end_of_file
1952: END
// every 1 1$30 do
1953: GO 1955
1955: DISABLE
// begin enable ;
1956: ENABLE
// CreateCratesArea ( Rand ( 1 , 5 ) , Area95 , true ) end ;
1957: LD_INT 1
1959: PPUSH
1960: LD_INT 5
1962: PPUSH
1963: CALL_OW 12
1967: PPUSH
1968: LD_INT 6
1970: PPUSH
1971: LD_INT 1
1973: PPUSH
1974: CALL_OW 55
1978: END
// every 1 1$00 do
1979: GO 1981
1981: DISABLE
// begin enable ;
1982: ENABLE
// CreateCratesArea ( Rand ( 1 , 5 ) , Area96 , true ) end ; end_of_file
1983: LD_INT 1
1985: PPUSH
1986: LD_INT 5
1988: PPUSH
1989: CALL_OW 12
1993: PPUSH
1994: LD_INT 7
1996: PPUSH
1997: LD_INT 1
1999: PPUSH
2000: CALL_OW 55
2004: END
// every 0 0$01 do var un , EnginerList , buildings , depots , i ;
2005: GO 2007
2007: DISABLE
2008: LD_INT 0
2010: PPUSH
2011: PPUSH
2012: PPUSH
2013: PPUSH
2014: PPUSH
// begin enable ;
2015: ENABLE
// EnginerList := FilterAllUnits ( [ [ [ f_side , 1 ] , [ f_class , 2 ] , [ f_lives , 1000 ] ] ] ) ;
2016: LD_ADDR_VAR 0 2
2020: PUSH
2021: LD_INT 22
2023: PUSH
2024: LD_INT 1
2026: PUSH
2027: EMPTY
2028: LIST
2029: LIST
2030: PUSH
2031: LD_INT 25
2033: PUSH
2034: LD_INT 2
2036: PUSH
2037: EMPTY
2038: LIST
2039: LIST
2040: PUSH
2041: LD_INT 24
2043: PUSH
2044: LD_INT 1000
2046: PUSH
2047: EMPTY
2048: LIST
2049: LIST
2050: PUSH
2051: EMPTY
2052: LIST
2053: LIST
2054: LIST
2055: PUSH
2056: EMPTY
2057: LIST
2058: PPUSH
2059: CALL_OW 69
2063: ST_TO_ADDR
// buildings := FilterAllUnits ( [ [ [ f_side , 1 ] , [ f_type , unit_building ] , [ f_not , [ f_lives , 1000 ] ] ] ] ) ;
2064: LD_ADDR_VAR 0 3
2068: PUSH
2069: LD_INT 22
2071: PUSH
2072: LD_INT 1
2074: PUSH
2075: EMPTY
2076: LIST
2077: LIST
2078: PUSH
2079: LD_INT 21
2081: PUSH
2082: LD_INT 3
2084: PUSH
2085: EMPTY
2086: LIST
2087: LIST
2088: PUSH
2089: LD_INT 3
2091: PUSH
2092: LD_INT 24
2094: PUSH
2095: LD_INT 1000
2097: PUSH
2098: EMPTY
2099: LIST
2100: LIST
2101: PUSH
2102: EMPTY
2103: LIST
2104: LIST
2105: PUSH
2106: EMPTY
2107: LIST
2108: LIST
2109: LIST
2110: PUSH
2111: EMPTY
2112: LIST
2113: PPUSH
2114: CALL_OW 69
2118: ST_TO_ADDR
// if buildings > 0 then
2119: LD_VAR 0 3
2123: PUSH
2124: LD_INT 0
2126: GREATER
2127: IFFALSE 2209
// begin for i = 1 to EnginerList do
2129: LD_ADDR_VAR 0 5
2133: PUSH
2134: DOUBLE
2135: LD_INT 1
2137: DEC
2138: ST_TO_ADDR
2139: LD_VAR 0 2
2143: PUSH
2144: FOR_TO
2145: IFFALSE 2207
// begin if IsInUnit ( EnginerList [ i ] ) then
2147: LD_VAR 0 2
2151: PUSH
2152: LD_VAR 0 5
2156: ARRAY
2157: PPUSH
2158: CALL_OW 310
2162: IFFALSE 2181
// ComExitBuilding ( EnginerList [ i ] ) else
2164: LD_VAR 0 2
2168: PUSH
2169: LD_VAR 0 5
2173: ARRAY
2174: PPUSH
2175: CALL_OW 122
2179: GO 2205
// ComRepairBuilding ( EnginerList [ i ] , buildings [ 1 ] ) ;
2181: LD_VAR 0 2
2185: PUSH
2186: LD_VAR 0 5
2190: ARRAY
2191: PPUSH
2192: LD_VAR 0 3
2196: PUSH
2197: LD_INT 1
2199: ARRAY
2200: PPUSH
2201: CALL_OW 130
// end ;
2205: GO 2144
2207: POP
2208: POP
// end ; if buildings = 0 then
2209: LD_VAR 0 3
2213: PUSH
2214: LD_INT 0
2216: EQUAL
2217: IFFALSE 2277
// begin for i = 1 to EnginerList do
2219: LD_ADDR_VAR 0 5
2223: PUSH
2224: DOUBLE
2225: LD_INT 1
2227: DEC
2228: ST_TO_ADDR
2229: LD_VAR 0 2
2233: PUSH
2234: FOR_TO
2235: IFFALSE 2275
// begin if not HasTask ( EnginerList [ i ] ) and not IsInUnit ( EnginerList [ i ] ) then
2237: LD_VAR 0 2
2241: PUSH
2242: LD_VAR 0 5
2246: ARRAY
2247: PPUSH
2248: CALL_OW 314
2252: NOT
2253: PUSH
2254: LD_VAR 0 2
2258: PUSH
2259: LD_VAR 0 5
2263: ARRAY
2264: PPUSH
2265: CALL_OW 310
2269: NOT
2270: AND
2271: IFFALSE 2273
// end ;
2273: GO 2234
2275: POP
2276: POP
// end ; end ;
2277: PPOPN 5
2279: END
// every 0 0$01 do var un , EnginerList , buildings , depots , i ;
2280: GO 2282
2282: DISABLE
2283: LD_INT 0
2285: PPUSH
2286: PPUSH
2287: PPUSH
2288: PPUSH
2289: PPUSH
// begin enable ;
2290: ENABLE
// EnginerList := FilterAllUnits ( [ [ [ f_side , 2 ] , [ f_class , 2 ] , [ f_lives , 1000 ] ] ] ) ;
2291: LD_ADDR_VAR 0 2
2295: PUSH
2296: LD_INT 22
2298: PUSH
2299: LD_INT 2
2301: PUSH
2302: EMPTY
2303: LIST
2304: LIST
2305: PUSH
2306: LD_INT 25
2308: PUSH
2309: LD_INT 2
2311: PUSH
2312: EMPTY
2313: LIST
2314: LIST
2315: PUSH
2316: LD_INT 24
2318: PUSH
2319: LD_INT 1000
2321: PUSH
2322: EMPTY
2323: LIST
2324: LIST
2325: PUSH
2326: EMPTY
2327: LIST
2328: LIST
2329: LIST
2330: PUSH
2331: EMPTY
2332: LIST
2333: PPUSH
2334: CALL_OW 69
2338: ST_TO_ADDR
// buildings := FilterAllUnits ( [ [ [ f_side , 2 ] , [ f_type , unit_building ] , [ f_not , [ f_lives , 1000 ] ] ] ] ) ;
2339: LD_ADDR_VAR 0 3
2343: PUSH
2344: LD_INT 22
2346: PUSH
2347: LD_INT 2
2349: PUSH
2350: EMPTY
2351: LIST
2352: LIST
2353: PUSH
2354: LD_INT 21
2356: PUSH
2357: LD_INT 3
2359: PUSH
2360: EMPTY
2361: LIST
2362: LIST
2363: PUSH
2364: LD_INT 3
2366: PUSH
2367: LD_INT 24
2369: PUSH
2370: LD_INT 1000
2372: PUSH
2373: EMPTY
2374: LIST
2375: LIST
2376: PUSH
2377: EMPTY
2378: LIST
2379: LIST
2380: PUSH
2381: EMPTY
2382: LIST
2383: LIST
2384: LIST
2385: PUSH
2386: EMPTY
2387: LIST
2388: PPUSH
2389: CALL_OW 69
2393: ST_TO_ADDR
// if buildings > 0 then
2394: LD_VAR 0 3
2398: PUSH
2399: LD_INT 0
2401: GREATER
2402: IFFALSE 2484
// begin for i = 1 to EnginerList do
2404: LD_ADDR_VAR 0 5
2408: PUSH
2409: DOUBLE
2410: LD_INT 1
2412: DEC
2413: ST_TO_ADDR
2414: LD_VAR 0 2
2418: PUSH
2419: FOR_TO
2420: IFFALSE 2482
// begin if IsInUnit ( EnginerList [ i ] ) then
2422: LD_VAR 0 2
2426: PUSH
2427: LD_VAR 0 5
2431: ARRAY
2432: PPUSH
2433: CALL_OW 310
2437: IFFALSE 2456
// ComExitBuilding ( EnginerList [ i ] ) else
2439: LD_VAR 0 2
2443: PUSH
2444: LD_VAR 0 5
2448: ARRAY
2449: PPUSH
2450: CALL_OW 122
2454: GO 2480
// ComRepairBuilding ( EnginerList [ i ] , buildings [ 1 ] ) ;
2456: LD_VAR 0 2
2460: PUSH
2461: LD_VAR 0 5
2465: ARRAY
2466: PPUSH
2467: LD_VAR 0 3
2471: PUSH
2472: LD_INT 1
2474: ARRAY
2475: PPUSH
2476: CALL_OW 130
// end ;
2480: GO 2419
2482: POP
2483: POP
// end ; if buildings = 0 then
2484: LD_VAR 0 3
2488: PUSH
2489: LD_INT 0
2491: EQUAL
2492: IFFALSE 2552
// begin for i = 1 to EnginerList do
2494: LD_ADDR_VAR 0 5
2498: PUSH
2499: DOUBLE
2500: LD_INT 1
2502: DEC
2503: ST_TO_ADDR
2504: LD_VAR 0 2
2508: PUSH
2509: FOR_TO
2510: IFFALSE 2550
// begin if not HasTask ( EnginerList [ i ] ) and not IsInUnit ( EnginerList [ i ] ) then
2512: LD_VAR 0 2
2516: PUSH
2517: LD_VAR 0 5
2521: ARRAY
2522: PPUSH
2523: CALL_OW 314
2527: NOT
2528: PUSH
2529: LD_VAR 0 2
2533: PUSH
2534: LD_VAR 0 5
2538: ARRAY
2539: PPUSH
2540: CALL_OW 310
2544: NOT
2545: AND
2546: IFFALSE 2548
// end ;
2548: GO 2509
2550: POP
2551: POP
// end ; end ;
2552: PPOPN 5
2554: END
// every 0 0$01 do var un , EnginerList , buildings , depots , i ;
2555: GO 2557
2557: DISABLE
2558: LD_INT 0
2560: PPUSH
2561: PPUSH
2562: PPUSH
2563: PPUSH
2564: PPUSH
// begin enable ;
2565: ENABLE
// EnginerList := FilterAllUnits ( [ [ [ f_side , 3 ] , [ f_class , 2 ] , [ f_lives , 1000 ] ] ] ) ;
2566: LD_ADDR_VAR 0 2
2570: PUSH
2571: LD_INT 22
2573: PUSH
2574: LD_INT 3
2576: PUSH
2577: EMPTY
2578: LIST
2579: LIST
2580: PUSH
2581: LD_INT 25
2583: PUSH
2584: LD_INT 2
2586: PUSH
2587: EMPTY
2588: LIST
2589: LIST
2590: PUSH
2591: LD_INT 24
2593: PUSH
2594: LD_INT 1000
2596: PUSH
2597: EMPTY
2598: LIST
2599: LIST
2600: PUSH
2601: EMPTY
2602: LIST
2603: LIST
2604: LIST
2605: PUSH
2606: EMPTY
2607: LIST
2608: PPUSH
2609: CALL_OW 69
2613: ST_TO_ADDR
// buildings := FilterAllUnits ( [ [ [ f_side , 3 ] , [ f_type , unit_building ] , [ f_not , [ f_lives , 1000 ] ] ] ] ) ;
2614: LD_ADDR_VAR 0 3
2618: PUSH
2619: LD_INT 22
2621: PUSH
2622: LD_INT 3
2624: PUSH
2625: EMPTY
2626: LIST
2627: LIST
2628: PUSH
2629: LD_INT 21
2631: PUSH
2632: LD_INT 3
2634: PUSH
2635: EMPTY
2636: LIST
2637: LIST
2638: PUSH
2639: LD_INT 3
2641: PUSH
2642: LD_INT 24
2644: PUSH
2645: LD_INT 1000
2647: PUSH
2648: EMPTY
2649: LIST
2650: LIST
2651: PUSH
2652: EMPTY
2653: LIST
2654: LIST
2655: PUSH
2656: EMPTY
2657: LIST
2658: LIST
2659: LIST
2660: PUSH
2661: EMPTY
2662: LIST
2663: PPUSH
2664: CALL_OW 69
2668: ST_TO_ADDR
// if buildings > 0 then
2669: LD_VAR 0 3
2673: PUSH
2674: LD_INT 0
2676: GREATER
2677: IFFALSE 2759
// begin for i = 1 to EnginerList do
2679: LD_ADDR_VAR 0 5
2683: PUSH
2684: DOUBLE
2685: LD_INT 1
2687: DEC
2688: ST_TO_ADDR
2689: LD_VAR 0 2
2693: PUSH
2694: FOR_TO
2695: IFFALSE 2757
// begin if IsInUnit ( EnginerList [ i ] ) then
2697: LD_VAR 0 2
2701: PUSH
2702: LD_VAR 0 5
2706: ARRAY
2707: PPUSH
2708: CALL_OW 310
2712: IFFALSE 2731
// ComExitBuilding ( EnginerList [ i ] ) else
2714: LD_VAR 0 2
2718: PUSH
2719: LD_VAR 0 5
2723: ARRAY
2724: PPUSH
2725: CALL_OW 122
2729: GO 2755
// ComRepairBuilding ( EnginerList [ i ] , buildings [ 1 ] ) ;
2731: LD_VAR 0 2
2735: PUSH
2736: LD_VAR 0 5
2740: ARRAY
2741: PPUSH
2742: LD_VAR 0 3
2746: PUSH
2747: LD_INT 1
2749: ARRAY
2750: PPUSH
2751: CALL_OW 130
// end ;
2755: GO 2694
2757: POP
2758: POP
// end ; if buildings = 0 then
2759: LD_VAR 0 3
2763: PUSH
2764: LD_INT 0
2766: EQUAL
2767: IFFALSE 2827
// begin for i = 1 to EnginerList do
2769: LD_ADDR_VAR 0 5
2773: PUSH
2774: DOUBLE
2775: LD_INT 1
2777: DEC
2778: ST_TO_ADDR
2779: LD_VAR 0 2
2783: PUSH
2784: FOR_TO
2785: IFFALSE 2825
// begin if not HasTask ( EnginerList [ i ] ) and not IsInUnit ( EnginerList [ i ] ) then
2787: LD_VAR 0 2
2791: PUSH
2792: LD_VAR 0 5
2796: ARRAY
2797: PPUSH
2798: CALL_OW 314
2802: NOT
2803: PUSH
2804: LD_VAR 0 2
2808: PUSH
2809: LD_VAR 0 5
2813: ARRAY
2814: PPUSH
2815: CALL_OW 310
2819: NOT
2820: AND
2821: IFFALSE 2823
// end ;
2823: GO 2784
2825: POP
2826: POP
// end ; end ;
2827: PPOPN 5
2829: END
// every 0 0$01 do
2830: GO 2832
2832: DISABLE
// begin ComEnterUnit ( s5 , b7 ) ;
2833: LD_INT 450
2835: PPUSH
2836: LD_INT 401
2838: PPUSH
2839: CALL_OW 120
// ComEnterUnit ( s6 , b8 ) ;
2843: LD_INT 451
2845: PPUSH
2846: LD_INT 384
2848: PPUSH
2849: CALL_OW 120
// ComEnterUnit ( s7 , b9 ) ;
2853: LD_INT 453
2855: PPUSH
2856: LD_INT 386
2858: PPUSH
2859: CALL_OW 120
// ComEnterUnit ( s8 , b10 ) ;
2863: LD_INT 454
2865: PPUSH
2866: LD_INT 380
2868: PPUSH
2869: CALL_OW 120
// ComEnterUnit ( s10 , b11 ) ;
2873: LD_INT 452
2875: PPUSH
2876: LD_INT 403
2878: PPUSH
2879: CALL_OW 120
// ComEnterUnit ( s9 , b12 ) ;
2883: LD_INT 455
2885: PPUSH
2886: LD_INT 586
2888: PPUSH
2889: CALL_OW 120
// ComEnterUnit ( s36 , b6 ) ;
2893: LD_INT 570
2895: PPUSH
2896: LD_INT 489
2898: PPUSH
2899: CALL_OW 120
// ComEnterUnit ( s3 , b5 ) ;
2903: LD_INT 486
2905: PPUSH
2906: LD_INT 483
2908: PPUSH
2909: CALL_OW 120
// ComEnterUnit ( s2 , b4 ) ;
2913: LD_INT 448
2915: PPUSH
2916: LD_INT 392
2918: PPUSH
2919: CALL_OW 120
// ComEnterUnit ( sol2 , b3 ) ;
2923: LD_INT 446
2925: PPUSH
2926: LD_INT 412
2928: PPUSH
2929: CALL_OW 120
// ComEnterUnit ( s4 , b2 ) ;
2933: LD_INT 470
2935: PPUSH
2936: LD_INT 468
2938: PPUSH
2939: CALL_OW 120
// ComEnterUnit ( sol1 , b1 ) ;
2943: LD_INT 513
2945: PPUSH
2946: LD_INT 498
2948: PPUSH
2949: CALL_OW 120
// ComEnterUnit ( falco , lebarr00 ) ;
2953: LD_INT 302
2955: PPUSH
2956: LD_INT 476
2958: PPUSH
2959: CALL_OW 120
// ComEnterUnit ( ars1 , lebunk00 ) ;
2963: LD_INT 74
2965: PPUSH
2966: LD_INT 52
2968: PPUSH
2969: CALL_OW 120
// ComEnterUnit ( ars2 , lebunk01 ) ;
2973: LD_INT 75
2975: PPUSH
2976: LD_INT 53
2978: PPUSH
2979: CALL_OW 120
// ComEnterUnit ( ars3 , lebunk02 ) ;
2983: LD_INT 76
2985: PPUSH
2986: LD_INT 54
2988: PPUSH
2989: CALL_OW 120
// ComEnterUnit ( ars4 , lebarr00 ) ;
2993: LD_INT 77
2995: PPUSH
2996: LD_INT 476
2998: PPUSH
2999: CALL_OW 120
// ComEnterUnit ( ars5 , lebarr00 ) ;
3003: LD_INT 78
3005: PPUSH
3006: LD_INT 476
3008: PPUSH
3009: CALL_OW 120
// ComEnterUnit ( ars6 , lebarr00 ) ;
3013: LD_INT 79
3015: PPUSH
3016: LD_INT 476
3018: PPUSH
3019: CALL_OW 120
// ComEnterUnit ( ars7 , lebarr00 ) ;
3023: LD_INT 80
3025: PPUSH
3026: LD_INT 476
3028: PPUSH
3029: CALL_OW 120
// ComEnterUnit ( ars8 , lebarr00 ) ;
3033: LD_INT 81
3035: PPUSH
3036: LD_INT 476
3038: PPUSH
3039: CALL_OW 120
// ComEnterUnit ( arsc1 , lelabf00 ) ;
3043: LD_INT 82
3045: PPUSH
3046: LD_INT 548
3048: PPUSH
3049: CALL_OW 120
// ComEnterUnit ( arsc2 , lelabf01 ) ;
3053: LD_INT 83
3055: PPUSH
3056: LD_INT 534
3058: PPUSH
3059: CALL_OW 120
// ComEnterUnit ( are1 , ledepo00 ) ;
3063: LD_INT 87
3065: PPUSH
3066: LD_INT 72
3068: PPUSH
3069: CALL_OW 120
// ComEnterUnit ( are2 , leware00 ) ;
3073: LD_INT 88
3075: PPUSH
3076: LD_INT 51
3078: PPUSH
3079: CALL_OW 120
// ComEnterUnit ( arm1 , lefact00 ) ;
3083: LD_INT 84
3085: PPUSH
3086: LD_INT 57
3088: PPUSH
3089: CALL_OW 120
// ComEnterUnit ( arm2 , lefact00 ) ;
3093: LD_INT 85
3095: PPUSH
3096: LD_INT 57
3098: PPUSH
3099: CALL_OW 120
// ComEnterUnit ( arm3 , lefact00 ) ;
3103: LD_INT 86
3105: PPUSH
3106: LD_INT 57
3108: PPUSH
3109: CALL_OW 120
// ComEnterUnit ( amm3 , amcntw00 ) ;
3113: LD_INT 588
3115: PPUSH
3116: LD_INT 16
3118: PPUSH
3119: CALL_OW 120
// ComEnterUnit ( ams1 , ambunk00 ) ;
3123: LD_INT 89
3125: PPUSH
3126: LD_INT 1
3128: PPUSH
3129: CALL_OW 120
// ComEnterUnit ( ams2 , ambunk01 ) ;
3133: LD_INT 90
3135: PPUSH
3136: LD_INT 2
3138: PPUSH
3139: CALL_OW 120
// ComEnterUnit ( ams3 , ambunk02 ) ;
3143: LD_INT 91
3145: PPUSH
3146: LD_INT 3
3148: PPUSH
3149: CALL_OW 120
// ComEnterUnit ( ams4 , ambunk03 ) ;
3153: LD_INT 92
3155: PPUSH
3156: LD_INT 4
3158: PPUSH
3159: CALL_OW 120
// ComEnterUnit ( ams5 , ambunk04 ) ;
3163: LD_INT 93
3165: PPUSH
3166: LD_INT 71
3168: PPUSH
3169: CALL_OW 120
// ComEnterUnit ( ams6 , ambarr00 ) ;
3173: LD_INT 99
3175: PPUSH
3176: LD_INT 14
3178: PPUSH
3179: CALL_OW 120
// ComEnterUnit ( ams7 , ambarr00 ) ;
3183: LD_INT 98
3185: PPUSH
3186: LD_INT 14
3188: PPUSH
3189: CALL_OW 120
// ComEnterUnit ( ams9 , ambarr00 ) ;
3193: LD_INT 100
3195: PPUSH
3196: LD_INT 14
3198: PPUSH
3199: CALL_OW 120
// ComEnterUnit ( ams10 , ambarr00 ) ;
3203: LD_INT 101
3205: PPUSH
3206: LD_INT 14
3208: PPUSH
3209: CALL_OW 120
// ComEnterUnit ( amsc1 , amlabf00 ) ;
3213: LD_INT 111
3215: PPUSH
3216: LD_INT 12
3218: PPUSH
3219: CALL_OW 120
// ComEnterUnit ( amsc2 , amlabf01 ) ;
3223: LD_INT 112
3225: PPUSH
3226: LD_INT 13
3228: PPUSH
3229: CALL_OW 120
// ComEnterUnit ( ame1 , amware00 ) ;
3233: LD_INT 118
3235: PPUSH
3236: LD_INT 5
3238: PPUSH
3239: CALL_OW 120
// ComEnterUnit ( amm1 , amfact00 ) ;
3243: LD_INT 113
3245: PPUSH
3246: LD_INT 6
3248: PPUSH
3249: CALL_OW 120
// ComEnterUnit ( amm2 , amfact00 ) ;
3253: LD_INT 116
3255: PPUSH
3256: LD_INT 6
3258: PPUSH
3259: CALL_OW 120
// ComEnterUnit ( rue1 , rudep1 ) ;
3263: LD_INT 225
3265: PPUSH
3266: LD_INT 127
3268: PPUSH
3269: CALL_OW 120
// ComEnterUnit ( rue2 , rudep2 ) ;
3273: LD_INT 226
3275: PPUSH
3276: LD_INT 128
3278: PPUSH
3279: CALL_OW 120
// ComEnterUnit ( rus1 , rulab1 ) ;
3283: LD_INT 227
3285: PPUSH
3286: LD_INT 172
3288: PPUSH
3289: CALL_OW 120
// ComEnterUnit ( rus2 , rulab1 ) ;
3293: LD_INT 228
3295: PPUSH
3296: LD_INT 172
3298: PPUSH
3299: CALL_OW 120
// ComEnterUnit ( rus3 , rulab2 ) ;
3303: LD_INT 229
3305: PPUSH
3306: LD_INT 181
3308: PPUSH
3309: CALL_OW 120
// ComEnterUnit ( rus4 , rulab2 ) ;
3313: LD_INT 230
3315: PPUSH
3316: LD_INT 181
3318: PPUSH
3319: CALL_OW 120
// ComEnterUnit ( rum1 , rufab ) ;
3323: LD_INT 231
3325: PPUSH
3326: LD_INT 213
3328: PPUSH
3329: CALL_OW 120
// ComEnterUnit ( rum2 , rufab ) ;
3333: LD_INT 232
3335: PPUSH
3336: LD_INT 213
3338: PPUSH
3339: CALL_OW 120
// ComEnterUnit ( rum3 , rufab ) ;
3343: LD_INT 233
3345: PPUSH
3346: LD_INT 213
3348: PPUSH
3349: CALL_OW 120
// end ; end_of_file
3353: END
// export hg11 , hg12 , hg13 , hg14 , hg15 , hg16 , hg17 , hg18 ; export soldat1 , soldat2 , soldat3 , soldat4 , soldat5 ; export function arabattack ; begin
3354: LD_INT 0
3356: PPUSH
// uc_side = 5 ;
3357: LD_ADDR_OWVAR 20
3361: PUSH
3362: LD_INT 5
3364: ST_TO_ADDR
// uc_nation = nation_arabian ;
3365: LD_ADDR_OWVAR 21
3369: PUSH
3370: LD_INT 2
3372: ST_TO_ADDR
// vc_chassis = ar_half_tracked ;
3373: LD_ADDR_OWVAR 37
3377: PUSH
3378: LD_INT 14
3380: ST_TO_ADDR
// vc_engine = engine_combustion ;
3381: LD_ADDR_OWVAR 39
3385: PUSH
3386: LD_INT 1
3388: ST_TO_ADDR
// vc_control = control_computer ;
3389: LD_ADDR_OWVAR 38
3393: PUSH
3394: LD_INT 3
3396: ST_TO_ADDR
// vc_weapon = ar_gun ;
3397: LD_ADDR_OWVAR 40
3401: PUSH
3402: LD_INT 27
3404: ST_TO_ADDR
// hg11 = CreateVehicle ;
3405: LD_ADDR_EXP 16
3409: PUSH
3410: CALL_OW 45
3414: ST_TO_ADDR
// hg12 = CreateVehicle ;
3415: LD_ADDR_EXP 17
3419: PUSH
3420: CALL_OW 45
3424: ST_TO_ADDR
// hg13 = CreateVehicle ;
3425: LD_ADDR_EXP 18
3429: PUSH
3430: CALL_OW 45
3434: ST_TO_ADDR
// hg14 = CreateVehicle ;
3435: LD_ADDR_EXP 19
3439: PUSH
3440: CALL_OW 45
3444: ST_TO_ADDR
// PlaceUnitArea ( hg11 , sojusz , false ) ;
3445: LD_EXP 16
3449: PPUSH
3450: LD_INT 5
3452: PPUSH
3453: LD_INT 0
3455: PPUSH
3456: CALL_OW 49
// PlaceUnitArea ( hg12 , sojusz , false ) ;
3460: LD_EXP 17
3464: PPUSH
3465: LD_INT 5
3467: PPUSH
3468: LD_INT 0
3470: PPUSH
3471: CALL_OW 49
// PlaceUnitArea ( hg13 , sojusz , false ) ;
3475: LD_EXP 18
3479: PPUSH
3480: LD_INT 5
3482: PPUSH
3483: LD_INT 0
3485: PPUSH
3486: CALL_OW 49
// PlaceUnitArea ( hg14 , sojusz , false ) ;
3490: LD_EXP 19
3494: PPUSH
3495: LD_INT 5
3497: PPUSH
3498: LD_INT 0
3500: PPUSH
3501: CALL_OW 49
// uc_side = 5 ;
3505: LD_ADDR_OWVAR 20
3509: PUSH
3510: LD_INT 5
3512: ST_TO_ADDR
// uc_nation = nation_arabian ;
3513: LD_ADDR_OWVAR 21
3517: PUSH
3518: LD_INT 2
3520: ST_TO_ADDR
// vc_chassis = ar_half_tracked ;
3521: LD_ADDR_OWVAR 37
3525: PUSH
3526: LD_INT 14
3528: ST_TO_ADDR
// vc_engine = engine_combustion ;
3529: LD_ADDR_OWVAR 39
3533: PUSH
3534: LD_INT 1
3536: ST_TO_ADDR
// vc_control = control_computer ;
3537: LD_ADDR_OWVAR 38
3541: PUSH
3542: LD_INT 3
3544: ST_TO_ADDR
// vc_weapon = ar_rocket_launcher ;
3545: LD_ADDR_OWVAR 40
3549: PUSH
3550: LD_INT 28
3552: ST_TO_ADDR
// hg15 = CreateVehicle ;
3553: LD_ADDR_EXP 20
3557: PUSH
3558: CALL_OW 45
3562: ST_TO_ADDR
// hg16 = CreateVehicle ;
3563: LD_ADDR_EXP 21
3567: PUSH
3568: CALL_OW 45
3572: ST_TO_ADDR
// hg17 = CreateVehicle ;
3573: LD_ADDR_EXP 22
3577: PUSH
3578: CALL_OW 45
3582: ST_TO_ADDR
// hg18 = CreateVehicle ;
3583: LD_ADDR_EXP 23
3587: PUSH
3588: CALL_OW 45
3592: ST_TO_ADDR
// PlaceUnitArea ( hg15 , sojusz , false ) ;
3593: LD_EXP 20
3597: PPUSH
3598: LD_INT 5
3600: PPUSH
3601: LD_INT 0
3603: PPUSH
3604: CALL_OW 49
// PlaceUnitArea ( hg16 , sojusz , false ) ;
3608: LD_EXP 21
3612: PPUSH
3613: LD_INT 5
3615: PPUSH
3616: LD_INT 0
3618: PPUSH
3619: CALL_OW 49
// PlaceUnitArea ( hg17 , sojusz , false ) ;
3623: LD_EXP 22
3627: PPUSH
3628: LD_INT 5
3630: PPUSH
3631: LD_INT 0
3633: PPUSH
3634: CALL_OW 49
// PlaceUnitArea ( hg18 , sojusz , false ) ;
3638: LD_EXP 23
3642: PPUSH
3643: LD_INT 5
3645: PPUSH
3646: LD_INT 0
3648: PPUSH
3649: CALL_OW 49
// uc_side = 5 ;
3653: LD_ADDR_OWVAR 20
3657: PUSH
3658: LD_INT 5
3660: ST_TO_ADDR
// uc_nation = nation_arabian ;
3661: LD_ADDR_OWVAR 21
3665: PUSH
3666: LD_INT 2
3668: ST_TO_ADDR
// hc_class = CLASS_SOLDIER ;
3669: LD_ADDR_OWVAR 28
3673: PUSH
3674: LD_INT 1
3676: ST_TO_ADDR
// PrepareSoldierSkills ( 7 ) ;
3677: LD_INT 7
3679: PPUSH
3680: CALL_OW 375
// soldat1 = CreateHuman ;
3684: LD_ADDR_EXP 24
3688: PUSH
3689: CALL_OW 44
3693: ST_TO_ADDR
// soldat2 = CreateHuman ;
3694: LD_ADDR_EXP 25
3698: PUSH
3699: CALL_OW 44
3703: ST_TO_ADDR
// soldat3 = CreateHuman ;
3704: LD_ADDR_EXP 26
3708: PUSH
3709: CALL_OW 44
3713: ST_TO_ADDR
// soldat4 = CreateHuman ;
3714: LD_ADDR_EXP 27
3718: PUSH
3719: CALL_OW 44
3723: ST_TO_ADDR
// soldat5 = CreateHuman ;
3724: LD_ADDR_EXP 28
3728: PUSH
3729: CALL_OW 44
3733: ST_TO_ADDR
// PlaceUnitArea ( soldat1 , sojusz , false ) ;
3734: LD_EXP 24
3738: PPUSH
3739: LD_INT 5
3741: PPUSH
3742: LD_INT 0
3744: PPUSH
3745: CALL_OW 49
// PlaceUnitArea ( soldat2 , sojusz , false ) ;
3749: LD_EXP 25
3753: PPUSH
3754: LD_INT 5
3756: PPUSH
3757: LD_INT 0
3759: PPUSH
3760: CALL_OW 49
// PlaceUnitArea ( soldat3 , sojusz , false ) ;
3764: LD_EXP 26
3768: PPUSH
3769: LD_INT 5
3771: PPUSH
3772: LD_INT 0
3774: PPUSH
3775: CALL_OW 49
// PlaceUnitArea ( soldat4 , sojusz , false ) ;
3779: LD_EXP 27
3783: PPUSH
3784: LD_INT 5
3786: PPUSH
3787: LD_INT 0
3789: PPUSH
3790: CALL_OW 49
// PlaceUnitArea ( soldat5 , sojusz , false ) ;
3794: LD_EXP 28
3798: PPUSH
3799: LD_INT 5
3801: PPUSH
3802: LD_INT 0
3804: PPUSH
3805: CALL_OW 49
// end ;
3809: LD_VAR 0 1
3813: RET
