p1 = "p _ _ _ _"
p2 = "_ p _ _ _"
p3 = "_ _ p _ _"
p4 = "_ _ _ p _"
p5 = "_ _ _ _ p"

e1 = "e _ _ _ _"
e2 = "_ e _ _ _"
e3 = "_ _ e _ _"
e4 = "_ _ _ e _"
e5 = "_ _ _ _ e"

vidaP = 5
if vidaP = 0
    p1, p2, p3, p4 , p5
    deleted(automatic)
end

[
p1 + e1 = vidaP -1 time 1
p2 + e2 = vidaP -1 time 1
p3 + e3 = vidaP -1 time 1
p4 + e4 = vidaP -1 time 1
p5 + e5 = vidaP -1 time 1
]