TurboCAD Forums

The Ultimate Resource for TurboCAD Knowledge

Register
 
When replying to a specific statement be sure to quote the previous post.

Macro Palette
Read 61 times
* April 20, 2017, 10:19:12 AM
No idea if anyone uses the Macro Palette, anyway, I needed to  create lots of concentric circles, I couldn't decide the best tool to use so used the macro recorded to record a single alteration as seen below.
Start "Edit|Select"
      Drag xOrigin + 1268.5349766673933000, yOrigin + 241.8858788353384500, zOrigin + 0.0000000000000000, 0
      ChangeEditField 4, "3mm"
      Drag xOrigin + 1268.5349766673933000, yOrigin + 241.8858788353384500, zOrigin + 0.0000000000000000, 0
      ChangeEditField 4, "31mm"
      Drag xOrigin + 1268.5349766673933000, yOrigin + 241.8858788353384500, zOrigin + 0.0000000000000000, 0
      ChangeEditField 5, "3mm"
      Drag xOrigin + 1268.5349766673933000, yOrigin + 241.8858788353384500, zOrigin + 0.0000000000000000, 0
      ChangeEditField 5, "31mm"

Then with a slight modification to the code
 
For I = 31 to 181 step 2
temp = I & " mm"
   Start "Edit|Select"
      Drag xOrigin + 1226.7351720312176000, yOrigin + 195.9666514229270400, zOrigin + 0.0000000000000000, 0
      ChangeEditField 4, temp
      Drag xOrigin + 1226.7351720312176000, yOrigin + 195.9666514229270400, zOrigin + 0.0000000000000000, 0
      ChangeEditField 5, temp
      EnterKey
Next

Selected object, turned on the make copy tool, ran the macro and got all the circles (75 of them)

Just posting in case any new users are unaware of the Macro Recorder
« Last Edit: April 20, 2017, 10:21:06 AM by Andy H »

Logged


April 22, 2017, 02:55:16 AM
#1
That is interesting information.

Thank you.


Jeff


Logged
TC Pro Platinum 2017, 2016 & 2015 (all with LightWorks) & V21
System: i7-5820K @ 3.30GHz, ASRock X99 Extreme4, 16GB DDR4-2133 RAM, Gigabyte GTX 970, Samsung NVMe SSD 950 (256GB), Windows 7 Pro (64-bit) SP1