// starting begin CenteronUnits ( m ) ;
   0: LD_INT 209
   2: PPUSH
   3: CALL_OW 85
// SaveForQuickRestart ;
   7: CALL_OW 22
// Resetfog ;
  11: CALL_OW 335
// ingameon ;
  15: CALL_OW 8
// Say ( m , d22 ) ;
  19: LD_INT 209
  21: PPUSH
  22: LD_STRING d22
  24: PPUSH
  25: CALL_OW 88
// SayRadio ( my , d23 ) ;
  29: LD_INT 206
  31: PPUSH
  32: LD_STRING d23
  34: PPUSH
  35: CALL_OW 94
// Say ( m , d24 ) ;
  39: LD_INT 209
  41: PPUSH
  42: LD_STRING d24
  44: PPUSH
  45: CALL_OW 88
// SetAreaMapShow ( Area68 , 1 ) ;
  49: LD_INT 1
  51: PPUSH
  52: LD_INT 1
  54: PPUSH
  55: CALL_OW 424
// ChangeMissionObjectives ( CEL4 ) ;
  59: LD_STRING CEL4
  61: PPUSH
  62: CALL_OW 337
// ingameoff ;
  66: CALL_OW 9
// end ; end_of_file
  70: END
// every 1 1$00 do
  71: GO 73
  73: DISABLE
// begin CreateCratesAnywhere ( Rand ( 2 , 5 ) , true ) ;
  74: LD_INT 2
  76: PPUSH
  77: LD_INT 5
  79: PPUSH
  80: CALL_OW 12
  84: PPUSH
  85: LD_INT 1
  87: PPUSH
  88: CALL_OW 57
// enable ;
  92: ENABLE
// end ; end_of_file
  93: END
// every 0 0$01 do var un , EnginerList , buildings , depots , i ;
  94: GO 96
  96: DISABLE
  97: LD_INT 0
  99: PPUSH
 100: PPUSH
 101: PPUSH
 102: PPUSH
 103: PPUSH
// begin enable ;
 104: ENABLE
// EnginerList := FilterAllUnits ( [ [ [ f_side , 4 ] , [ f_class , 2 ] , [ f_lives , 1000 ] ] ] ) ;
 105: LD_ADDR_VAR 0 2
 109: PUSH
 110: LD_INT 22
 112: PUSH
 113: LD_INT 4
 115: PUSH
 116: EMPTY
 117: LIST
 118: LIST
 119: PUSH
 120: LD_INT 25
 122: PUSH
 123: LD_INT 2
 125: PUSH
 126: EMPTY
 127: LIST
 128: LIST
 129: PUSH
 130: LD_INT 24
 132: PUSH
 133: LD_INT 1000
 135: PUSH
 136: EMPTY
 137: LIST
 138: LIST
 139: PUSH
 140: EMPTY
 141: LIST
 142: LIST
 143: LIST
 144: PUSH
 145: EMPTY
 146: LIST
 147: PPUSH
 148: CALL_OW 69
 152: ST_TO_ADDR
// buildings := FilterAllUnits ( [ [ [ f_side , 4 ] , [ f_type , unit_building ] , [ f_not , [ f_lives , 1000 ] ] ] ] ) ;
 153: LD_ADDR_VAR 0 3
 157: PUSH
 158: LD_INT 22
 160: PUSH
 161: LD_INT 4
 163: PUSH
 164: EMPTY
 165: LIST
 166: LIST
 167: PUSH
 168: LD_INT 21
 170: PUSH
 171: LD_INT 3
 173: PUSH
 174: EMPTY
 175: LIST
 176: LIST
 177: PUSH
 178: LD_INT 3
 180: PUSH
 181: LD_INT 24
 183: PUSH
 184: LD_INT 1000
 186: PUSH
 187: EMPTY
 188: LIST
 189: LIST
 190: PUSH
 191: EMPTY
 192: LIST
 193: LIST
 194: PUSH
 195: EMPTY
 196: LIST
 197: LIST
 198: LIST
 199: PUSH
 200: EMPTY
 201: LIST
 202: PPUSH
 203: CALL_OW 69
 207: ST_TO_ADDR
// if buildings > 0 then
 208: LD_VAR 0 3
 212: PUSH
 213: LD_INT 0
 215: GREATER
 216: IFFALSE 298
// begin for i = 1 to EnginerList do
 218: LD_ADDR_VAR 0 5
 222: PUSH
 223: DOUBLE
 224: LD_INT 1
 226: DEC
 227: ST_TO_ADDR
 228: LD_VAR 0 2
 232: PUSH
 233: FOR_TO
 234: IFFALSE 296
// begin if IsInUnit ( EnginerList [ i ] ) then
 236: LD_VAR 0 2
 240: PUSH
 241: LD_VAR 0 5
 245: ARRAY
 246: PPUSH
 247: CALL_OW 310
 251: IFFALSE 270
// ComExitBuilding ( EnginerList [ i ] ) else
 253: LD_VAR 0 2
 257: PUSH
 258: LD_VAR 0 5
 262: ARRAY
 263: PPUSH
 264: CALL_OW 122
 268: GO 294
// ComRepairBuilding ( EnginerList [ i ] , buildings [ 1 ] ) ;
 270: LD_VAR 0 2
 274: PUSH
 275: LD_VAR 0 5
 279: ARRAY
 280: PPUSH
 281: LD_VAR 0 3
 285: PUSH
 286: LD_INT 1
 288: ARRAY
 289: PPUSH
 290: CALL_OW 130
// end ;
 294: GO 233
 296: POP
 297: POP
// end ; if buildings = 0 then
 298: LD_VAR 0 3
 302: PUSH
 303: LD_INT 0
 305: EQUAL
 306: IFFALSE 366
// begin for i = 1 to EnginerList do
 308: LD_ADDR_VAR 0 5
 312: PUSH
 313: DOUBLE
 314: LD_INT 1
 316: DEC
 317: ST_TO_ADDR
 318: LD_VAR 0 2
 322: PUSH
 323: FOR_TO
 324: IFFALSE 364
// begin if not HasTask ( EnginerList [ i ] ) and not IsInUnit ( EnginerList [ i ] ) then
 326: LD_VAR 0 2
 330: PUSH
 331: LD_VAR 0 5
 335: ARRAY
 336: PPUSH
 337: CALL_OW 314
 341: NOT
 342: PUSH
 343: LD_VAR 0 2
 347: PUSH
 348: LD_VAR 0 5
 352: ARRAY
 353: PPUSH
 354: CALL_OW 310
 358: NOT
 359: AND
 360: IFFALSE 362
// end ;
 362: GO 323
 364: POP
 365: POP
// end ; end ; end_of_file
 366: PPOPN 5
 368: END
// every 0 0$0.1 trigger IsDead ( m ) do
 369: LD_INT 209
 371: PPUSH
 372: CALL_OW 301
 376: IFFALSE 395
 378: GO 380
 380: DISABLE
// begin wait ( 0 0$1 ) ;
 381: LD_INT 35
 383: PPUSH
 384: CALL_OW 67
// YouLost ( Madison_nie_zyje ) ;
 388: LD_STRING Madison_nie_zyje
 390: PPUSH
 391: CALL_OW 104
// end ;
 395: END
// every 0 0$0.1 trigger IsDead ( s ) do
 396: LD_INT 210
 398: PPUSH
 399: CALL_OW 301
 403: IFFALSE 422
 405: GO 407
 407: DISABLE
// begin wait ( 0 0$1 ) ;
 408: LD_INT 35
 410: PPUSH
 411: CALL_OW 67
// YouLost ( Greene_nie_zyje ) ;
 415: LD_STRING Greene_nie_zyje
 417: PPUSH
 418: CALL_OW 104
// end ;
 422: END
// on Contact ( side1 , side2 ) do begin if side1 = 1 and side2 = 4 then
 423: LD_VAR 0 1
 427: PUSH
 428: LD_INT 1
 430: EQUAL
 431: PUSH
 432: LD_VAR 0 2
 436: PUSH
 437: LD_INT 4
 439: EQUAL
 440: AND
 441: IFFALSE 450
// begin YouLost ( zaatakowales_sojusznika ) ;
 443: LD_STRING zaatakowales_sojusznika
 445: PPUSH
 446: CALL_OW 104
// end ; end ; end_of_file
 450: PPOPN 2
 452: END
// every 0 0$01 trigger IsInArea ( m , Area68 ) do
 453: LD_INT 209
 455: PPUSH
 456: LD_INT 1
 458: PPUSH
 459: CALL_OW 308
 463: IFFALSE 564
 465: GO 467
 467: DISABLE
// begin CenteronUnits ( m ) ;
 468: LD_INT 209
 470: PPUSH
 471: CALL_OW 85
// ingameon ;
 475: CALL_OW 8
// Say ( my , d25 ) ;
 479: LD_INT 206
 481: PPUSH
 482: LD_STRING d25
 484: PPUSH
 485: CALL_OW 88
// Say ( m , d26 ) ;
 489: LD_INT 209
 491: PPUSH
 492: LD_STRING d26
 494: PPUSH
 495: CALL_OW 88
// Say ( my , d27 ) ;
 499: LD_INT 206
 501: PPUSH
 502: LD_STRING d27
 504: PPUSH
 505: CALL_OW 88
// Say ( m , d28 ) ;
 509: LD_INT 209
 511: PPUSH
 512: LD_STRING d28
 514: PPUSH
 515: CALL_OW 88
// ingameoff ;
 519: CALL_OW 9
// AddMedal ( medal1 , 1 ) ;
 523: LD_STRING medal1
 525: PPUSH
 526: LD_INT 1
 528: PPUSH
 529: CALL_OW 101
// AddMedal ( medal2 , 1 ) ;
 533: LD_STRING medal2
 535: PPUSH
 536: LD_INT 1
 538: PPUSH
 539: CALL_OW 101
// AddMedal ( medal3 , 1 ) ;
 543: LD_STRING medal3
 545: PPUSH
 546: LD_INT 1
 548: PPUSH
 549: CALL_OW 101
// GiveMedals ( Main ) ;
 553: LD_STRING Main
 555: PPUSH
 556: CALL_OW 102
// YouWin ;
 560: CALL_OW 103
// end ; end_of_file
 564: END
// every 0 0$01 do
 565: GO 567
 567: DISABLE
// begin comenterunit ( [ s1 ] , br ) ;
 568: LD_INT 212
 570: PUSH
 571: EMPTY
 572: LIST
 573: PPUSH
 574: LD_INT 208
 576: PPUSH
 577: CALL_OW 120
// comenterunit ( [ s2 ] , br ) ;
 581: LD_INT 213
 583: PUSH
 584: EMPTY
 585: LIST
 586: PPUSH
 587: LD_INT 208
 589: PPUSH
 590: CALL_OW 120
// comenterunit ( [ n1 ] , l1 ) ;
 594: LD_INT 227
 596: PUSH
 597: EMPTY
 598: LIST
 599: PPUSH
 600: LD_INT 169
 602: PPUSH
 603: CALL_OW 120
// comenterunit ( [ n2 ] , l2 ) ;
 607: LD_INT 228
 609: PUSH
 610: EMPTY
 611: LIST
 612: PPUSH
 613: LD_INT 159
 615: PPUSH
 616: CALL_OW 120
// comenterunit ( [ m1 ] , fc ) ;
 620: LD_INT 229
 622: PUSH
 623: EMPTY
 624: LIST
 625: PPUSH
 626: LD_INT 156
 628: PPUSH
 629: CALL_OW 120
// end ;
 633: END
