home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 42 / CDGAMER42.iso / Egoboo / egoboo.exe / egoboo / modules / healer.mod / objects / Fright.obj / script.txt < prev    next >
Text File  |  2000-07-08  |  2KB  |  116 lines
  1. // Check for a kill order
  2. IfOrdered
  3.   tmpx = selforder
  4.   tmpy = [UNDO]
  5.   IfXIsEqualToY
  6.     UndoEnchant
  7.  
  8.  
  9. // Undead are sustained by magic
  10. IfSpawned
  11.   MakeCrushValid
  12.   EnchantTarget // target is self...
  13.  
  14.  
  15. // Make ping as if it were invincible
  16. IfHealed
  17.   IfStateIs0
  18.     tmpx = selfx
  19.     tmpy = selfy
  20.     tmpdistance = selfz
  21.     tmpargument = 4
  22.     SpawnExactParticle
  23.     tmpargument = 1
  24.     SetState
  25.     tmpargument = 20
  26.     SetTime
  27.  
  28.  
  29. // Die and poof
  30. IfKilled
  31.   tmpargument = MESSAGEDEATH
  32.   SendMessageNear
  33.   SpawnPoof
  34.   tmpargument = 1
  35.   tmpdistance = 22050
  36.   PlaySound
  37.   tmpargument = [WAKE]
  38.   tmpdistance = [WAKE]
  39.   OrderSpecialID
  40. IfCrushed
  41.   tmpargument = MESSAGEDEATH
  42.   SendMessageNear
  43.   SpawnPoof
  44.   tmpargument = 1
  45.   tmpdistance = 22050
  46.   PlaySound
  47.   tmpargument = [WAKE]
  48.   tmpdistance = [WAKE]
  49.   OrderSpecialID
  50.  
  51.  
  52. // Chase good guys
  53. IfTimeOut
  54.   IfTargetIsSelf
  55.     tmpdistance = 90000  // Square of range
  56.     SetTargetToDistantEnemy
  57.     tmpx = rand & 511 - 256 + selfspawnx
  58.     tmpy = rand & 511 - 256 + selfspawny
  59.   Else
  60.     tmpx = targetdistance
  61.     tmpy = 700
  62.     IfXIsMoreThanY
  63.       SetTargetToSelf
  64.       tmpx = rand & 511 - 256 + selfx
  65.       tmpy = rand & 511 - 256 + selfy
  66.     Else
  67.       tmpx = targetx
  68.       tmpy = targety
  69.   ClearWaypoints
  70.   AddWaypoint
  71.   tmpargument = 20
  72.   SetTime
  73.   tmpargument = 0
  74.   SetState
  75.  
  76.  
  77.  
  78. // Find a new target
  79. IfTargetKilled
  80.   SetTargetToSelf
  81.   tmpargument = 0
  82.   SetTime
  83.  
  84.  
  85.  
  86. // Make good guys unable to attack
  87. IfBumped
  88.   IfStateIs0
  89.     SetTargetToWhoeverBumped
  90.     IfTargetIsOnHatedTeam
  91.       tmpargument = [HUMA]
  92.       IfTargetHasID
  93.         tmpargument = 1
  94.         SendMessageNear
  95.         tmpargument = 1
  96.         SetState
  97.         tmpargument = 250
  98.         SetTargetReloadTime
  99.         tmpargument = 40
  100.         SetTime
  101.         tmpargument = 2
  102.         tmpdistance = 30870
  103.         PlaySound
  104.     tmpturn = targetturnto + 32768
  105.     tmpx = selfx
  106.     tmpy = selfy
  107.     tmpdistance = 300
  108.     Compass
  109.     ClearWaypoints
  110.     AddWaypoint
  111.     SetTargetToSelf
  112.  
  113.  
  114. // All Done
  115. End
  116.