Bonjour, mon besoin est de faire tourner mes motifs avec les mêmes rotations que mon plan de travail
Ma macro tourne bien mes repère mais ne réalise pas la rotation de mes motis. Pouvez vous m'aider ?
Voici ma macro :
STRING wp = INPUT ENTITY WORKPLANE "ACTIVER B0 ou B0 C0"
ACTIVATE WORKPLANE $wp
REAL bnum = ''
STRING num = "Rotation B du plan de travail N°"
$bnum = input $num
EXPLORER SELECT Workplane "Workplane\N°" NEW
MODE WORKPLANE_TRANSFORM START "N°"
ACTIVATE WORKPLANE $wp
MODE WORKPLANE_TRANSFORM START
MODE TRANSFORM TYPE ROTATE
STATUS EDITING_PLANE ZX
MODE TRANSFORM ROTATE ANGLE $bnum
MODE TRANSFORM FINISH
MODE WORKPLANE_TRANSFORM FINISH ACCEPT
REAL anglenum = ''
STRING plnum = "Rotation C du plan de travail N°"
$anglenum = input $plnum
EXPLORER SELECT Workplane "Workplane\N°" NEW
MODE WORKPLANE_TRANSFORM START "N°"
ACTIVATE WORKPLANE $wp
MODE WORKPLANE_TRANSFORM START
MODE TRANSFORM TYPE ROTATE
STATUS EDITING_PLANE XY
MODE TRANSFORM ROTATE ANGLE $anglenum
MODE TRANSFORM FINISH
MODE WORKPLANE_TRANSFORM FINISH ACCEPT
EXPLORER SELECT Workplane "Workplane\N°" NEW
ACTIVATE WORKPLANE "N°"
ROTATE TRANSFORM TOP
FORM CALC WAIT FORM CALCULATOR TAB LASTMEAS
MEASURE CLEAR_ALL MODE VECTOR START MEASURE POSITION
MACRO PAUSE "QUELLE EST HAUTEUR DES N°"
REAL echnum = ''
STRING chnum = "Facteur d'echelle des N°"
$echnum = input $chnum
EXPLORER SELECT Workplane "Workplane\B0C0" NEW
ACTIVATE WORKPLANE "B0 C0"
EXPLORER SELECT Pattern "Pattern\GRV_INT\GRV_HT_3\0" NEW
EXPLORER SELECT Pattern "Pattern\GRV_INT\GRV_HT_3\33" SERIES
ACTIVATE FOLDER "Pattern\GRV_INT\GRV_HT_3"
EDIT PATTERN "0" SELECT ALL
EDIT PATTERN "1" SELECT ALL
EDIT PATTERN "2" SELECT ALL
EDIT PATTERN "3" SELECT ALL
EDIT PATTERN "4" SELECT ALL
EDIT PATTERN "5" SELECT ALL
EDIT PATTERN "6" SELECT ALL
EDIT PATTERN "7" SELECT ALL
EDIT PATTERN "8" SELECT ALL
EDIT PATTERN "9" SELECT ALL
EDIT PATTERN "10" SELECT ALL
EDIT PATTERN "11" SELECT ALL
EDIT PATTERN "12" SELECT ALL
EDIT PATTERN "13" SELECT ALL
EDIT PATTERN "14" SELECT ALL
EDIT PATTERN "15" SELECT ALL
EDIT PATTERN "16" SELECT ALL
EDIT PATTERN "17" SELECT ALL
EDIT PATTERN "18" SELECT ALL
EDIT PATTERN "19" SELECT ALL
EDIT PATTERN "20" SELECT ALL
EDIT PATTERN "21" SELECT ALL
EDIT PATTERN "22" SELECT ALL
EDIT PATTERN "23" SELECT ALL
EDIT PATTERN "24" SELECT ALL
EDIT PATTERN "25" SELECT ALL
EDIT PATTERN "26" SELECT ALL
EDIT PATTERN "27" SELECT ALL
EDIT PATTERN "28" SELECT ALL
EDIT PATTERN "29" SELECT ALL
EDIT PATTERN "30" SELECT ALL
EDIT PATTERN "31" SELECT ALL
EDIT PATTERN "32" SELECT ALL
EDIT PATTERN "33" SELECT ALL
MODE GEOMETRY_TRANSFORM START PATTERN
MODE TRANSFORM TYPE SCALE
MODE TRANSFORM SCALE LOCK Z ON
MODE TRANSFORM SCALE FACTOR $echnum
MODE TRANSFORM TYPE ROTATE
STATUS EDITING_PLANE ZX
MODE TRANSFORM ROTATE ANGLE $bnum
STATUS EDITING_PLANE XY
MODE TRANSFORM ROTATE ANGLE $anglenum
MODE GEOMETRY_TRANSFORM FINISH ACCEPT
Le titre du sujet a été modifié par un modérateur pour faciliter la recherche. Titre original:
Help !!! Macro avec même rotation repère et motifs