04-18-2012, 10:49 AM
04-18-2012, 02:03 PM
Use this macro below:
Change the ID 3277 for ID of parcel.
Code:
200 {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!)
Change the ID 3277 for ID of parcel.
04-18-2012, 05:45 PM
Thank you so much
Parcel ID = 3503
Stamped Parcel ID = 3504
Would that be possible to edit this macro so it could pick it up from a range of 5 SQMs?
Parcel ID = 3503
Stamped Parcel ID = 3504
Would that be possible to edit this macro so it could pick it up from a range of 5 SQMs?
04-18-2012, 09:04 PM
Try this:
Code:
200 {PushMax EDITABLE} VarSetEx(ID, PARCEL_ID) VarSet(X) Self.X VarSet(Y) Self.Y VarSet(Z) Self.Z VarSub(Y, 5) Map.PickUp(!ID!, -1, 0, !X!, !Y!, !Z!)<>1 VarAdd(X, 5) Map.PickUp(!ID!, -1, 0, !X!, !Y!, !Z!)<>1 VarAdd(Y, 5) Map.PickUp(!ID!, -1, 0, !X!, !Y!, !Z!)<>1 VarAdd(Y, 5) Map.PickUp(!ID!, -1, 0, !X!, !Y!, !Z!)<>1 VarSub(X, 5) Map.PickUp(!ID!, -1, 0, !X!, !Y!, !Z!)<>1 VarSub(X, 5) Map.PickUp(!ID!, -1, 0, !X!, !Y!, !Z!)<>1 VarSub(Y, 5) Map.PickUp(!ID!, -1, 0, !X!, !Y!, !Z!)<>1 VarSub(Y, 5) Map.PickUp(!ID!, -1, 0, !X!, !Y!, !Z!)
04-19-2012, 11:53 AM
thank you Dexter, you are really helpful!
the script you edited is working
...but it picks up only parcels in a straight line of 5 sqms, i could edit and create macros for 1,2,3,4,5 straight sqms, but what about these which are not in a straight line? for example X range 5 and Y range 2? etc
would that be possible to edit your script so it picks up parcels in all of the range of 5sqms (5x5)?
same as destroy furniture works
it destroys furnitures in a range of 5 sqms all around, not just straight lines
i really (and i really mean it) appreciate your help
the script you edited is working
...but it picks up only parcels in a straight line of 5 sqms, i could edit and create macros for 1,2,3,4,5 straight sqms, but what about these which are not in a straight line? for example X range 5 and Y range 2? etc
would that be possible to edit your script so it picks up parcels in all of the range of 5sqms (5x5)?
same as destroy furniture works
Code:
1500 {Destroy Furniture} X:=Self.X Y:=Self.Y Z:=Self.Z weapon:=Self.Inventory.LeftHand Map.UseOn(!weapon!, 2434, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2471, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2472, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2482, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2480, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2481, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2473, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2469, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2470, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2434, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2433, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2432, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2431, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2358, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2359, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2360, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2361, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2319, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2524, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2523, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2982, !X!, !Y!, !Z!, 5) <>1 Map.UseOn(!weapon!, 2465, !X!, !Y!, !Z!, 5)
it destroys furnitures in a range of 5 sqms all around, not just straight lines
i really (and i really mean it) appreciate your help