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