home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 42 / CDGAMER42.iso / Egoboo / egoboo.exe / egoboo / modules / healer.mod / objects / missile.obj / SCRIPT.TXT < prev    next >
Text File  |  1999-11-26  |  2KB  |  93 lines
  1. // Remove the charge
  2. IfTakenOut
  3.   tmpargument = 0
  4.   SetContent
  5.   SetTargetToWhoeverIsHolding
  6.     IfTargetIsAPlayer
  7.       tmpargument = 0
  8.       SendMessageNear
  9.  
  10.  
  11. // Spell AI
  12. IfUsed
  13.   GetContent
  14.   tmpx = tmpargument
  15.   tmpy = 1024
  16.   IfXIsLessThanY
  17.     SetTargetToWhoeverIsHolding
  18.     tmpargument = [WMAG]
  19.     IfTargetHasSkillID
  20.       tmpy = targetmanaflow
  21.       IfXIsLessThanY
  22.         tmpx = 16
  23.         tmpargument = tmpx
  24.         CostTargetMana
  25.           GetContent
  26.           tmpargument = tmpargument + tmpx
  27.           SetContent
  28.           tmpargument = tmpargument > 8
  29.           SetState
  30. Else
  31.   GetContent
  32.   tmpx = tmpargument
  33.   tmpy = 256
  34.   IfXIsMoreThanY
  35.     // Make the target shoot
  36.     SetTargetToWhoeverIsHolding
  37.       tmpargument = ACTIONZA
  38.       CorrectActionForHand
  39.       TargetDoAction
  40.  
  41.     // Figured out what it was
  42.     MakeNameKnown
  43.     MakeUsageKnown
  44.     // Shoot off some missiles
  45.     tmpx = selfx
  46.     tmpy = selfy
  47.     tmpdistance = selfz
  48.     tmpargument = 1
  49.     IfStateIs1
  50.       SpawnExactParticle
  51.     IfStateIs2
  52.       SpawnExactParticle
  53.       SpawnExactParticle
  54.     IfStateIs3
  55.       SpawnExactParticle
  56.       SpawnExactParticle
  57.       SpawnExactParticle
  58.     IfStateIs4
  59.       SpawnExactParticle
  60.       SpawnExactParticle
  61.       SpawnExactParticle
  62.       SpawnExactParticle
  63.     tmpargument = 0
  64.     tmpdistance = rand & 2047 + 10000
  65.     PlaySound
  66.   // Reset the charge counter
  67.   tmpargument = 0
  68.   SetContent
  69.  
  70.  
  71. // Put the little mana ball on the
  72. // character's hand
  73. GetContent
  74. tmpx = tmpargument
  75. tmpy = 0
  76. IfXIsMoreThanY
  77.   tmpturn = tmpargument < 4 + 5000
  78.   tmpdistance = SPAWNORIGIN
  79.   tmpargument = 0
  80.   SpawnAttachedSizedParticle
  81.  
  82.  
  83. // Return to spellbook, Do last!
  84. IfDropped
  85.   tmpargument = 0
  86.   SetContent
  87.   BecomeSpellbook
  88.   DisaffirmCharacter
  89.   tmpargument = ACTIONJB
  90.   DoAction
  91.   KeepAction
  92. End
  93.