home *** CD-ROM | disk | FTP | other *** search
/ PC World Plus! (NZ) 2001 October / PCW1001.iso / Games / startopiademo1.exe / missions / 00 / spies002.txt < prev    next >
Encoding:
Text File  |  2001-05-15  |  1.5 KB  |  91 lines
  1. ;SPIES********************************************************************
  2. :Spies100
  3. if
  4.     spymessage = 0
  5.     spytype = 0
  6.     turn > spytime
  7.     energy > 10000
  8.     enemy_count > 0
  9. then
  10.     incoming local_comms respond spy_wanted within 1000 "general_assassin01"
  11.     set spymessage 1
  12. end
  13.  
  14. :Spies101
  15. if
  16.     spy_wanted = YES
  17.     spytype = 0
  18. then
  19.     place_peep spy assasin enemies
  20.     addenergy (0-(3000*enemy_count))
  21.     set spy_wanted 3
  22.     set spytype (rnd%2)
  23.     set spytime ((turn + 20000) + (rnd%10000))
  24.     set spymessage 0
  25. end
  26.  
  27.  
  28. :Spies102
  29. if
  30.     spymessage = 0
  31.     spytype = 1
  32.     turn > spytime
  33.     energy > 10000
  34.     enemy_count > 0
  35. then
  36.     incoming local_comms respond spy_wanted within 1000 "general_bomber01"
  37.     set spymessage 1
  38. end
  39.  
  40. :Spies103
  41. if
  42.     spy_wanted = YES
  43.     spytype = 1
  44. then
  45.     place_peep spy saboteur enemies
  46.     addenergy (0-(3000*enemy_count))
  47.     set spy_wanted 3
  48.     set spytype (rnd%2)
  49.     set spytime ((turn + 20000) + (rnd%10000))
  50.     set spymessage 0
  51. end
  52.  
  53. :spies104
  54. if
  55.     spy_wanted < 2
  56. then
  57.     set spy_wanted 3
  58.     set spytime ((turn + 20000) + (rnd%10000))
  59.     set spytype (rnd%2)
  60.     set spymessage 0
  61. end
  62.  
  63. :spies105
  64. if
  65.     spymessage = 0
  66.     turn > spytime
  67.     enemy_count < 1
  68. then
  69.     set spytime ((turn + 2000) + (rnd%1000))
  70. end
  71.  
  72. ;PEEPSPIES
  73. :AlienSpies
  74. if
  75.     turn > 20000
  76.     turn > alienspy
  77. then
  78.     place_peep ((rnd%10)+ 5) skill 1 saboteur
  79.     set alienspy ((turn + 20000) + (rnd%10000))
  80. end
  81.  
  82. ;PEEPASSASSINS
  83. :AlienKiller
  84. if
  85.     turn > 20000
  86.     turn > alienkiller
  87. then
  88.     place_peep ((rnd%4)+ 5) assasin
  89.     set alienkiller ((turn + 20000) + (rnd%10000))
  90. end
  91.