home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 42 / CDGAMER42.iso / Egoboo / egoboo.exe / egoboo / modules / palshad.mod / objects / shutdoor.obj / script.txt < prev    next >
Text File  |  2000-01-29  |  2KB  |  65 lines

  1. // See if there is a character in the detect passage
  2. IfTimeOut
  3.   tmpargument = 10
  4.   SetTime
  5.   KeepAction
  6.  
  7.  
  8.   // Check if the master passage is open...
  9.   GetContent
  10.   IfPassageOpen
  11.     tmpargument = 10000
  12.     SetTime
  13.     tmpargument = passage + 1
  14.     OpenPassage
  15.     // Make the jewel light up
  16.     tmpargument = 0
  17.     IfArmorIs
  18.       tmpargument = 1
  19.       ChangeArmor
  20.   Else
  21.     // Check if the detect passage is blocked
  22.     tmpargument = passage
  23.     SetTargetToWhoeverIsInPassage
  24.       tmpargument = passage + 1
  25.       OpenPassage
  26.       // Make the jewel light up
  27.       tmpargument = 0
  28.       IfArmorIs
  29.         tmpargument = 1
  30.         ChangeArmor
  31.     Else
  32.       tmpargument = passage + 1
  33.       IfPassageOpen
  34.         ClosePassage
  35.         // Make the jewel darken
  36.         tmpargument = 1
  37.         IfArmorIs
  38.           tmpargument = 0
  39.           ChangeArmor
  40.  
  41.  
  42. // Handle the animation and sound
  43. tmpargument = passage + 1    // Is the passage clear?
  44. IfPassageOpen            // 
  45.   tmpargument = 0          //
  46.   IfStateIs              // State 0 ( Closed )
  47.     tmpargument = ACTIONMG        //
  48.     DoAction                //
  49.       tmpargument = 1              // Open it
  50.       SetState                  //
  51.       tmpargument = 0              //
  52.       tmpdistance = 11025          //
  53.       PlaySound                  //
  54. Else
  55.   tmpargument = 1          //
  56.   IfStateIs              // State 1 ( Open )
  57.     tmpargument = ACTIONMJ        //
  58.     DoAction                //
  59.       tmpargument = 0              // Close it
  60.       SetState                  //
  61.       tmpargument = 1              //
  62.       tmpdistance = 11025          //
  63.       PlaySound                  //
  64. End                // Finished with this character
  65.