home *** CD-ROM | disk | FTP | other *** search
/ Hacker 70 / HACKER70.ISO / Igre / Startopia / startopiademo.exe / missions / 00 / spies001.txt < prev    next >
Text File  |  2001-05-15  |  2KB  |  92 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 + 30000) + (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 + 30000) + (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 + 30000) + (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 + 3000) + (rnd%1000))
  70. end
  71.  
  72.  
  73. ;PEEPSPIES
  74. :AlienSpies
  75. if
  76.     turn > 40000
  77.     turn > alienspy
  78. then
  79.     place_peep ((rnd%10)+ 5) skill 1 saboteur
  80.     set alienspy ((turn + 30000) + (rnd%10000))
  81. end
  82.  
  83. ;PEEPASSASSINS
  84. :AlienKiller
  85. if
  86.     turn > 40000
  87.     turn > alienkiller
  88. then
  89.     place_peep ((rnd%4)+ 5) assasin
  90.     set alienkiller ((turn + 30000) + (rnd%10000))
  91. end
  92.