home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 42 / CDGAMER42.iso / Egoboo / egoboo.exe / egoboo / modules / rogue.mod / objects / hanxbow.obj / script.txt < prev    next >
Text File  |  2000-03-17  |  934b  |  40 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 = 2
  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 + 9000      //
  25.   PlaySound                  //
  26. IfGrabbed                // Tell them what they've won...
  27.   SetTargetToWhoeverIsHolding          //
  28.   IfTargetIsAPlayer              //
  29.     tmpargument = 0              //
  30.     SendMessageNear              //
  31. IfUsed
  32.   MakeNameKnown
  33.   tmpargument = 25
  34.   SetReloadTime
  35.   IfAmmoOut
  36.     tmpargument = 3
  37.     tmpdistance = 11025
  38.     PlaySound
  39. End                    // All done
  40.