home *** CD-ROM | disk | FTP | other *** search
/ Hacker 70 / HACKER70.ISO / Igre / Startopia / startopiademo.exe / missions / 00 / AIFacilityHelp.txt next >
Text File  |  2001-05-09  |  638b  |  29 lines
  1. ;LOVENESTS
  2. :AILoveNestHelp
  3. if
  4.     turn > 10000
  5.     human = 0
  6.     turn > AIstuff
  7.     energy > 5000
  8.     love_nest_count < (segmentdecks / 3)
  9. then
  10.     set AIstuff (turn + 2880)
  11.     placeportable hard_plan_crate 5 13 mid_deck 600 love_nest
  12.     addenergy (0 - 2000)
  13. end
  14.  
  15. ;LOVECHAIRS
  16. :AILoveChairHelp
  17. if
  18.     human = 0
  19.     turn > AIstuff
  20.     energy > 5000
  21.     love_chair_count < (love_nest_count * 4)
  22. then
  23.     placeportable furniture_plan_crate 5 13 mid_deck 600 love_chair
  24.     placeportable furniture_plan_crate 5 14 mid_deck 600 love_bench
  25.     placeportable furniture_plan_crate 6 13 mid_deck 600 love_bench
  26.     set AIstuff (turn + 2880)
  27.     addenergy (0 - 500)
  28. end
  29.