02-24-2012, 03:34 PM
Code:
1000 {PushMax EDITABLE} VarSetEx(ID, 3277) VarSet(X) Self.X VarSet(Y) Self.Y VarSet(Z) Self.Z VarSub(Y, 1) Map.PickUp(!ID!, -1, 0, !X!, !Y!, !Z!)<>1 VarAdd(X, 1) Map.PickUp(!ID!, -1, 0, !X!, !Y!, !Z!)<>1 VarAdd(Y, 1) Map.PickUp(!ID!, -1, 0, !X!, !Y!, !Z!)<>1 VarAdd(Y, 1) Map.PickUp(!ID!, -1, 0, !X!, !Y!, !Z!)<>1 VarSub(X, 1) Map.PickUp(!ID!, -1, 0, !X!, !Y!, !Z!)<>1 VarSub(X, 1) Map.PickUp(!ID!, -1, 0, !X!, !Y!, !Z!)<>1 VarSub(Y, 1) Map.PickUp(!ID!, -1, 0, !X!, !Y!, !Z!)<>1 VarSub(Y, 1) Map.PickUp(!ID!, -1, 0, !X!, !Y!, !Z!)