// export attacks_enabled ; starting begin CenteronUnits ( m ) ;
   0: LD_INT 126
   2: PPUSH
   3: CALL_OW 85
// SaveForQuickRestart ;
   7: CALL_OW 22
// Resetfog ;
  11: CALL_OW 335
// Ingameon ;
  15: CALL_OW 8
// Dialogueon ;
  19: CALL_OW 6
// Say ( my , b1 ) ;
  23: LD_INT 127
  25: PPUSH
  26: LD_STRING b1
  28: PPUSH
  29: CALL_OW 88
// Say ( m , b2 ) ;
  33: LD_INT 126
  35: PPUSH
  36: LD_STRING b2
  38: PPUSH
  39: CALL_OW 88
// Say ( s2 , b3 ) ;
  43: LD_INT 134
  45: PPUSH
  46: LD_STRING b3
  48: PPUSH
  49: CALL_OW 88
// Say ( s , b4 ) ;
  53: LD_INT 132
  55: PPUSH
  56: LD_STRING b4
  58: PPUSH
  59: CALL_OW 88
// Say ( s10 , b5 ) ;
  63: LD_INT 213
  65: PPUSH
  66: LD_STRING b5
  68: PPUSH
  69: CALL_OW 88
// Say ( my , b6 ) ;
  73: LD_INT 127
  75: PPUSH
  76: LD_STRING b6
  78: PPUSH
  79: CALL_OW 88
// Say ( my , b7 ) ;
  83: LD_INT 127
  85: PPUSH
  86: LD_STRING b7
  88: PPUSH
  89: CALL_OW 88
// Say ( s1 , b8 ) ;
  93: LD_INT 141
  95: PPUSH
  96: LD_STRING b8
  98: PPUSH
  99: CALL_OW 88
// Say ( m , b9 ) ;
 103: LD_INT 126
 105: PPUSH
 106: LD_STRING b9
 108: PPUSH
 109: CALL_OW 88
// Say ( s , b10 ) ;
 113: LD_INT 132
 115: PPUSH
 116: LD_STRING b10
 118: PPUSH
 119: CALL_OW 88
// Say ( s2 , b11 ) ;
 123: LD_INT 134
 125: PPUSH
 126: LD_STRING b11
 128: PPUSH
 129: CALL_OW 88
// Say ( s10 , b12 ) ;
 133: LD_INT 213
 135: PPUSH
 136: LD_STRING b12
 138: PPUSH
 139: CALL_OW 88
// Say ( s2 , b13 ) ;
 143: LD_INT 134
 145: PPUSH
 146: LD_STRING b13
 148: PPUSH
 149: CALL_OW 88
// Say ( my , b14 ) ;
 153: LD_INT 127
 155: PPUSH
 156: LD_STRING b14
 158: PPUSH
 159: CALL_OW 88
// dialogueoff ;
 163: CALL_OW 7
// ingameoff ;
 167: CALL_OW 9
// ChangeMissionObjectives ( CEL5 ) ;
 171: LD_STRING CEL5
 173: PPUSH
 174: CALL_OW 337
// comenterunit ( [ s2 ] , b3 ) ;
 178: LD_INT 134
 180: PUSH
 181: EMPTY
 182: LIST
 183: PPUSH
 184: LD_INT 89
 186: PPUSH
 187: CALL_OW 120
// comenterunit ( [ s ] , br ) ;
 191: LD_INT 132
 193: PUSH
 194: EMPTY
 195: LIST
 196: PPUSH
 197: LD_INT 58
 199: PPUSH
 200: CALL_OW 120
// comenterunit ( [ s2 ] , b5 ) ;
 204: LD_INT 134
 206: PUSH
 207: EMPTY
 208: LIST
 209: PPUSH
 210: LD_INT 37
 212: PPUSH
 213: CALL_OW 120
// comenterunit ( [ s10 ] , b3 ) ;
 217: LD_INT 213
 219: PUSH
 220: EMPTY
 221: LIST
 222: PPUSH
 223: LD_INT 89
 225: PPUSH
 226: CALL_OW 120
// comenterunit ( [ s1 ] , b12 ) ;
 230: LD_INT 141
 232: PUSH
 233: EMPTY
 234: LIST
 235: PPUSH
 236: LD_INT 60
 238: PPUSH
 239: CALL_OW 120
// comenterunit ( [ my ] , dep ) ;
 243: LD_INT 127
 245: PUSH
 246: EMPTY
 247: LIST
 248: PPUSH
 249: LD_INT 313
 251: PPUSH
 252: CALL_OW 120
// wait ( 1 1$00 ) ;
 256: LD_INT 2100
 258: PPUSH
 259: CALL_OW 67
// Say ( s10 , b15 ) ;
 263: LD_INT 213
 265: PPUSH
 266: LD_STRING b15
 268: PPUSH
 269: CALL_OW 88
// Say ( my , b16 ) ;
 273: LD_INT 127
 275: PPUSH
 276: LD_STRING b16
 278: PPUSH
 279: CALL_OW 88
// arabwrog ;
 283: CALL 718 0 0
// arabwrog1 ;
 287: CALL 1019 0 0
// arabwrog2 ;
 291: CALL 1320 0 0
// wait ( 2 2$00 ) ;
 295: LD_INT 4200
 297: PPUSH
 298: CALL_OW 67
// attacks_enabled = true ;
 302: LD_ADDR_EXP 1
 306: PUSH
 307: LD_INT 1
 309: ST_TO_ADDR
// wait ( 5 5$00 ) ;
 310: LD_INT 10500
 312: PPUSH
 313: CALL_OW 67
// Say ( my , b17 ) ;
 317: LD_INT 127
 319: PPUSH
 320: LD_STRING b17
 322: PPUSH
 323: CALL_OW 88
// wait ( 5 5$00 ) ;
 327: LD_INT 10500
 329: PPUSH
 330: CALL_OW 67
// attacks_enabled = false ;
 334: LD_ADDR_EXP 1
 338: PUSH
 339: LD_INT 0
 341: ST_TO_ADDR
// Say ( my , b18 ) ;
 342: LD_INT 127
 344: PPUSH
 345: LD_STRING b18
 347: PPUSH
 348: CALL_OW 88
// AddMedal ( medal1 , 1 ) ;
 352: LD_STRING medal1
 354: PPUSH
 355: LD_INT 1
 357: PPUSH
 358: CALL_OW 101
// AddMedal ( medal2 , 1 ) ;
 362: LD_STRING medal2
 364: PPUSH
 365: LD_INT 1
 367: PPUSH
 368: CALL_OW 101
// AddMedal ( medal3 , 1 ) ;
 372: LD_STRING medal3
 374: PPUSH
 375: LD_INT 1
 377: PPUSH
 378: CALL_OW 101
// GiveMedals ( Main ) ;
 382: LD_STRING Main
 384: PPUSH
 385: CALL_OW 102
// YouWin ;
 389: CALL_OW 103
// end ; end_of_file
 393: END
// every 0 0$01 do
 394: GO 396
 396: DISABLE
// begin comenterunit ( [ s4 ] , b1 ) ;
 397: LD_INT 150
 399: PUSH
 400: EMPTY
 401: LIST
 402: PPUSH
 403: LD_INT 53
 405: PPUSH
 406: CALL_OW 120
// comenterunit ( [ s5 ] , b2 ) ;
 410: LD_INT 211
 412: PUSH
 413: EMPTY
 414: LIST
 415: PPUSH
 416: LD_INT 46
 418: PPUSH
 419: CALL_OW 120
// comenterunit ( [ s6 ] , b4 ) ;
 423: LD_INT 160
 425: PUSH
 426: EMPTY
 427: LIST
 428: PPUSH
 429: LD_INT 38
 431: PPUSH
 432: CALL_OW 120
// comenterunit ( [ s7 ] , b6 ) ;
 436: LD_INT 162
 438: PUSH
 439: EMPTY
 440: LIST
 441: PPUSH
 442: LD_INT 40
 444: PPUSH
 445: CALL_OW 120
// comenterunit ( [ s8 ] , b7 ) ;
 449: LD_INT 163
 451: PUSH
 452: EMPTY
 453: LIST
 454: PPUSH
 455: LD_INT 92
 457: PPUSH
 458: CALL_OW 120
// comenterunit ( [ s9 ] , b8 ) ;
 462: LD_INT 164
 464: PUSH
 465: EMPTY
 466: LIST
 467: PPUSH
 468: LD_INT 93
 470: PPUSH
 471: CALL_OW 120
// comenterunit ( [ s11 ] , b11 ) ;
 475: LD_INT 172
 477: PUSH
 478: EMPTY
 479: LIST
 480: PPUSH
 481: LD_INT 59
 483: PPUSH
 484: CALL_OW 120
// comenterunit ( [ s12 ] , b13 ) ;
 488: LD_INT 174
 490: PUSH
 491: EMPTY
 492: LIST
 493: PPUSH
 494: LD_INT 61
 496: PPUSH
 497: CALL_OW 120
// comenterunit ( [ s13 ] , b14 ) ;
 501: LD_INT 175
 503: PUSH
 504: EMPTY
 505: LIST
 506: PPUSH
 507: LD_INT 88
 509: PPUSH
 510: CALL_OW 120
// comenterunit ( [ s14 ] , b16 ) ;
 514: LD_INT 176
 516: PUSH
 517: EMPTY
 518: LIST
 519: PPUSH
 520: LD_INT 82
 522: PPUSH
 523: CALL_OW 120
// comenterunit ( [ s15 ] , b15 ) ;
 527: LD_INT 177
 529: PUSH
 530: EMPTY
 531: LIST
 532: PPUSH
 533: LD_INT 62
 535: PPUSH
 536: CALL_OW 120
// comenterunit ( [ s16 ] , b17 ) ;
 540: LD_INT 178
 542: PUSH
 543: EMPTY
 544: LIST
 545: PPUSH
 546: LD_INT 68
 548: PPUSH
 549: CALL_OW 120
// comenterunit ( [ s18 ] , b18 ) ;
 553: LD_INT 179
 555: PUSH
 556: EMPTY
 557: LIST
 558: PPUSH
 559: LD_INT 76
 561: PPUSH
 562: CALL_OW 120
// comenterunit ( [ s3 ] , l2 ) ;
 566: LD_INT 195
 568: PUSH
 569: EMPTY
 570: LIST
 571: PPUSH
 572: LD_INT 121
 574: PPUSH
 575: CALL_OW 120
// comenterunit ( [ m2 ] , w2 ) ;
 579: LD_INT 193
 581: PUSH
 582: EMPTY
 583: LIST
 584: PPUSH
 585: LD_INT 112
 587: PPUSH
 588: CALL_OW 120
// comenterunit ( [ s12 ] , b13 ) ;
 592: LD_INT 174
 594: PUSH
 595: EMPTY
 596: LIST
 597: PPUSH
 598: LD_INT 61
 600: PPUSH
 601: CALL_OW 120
// comenterunit ( [ m1 ] , w1 ) ;
 605: LD_INT 191
 607: PUSH
 608: EMPTY
 609: LIST
 610: PPUSH
 611: LD_INT 118
 613: PPUSH
 614: CALL_OW 120
// comenterunit ( [ n1 ] , l1 ) ;
 618: LD_INT 196
 620: PUSH
 621: EMPTY
 622: LIST
 623: PPUSH
 624: LD_INT 125
 626: PPUSH
 627: CALL_OW 120
// comenterunit ( [ z1 , z2 , z3 , z4 , z5 ] , br ) ;
 631: LD_INT 169
 633: PUSH
 634: LD_INT 168
 636: PUSH
 637: LD_INT 167
 639: PUSH
 640: LD_INT 166
 642: PUSH
 643: LD_INT 165
 645: PUSH
 646: EMPTY
 647: LIST
 648: LIST
 649: LIST
 650: LIST
 651: LIST
 652: PPUSH
 653: LD_INT 58
 655: PPUSH
 656: CALL_OW 120
// end ; end_of_file
 660: END
// on Contact ( side1 , side2 ) do begin if side1 = 1 and side2 = 4 then
 661: LD_VAR 0 1
 665: PUSH
 666: LD_INT 1
 668: EQUAL
 669: PUSH
 670: LD_VAR 0 2
 674: PUSH
 675: LD_INT 4
 677: EQUAL
 678: AND
 679: IFFALSE 688
// begin YouLost ( zaatakowales_sojusznika ) ;
 681: LD_STRING zaatakowales_sojusznika
 683: PPUSH
 684: CALL_OW 104
// end ; end ;
 688: PPOPN 2
 690: END
// every 0 0$0.1 trigger IsDead ( m ) do
 691: LD_INT 126
 693: PPUSH
 694: CALL_OW 301
 698: IFFALSE 717
 700: GO 702
 702: DISABLE
// begin wait ( 0 0$1 ) ;
 703: LD_INT 35
 705: PPUSH
 706: CALL_OW 67
// YouLost ( Madison_nie_zyje ) ;
 710: LD_STRING Madison_nie_zyje
 712: PPUSH
 713: CALL_OW 104
// end ; end_of_file
 717: END
// export soldat1 , soldat2 , soldat3 , soldat4 , mechanik1 , hg1 ; export function arabwrog ; begin
 718: LD_INT 0
 720: PPUSH
// uc_side = 2 ;
 721: LD_ADDR_OWVAR 20
 725: PUSH
 726: LD_INT 2
 728: ST_TO_ADDR
// uc_nation = nation_arabian ;
 729: LD_ADDR_OWVAR 21
 733: PUSH
 734: LD_INT 2
 736: ST_TO_ADDR
// hc_class = CLASS_SOLDIER ;
 737: LD_ADDR_OWVAR 28
 741: PUSH
 742: LD_INT 1
 744: ST_TO_ADDR
// PrepareSoldierSkills ( 1 ) ;
 745: LD_INT 1
 747: PPUSH
 748: CALL_OW 375
// hc_importance = 0 ;
 752: LD_ADDR_OWVAR 32
 756: PUSH
 757: LD_INT 0
 759: ST_TO_ADDR
// soldat1 = CreateHuman ;
 760: LD_ADDR_EXP 2
 764: PUSH
 765: CALL_OW 44
 769: ST_TO_ADDR
// soldat2 = CreateHuman ;
 770: LD_ADDR_EXP 3
 774: PUSH
 775: CALL_OW 44
 779: ST_TO_ADDR
// soldat3 = CreateHuman ;
 780: LD_ADDR_EXP 4
 784: PUSH
 785: CALL_OW 44
 789: ST_TO_ADDR
// soldat4 = CreateHuman ;
 790: LD_ADDR_EXP 5
 794: PUSH
 795: CALL_OW 44
 799: ST_TO_ADDR
// PlaceUnitArea ( soldat1 , Area42 , false ) ;
 800: LD_EXP 2
 804: PPUSH
 805: LD_INT 1
 807: PPUSH
 808: LD_INT 0
 810: PPUSH
 811: CALL_OW 49
// PlaceUnitArea ( soldat2 , Area42 , false ) ;
 815: LD_EXP 3
 819: PPUSH
 820: LD_INT 1
 822: PPUSH
 823: LD_INT 0
 825: PPUSH
 826: CALL_OW 49
// PlaceUnitArea ( soldat3 , Area42 , false ) ;
 830: LD_EXP 4
 834: PPUSH
 835: LD_INT 1
 837: PPUSH
 838: LD_INT 0
 840: PPUSH
 841: CALL_OW 49
// PlaceUnitArea ( soldat4 , Area42 , false ) ;
 845: LD_EXP 5
 849: PPUSH
 850: LD_INT 1
 852: PPUSH
 853: LD_INT 0
 855: PPUSH
 856: CALL_OW 49
// uc_side = 2 ;
 860: LD_ADDR_OWVAR 20
 864: PUSH
 865: LD_INT 2
 867: ST_TO_ADDR
// uc_nation = nation_arabian ;
 868: LD_ADDR_OWVAR 21
 872: PUSH
 873: LD_INT 2
 875: ST_TO_ADDR
// hc_class = CLASS_MECHANIC ;
 876: LD_ADDR_OWVAR 28
 880: PUSH
 881: LD_INT 3
 883: ST_TO_ADDR
// PrepareMechanicSkills ( 1 ) ;
 884: LD_INT 1
 886: PPUSH
 887: CALL_OW 377
// mechanik1 = CreateHuman ;
 891: LD_ADDR_EXP 6
 895: PUSH
 896: CALL_OW 44
 900: ST_TO_ADDR
// vc_chassis = ar_half_tracked ;
 901: LD_ADDR_OWVAR 37
 905: PUSH
 906: LD_INT 14
 908: ST_TO_ADDR
// vc_engine = engine_combustion ;
 909: LD_ADDR_OWVAR 39
 913: PUSH
 914: LD_INT 1
 916: ST_TO_ADDR
// vc_control = control_manual ;
 917: LD_ADDR_OWVAR 38
 921: PUSH
 922: LD_INT 1
 924: ST_TO_ADDR
// vc_weapon = ar_double_machine_gun ;
 925: LD_ADDR_OWVAR 40
 929: PUSH
 930: LD_INT 24
 932: ST_TO_ADDR
// hg1 = CreateVehicle ;
 933: LD_ADDR_EXP 7
 937: PUSH
 938: CALL_OW 45
 942: ST_TO_ADDR
// PlaceHumanInUnit ( mechanik1 , hg1 ) ;
 943: LD_EXP 6
 947: PPUSH
 948: LD_EXP 7
 952: PPUSH
 953: CALL_OW 52
// PlaceUnitArea ( hg1 , Area42 , false ) ;
 957: LD_EXP 7
 961: PPUSH
 962: LD_INT 1
 964: PPUSH
 965: LD_INT 0
 967: PPUSH
 968: CALL_OW 49
// comagressivemove ( [ soldat1 , soldat2 , soldat3 , soldat4 , hg1 ] , 45 , 48 ) ;
 972: LD_EXP 2
 976: PUSH
 977: LD_EXP 3
 981: PUSH
 982: LD_EXP 4
 986: PUSH
 987: LD_EXP 5
 991: PUSH
 992: LD_EXP 7
 996: PUSH
 997: EMPTY
 998: LIST
 999: LIST
1000: LIST
1001: LIST
1002: LIST
1003: PPUSH
1004: LD_INT 45
1006: PPUSH
1007: LD_INT 48
1009: PPUSH
1010: CALL_OW 114
// end ;
1014: LD_VAR 0 1
1018: RET
// export soldat5 , soldat6 , soldat7 , soldat8 , mechanik2 , hg2 ; export function arabwrog1 ; begin
1019: LD_INT 0
1021: PPUSH
// uc_side = 2 ;
1022: LD_ADDR_OWVAR 20
1026: PUSH
1027: LD_INT 2
1029: ST_TO_ADDR
// uc_nation = nation_arabian ;
1030: LD_ADDR_OWVAR 21
1034: PUSH
1035: LD_INT 2
1037: ST_TO_ADDR
// hc_class = CLASS_SOLDIER ;
1038: LD_ADDR_OWVAR 28
1042: PUSH
1043: LD_INT 1
1045: ST_TO_ADDR
// PrepareSoldierSkills ( 1 ) ;
1046: LD_INT 1
1048: PPUSH
1049: CALL_OW 375
// hc_importance = 0 ;
1053: LD_ADDR_OWVAR 32
1057: PUSH
1058: LD_INT 0
1060: ST_TO_ADDR
// soldat5 = CreateHuman ;
1061: LD_ADDR_EXP 8
1065: PUSH
1066: CALL_OW 44
1070: ST_TO_ADDR
// soldat6 = CreateHuman ;
1071: LD_ADDR_EXP 9
1075: PUSH
1076: CALL_OW 44
1080: ST_TO_ADDR
// soldat7 = CreateHuman ;
1081: LD_ADDR_EXP 10
1085: PUSH
1086: CALL_OW 44
1090: ST_TO_ADDR
// soldat8 = CreateHuman ;
1091: LD_ADDR_EXP 11
1095: PUSH
1096: CALL_OW 44
1100: ST_TO_ADDR
// PlaceUnitArea ( soldat5 , Area43 , false ) ;
1101: LD_EXP 8
1105: PPUSH
1106: LD_INT 2
1108: PPUSH
1109: LD_INT 0
1111: PPUSH
1112: CALL_OW 49
// PlaceUnitArea ( soldat6 , Area43 , false ) ;
1116: LD_EXP 9
1120: PPUSH
1121: LD_INT 2
1123: PPUSH
1124: LD_INT 0
1126: PPUSH
1127: CALL_OW 49
// PlaceUnitArea ( soldat7 , Area43 , false ) ;
1131: LD_EXP 10
1135: PPUSH
1136: LD_INT 2
1138: PPUSH
1139: LD_INT 0
1141: PPUSH
1142: CALL_OW 49
// PlaceUnitArea ( soldat8 , Area43 , false ) ;
1146: LD_EXP 11
1150: PPUSH
1151: LD_INT 2
1153: PPUSH
1154: LD_INT 0
1156: PPUSH
1157: CALL_OW 49
// uc_side = 2 ;
1161: LD_ADDR_OWVAR 20
1165: PUSH
1166: LD_INT 2
1168: ST_TO_ADDR
// uc_nation = nation_arabian ;
1169: LD_ADDR_OWVAR 21
1173: PUSH
1174: LD_INT 2
1176: ST_TO_ADDR
// hc_class = CLASS_MECHANIC ;
1177: LD_ADDR_OWVAR 28
1181: PUSH
1182: LD_INT 3
1184: ST_TO_ADDR
// PrepareMechanicSkills ( 1 ) ;
1185: LD_INT 1
1187: PPUSH
1188: CALL_OW 377
// mechanik2 = CreateHuman ;
1192: LD_ADDR_EXP 12
1196: PUSH
1197: CALL_OW 44
1201: ST_TO_ADDR
// vc_chassis = ar_half_tracked ;
1202: LD_ADDR_OWVAR 37
1206: PUSH
1207: LD_INT 14
1209: ST_TO_ADDR
// vc_engine = engine_combustion ;
1210: LD_ADDR_OWVAR 39
1214: PUSH
1215: LD_INT 1
1217: ST_TO_ADDR
// vc_control = control_manual ;
1218: LD_ADDR_OWVAR 38
1222: PUSH
1223: LD_INT 1
1225: ST_TO_ADDR
// vc_weapon = ar_double_machine_gun ;
1226: LD_ADDR_OWVAR 40
1230: PUSH
1231: LD_INT 24
1233: ST_TO_ADDR
// hg2 = CreateVehicle ;
1234: LD_ADDR_EXP 13
1238: PUSH
1239: CALL_OW 45
1243: ST_TO_ADDR
// PlaceHumanInUnit ( mechanik2 , hg2 ) ;
1244: LD_EXP 12
1248: PPUSH
1249: LD_EXP 13
1253: PPUSH
1254: CALL_OW 52
// PlaceUnitArea ( hg2 , Area43 , false ) ;
1258: LD_EXP 13
1262: PPUSH
1263: LD_INT 2
1265: PPUSH
1266: LD_INT 0
1268: PPUSH
1269: CALL_OW 49
// comagressivemove ( [ soldat5 , soldat6 , soldat7 , soldat8 , hg2 ] , 72 , 58 ) ;
1273: LD_EXP 8
1277: PUSH
1278: LD_EXP 9
1282: PUSH
1283: LD_EXP 10
1287: PUSH
1288: LD_EXP 11
1292: PUSH
1293: LD_EXP 13
1297: PUSH
1298: EMPTY
1299: LIST
1300: LIST
1301: LIST
1302: LIST
1303: LIST
1304: PPUSH
1305: LD_INT 72
1307: PPUSH
1308: LD_INT 58
1310: PPUSH
1311: CALL_OW 114
// end ;
1315: LD_VAR 0 1
1319: RET
// export soldat9 , soldat10 , soldat11 , soldat12 , mechanik3 , hg3 ; export function arabwrog2 ; begin
1320: LD_INT 0
1322: PPUSH
// uc_side = 2 ;
1323: LD_ADDR_OWVAR 20
1327: PUSH
1328: LD_INT 2
1330: ST_TO_ADDR
// uc_nation = nation_arabian ;
1331: LD_ADDR_OWVAR 21
1335: PUSH
1336: LD_INT 2
1338: ST_TO_ADDR
// hc_class = CLASS_SOLDIER ;
1339: LD_ADDR_OWVAR 28
1343: PUSH
1344: LD_INT 1
1346: ST_TO_ADDR
// PrepareSoldierSkills ( 1 ) ;
1347: LD_INT 1
1349: PPUSH
1350: CALL_OW 375
// hc_importance = 0 ;
1354: LD_ADDR_OWVAR 32
1358: PUSH
1359: LD_INT 0
1361: ST_TO_ADDR
// soldat9 = CreateHuman ;
1362: LD_ADDR_EXP 14
1366: PUSH
1367: CALL_OW 44
1371: ST_TO_ADDR
// soldat10 = CreateHuman ;
1372: LD_ADDR_EXP 15
1376: PUSH
1377: CALL_OW 44
1381: ST_TO_ADDR
// soldat11 = CreateHuman ;
1382: LD_ADDR_EXP 16
1386: PUSH
1387: CALL_OW 44
1391: ST_TO_ADDR
// soldat12 = CreateHuman ;
1392: LD_ADDR_EXP 17
1396: PUSH
1397: CALL_OW 44
1401: ST_TO_ADDR
// PlaceUnitArea ( soldat9 , Area44 , false ) ;
1402: LD_EXP 14
1406: PPUSH
1407: LD_INT 3
1409: PPUSH
1410: LD_INT 0
1412: PPUSH
1413: CALL_OW 49
// PlaceUnitArea ( soldat10 , Area44 , false ) ;
1417: LD_EXP 15
1421: PPUSH
1422: LD_INT 3
1424: PPUSH
1425: LD_INT 0
1427: PPUSH
1428: CALL_OW 49
// PlaceUnitArea ( soldat11 , Area44 , false ) ;
1432: LD_EXP 16
1436: PPUSH
1437: LD_INT 3
1439: PPUSH
1440: LD_INT 0
1442: PPUSH
1443: CALL_OW 49
// PlaceUnitArea ( soldat12 , Area44 , false ) ;
1447: LD_EXP 17
1451: PPUSH
1452: LD_INT 3
1454: PPUSH
1455: LD_INT 0
1457: PPUSH
1458: CALL_OW 49
// uc_side = 2 ;
1462: LD_ADDR_OWVAR 20
1466: PUSH
1467: LD_INT 2
1469: ST_TO_ADDR
// uc_nation = nation_arabian ;
1470: LD_ADDR_OWVAR 21
1474: PUSH
1475: LD_INT 2
1477: ST_TO_ADDR
// hc_class = CLASS_MECHANIC ;
1478: LD_ADDR_OWVAR 28
1482: PUSH
1483: LD_INT 3
1485: ST_TO_ADDR
// PrepareMechanicSkills ( 1 ) ;
1486: LD_INT 1
1488: PPUSH
1489: CALL_OW 377
// hc_importance = 0 ;
1493: LD_ADDR_OWVAR 32
1497: PUSH
1498: LD_INT 0
1500: ST_TO_ADDR
// mechanik3 = CreateHuman ;
1501: LD_ADDR_EXP 18
1505: PUSH
1506: CALL_OW 44
1510: ST_TO_ADDR
// vc_chassis = ar_half_tracked ;
1511: LD_ADDR_OWVAR 37
1515: PUSH
1516: LD_INT 14
1518: ST_TO_ADDR
// vc_engine = engine_combustion ;
1519: LD_ADDR_OWVAR 39
1523: PUSH
1524: LD_INT 1
1526: ST_TO_ADDR
// vc_control = control_manual ;
1527: LD_ADDR_OWVAR 38
1531: PUSH
1532: LD_INT 1
1534: ST_TO_ADDR
// vc_weapon = ar_double_machine_gun ;
1535: LD_ADDR_OWVAR 40
1539: PUSH
1540: LD_INT 24
1542: ST_TO_ADDR
// hg3 = CreateVehicle ;
1543: LD_ADDR_EXP 19
1547: PUSH
1548: CALL_OW 45
1552: ST_TO_ADDR
// PlaceHumanInUnit ( mechanik3 , hg3 ) ;
1553: LD_EXP 18
1557: PPUSH
1558: LD_EXP 19
1562: PPUSH
1563: CALL_OW 52
// PlaceUnitArea ( hg3 , Area44 , false ) ;
1567: LD_EXP 19
1571: PPUSH
1572: LD_INT 3
1574: PPUSH
1575: LD_INT 0
1577: PPUSH
1578: CALL_OW 49
// comagressivemove ( [ soldat9 , soldat10 , soldat11 , soldat12 , hg3 ] , 98 , 56 ) ;
1582: LD_EXP 14
1586: PUSH
1587: LD_EXP 15
1591: PUSH
1592: LD_EXP 16
1596: PUSH
1597: LD_EXP 17
1601: PUSH
1602: LD_EXP 19
1606: PUSH
1607: EMPTY
1608: LIST
1609: LIST
1610: LIST
1611: LIST
1612: LIST
1613: PPUSH
1614: LD_INT 98
1616: PPUSH
1617: LD_INT 56
1619: PPUSH
1620: CALL_OW 114
// end ;
1624: LD_VAR 0 1
1628: RET
// export soldat13 , soldat14 , soldat15 , soldat16 ; export function arabwrog3 ; begin
1629: LD_INT 0
1631: PPUSH
// uc_side = 2 ;
1632: LD_ADDR_OWVAR 20
1636: PUSH
1637: LD_INT 2
1639: ST_TO_ADDR
// uc_nation = nation_arabian ;
1640: LD_ADDR_OWVAR 21
1644: PUSH
1645: LD_INT 2
1647: ST_TO_ADDR
// hc_class = CLASS_SOLDIER ;
1648: LD_ADDR_OWVAR 28
1652: PUSH
1653: LD_INT 1
1655: ST_TO_ADDR
// PrepareSoldierSkills ( 1 ) ;
1656: LD_INT 1
1658: PPUSH
1659: CALL_OW 375
// hc_importance = 0 ;
1663: LD_ADDR_OWVAR 32
1667: PUSH
1668: LD_INT 0
1670: ST_TO_ADDR
// soldat13 = CreateHuman ;
1671: LD_ADDR_EXP 20
1675: PUSH
1676: CALL_OW 44
1680: ST_TO_ADDR
// soldat14 = CreateHuman ;
1681: LD_ADDR_EXP 21
1685: PUSH
1686: CALL_OW 44
1690: ST_TO_ADDR
// PlaceUnitArea ( soldat13 , Area45 , false ) ;
1691: LD_EXP 20
1695: PPUSH
1696: LD_INT 4
1698: PPUSH
1699: LD_INT 0
1701: PPUSH
1702: CALL_OW 49
// PlaceUnitArea ( soldat14 , Area45 , false ) ;
1706: LD_EXP 21
1710: PPUSH
1711: LD_INT 4
1713: PPUSH
1714: LD_INT 0
1716: PPUSH
1717: CALL_OW 49
// comagressivemove ( [ soldat13 , soldat14 ] , 24 , 42 ) ;
1721: LD_EXP 20
1725: PUSH
1726: LD_EXP 21
1730: PUSH
1731: EMPTY
1732: LIST
1733: LIST
1734: PPUSH
1735: LD_INT 24
1737: PPUSH
1738: LD_INT 42
1740: PPUSH
1741: CALL_OW 114
// end ;
1745: LD_VAR 0 1
1749: RET
// export soldat17 , soldat18 , soldat19 , soldat20 ; export function arabwrog4 ; begin
1750: LD_INT 0
1752: PPUSH
// uc_side = 2 ;
1753: LD_ADDR_OWVAR 20
1757: PUSH
1758: LD_INT 2
1760: ST_TO_ADDR
// uc_nation = nation_arabian ;
1761: LD_ADDR_OWVAR 21
1765: PUSH
1766: LD_INT 2
1768: ST_TO_ADDR
// hc_importance = 0 ;
1769: LD_ADDR_OWVAR 32
1773: PUSH
1774: LD_INT 0
1776: ST_TO_ADDR
// hc_class = CLASS_SOLDIER ;
1777: LD_ADDR_OWVAR 28
1781: PUSH
1782: LD_INT 1
1784: ST_TO_ADDR
// PrepareSoldierSkills ( 1 ) ;
1785: LD_INT 1
1787: PPUSH
1788: CALL_OW 375
// soldat15 = CreateHuman ;
1792: LD_ADDR_EXP 22
1796: PUSH
1797: CALL_OW 44
1801: ST_TO_ADDR
// soldat16 = CreateHuman ;
1802: LD_ADDR_EXP 23
1806: PUSH
1807: CALL_OW 44
1811: ST_TO_ADDR
// soldat17 = CreateHuman ;
1812: LD_ADDR_EXP 24
1816: PUSH
1817: CALL_OW 44
1821: ST_TO_ADDR
// soldat18 = CreateHuman ;
1822: LD_ADDR_EXP 25
1826: PUSH
1827: CALL_OW 44
1831: ST_TO_ADDR
// PlaceUnitArea ( soldat15 , Area46 , false ) ;
1832: LD_EXP 22
1836: PPUSH
1837: LD_INT 5
1839: PPUSH
1840: LD_INT 0
1842: PPUSH
1843: CALL_OW 49
// PlaceUnitArea ( soldat16 , Area46 , false ) ;
1847: LD_EXP 23
1851: PPUSH
1852: LD_INT 5
1854: PPUSH
1855: LD_INT 0
1857: PPUSH
1858: CALL_OW 49
// PlaceUnitArea ( soldat17 , Area46 , false ) ;
1862: LD_EXP 24
1866: PPUSH
1867: LD_INT 5
1869: PPUSH
1870: LD_INT 0
1872: PPUSH
1873: CALL_OW 49
// PlaceUnitArea ( soldat18 , Area46 , false ) ;
1877: LD_EXP 25
1881: PPUSH
1882: LD_INT 5
1884: PPUSH
1885: LD_INT 0
1887: PPUSH
1888: CALL_OW 49
// comagressivemove ( [ soldat15 , soldat16 , soldat17 , soldat18 ] , 98 , 21 ) ;
1892: LD_EXP 22
1896: PUSH
1897: LD_EXP 23
1901: PUSH
1902: LD_EXP 24
1906: PUSH
1907: LD_EXP 25
1911: PUSH
1912: EMPTY
1913: LIST
1914: LIST
1915: LIST
1916: LIST
1917: PPUSH
1918: LD_INT 98
1920: PPUSH
1921: LD_INT 21
1923: PPUSH
1924: CALL_OW 114
// end ;
1928: LD_VAR 0 1
1932: RET
// every 2 2$00 trigger attacks_enabled do
1933: LD_EXP 1
1937: IFFALSE 1991
1939: GO 1941
1941: DISABLE
// begin enable ;
1942: ENABLE
// arabwrog ;
1943: CALL 718 0 0
// wait ( 0 0$1 ) ;
1947: LD_INT 35
1949: PPUSH
1950: CALL_OW 67
// arabwrog1 ;
1954: CALL 1019 0 0
// wait ( 0 0$1 ) ;
1958: LD_INT 35
1960: PPUSH
1961: CALL_OW 67
// arabwrog2 ;
1965: CALL 1320 0 0
// wait ( 0 0$1 ) ;
1969: LD_INT 35
1971: PPUSH
1972: CALL_OW 67
// arabwrog3 ;
1976: CALL 1629 0 0
// wait ( 0 0$1 ) ;
1980: LD_INT 35
1982: PPUSH
1983: CALL_OW 67
// arabwrog4 ;
1987: CALL 1750 0 0
// end ; end_of_file
1991: END
// every 0 0$01 do var un , EnginerList , buildings , depots , i ;
1992: GO 1994
1994: DISABLE
1995: LD_INT 0
1997: PPUSH
1998: PPUSH
1999: PPUSH
2000: PPUSH
2001: PPUSH
// begin enable ;
2002: ENABLE
// EnginerList := FilterAllUnits ( [ [ [ f_side , 4 ] , [ f_class , 2 ] , [ f_lives , 1000 ] ] ] ) ;
2003: LD_ADDR_VAR 0 2
2007: PUSH
2008: LD_INT 22
2010: PUSH
2011: LD_INT 4
2013: PUSH
2014: EMPTY
2015: LIST
2016: LIST
2017: PUSH
2018: LD_INT 25
2020: PUSH
2021: LD_INT 2
2023: PUSH
2024: EMPTY
2025: LIST
2026: LIST
2027: PUSH
2028: LD_INT 24
2030: PUSH
2031: LD_INT 1000
2033: PUSH
2034: EMPTY
2035: LIST
2036: LIST
2037: PUSH
2038: EMPTY
2039: LIST
2040: LIST
2041: LIST
2042: PUSH
2043: EMPTY
2044: LIST
2045: PPUSH
2046: CALL_OW 69
2050: ST_TO_ADDR
// buildings := FilterAllUnits ( [ [ [ f_side , 4 ] , [ f_type , unit_building ] , [ f_not , [ f_lives , 1000 ] ] ] ] ) ;
2051: LD_ADDR_VAR 0 3
2055: PUSH
2056: LD_INT 22
2058: PUSH
2059: LD_INT 4
2061: PUSH
2062: EMPTY
2063: LIST
2064: LIST
2065: PUSH
2066: LD_INT 21
2068: PUSH
2069: LD_INT 3
2071: PUSH
2072: EMPTY
2073: LIST
2074: LIST
2075: PUSH
2076: LD_INT 3
2078: PUSH
2079: LD_INT 24
2081: PUSH
2082: LD_INT 1000
2084: PUSH
2085: EMPTY
2086: LIST
2087: LIST
2088: PUSH
2089: EMPTY
2090: LIST
2091: LIST
2092: PUSH
2093: EMPTY
2094: LIST
2095: LIST
2096: LIST
2097: PUSH
2098: EMPTY
2099: LIST
2100: PPUSH
2101: CALL_OW 69
2105: ST_TO_ADDR
// if buildings > 0 then
2106: LD_VAR 0 3
2110: PUSH
2111: LD_INT 0
2113: GREATER
2114: IFFALSE 2196
// begin for i = 1 to EnginerList do
2116: LD_ADDR_VAR 0 5
2120: PUSH
2121: DOUBLE
2122: LD_INT 1
2124: DEC
2125: ST_TO_ADDR
2126: LD_VAR 0 2
2130: PUSH
2131: FOR_TO
2132: IFFALSE 2194
// begin if IsInUnit ( EnginerList [ i ] ) then
2134: LD_VAR 0 2
2138: PUSH
2139: LD_VAR 0 5
2143: ARRAY
2144: PPUSH
2145: CALL_OW 310
2149: IFFALSE 2168
// ComExitBuilding ( EnginerList [ i ] ) else
2151: LD_VAR 0 2
2155: PUSH
2156: LD_VAR 0 5
2160: ARRAY
2161: PPUSH
2162: CALL_OW 122
2166: GO 2192
// ComRepairBuilding ( EnginerList [ i ] , buildings [ 1 ] ) ;
2168: LD_VAR 0 2
2172: PUSH
2173: LD_VAR 0 5
2177: ARRAY
2178: PPUSH
2179: LD_VAR 0 3
2183: PUSH
2184: LD_INT 1
2186: ARRAY
2187: PPUSH
2188: CALL_OW 130
// end ;
2192: GO 2131
2194: POP
2195: POP
// end ; if buildings = 0 then
2196: LD_VAR 0 3
2200: PUSH
2201: LD_INT 0
2203: EQUAL
2204: IFFALSE 2264
// begin for i = 1 to EnginerList do
2206: LD_ADDR_VAR 0 5
2210: PUSH
2211: DOUBLE
2212: LD_INT 1
2214: DEC
2215: ST_TO_ADDR
2216: LD_VAR 0 2
2220: PUSH
2221: FOR_TO
2222: IFFALSE 2262
// begin if not HasTask ( EnginerList [ i ] ) and not IsInUnit ( EnginerList [ i ] ) then
2224: LD_VAR 0 2
2228: PUSH
2229: LD_VAR 0 5
2233: ARRAY
2234: PPUSH
2235: CALL_OW 314
2239: NOT
2240: PUSH
2241: LD_VAR 0 2
2245: PUSH
2246: LD_VAR 0 5
2250: ARRAY
2251: PPUSH
2252: CALL_OW 310
2256: NOT
2257: AND
2258: IFFALSE 2260
// end ;
2260: GO 2221
2262: POP
2263: POP
// end ; end ;
2264: PPOPN 5
2266: END
// every 0 0$01 do
2267: GO 2269
2269: DISABLE
// begin AddComResearch ( l1 , tech_Tech1 ) ;
2270: LD_INT 125
2272: PPUSH
2273: LD_INT 48
2275: PPUSH
2276: CALL_OW 184
// AddComResearch ( l2 , tech_Tech1 ) ;
2280: LD_INT 121
2282: PPUSH
2283: LD_INT 48
2285: PPUSH
2286: CALL_OW 184
// end ;
2290: END
