home *** CD-ROM | disk | FTP | other *** search
/ Maximum CD 2012 February / maximum-cd-2012-02.iso / DiscContents / TheWagerSetup1.2.exe / Assets / Scripts / GhostShip2.lua < prev    next >
Encoding:
Text File  |  2011-02-27  |  622 b   |  20 lines
  1. -- GhostShip Events
  2. Starting = 0;
  3. SeaEvent = 1;
  4.  
  5. if CrewPower < 6 then
  6.  
  7.   ShowStoryText("There's no two ways about it: your crew are scared. They don't appear prepared for this fight at all, and you fear that nothing you say to them will calm their nerves for the fight ahead.");
  8.  
  9. else
  10.  
  11.   ShowStoryText("Your crew are nervous; there's no mistaking it. But you give them a few swift words and empty promises, by the end of which they appear as ready as they'll ever be to do battle.");
  12.  
  13.   iValue = GetIntFlag(3);
  14.   iValue = iValue + 1;
  15.   SetIntFlag(3, iValue);
  16.  
  17. end
  18.  
  19. AddChoice("Onwards!", "GhostShip3");
  20.