[v_herw]

Hi,

I am looking for a script, which transforms a connector.
Journaling gives me the following - but this is really cumbersome

################################################
 
pw::Application clearClipboard
pw::Application setClipboard[list $_CN(23) $_CN(24)]
pw::Application markUndoLevel {Copy}

set _TMP(mode_1) [pw::Application begin Paste]
  set _TMP(PW_1) [$_TMP(mode_1) getEntities]
  set _TMP(mode_2) [pw::Application begin Modify $_TMP(PW_1)]
    pw::Entity transform [pwu::Transform translation [pwu::Vector3 subtract[list 0 0 -3][list 3.592982456140399e-5 1.0950441942103595e-17 0.0]]] [$_TMP(mode_2) getEntities]
  $_TMP(mode_2) end
  unset _TMP(mode_2)
$_TMP(mode_1) end
unset _TMP(mode_1)

###############################################

Thanks for your help

Vanessa

[cnsidero]

Here's it cleaned up with a comment for each step:

package require PWI_Glyph 2.17

## TRANSLATE COPIED CONNECTOR 3 units in the z-dir ##

# modify for your script
set cons [pw::Grid getByName "con-1"]
# begin point of translation
set pt1 "0 0 0"
# end point of translation
set pt2 "0 0 3"

## START COPY/PASTE/TRANSLATE ##

# make sure clipboard is empty
pw::Application clearClipboard
# copy connectors to clipboard
pw::Application setClipboard $cons

# create paste mode
set mode(paste) [pw::Application begin Paste]
   # store copied connectors
   set xformCons [$mode(paste) getEntities]
   # copied connectors modify mode
   set mode(mod) [pw::Application begin Modify $xformCons]

      # translation vector
      set transVect [pwu::Vector3 subtract $pt2 $pt1]

      # translation matrix
      set xformMatrix [pwu::Transform translation $transVect]
      # translate copied connectors
      pw::Entity transform $xformMatrix $xformCons

   # end modify mode
   $mode(mod) end

# end paste mode. copied connectors now translated
$mode(paste) end

The best thing to do is read the documentation for each step in the main body. For example, "pwu::Entity transform" requires a matrix as an argument which can be created by "pwu::Transform transform" which in turn requires the translation vector created by subtracting the begin point from the end point with "pwu::Vector3 subtract"

When you script some commands and don't understand the methods used, find it the documentation. Most have examples.

-Chris

[jchawner]

Hi Vanessa:

Chris has already answered your question. But keep in mind that while journaling is a good learning tool, it does things primarily to ensure the script can be played back. Therefore, it looks a lot more complex than one you'd write yourself.