ACTOR FriendMarineHexa : BaseMarine
{
	AttackSound " "
	Translation "112:127=176:191"
	States
	{
	Spawn:
		PHET A 1
		"####" A 0 A_GiveInventory("TargetIsAMarine")
		PHET A 1 A_Look
		Loop
	Missile:
        "####" A 0
        "####" A 0 A_ChangeFlag("NODROPOFF", 1)
		"####" A 0 A_JumpIfInTargetInventory("TargetIsAMarine", 1, "FollowPlayer")
		"####" A 0 A_JumpIfInTargetInventory("IsPlayer", 1, "CheckRangeToWait")
		"####" A 0 A_ChangeFlag("SHOOTABLE", 1)
		"####" A 0 A_ChangeFlag("SOLID", 0)
		"####" A 0 A_JumpIfCloser(200, "Retreat")
		"####" A 0 A_FaceTarget
		"####" A 1 A_Chase ("","")
		"####" A 0 A_JumpIfInTargetInventory("IsPlayer", 1, "CheckRangeToWait")
		Goto Strafe
	Strafe:
		"####" A 0 A_Jump(128, "Attack")
		"####" A 0 ThrustThing(Angle*256/360+64,12,0,0)
		"####" AABBCCDD 2 A_Chase
		"####" A 0 A_Stop
		Goto Attack
	Attack:
		"####" A 0 A_JumpIfInTargetInventory("IsPlayer", 1, "CheckRangeToWait")
		"####" A 0 A_JumpIfInventory("Hexa-ZombieToken",3,"Reload")
		"####" A 0 A_JumpIfCloser(325,"Hexa")
	Normal:
		"####" E 15 A_FaceTarget
		"####" A 0 A_PlaySound("weapons/qsgdoublefire")
		"####" A 0 A_GiveInventory("Hexa-ZombieToken",1)
		"####" AAAAAA 0 Bright A_CustomMissile("MonsterTracer2",Random(28,34),0,Random(6,-6),0)
		"####" F 5 Bright A_CustomBulletAttack(13.8,9.6,10,Random(1,4)*3,"FriendlyMarineBulletPuff") 
		"####" E 15 A_FaceTarget
		"####" A 0 A_JumpIfInventory("Hexa-ZombieToken",3,"Reload")
		Goto See
	Hexa:
		"####" A 0 A_JumpIfInventory("Hexa-ZombieToken",1,"Normal")
		"####" E 15 A_FaceTarget
		"####" A 0 A_PlaySound("weapons/hsgfire")
		"####" A 0 A_GiveInventory("Hexa-ZombieToken",3)
		"####" AAAAAAAAAAAA 0 Bright A_CustomMissile("MonsterTracer2",Random(28,34),0,Random(6,-6),0)
		"####" F 5 Bright A_CustomBulletAttack(15.4,10.6,37,Random(1,4)*3,"FriendlyMarineBulletPuff")
		"####" E 25 A_FaceTarget	
	Reload:
		"####" A 0 A_TakeInventory("Hexa-ZombieToken",3)
		"####" A 0 A_PlaySound("weapons/qsgopen")	
		"####" E 15 A_FaceTarget
		"####" EEEEEE 0 A_SpawnItemEx("SSGShellCasing",25,-2,25,Random(2,4),Random(-3,-6),Random(3,6),0)
		"####" E 12 A_PlaySound("weapons/qsgshellslide")	
		"####" E 8
		"####" E 12 A_PlaySound("weapons/qsgshellslide")	
		"####" E 8
		"####" E 12 A_PlaySound("weapons/qsgshellslide")	
		"####" E 8
		"####" E 10 A_PlaySound("weapons/qsgclose")	
		Goto See
	Retreat:
		"####" A 0
		"####" A 2 A_Recoil(4)
		"####" A 0 A_FaceTarget
		"####" A 0 
		"####" B 2 A_Recoil(4)
		"####" A 0 A_FaceTarget
		"####" A 0 
		"####" C 2 A_Recoil(4)
		"####" A 0 A_FaceTarget
		"####" D 2 A_Recoil(4)
		"####" A 0 A_FaceTarget
		Goto Attack
		}
}