home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 42 / CDGAMER42.iso / Egoboo / egoboo.exe / egoboo / modules / rogue.mod / objects / gate.obj / script.txt < prev    next >
Text File  |  1999-05-27  |  793b  |  25 lines
  1. // ZZ> This function makes the door open if its passage is open
  2. KeepAction            //
  3. tmpargument = passage        // Is the passage clear?
  4. IfPassageOpen            // 
  5.   tmpargument = 0          //
  6.   IfStateIs              // State 0 ( Closed )
  7.     tmpargument = ACTIONMG        //
  8.     DoAction                //
  9.       tmpargument = 1              // Open it
  10.       SetState                  //
  11.       tmpargument = 0              //
  12.       tmpdistance = 11025          //
  13.       PlaySound                  //
  14. Else
  15.   tmpargument = 1          //
  16.   IfStateIs              // State 1 ( Open )
  17.     tmpargument = ACTIONMJ        // 71 is the code for MJ
  18.     DoAction                //
  19.       tmpargument = 0              // Close it
  20.       SetState                  //
  21.       tmpargument = 1              //
  22.       tmpdistance = 11025          //
  23.       PlaySound                  //
  24. End                // Finished with this character
  25.