3.8 mb rar includes wOxxOm.TOOLS.package(28 functions).8 n9 }; c2 M- u: G" b) w9 n" g
Bouns: Page numbering macro+video tutorial how to install macro and
& w/ e) n& u/ m9 ?% D: xhow to customize it in corel work place.4 j6 Q7 p* e5 q( r# F
This package has 28 macros see here details:
6 z% t$ I+ G% a; i! g
% n' q, L. ?' ?3 b4 H% A1 H$ f9 n8 T9 C; |; v
2 t9 I- h6 \& o8 h2 ?; Q3 ^( H# K
* wx.PClipPick - pick a powerclipped shape(s) without entering powerclip editing mode. Works with keyboard3 |8 c$ I' m9 a0 f1 S: x
assignment only: for example assign both "W" and "Shift-W" (to add to selection). Repeat the macro to pick- Z; O7 y9 \8 G
nested shapes. Oct,2 UPDATED: fixed screen redraw bug when no object under mouse
- ?4 f% M1 D" O  ^+ D3 P8 M' m2 ~* wx.ZoomOutBack Sep,28: to replace F3 hotkey, restores old pre-X3 behaviour - view goes to last used" T" z7 F- j( H7 x- C) n, X
zoom when being invoked after zooming in. Especially handy when switching between extremely differing zoom( |' X; E+ `' W
levels.
6 [7 ?  [6 D% w5 G* wx.ZoomFullPage Oct,5: to replace Shift-F4 hotkey, zoom to page + 5% (whereas standard DRAW' P  u) y  s, }* D
behaviour is to add 20% thus wasting space)- L" I+ x9 G$ P! c3 Z1 i
* wx.ScrollScreenDown, ...Up ...Left ...Right ...DownRight ...UpRight ...DownLeft ...UpLeft Sep,28: Scroll by7 e* A# P3 D) l& u0 X# U
80% of screen. Assign e.g. to Ctrl-Alt-Numpad keys (1 to 9)
3 f, T' t- I' ^* N( f2 ?0 U* wx.InvertSelection - invert shapes selection
6 w7 @$ u# T$ ~2 L+ |- H& A* wx.selectComplexCurves - to find shapes with number of nodes greater than specified
9 R/ f7 e. k+ K" t: C7 T4 A* wx.selectSmallObjects - select objects smaller than user specified threshold! z5 X: C/ V' n
* wx.selectSameFillColor, wx.selectSameFillAndOutline, wx.selectSameOutline, wx.selectSameDialog -
: h0 o, s8 d! H- g$ {2 uselects ungroupped shapes with same fill/outline colors. Tip for 'dialogless' macros: enable keyboard ScrollLock0 J$ T8 w+ }4 i" {8 A& P3 z2 e
led to specify sensitivity, negative '-1' etc - also select inside groups without ungrouping" \/ M0 `/ \- P
' h! s. t* K1 T3 R& I2 Z

: M8 E! Y* b3 D. |; F; `4 ~- M3 Q% G& m( ]$ N/ R
* wx.CreateFountain - to quickcreate complex fountain fills - select a few uniformly filled shapes, invoke the# v! v6 q) O+ _+ L6 q* t' b
macro, pick the target shape which will be painted with a fountain fill.
8 f+ T8 [1 e6 B& s7 ^1 o1 b6 `Very handy tip: use EyeDropper tool to pick colors from bitmap and then Shift-click to fill the next rectangle9 n9 t) m5 T0 |, A
(duplicate as many rectangles as needed before). Angle and space between centers of source shapes is
: a, |# G* }; O$ _5 G, `) }5 l7 Vpreserved.1 r( M/ f# j  E9 l
2 O- A5 S8 H9 |% F& z  Y2 W- i4 \
) O- t1 a# Q: h: K  I; t

  T! ^5 y  L+ R% O9 ]1 T* wx.ConvertShapesToCMYK - converts shapes and bitmaps to CMYK (selected/whole doc)6 N) U, ]) \: v1 c% k$ g* L  y
* wx.transparentEdge - create feathered edges for simple shapes. Quirky note: Sometimes a shape must
6 |0 d2 z8 `! Ihave an outline for the macro to work correctly ('Fix' button)2 H) V0 t2 h% X, y/ L5 u
, M* |/ k, f+ ?# C7 S* {
7 o" }+ u6 L9 c0 s# b# K7 G

2 O2 X+ ]1 F6 t! [) o7 B$ b
5 m3 J6 Z: ~, F' r* wx.TextToCurves - text to curves (also powerclipped) throughout whole document or selection only.
6 `# @7 q& _6 x# k7 U. Z  w6 r* wx.OutlinesToQ_KillEmpty - converts outlines to curves and deletes original shapes if it has no fill7 R, `9 T, L; C* [, s
* wx.outlineBehind - set outline behind. Shift-click (also Ctrl-click) for normal.6 F- D% u$ S/ [% M. J/ e
* wx.outlineCorners Sep,30: set corners to rounded, Ctrl-click: miter, Shift-click: bevel'd8 P0 p+ t* v% U9 @# Q7 ~
* wx.OutlineIncrease & OutlineDecrease - change selected shapes' outlines width. Each width is changed
  F2 P1 {/ v0 v- Y! w9 u! S7 pindividually which allows changing of different widths in one selection. I have it on Ctrl-Alt-Up & Down
3 G4 W/ N* ~  p5 }* wx.OutlineEqualsFill Sep,28: makes outline color equal to fill. Useful for trace results in X3 to eliminate faint" g! C0 {' n3 A& B+ t* u5 ~
ghostly 'outline'.$ ]2 s/ U  `& H4 u
* wx.GuideHorizontal, GuideVertical - create guide at mouse cursor. It's convenient if assigned to a hotkey
: T& E, E. V  Q* R# d* wx.PasteAtMouse - paste the clipboard at mouse position. Assign to hotkey only (Ctrl-Shift-V), ]" w5 d- E5 K* g
* wx.ForEach - repeat last standard transform (repeatable usually with Ctrl-R) for the selection of multiple
6 s9 N  J8 D1 d0 q( k: _shapes individually for each (each repetition creates its 'undo' record); P4 c/ v8 t8 L+ w; l; d
Sep,30: fixed bug with repeating of rotation
) T/ A- c3 J# U# g+ G/ x* wx.BlendSplit - splits blend at position under mouse cursor. Invoke via hotkey only (mine is "Z")" ]) S& U8 b, p, i6 S' C1 W' I
* wx.sizePagetoFIT Oct,5: resizes page to fit objects + user specified gap
4 q) ?& s8 Q- p# k: r6 q% j* wx.pageNamesAsNumbers - remove page names ("Page #") so that only numbers remain.
) y. y- t7 L$ o4 o$ [) c* wx.dupOnNextPage - quick copying of selection to the next page (no clipboard usage). Layers currently are
- E' X, i" I1 Z! |$ s7 R: Omerged.
6 h7 t3 |6 b2 g1 v2 a3 W! I5 h* wx.OverprintsRemove - remove all overprints (selected objects/whole doc), including overprinted bitmaps
* e  u  I) h' T  D* wx.BitmapsDownsample Sep,28: resamples bitmaps if its dpi is larger than specified by 20%. Asks dpi # and6 N, v7 y  M9 Q$ b
processes selected / whole doc, including powerclips. Shows per page statistics.
& r: r% S. `0 l* wx.BitmapsSetDPI Sep,28: changes dpi value for bitmaps without resampling. Asks dpi # and processes
( y, N# g2 \1 v; x/ `" ]selected / whole doc, including powerclips. Shows per page statistics.% \  i# C$ `0 O& H( [
* wx.BitmapsToPowerclips Sep,28: puts bitmaps into powerclips. Asks bleed # and processes selected /
( F% f! K6 G0 r0 pwhole doc. Shows per page statistics.
4 g, p8 ^6 P% H0 S
0 H( A6 m) h. o% Uhttp://rapidshare.com/files/94291920/corel_macro.rar
* |$ Z; ]* V. |  i- `8 n* Vhttp://depositfiles.com/files/3731542

dddddddddddddddddddddddddddddddddddddddddddd