home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 42 / CDGAMER42.iso / Egoboo / egoboo.exe / egoboo / modules / healer.mod / objects / kurcinq.obj / script.txt < prev    next >
Text File  |  2000-02-26  |  1KB  |  45 lines
  1. // ZZ> This function makes an item fall to the floor when spawned
  2. IfSpawned                //
  3.   tmpargument = ACTIONJB          //
  4.   DoAction                  //
  5.   KeepAction                  //
  6.   MakeCrushValid
  7. IfCrushed
  8.   tmpx = selfx
  9.   tmpy = selfy
  10.   tmpdistance = selfz
  11.   tmpargument = 1
  12.   SpawnExactParticle
  13.   SpawnExactParticle
  14.   SpawnExactParticle
  15.   SpawnExactParticle
  16.   GoPoof
  17.   tmpargument = 1
  18.   SendMessageNear
  19. IfDropped                // Make it lie on floor
  20.   KeepAction                  //
  21. IfGrabbed                // Tell them what they've won...
  22.   SetTargetToWhoeverIsHolding          //
  23.   IfTargetIsAPlayer              //
  24.     tmpargument = 0              //
  25.     SendMessageNear              //
  26. IfHitGround                // Make a sound
  27.   tmpargument = 1              //
  28.   tmpdistance = rand & 2047 + 10000      //
  29.   PlaySound                  //
  30. IfNotDropped
  31.   tmpargument = 2
  32.   SendMessageNear
  33. IfTakenOut
  34.   tmpargument = 2
  35.   tmpdistance = rand & 2047 + 10000
  36.   PlaySound
  37.   SetTargetToWhoeverIsHolding
  38.   IfTargetIsAPlayer
  39.     tmpargument = 4
  40.     SendMessageNear
  41. IfNotPutAway
  42.   tmpargument = 3
  43.   SendMessageNear
  44. End                    // All done
  45.