ACTOR LostSoulClass : PlayerPawn
{
  health 100
  radius 14
  height 44
  mass 50
  speed 0.6
  painchance 128
  Player.DisplayName "Lost Soul"
  Player.MaxHealth 100
  Player.SoundClass "MLostSoul"
  
  Player.MorphWeapon "MLostSoulWeap"
  Player.WeaponSlot 1, MLostSoulWeap
  Player.JumpZ 0
  Player.ViewHeight 20
  Player.AttackZOffset 5
  RenderStyle SoulTrans
  
  DamageFactor "MarineDamage", 1
  DamageFactor "MarineRLDamage", 1
  
  DamageFactor "ImpBallDamage", 0
  DamageFactor "CacoDamage", 0
  DamageFactor "SkelDamage", 0
  DamageFactor "FatsoDamage", 0
  DamageFactor "KnightDamage", 0
  DamageFactor "ArachDamage", 0
  DamageFactor "viledamage", 0
  DamageFactor "Control", 0
  DamageFactor "ZombiesDamage", 0
  DamageFactor "Slime", 0
  
  -PICKUP
  +NOSKIN
  +NOPAIN
  -FRIENDLY
  +NOTARGET
  +DONTFALL
  
  states
  {
  Spawn:
	SKUL AB 10 bright 
    loop
  See:
    SKUL A 0
    SKUL A 0 A_Jump (240,2)
	SKUL A 0 A_PlaySoundEx ("skull/active","body")
    SKUL AB 6 bright
    goto Spawn
  Missile:
    SKUL C 4 bright
    SKUL D 4 bright
    SKUL CCDD 2 bright
	SKUL C 3
    goto Spawn
  Melee:
    SKUL C 4 bright
    SKUL D 4 bright
    SKUL CCDD 2 bright
	SKUL C 3
    goto Spawn
  Death:
    NULL A 0 A_GiveToTarget ("MarineExp",3)
    SKUL F 6 bright A_NoGravity
    SKUL G 6 bright A_PlaySoundEx ("skull/death","body")
    SKUL H 6 bright
    SKUL I 6 bright A_NoBlocking
    SKUL JK 6 bright
    TNT1 A 1 A_HideThing
	TNT1 A -1
	stop
  }
}


ACTOR MLostSoulWeap : Weapon
{
  OBITUARY "%o was spooked by %k."
  weapon.kickback 30
  +WEAPON.NOALERT
  +Ammo_Optional
  +WEAPON.CHEATNOTWEAPON

  states
  {
  Spawn:
    TNT1 A 1 Thing_Remove (0)
    Stop
  Select:
	TNT1 A 1 A_Raise
    loop
  Ready:
    TNT1 A 1 A_WeaponReady
    NULL A 0 A_JumpIfInventory ("Mskull",0,1)
    Loop
	NULL A 0 HealThing(1)
	goto ready 
  DeSelect:
    TNT1 A 1 A_Lower
    Loop
  Fire:
    TNT1 A 1 A_JumpIfCloser (80,"Melee")
	TNT1 A 1 A_Recoil (-5)
	TNT1 A 1 A_JumpIfCloser (80,"Melee")
    TNT1 A 1 A_Recoil (-5)
	TNT1 A 1 A_JumpIfCloser (80,"Melee")
    TNT1 A 1 A_Recoil (-5)
	TNT1 A 1 A_JumpIfCloser (80,"Melee")
    Goto Ready
  Melee:
   TNT1 A 1 A_PlaySoundEx ("skull/melee","Body")
   TNT1 A 1 A_CustomPunch (3,0,1,"FBulletPuff")
   TNT1 A 1 A_CustomPunch (2,0,1,"FBulletPuff")
   TNT1 A 1 A_CustomPunch (1,0,1,"FBulletPuff")
   TNT1 A 16
   Goto Ready
  AltFire:
    TNT1 A 5 ACS_ExecuteAlways (419,0,18)
	goto ready	
  }
}