//REVERT UNIFY SCRIPT v0.1 By Phil Billones
[IConfig,2018]

[ISubPalette, "Zplugin:My Scripts"]
[VarDef,xyzSize,0]
[VarDef,xPos,0]
[VarDef,yPos,0]
[VarDef,zPos,0]

[IButton, "Zplugin:My Scripts:StoreXYZ","Zplugin:My Scripts:StoreXYZ",
[If,[IExists, Tool:Geometry:X Position],
	[VarSet,xyzSize,0]
	[VarSet,xPos,0]
	[VarSet,yPos,0]
	[VarSet,zPos,0]
	[VarSet,xyzSize,[IGet,Tool:Geometry:XYZ Size]]
	[VarSet,xPos,[IGet,Tool:Geometry:X Position]]
	[VarSet,yPos,[IGet,Tool:Geometry:Y Position]]
	[VarSet,zPos,[IGet,Tool:Geometry:Z Position]]
	[Note,"XYZ Stored!",,1]
,
[MessageOk, "Geometry Error!"]
]
]

[IButton, "Zplugin:My Scripts:RevertXYZ","Zplugin:My Scripts:RevertXYZ",
[If,[IExists, Tool:Geometry:X Position],
	[ISet,Tool:Geometry:XYZ Size,xyzSize]
	[ISet,Tool:Geometry:X Position,xPos]
	[ISet,Tool:Geometry:Y Position,yPos]
	[ISet,Tool:Geometry:Z Position,zPos]
	[Note,"Revert Unify",,1]
	[VarSet,xyzSize,0]
	[VarSet,xPos,0]
	[VarSet,yPos,0]
	[VarSet,zPos,0]
,
[MessageOk, "Geometry Error!"]
]
]