home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 51 / PCGamer51_17Demos.iso / games / colobotdemo / colobotdemo10e.exe / script / titan1.txt < prev    next >
Text File  |  2001-06-15  |  581b  |  17 lines
  1. extern void object::CollectTitanium1()
  2. {
  3.     // 1) Variable definition.
  4.     object  item;            // info. about objects
  5.     
  6.     // 2) Goes toward the titanium ore and grabs it.
  7.     item = radar(TitaniumOre);// looks for titanium ore
  8.     goto(item.position);     // goes to the position
  9.     grab();                  // grabs the titanium
  10.     
  11.     // 3) Goes toward the converter and drops it.
  12.     item = radar(Converter); // looks for converter
  13.     goto(item.position);     // goes to the position
  14.     drop();                  // drops the titanium
  15.     move(-2.5);              // steps back 2.5 m
  16. }
  17.