// every 0 0$01 do
   0: GO 2
   2: DISABLE
// begin comenterunit ( [ s1 ] , br ) ;
   3: LD_INT 76
   5: PUSH
   6: EMPTY
   7: LIST
   8: PPUSH
   9: LD_INT 65
  11: PPUSH
  12: CALL_OW 120
// comenterunit ( [ s4 ] , br1 ) ;
  16: LD_INT 77
  18: PUSH
  19: EMPTY
  20: LIST
  21: PPUSH
  22: LD_INT 101
  24: PPUSH
  25: CALL_OW 120
// comenterunit ( [ n1 ] , l1 ) ;
  29: LD_INT 81
  31: PUSH
  32: EMPTY
  33: LIST
  34: PPUSH
  35: LD_INT 48
  37: PPUSH
  38: CALL_OW 120
// comenterunit ( [ s2 ] , lab1 ) ;
  42: LD_INT 75
  44: PUSH
  45: EMPTY
  46: LIST
  47: PPUSH
  48: LD_INT 25
  50: PPUSH
  51: CALL_OW 120
// comenterunit ( [ m1 ] , f1 ) ;
  55: LD_INT 79
  57: PUSH
  58: EMPTY
  59: LIST
  60: PPUSH
  61: LD_INT 55
  63: PPUSH
  64: CALL_OW 120
// comenterunit ( [ m2 ] , f2 ) ;
  68: LD_INT 80
  70: PUSH
  71: EMPTY
  72: LIST
  73: PPUSH
  74: LD_INT 56
  76: PPUSH
  77: CALL_OW 120
// comenterunit ( [ s3 ] , br3 ) ;
  81: LD_INT 78
  83: PUSH
  84: EMPTY
  85: LIST
  86: PPUSH
  87: LD_INT 31
  89: PPUSH
  90: CALL_OW 120
// comenterunit ( [ s5 ] , br5 ) ;
  94: LD_INT 103
  96: PUSH
  97: EMPTY
  98: LIST
  99: PPUSH
 100: LD_INT 33
 102: PPUSH
 103: CALL_OW 120
// end ;
 107: END
// export ms ; export function cms ; begin
 108: LD_INT 0
 110: PPUSH
// uc_side = 1 ;
 111: LD_ADDR_OWVAR 20
 115: PUSH
 116: LD_INT 1
 118: ST_TO_ADDR
// uc_nation = nation_american ;
 119: LD_ADDR_OWVAR 21
 123: PUSH
 124: LD_INT 1
 126: ST_TO_ADDR
// hc_name = Bradley Madison ;
 127: LD_ADDR_OWVAR 26
 131: PUSH
 132: LD_STRING Bradley Madison
 134: ST_TO_ADDR
// hc_sex = sex_male ;
 135: LD_ADDR_OWVAR 27
 139: PUSH
 140: LD_INT 1
 142: ST_TO_ADDR
// hc_class = 1 ;
 143: LD_ADDR_OWVAR 28
 147: PUSH
 148: LD_INT 1
 150: ST_TO_ADDR
// hc_importance = 100 ;
 151: LD_ADDR_OWVAR 32
 155: PUSH
 156: LD_INT 100
 158: ST_TO_ADDR
// hc_gallery := E3galery ;
 159: LD_ADDR_OWVAR 33
 163: PUSH
 164: LD_STRING E3galery
 166: ST_TO_ADDR
// hc_face_number := 5 ;
 167: LD_ADDR_OWVAR 34
 171: PUSH
 172: LD_INT 5
 174: ST_TO_ADDR
// hc_basic_skills := [ 0 , 2 , 0 , 0 ] ;
 175: LD_ADDR_OWVAR 30
 179: PUSH
 180: LD_INT 0
 182: PUSH
 183: LD_INT 2
 185: PUSH
 186: LD_INT 0
 188: PUSH
 189: LD_INT 0
 191: PUSH
 192: EMPTY
 193: LIST
 194: LIST
 195: LIST
 196: LIST
 197: ST_TO_ADDR
// hc_skills := [ 0 , 2 , 0 , 0 ] ;
 198: LD_ADDR_OWVAR 31
 202: PUSH
 203: LD_INT 0
 205: PUSH
 206: LD_INT 2
 208: PUSH
 209: LD_INT 0
 211: PUSH
 212: LD_INT 0
 214: PUSH
 215: EMPTY
 216: LIST
 217: LIST
 218: LIST
 219: LIST
 220: ST_TO_ADDR
// ms = CreateHuman ;
 221: LD_ADDR_EXP 1
 225: PUSH
 226: CALL_OW 44
 230: ST_TO_ADDR
// PlaceUnitArea ( ms , area11 , false ) ;
 231: LD_EXP 1
 235: PPUSH
 236: LD_INT 1
 238: PPUSH
 239: LD_INT 0
 241: PPUSH
 242: CALL_OW 49
// end ;
 246: LD_VAR 0 1
 250: RET
// every 0 0$01 do
 251: GO 253
 253: DISABLE
// begin AddComResearch ( l1 , tech_Tech1 ) ;
 254: LD_INT 48
 256: PPUSH
 257: LD_INT 48
 259: PPUSH
 260: CALL_OW 184
// end ; end_of_file
 264: END
// on Contact ( side1 , side2 ) do begin if side1 = 1 and side2 = 4 then
 265: LD_VAR 0 1
 269: PUSH
 270: LD_INT 1
 272: EQUAL
 273: PUSH
 274: LD_VAR 0 2
 278: PUSH
 279: LD_INT 4
 281: EQUAL
 282: AND
 283: IFFALSE 292
// begin YouLost ( zaatakowales_sojusznika ) ;
 285: LD_STRING zaatakowales_sojusznika
 287: PPUSH
 288: CALL_OW 104
// end ; end ; end_of_file
 292: PPOPN 2
 294: END
// starting begin CenteronUnits ( m ) ;
 295: LD_INT 17
 297: PPUSH
 298: CALL_OW 85
// SaveForQuickRestart ;
 302: CALL_OW 22
// Resetfog ;
 306: CALL_OW 335
// ChangeMissionObjectives ( CEL1 ) ;
 310: LD_STRING CEL1
 312: PPUSH
 313: CALL_OW 337
// Say ( m , d1 ) ;
 317: LD_INT 17
 319: PPUSH
 320: LD_STRING d1
 322: PPUSH
 323: CALL_OW 88
// Say ( s , d2 ) ;
 327: LD_INT 22
 329: PPUSH
 330: LD_STRING d2
 332: PPUSH
 333: CALL_OW 88
// Say ( m , d3 ) ;
 337: LD_INT 17
 339: PPUSH
 340: LD_STRING d3
 342: PPUSH
 343: CALL_OW 88
// Say ( s , d4 ) ;
 347: LD_INT 22
 349: PPUSH
 350: LD_STRING d4
 352: PPUSH
 353: CALL_OW 88
// Say ( m , d5 ) ;
 357: LD_INT 17
 359: PPUSH
 360: LD_STRING d5
 362: PPUSH
 363: CALL_OW 88
// Say ( s , d6 ) ;
 367: LD_INT 22
 369: PPUSH
 370: LD_STRING d6
 372: PPUSH
 373: CALL_OW 88
// wait ( 0 0$40 ) ;
 377: LD_INT 1400
 379: PPUSH
 380: CALL_OW 67
// Say ( my , d7 ) ;
 384: LD_INT 94
 386: PPUSH
 387: LD_STRING d7
 389: PPUSH
 390: CALL_OW 88
// Say ( m , d8 ) ;
 394: LD_INT 17
 396: PPUSH
 397: LD_STRING d8
 399: PPUSH
 400: CALL_OW 88
// wait ( 1 1$00 ) ;
 404: LD_INT 2100
 406: PPUSH
 407: CALL_OW 67
// SayRadio ( my , d9 ) ;
 411: LD_INT 94
 413: PPUSH
 414: LD_STRING d9
 416: PPUSH
 417: CALL_OW 94
// ComEnterUnit ( n1 , b1 ) ;
 421: LD_INT 81
 423: PPUSH
 424: LD_INT 63
 426: PPUSH
 427: CALL_OW 120
// ComEnterUnit ( bf , b1 ) ;
 431: LD_INT 23
 433: PPUSH
 434: LD_INT 63
 436: PPUSH
 437: CALL_OW 120
// ComEnterUnit ( m1 , b1 ) ;
 441: LD_INT 79
 443: PPUSH
 444: LD_INT 63
 446: PPUSH
 447: CALL_OW 120
// ComEnterUnit ( m2 , b1 ) ;
 451: LD_INT 80
 453: PPUSH
 454: LD_INT 63
 456: PPUSH
 457: CALL_OW 120
// comagressivemove ( [ s1 ] , 52 , 37 ) ;
 461: LD_INT 76
 463: PUSH
 464: EMPTY
 465: LIST
 466: PPUSH
 467: LD_INT 52
 469: PPUSH
 470: LD_INT 37
 472: PPUSH
 473: CALL_OW 114
// comagressivemove ( [ s2 ] , 52 , 37 ) ;
 477: LD_INT 75
 479: PUSH
 480: EMPTY
 481: LIST
 482: PPUSH
 483: LD_INT 52
 485: PPUSH
 486: LD_INT 37
 488: PPUSH
 489: CALL_OW 114
// comagressivemove ( [ s3 ] , 52 , 37 ) ;
 493: LD_INT 78
 495: PUSH
 496: EMPTY
 497: LIST
 498: PPUSH
 499: LD_INT 52
 501: PPUSH
 502: LD_INT 37
 504: PPUSH
 505: CALL_OW 114
// comagressivemove ( [ s4 ] , 52 , 37 ) ;
 509: LD_INT 77
 511: PUSH
 512: EMPTY
 513: LIST
 514: PPUSH
 515: LD_INT 52
 517: PPUSH
 518: LD_INT 37
 520: PPUSH
 521: CALL_OW 114
// comagressivemove ( [ s5 ] , 52 , 37 ) ;
 525: LD_INT 103
 527: PUSH
 528: EMPTY
 529: LIST
 530: PPUSH
 531: LD_INT 52
 533: PPUSH
 534: LD_INT 37
 536: PPUSH
 537: CALL_OW 114
// ChangeMissionObjectives ( CEL1W ) ;
 541: LD_STRING CEL1W
 543: PPUSH
 544: CALL_OW 337
// ChangeMissionObjectives ( CEL2 ) ;
 548: LD_STRING CEL2
 550: PPUSH
 551: CALL_OW 337
// SetAreaMapShow ( Area11 , 1 ) ;
 555: LD_INT 1
 557: PPUSH
 558: LD_INT 1
 560: PPUSH
 561: CALL_OW 424
// SayRadio ( my , d9a ) ;
 565: LD_INT 94
 567: PPUSH
 568: LD_STRING d9a
 570: PPUSH
 571: CALL_OW 94
// Say ( m , d10 ) ;
 575: LD_INT 17
 577: PPUSH
 578: LD_STRING d10
 580: PPUSH
 581: CALL_OW 88
// Say ( s , d11 ) ;
 585: LD_INT 22
 587: PPUSH
 588: LD_STRING d11
 590: PPUSH
 591: CALL_OW 88
// Say ( my , d12 ) ;
 595: LD_INT 94
 597: PPUSH
 598: LD_STRING d12
 600: PPUSH
 601: CALL_OW 88
// ComEnterUnit ( s , b1 ) ;
 605: LD_INT 22
 607: PPUSH
 608: LD_INT 63
 610: PPUSH
 611: CALL_OW 120
// end ; end_of_file
 615: END
// every 0 0$01 trigger IsInArea ( m , Area11 ) do
 616: LD_INT 17
 618: PPUSH
 619: LD_INT 1
 621: PPUSH
 622: CALL_OW 308
 626: IFFALSE 656
 628: GO 630
 630: DISABLE
// begin RemoveUnit ( M ) ;
 631: LD_INT 17
 633: PPUSH
 634: CALL_OW 64
// ChangeMissionObjectives ( CEL2W ) ;
 638: LD_STRING CEL2W
 640: PPUSH
 641: CALL_OW 337
// ChangeMissionObjectives ( CEL3 ) ;
 645: LD_STRING CEL3
 647: PPUSH
 648: CALL_OW 337
// cms ;
 652: CALL 108 0 0
// end ;
 656: END
// every 0 0$01 trigger IsInArea ( ms , Area12 ) do
 657: LD_EXP 1
 661: PPUSH
 662: LD_INT 2
 664: PPUSH
 665: CALL_OW 308
 669: IFFALSE 832
 671: GO 673
 673: DISABLE
// begin ingameon ;
 674: CALL_OW 8
// Say ( my , d13 ) ;
 678: LD_INT 94
 680: PPUSH
 681: LD_STRING d13
 683: PPUSH
 684: CALL_OW 88
// Say ( s2 , d14 ) ;
 688: LD_INT 75
 690: PPUSH
 691: LD_STRING d14
 693: PPUSH
 694: CALL_OW 88
// Say ( my , d15 ) ;
 698: LD_INT 94
 700: PPUSH
 701: LD_STRING d15
 703: PPUSH
 704: CALL_OW 88
// ingameoff ;
 708: CALL_OW 9
// comagressivemove ( [ s1 ] , 100 , 66 ) ;
 712: LD_INT 76
 714: PUSH
 715: EMPTY
 716: LIST
 717: PPUSH
 718: LD_INT 100
 720: PPUSH
 721: LD_INT 66
 723: PPUSH
 724: CALL_OW 114
// comagressivemove ( [ s2 ] , 100 , 66 ) ;
 728: LD_INT 75
 730: PUSH
 731: EMPTY
 732: LIST
 733: PPUSH
 734: LD_INT 100
 736: PPUSH
 737: LD_INT 66
 739: PPUSH
 740: CALL_OW 114
// comagressivemove ( [ s3 ] , 100 , 66 ) ;
 744: LD_INT 78
 746: PUSH
 747: EMPTY
 748: LIST
 749: PPUSH
 750: LD_INT 100
 752: PPUSH
 753: LD_INT 66
 755: PPUSH
 756: CALL_OW 114
// comagressivemove ( [ s4 ] , 100 , 66 ) ;
 760: LD_INT 77
 762: PUSH
 763: EMPTY
 764: LIST
 765: PPUSH
 766: LD_INT 100
 768: PPUSH
 769: LD_INT 66
 771: PPUSH
 772: CALL_OW 114
// comagressivemove ( [ s5 ] , 100 , 66 ) ;
 776: LD_INT 103
 778: PUSH
 779: EMPTY
 780: LIST
 781: PPUSH
 782: LD_INT 100
 784: PPUSH
 785: LD_INT 66
 787: PPUSH
 788: CALL_OW 114
// comagressivemove ( [ my ] , 100 , 66 ) ;
 792: LD_INT 94
 794: PUSH
 795: EMPTY
 796: LIST
 797: PPUSH
 798: LD_INT 100
 800: PPUSH
 801: LD_INT 66
 803: PPUSH
 804: CALL_OW 114
// ChangeMissionObjectives ( CEL3W ) ;
 808: LD_STRING CEL3W
 810: PPUSH
 811: CALL_OW 337
// ChangeMissionObjectives ( CEL4 ) ;
 815: LD_STRING CEL4
 817: PPUSH
 818: CALL_OW 337
// SetAreaMapShow ( Area14 , 1 ) ;
 822: LD_INT 3
 824: PPUSH
 825: LD_INT 1
 827: PPUSH
 828: CALL_OW 424
// end ;
 832: END
// every 0 0$01 trigger IsInArea ( ms , Area14 ) do
 833: LD_EXP 1
 837: PPUSH
 838: LD_INT 3
 840: PPUSH
 841: CALL_OW 308
 845: IFFALSE 916
 847: GO 849
 849: DISABLE
// begin ingameon ;
 850: CALL_OW 8
// Say ( my , d16 ) ;
 854: LD_INT 94
 856: PPUSH
 857: LD_STRING d16
 859: PPUSH
 860: CALL_OW 88
// Say ( s2 , d17 ) ;
 864: LD_INT 75
 866: PPUSH
 867: LD_STRING d17
 869: PPUSH
 870: CALL_OW 88
// Say ( my , d18 ) ;
 874: LD_INT 94
 876: PPUSH
 877: LD_STRING d18
 879: PPUSH
 880: CALL_OW 88
// Say ( ms , d19 ) ;
 884: LD_EXP 1
 888: PPUSH
 889: LD_STRING d19
 891: PPUSH
 892: CALL_OW 88
// Say ( my , d20 ) ;
 896: LD_INT 94
 898: PPUSH
 899: LD_STRING d20
 901: PPUSH
 902: CALL_OW 88
// ChangeMap ( 1 , %_cont ) ;
 906: LD_INT 1
 908: PPUSH
 909: LD_STRING %_cont
 911: PPUSH
 912: CALL_OW 340
// end ;
 916: END
