home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 42 / CDGAMER42.iso / Egoboo / egoboo.exe / egoboo / modules / rogue.mod / objects / exitarea.obj / script.txt < prev    next >
Text File  |  2000-03-26  |  901b  |  37 lines
  1. // Check the exit passage
  2. IfTimeOut
  3.   DisableExport
  4.   tmpargument = passage
  5.   SetTargetToWhoeverIsInPassage
  6.     IfTargetIsAMount
  7.       SetTargetToTargetLeftHand // Rider is held in the mount's left hand...
  8.     IfTargetIsAPlayer
  9.       ClearEndMessage
  10.       tmpargument = [PRIS]  // Did you lead K'nife out?
  11.       tmpdistance = 6
  12.       SetTargetToNearestBlahID
  13.         tmpargument = 0
  14.         AddEndMessage
  15.         tmpargument = 1
  16.         AddEndMessage
  17.         tmpargument = 2
  18.         AddEndMessage
  19.         tmpargument = 3
  20.         AddEndMessage
  21.         tmpargument = [KNIF]  // Special ending
  22.         AddIDSZ
  23.       Else
  24.         tmpargument = 4
  25.         AddEndMessage
  26.         tmpargument = 5
  27.         AddEndMessage
  28.         tmpargument = 6
  29.         AddEndMessage
  30.       tmpargument = [BEAT]
  31.       AddIDSZ
  32.       EnableExport
  33.       EndModule
  34.   tmpargument = 10
  35.   SetTime
  36. End
  37.