3.8 mb rar includes wOxxOm.TOOLS.package(28 functions).
; S' S+ K* V5 l* O: r, N W, G) L7 @% }
Bouns: Page numbering macro+video tutorial how to install macro and
* y- Y! M% T; D4 e; r
how to customize it in corel work place.
: [1 u- a* P" f3 y
This package has 28 macros see here details:
4 m8 N7 i! t- @, x# D; W; C. ^ ` k
- }6 ~4 o8 z, v+ |
1 e4 E8 k0 b6 A1 I' H: z! v) u- R# x! h2 A7 _1 }
* wx.PClipPick - pick a powerclipped shape(s) without entering powerclip editing mode. Works with keyboard
e4 ^$ ~. F! `! {/ yassignment only: for example assign both "W" and "Shift-W" (to add to selection). Repeat the macro to pick
; L( o# P/ u; \1 L/ N) O: A) x, [' `3 onested shapes. Oct,2 UPDATED: fixed screen redraw bug when no object under mouse
( _: _& R l1 g% v
* wx.ZoomOutBack Sep,28: to replace F3 hotkey, restores old pre-X3 behaviour - view goes to last used
, |7 q& b" z$ A/ O: T; s$ Gzoom when being invoked after zooming in. Especially handy when switching between extremely differing zoom
: Q: t* V1 q5 T$ ~3 Ulevels.
8 e3 Q* Z7 a \# T' P* wx.ZoomFullPage Oct,5: to replace Shift-F4 hotkey, zoom to page + 5% (whereas standard DRAW
& Y* m2 `; f2 Y6 t8 G; v/ [; zbehaviour is to add 20% thus wasting space)
5 v0 E- V0 G. t0 ~8 C* wx.ScrollScreenDown, ...Up ...Left ...Right ...DownRight ...UpRight ...DownLeft ...UpLeft Sep,28: Scroll by
. `* \ L8 W+ _1 S" X o
80% of screen. Assign e.g. to Ctrl-Alt-Numpad keys (1 to 9)
6 b1 V7 n7 I$ ], ~& n2 V
* wx.InvertSelection - invert shapes selection
. h$ Y" S8 }, u! h8 f
* wx.selectComplexCurves - to find shapes with number of nodes greater than specified
, u, Y/ _7 y; u* q6 y/ x, y
* wx.selectSmallObjects - select objects smaller than user specified threshold
6 {6 t8 V$ k }, q5 ~' n$ Z
* wx.selectSameFillColor, wx.selectSameFillAndOutline, wx.selectSameOutline, wx.selectSameDialog -
- p5 j% U" H0 |( Y' x! \1 Fselects ungroupped shapes with same fill/outline colors. Tip for 'dialogless' macros: enable keyboard ScrollLock
4 {3 L' _; r9 V+ f" k
led to specify sensitivity, negative '-1' etc - also select inside groups without ungrouping
( R/ G- H) E+ c. u8 J }1 o+ c
1 P) m/ G1 a4 H- U8 M3 L- z5 [) f
! ~) U! j4 E5 ]* R
% O ]2 v- v! c( ]+ _* wx.CreateFountain - to quickcreate complex fountain fills - select a few uniformly filled shapes, invoke the
( w4 \% I+ r8 C' {; h# n$ umacro, pick the target shape which will be painted with a fountain fill.
* ]( `6 C8 {( T) P) pVery handy tip: use EyeDropper tool to pick colors from bitmap and then Shift-click to fill the next rectangle
6 G$ x# B. |' Y: J# R1 {* V+ \(duplicate as many rectangles as needed before). Angle and space between centers of source shapes is
/ I" `) Z" D- U- @( x: y, j4 k$ Dpreserved.
( Q& E" I S/ p N( v1 ?) N, {
; P" \; `' p6 c% J5 c7 s6 k5 e
! j4 [. y5 h6 K% O& C' ~
$ ^7 I: ?! M0 y: O* wx.ConvertShapesToCMYK - converts shapes and bitmaps to CMYK (selected/whole doc)
# r/ V: C; j/ r+ @% ]: d* wx.transparentEdge - create feathered edges for simple shapes. Quirky note: Sometimes a shape must
+ l3 m( L* b' F' a, B
have an outline for the macro to work correctly ('Fix' button)
+ ^" ~; D4 F. j& b3 Q. L Z4 s }+ n( ?. Q) ]" C$ u! d* |
5 e0 [9 p7 [1 M& ~$ {6 p# q" Z- I$ \* O( s
: Z& u3 v) f& F$ y7 M# a5 C g* wx.TextToCurves - text to curves (also powerclipped) throughout whole document or selection only.
* E. f8 L& a& y
* wx.OutlinesToQ_KillEmpty - converts outlines to curves and deletes original shapes if it has no fill
3 Q' H* ~4 T! s( }* wx.outlineBehind - set outline behind. Shift-click (also Ctrl-click) for normal.
3 o6 x) q, g0 }* wx.outlineCorners Sep,30: set corners to rounded, Ctrl-click: miter, Shift-click: bevel'd
- ?9 C4 Y8 e2 b* t0 N. N
* wx.OutlineIncrease & OutlineDecrease - change selected shapes' outlines width. Each width is changed
, V, N; f; M& v$ `( H9 z6 F
individually which allows changing of different widths in one selection. I have it on Ctrl-Alt-Up & Down
# c7 P# H7 _: _7 V' P
* wx.OutlineEqualsFill Sep,28: makes outline color equal to fill. Useful for trace results in X3 to eliminate faint
7 h3 p4 `: \* b" Z2 m
ghostly 'outline'.
( `2 ~- c0 l0 h1 G' W4 Q) _8 D
* wx.GuideHorizontal, GuideVertical - create guide at mouse cursor. It's convenient if assigned to a hotkey
1 n1 H9 d2 x2 l# J
* wx.PasteAtMouse - paste the clipboard at mouse position. Assign to hotkey only (Ctrl-Shift-V)
: @- \3 z- i: F2 ?* wx.ForEach - repeat last standard transform (repeatable usually with Ctrl-R) for the selection of multiple
3 v; U6 W# }$ w/ L# l' p
shapes individually for each (each repetition creates its 'undo' record)
0 Z. s( R5 h: j5 Y
Sep,30: fixed bug with repeating of rotation
. C, b/ G0 D' P+ ?# _; W5 Z* wx.BlendSplit - splits blend at position under mouse cursor. Invoke via hotkey only (mine is "Z")
4 f6 s2 g% G7 w7 F6 g' [
* wx.sizePagetoFIT Oct,5: resizes page to fit objects + user specified gap
1 M6 M9 V2 b9 f$ u2 ?7 t
* wx.pageNamesAsNumbers - remove page names ("Page #") so that only numbers remain.
3 z2 ~6 D3 D# F# g- k* u+ [
* wx.dupOnNextPage - quick copying of selection to the next page (no clipboard usage). Layers currently are
: p+ `1 R4 r6 N1 X+ |3 p
merged.
+ L4 Y7 g" B+ s8 O+ V* wx.OverprintsRemove - remove all overprints (selected objects/whole doc), including overprinted bitmaps
1 e" j4 f( A. a; k) t! q
* wx.BitmapsDownsample Sep,28: resamples bitmaps if its dpi is larger than specified by 20%. Asks dpi # and
# }. a( n# X5 s# `$ f& G2 n- dprocesses selected / whole doc, including powerclips. Shows per page statistics.
, F2 {) s! I8 z9 B( @* ]% P* wx.BitmapsSetDPI Sep,28: changes dpi value for bitmaps without resampling. Asks dpi # and processes
* z2 ?: D. l' ^) iselected / whole doc, including powerclips. Shows per page statistics.
) e. |! @$ S8 \+ Z T% `+ Y
* wx.BitmapsToPowerclips Sep,28: puts bitmaps into powerclips. Asks bleed # and processes selected /
8 J0 @( F2 C1 ]
whole doc. Shows per page statistics.
" I3 f+ @ b2 T: |) k) c7 _, N$ M5 F% @* J3 s$ q
http://rapidshare.com/files/94291920/corel_macro.rar" d0 D) d0 h7 q* |
http://depositfiles.com/files/3731542