mob/allies
var/owner=""
var/mob/allies/M
New()
.=..()
spawn(1)
Wander()
proc/Wander()
while(src)
if (M in oview(5))
if(M.owner == src.owner)
..()
else
step_towards(src,M)
else
for(M in view(src))
break
sleep(10)
spawn(30)
Wander()
Bump(mob/M)
if (istype(M,/mob/allies))
attack(M)
proc/attack(mob/M)
var/damage = rand(1,str)
if(usr.str - M.defense > 0)
M.hp -= usr.str - M.defense
view(4) << "[src] attacks [M] for <font color = red><b>[damage]</b><font color = black> !!"
M.DeathCheck
else
return
infantry_b
icon='Player.dmi'
icon_state="infantryb"
str=5
defense=3
hp=20
Im going to bed, i'll check this tomorow.