' A3 Monochrome, No lineweights, Fit All drawing Limits.
Sub main MbeSetAppVariable "PLOTDLG", "plotAttrUI.line_wghts", 0& MbeSetAppVariable "PLOTDLG", "plotUI.uiColorMode", 0& MbeSetScaledAppVar "PLOTDLG", "plotUI.dblScaleUorsToPrintUnits", 1.97 MbeSendCommand "PRINT BOUNDARY FIT ALL " MbeSendCommand "PRINT EXECUTE " End Sub
The above macro is to print drawings to the default printer.
Prints come out in colour, what am I missing??
(I recorded this with the inbuilt recorder, I am not an expert user or programmer).
As a workaround you could use a keyin in your macro,
replacing
MbeSetAppVariable "PLOTDLG", "plotUI.uiColorMode", 0&
with
MbeSendCommand "print colormode monochrome"
See the help for other plot dialog key-ins under the heading
" Working with Completed Designs > Printing > Print Dialog > Print Dialog Key-ins "
In addition you may want to consider defining a Print Style for pre defining and setting your printing parameters. More information can be found in the help " Working with Completed Designs > Printing > Print Styles "
See also communities.bentley.com/.../7203
It doesnt have to be a macro it can just be a series of keyins commands strung together with ; ( semi colon)
when you run the control p or print command an mdl is loaded in the back ground
you can then run mdl load and new dialog pops choose as shown in picture will give access to more keyins scroll through to find what you need....
you may need to prefix each multiple command like paper size etc with the word print then the command then a semicolon
once you have your string you can set it to an F key for faster access
For examplel I used F12 for making A3 pdfs colour and shft F12 for plot A3 BW pdf and Alt F12 plot A3 wysiwyg PDFs for colour raster maps what you see is what you get Once you master this you will be able to do things very quickly....
Also work out other tools you can customise...
Lorys
Started msnt work 1990 - Retired Nov 2022 ( oh boy am I old )
But was long time user V8iss10 (8.11.09.919) dabbler CE update 16 (10.16.00.80)
MicroStation user since 1990 Melbourne Australia.click link to PM me