home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 42 / CDGAMER42.iso / Egoboo / egoboo.exe / egoboo / modules / advent.mod / objects / dbutton.obj / script.txt < prev    next >
Text File  |  1999-06-27  |  798b  |  22 lines
  1. // ZZ> This function makes the button go down
  2. tmpx = 20                // Threshold weight
  3. tmpy = weight                // Weight of characters on top
  4. IfXIsLessThanY                //
  5.   tmpargument = 0              //
  6.   IfStateIs                  // Only go down if it's up
  7.     tmpargument = ACTIONMG            //
  8.     DoAction                    //
  9.       tmpargument = 1                  // 1 is down
  10.       SetState                      //
  11.       tmpargument = passage              //
  12.       OpenPassage                  //
  13.       tmpargument = passage + 1              // !!!BAD!!!
  14.       OpenPassage                  //
  15.         SetTargetToWhoeverBumped                //
  16.         tmpargument = 0                    //
  17.         SendMessageNear                    //
  18.       KeepAction                  // Make it stay on last frame
  19.       tmpargument = 0                  //
  20.       SetBumpHeight                  //
  21. End                    // Finished with this character
  22.