home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 42 / CDGAMER42.iso / Egoboo / egoboo.exe / egoboo / modules / gnome.mod / objects / gonne.obj / script.txt < prev    next >
Text File  |  2000-06-25  |  2KB  |  64 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 = 1
  13.   SpawnExactParticle
  14.   SpawnExactParticle
  15.   SpawnExactParticle
  16.   SpawnExactParticle
  17.   GoPoof
  18.   tmpargument = 2
  19.   SendMessageNear
  20. IfDropped                // Make it lie on floor
  21.   KeepAction                  //
  22. IfUsed                    // Drop shells or make a click sound
  23.   IfAmmoOut
  24.     tmpargument = 1
  25.     tmpdistance = rand & 2047 + 11000
  26.     PlaySound
  27.   Else
  28.     tmpx = selfammo & 1
  29.     tmpy = 0
  30.     IfXIsMoreThanY
  31.       tmpargument = 40
  32.       SetReloadTime
  33.     tmpx = selfx
  34.     tmpy = selfy
  35.     tmpdistance = selfz
  36.     tmpargument = 4
  37.     SpawnExactParticle
  38.     IfStateIs0
  39.       tmpargument = 3
  40.       tmpdistance = rand & 2047 + 10000
  41.       PlaySound
  42.       tmpargument = 1
  43.     Else
  44.       tmpargument = 4
  45.       tmpdistance = rand & 2047 + 10000
  46.       PlaySound
  47.       tmpargument = 0
  48.     SetState
  49.     tmpargument = [WAKE]
  50.     tmpdistance = [WAKE]
  51.     OrderSpecialID
  52. IfHitGround                // Play the drop sound
  53.   tmpargument = 0              //
  54.   tmpdistance = rand & 2047 + 8000      //
  55.   PlaySound                  //
  56. IfGrabbed                // Tell them what they've won...
  57.   SetTargetToWhoeverIsHolding          //
  58.   IfTargetIsAPlayer              //
  59.     tmpargument = 0              //
  60.     IfAmmoOut                  //
  61.       tmpargument = 1                //
  62.     SendMessageNear              //
  63. End                    // All done
  64.