home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 42 / CDGAMER42.iso / Egoboo / egoboo.exe / egoboo / players / dunlar.obj / 0.obj / script.txt < prev    next >
Text File  |  1999-10-10  |  2KB  |  114 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.   tmpargument = 0
  22.   SetState
  23. IfHitGround                // Make a sound
  24.   tmpargument = 0              //
  25.   tmpdistance = rand & 2047 + 10000      //
  26.   PlaySound                  //
  27. IfNotDropped
  28.   tmpargument = 2
  29.   SendMessageNear
  30. IfNotPutAway
  31.   tmpargument = 3
  32.   SendMessageNear
  33. IfTakenOut
  34.   tmpargument = 1
  35.   SetState
  36. IfGrabbed                // Tell them what they've won...
  37.   SetTargetToWhoeverIsHolding          //
  38.   IfTargetIsAPlayer              //
  39.     tmpargument = 0              //
  40.     SendMessageNear              //
  41.   tmpargument = 1
  42.   SetState
  43.  
  44.  
  45. // Item is held by a foot soldier
  46. IfStateIs1
  47.   IfTargetIsMounted
  48.     // Can the holder joust?
  49.     tmpargument = [JOUS]
  50.     IfTargetHasSkillID
  51.       tmpargument = 0
  52.       CorrectActionForHand
  53.       tmpargument = tmpargument & 2 + ACTIONMH
  54.       DoActionOverride
  55.       KeepAction
  56.       tmpargument = 2
  57.       SetState
  58.       tmpargument = 5
  59.       SendMessageNear
  60.     Else
  61.       // No joust allowed
  62.       tmpargument = 3
  63.       SetState
  64.       tmpargument = 4
  65.       SendMessageNear
  66.  
  67.  
  68.  
  69.  
  70. // Item is held by a cavalier
  71. IfStateIs2
  72.   IfTargetIsMounted
  73.     // Do a particle spawn based on speed
  74.     SetOldTarget
  75.     SetTargetToLowestTarget
  76.     tmpx = targetspeedx
  77.     tmpy = targetspeedy
  78.     tmpx = xydistance > 2
  79.  
  80.  
  81.     // Make sure mount is moving fast enough
  82.     tmpy = 0
  83.     IfXIsMoreThanY
  84.       // Not too fast
  85.       tmpy = 4
  86.       IfXIsMoreThanY
  87.         tmpx = tmpy
  88.  
  89.  
  90.       // Now spawn it
  91.       tmpargument = 1 + tmpx
  92.       tmpdistance = 1
  93.       SpawnAttachedParticle
  94.     SetTargetToOldTarget
  95.   Else
  96.     tmpargument = ACTIONMK
  97.     DoActionOverride
  98.     KeepAction
  99.     tmpargument = 1
  100.     SetState
  101.  
  102.  
  103. // Item is held by a cavalier that has no clue
  104. IfStateIs2
  105.   IfTargetIsMounted
  106.     GetState // NOP
  107.   Else
  108.     tmpargument = 1
  109.     SetState
  110.  
  111.  
  112.  
  113. End
  114.