home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 42 / CDGAMER42.iso / Egoboo / egoboo.exe / egoboo / modules / palshad.mod / objects / sacripit.obj / script.txt < prev    next >
Text File  |  2000-06-03  |  1KB  |  51 lines
  1. // This checks the pit for any dead bodies that can be removed...
  2. IfTimeOut
  3.   tmpargument = passage
  4.   SetTargetToWhoeverIsInPassage
  5.     tmpx = targetz
  6.     tmpy = 0 - 100
  7.     IfXIsLessThanY
  8.       tmpargument = [HUMA]
  9.       IfTargetHasID
  10.         PoofTarget
  11.           GetContent
  12.           tmpargument = tmpargument + 1
  13.           SetContent
  14.           tmpx = tmpargument
  15.           tmpy = 2
  16.           IfXIsMoreThanY
  17.             // Drop goodies
  18.             tmpargument = 49
  19.             tmpturn = rand
  20.             tmpdistance = 0
  21.             tmpx = selfx
  22.             tmpy = selfy
  23.             SpawnExactCharacterXYZ
  24.             SpawnPoof
  25.             tmpargument = 0
  26.             tmpdistance = 11025
  27.             PlaySound
  28.             GoPoof
  29.             tmpargument = 2
  30.           Else
  31.             tmpargument = 0
  32.           SendMessageNear
  33.         Else
  34.           tmpargument = 3
  35.           SendMessageNear
  36.           GoPoof
  37.       Else
  38.         PoofTarget
  39.           tmpargument = 1
  40.           SendMessageNear
  41.           tmpargument = 0
  42.           SetContent
  43.         Else
  44.           tmpargument = 3
  45.           SendMessageNear
  46.           GoPoof
  47.  
  48.   tmpargument = 50
  49.   SetTime
  50. End                    // All done
  51.