home *** CD-ROM | disk | FTP | other *** search
/ Classic Fond 52 / ClassicFond52.iso / GAMES / DROIDW.RAR / DWCD.GOB / mission_cog_00_ronto.cog < prev    next >
Encoding:
Text File  |  1998-11-04  |  798 b   |  47 lines
  1. symbols
  2. message   startup
  3. message   pulse
  4. message   converse
  5.  
  6. thing     ronto
  7.  
  8. sound     walkgrunt=00tRonto01.wav
  9. sound     talkgrunt0=00tRonto02.wav
  10. sound     talkgrunt1=00tRonto03.wav
  11.  
  12. int       conversationactive=0               local
  13.  
  14.  
  15. end
  16.  
  17. code
  18. startup:
  19.      setpulse(3);
  20.      return;
  21.      
  22.  
  23. pulse:
  24.      if (rand()>0.75) {
  25.           playsoundthing(walkgrunt, ronto, 1.0, -1, -1, 0);
  26.      }
  27.      return;
  28.      
  29. converse:
  30.      responseID=dwGetplayerresponse();
  31.      if (responseid==0&&!ConversationActive) {
  32.           conversationactive=1;   
  33.           if (rand()>0.5) playsoundthing(talkgrunt0, ronto, 1.0, -1, -1, 0);
  34.           else playsoundthing(talkgrunt1, ronto, 1.0, -1, -1, 0);
  35.           conversationactive=0;
  36.      }
  37.  
  38.      return;
  39.  
  40.  
  41. end
  42.  
  43.  
  44.  
  45.  
  46.  
  47.