home *** CD-ROM | disk | FTP | other *** search
/ Classic Fond 52 / ClassicFond52.iso / GAMES / DROIDW.RAR / DWCD.GOB / mission_cog_t4_inclinemadness.cog < prev    next >
Encoding:
Text File  |  1998-11-04  |  2.2 KB  |  84 lines

  1. symbols
  2. message        startup
  3. message        crossed
  4. message        timer
  5. message        pulse
  6.  
  7. thing          crate1
  8. thing          crate2
  9. thing          thephonycrate
  10.  
  11. surface        triggeradjoin            mask=0xffff    linkid=1
  12. template       solidcrateT
  13. thing          teledest
  14. sector         UCsector
  15. thing          topghost
  16. surface        blockadjoin              nolink
  17. surface        triggeradjoinREAL        mask=0xffff    linkid=2
  18. surface        IWannaBeAdored           nolink
  19. end
  20.  
  21. ## Code Section
  22. code                  
  23. startup:
  24.      player=getlocalplayerthing();
  25.      if (getdifficulty()==0) {
  26.           teleportthing(crate2, teledest);
  27.      }
  28.      else if (getdifficulty()==1) {
  29.           teleportthing(crate1, teledest);
  30.           teleportthing(crate2, teledest);
  31.           teleportthing(thephonycrate, teledest);
  32.      }  
  33.      setadjoinflags(blockadjoin, 2);
  34.      setadjoinflags(IWannaBeAdored, 2);  #you can now walk thru this adjoin
  35.      lovespreads=0;
  36.      return;
  37.      
  38. crossed:
  39.      if (getsenderid()==1) {
  40.           if ( (getdifficulty()==2)||(getdifficulty()==0) ) {
  41.                if ( (getsourceref()==crate1)||(getsourceref()==crate2) ) {
  42.                     print("crossed.  dammit.");
  43.                     uppercrate=getsourceref();
  44.                     settimer(1);   
  45.                }          
  46.           }
  47.      }
  48.      else if (getsenderid()==2) {
  49.           if (getsourceref()==player) {
  50.                setadjoinflags(blockadjoin, 2);
  51.                print("here's the player");
  52.           }
  53.           else if (lovespreads==0) {
  54.                clearadjoinflags(blockadjoin, 2);
  55.                print("here's the crate");
  56.           }
  57.      }
  58.      return;
  59.      
  60. timer:
  61.      print("and what goes up");
  62.      if (getthingsector(uppercrate)==UCsector) {
  63.           print("must come down");
  64.           teleportthing(uppercrate, teledest);     
  65.           creatething(solidcrateT, topghost);
  66.           setadjoinflags(blockadjoin, 2);
  67.           clearadjoinflags(IWannaBeAdored, 2);  #you can NOT walk thru this adjoin
  68.           LoveSpreads=1;
  69.      }               
  70.  
  71.      return;
  72.  
  73. end
  74.      
  75.      
  76.      
  77.     
  78.  
  79.      
  80.      
  81.      
  82.      
  83.  
  84.