Hard help

[lukasze]

Hello Could someone fix the macro it work?

x:=Self.X()
z:=Self.Z()
y:=Self.Y()
x+1
VarAdd(x, 1)
Map.HasID(4246, !x!, !y!, !z!)
Map.Use(4246, !x!, !y!, !z!, 1) [ELSE]
x+1
y+1
VarAdd(y, 1)
Map.HasID(4246, !x!, !y!, !z!)
Map.Use(4246, !x!, !y!, !z!, 1) [ELSE]
y+1
VarSub(x, 1)
Map.HasID(4246, !x!, !y!, !z!)
Map.Use(4246, !x!, !y!, !z!, 1) [ELSE]
y-1
VarSub(y, 2)
Map.HasID(4246, !x!, !y!, !z!)
Map.Use(4246, !x!, !y!, !z!, 1) [ELSE]
y-1
x-1
VarSub(x, 1)
Map.HasID(4246, !x!, !y!, !z!)
Map.Use(4246, !x!, !y!, !z!, 1) [ELSE]
y-1
x+1
VarAdd(x, 2)
Map.HasID(4246, !x!, !y!, !z!)
Map.Use(4246, !x!, !y!, !z!, 1) [ELSE]
x-1
VarAdd(y, 1)
VarSub(x, 2)
Map.HasID(4246, !x!, !y!, !z!)
Map.Use(4246, !x!, !y!, !z!, 1) [ELSE]
x-1
y-1
VarSub(y, 1)
Map.HasID(4246, !x!, !y!, !z!)
Map.Use(4246, !x!, !y!, !z!, 1)
Exit()