Llama Tools

Hello Brains, Thanks for the

Hello Brains,

Thanks for the tweaked script! mucho grande appreciated!

Nice script and very useful but I edited it

After reading Luos_83 comment I thought I will make the menu smaller, also the functions vmesh and export to model cause errors in 3D Max 2016 so took them and preview animate away as the other options are to me the only decent ones. Hope you don't mind :)

It now is this:-

If LlamaTools != undefined then destroydialog LlamaTools

macroScript LlamaTools category:"Llama Tools" --Start MacroScript
(

-- FUNCTIONS

fn resetObjU obj =
(

ResetXForm obj --resetXform
format "Espi say:Xform Added\n" -- purple information message
convertToPoly obj -- Collapse to edit Poly
format "Espi say: Xform Collapsed\n" -- purple information message

)

-----------------------------------------------------------------------------------------------------------------------------------

fn centerPvt obj =
(
obj.pivot = obj.center --center pivot
format "Espi say: center pivot\n" -- purple information message
)

-----------------------------------------------------------------------------------------------------------------------------------

fn CopyObj =
(

thecopypastedir = getdir #autoback; -- CHANGE THIS TO ANY FOLDER YOU WANT
thecopypastefile = "\pastefile.max"; --this is the filename to save as...
thecopypastestring = thecopypastedir + thecopypastefile; --this is the complete string

if $ != undefined do
saveNodes $ thecopypastestring --this saves ("copies") the objects as a file

)

-----------------------------------------------------------------------------------------------------------------------------------

fn PasteObj =
(

thecopypastedir = getdir #autoback -- CHANGE THIS TO ANY FOLDER YOU WANT
thecopypastefile = "\pastefile.max" --this is the filename to save as...
thecopypastestring = thecopypastedir + thecopypastefile --this is the complete string

mergemaxfile (thecopypastedir + thecopypastefile) #select --this merges ("pastes") and selects objects from file

)

-----------------------------------------------------------------------------------------------------------------------------------

fn MoveOrig obj =
(

obj.position = [0,0,0] --move the object/s to [0,0,0]
format "Espi say:Object Moved\n" -- purple information message

)

-----------------------------------------------------------------------------------------------------------------------------------

-- ROLLOUT, WINDOW wwith BUTTONS

If rLlamaTools != undefined then destroydialog rLlamaTools --if spawn new rollout destroy the oldest

rollout rLlamaTools "LLAMA TOOLS" width:210 height:250
(
button btn_ResetObj "Reset Object" pos:[30,36] width:150 height:20;
button btn_ctrPivot "Center Pivot" pos:[30,66] width:150 height:20 enabled:true;
GroupBox grpCopyPaste "Copy/Paste In/Out Max Scenes" pos:[7,150] width:195 height:90;
button btnCopy "Copy" pos:[30,174] width:150 height:20;
button btnPaste "Paste" pos:[30,204] width:150 height:20;
button btn_MoveOrig "Move to [0,0,0]" pos:[30,96] width:150 height:20;
GroupBox grp12 "Basic Utilities" pos:[7,11] width:195 height:120;

on btn_ResetObj pressed do --button to reset the object
(
if selection != 0 then --check for exceptions
(

for i = 1 to selection.count do
(
tobj = selection[i]; --the object selected assign to variable "tobj"

resetObjU tobj; --the variable into the function "resetObjU"

)

)

)
on btn_ctrPivot pressed do --button center the pivot
(

if selection != 0 then --check for exceptions
(

for i = 1 to selection.count do
(
tobj = selection[i]; --the object selected assign to variable "tobj"

centerPvt tobj; --the variable into the function "centerPvt"

)

)

)
on btnCopy pressed do
(

CopyObj ();

)
on btnPaste pressed do
(

PasteObj ();

)
on btn_MoveOrig pressed do
(

if selection != 0 then --check for exceptions
(

for i = 1 to selection.count do
(
tobj = selection[i]; --the object selected assign to variable "tobj"

MoveOrig tobj; --the variable into the function "centerPvt"

)

)
)
)
createDialog rLlamaTools;

)