Automation of preserve node into temp nodes into Hypermesh

I am trying to automate the conversion of preserved node into temp.

Manually we can do like :  Analysis ->preserve node-> select node->make preserved

now node preserved. The preserved node can be converted into temp node like: Analysis ->preserve node-> select preserved node->make temp

For automation:

step 1: Need to call Preserved node.

step2: Called preserved nodes need to convert into temp node with *nodemarkaddtempmark command.

I dont know with what Tcl command we can call the preserved nodes for converting in Tcl script. Can any one help?