system "Zechnas El Chato a 2 vecinos en cilindro. V1.0"
{
}
method "main"
begin
If Number 0 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 0 to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 1 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 1 to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 2 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 2
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 3 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 3
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 4 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 4
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 5 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 5
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 6 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 6
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 7 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 7
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 8 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 8
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 9 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 9
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 10 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 10
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 11 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 11
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 12 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 12
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 13 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 13
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 14 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 14
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 15 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 15
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 16 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 16
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 17 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 17
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 18 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 18
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 19 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 19
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 20 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 20
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 21 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 21
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 22 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 22
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 23 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 23
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 24 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 24
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 25 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 25
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 26 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 26
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 27 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 27
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 28 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 28
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 29 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 29
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 30 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 30
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 31 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 31
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 32 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 32
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 33 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 33
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 34 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 34
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 35 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 35
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
If Number 36 has Hit en 1
Begin
Put 2 on Neighbor Count
Copy Neighbors of Number 36
to Record "vecinos" Layout
end
While on Each Spin
Begin
Put 1 units on Record "vecinos" Layout List
end
End