! CONFIG.PRO Mapkeys by Eldon GOATES of Synthesis Engineering Services, Inc.
!   - Revised August 14 2002 for Pro/E Magazine article
!   - 2000i Version

! ****************************************************************************
! WARNING: THE FOLLOWING MAPKEYS ARE EXAMPLES ONLY
!          THEY WILL NOT WORK PROPERLY ON EVERY SYSTEM
! ****************************************************************************

! FUNCTION KEYS:

mapkey $F12 %dr; #regenerate; #model; #automatic; #current vals;
! Regenerates model(s) using current values for Pro/Program (if used).
! Starts regeneration with done-return to set to correct menus.



! ****************************************************************************
! FILE MANAGEMENT *

mapkey dir ~ Select `main_dlg_cur` `MenuBar1`1 `File`;\
mapkey(continued) ~ Close `main_dlg_cur` `MenuBar1`;\
mapkey(continued) ~ Activate `main_dlg_cur` `File.psh_working_dir`;
mapkey di2 ~ Activate `file_open` `Open`;

mapkey diw %dir; ~ Activate `file_open` `Inputname``/share/work`;
mapkey dim %dir; ~ Activate `file_open` `Inputname``/share/work/misc`; %di2;

! any number of directories can be mapped with simple mapkeys.
! just copy the key, change the 3rd letter and type the path.

! opening files: asr = Assembly Search Retrieve
!                asi = Assembly Search Retrieve In Session
!                psr = Part Search Retrieve
!                psi = Part Search Retrieve In Session

mapkey asi %asr; ~ Activate `file_open` `In Session`;
mapkey asr ~ Select `main_dlg_cur` `MenuBar1`1 `File`;\
mapkey(continued) ~ Close `main_dlg_cur` `MenuBar1`;~ Activate `main_dlg_cur` `File.psh_open`;\
mapkey(continued) ~ Select `file_open` `Type`1 `db_1`;
mapkey psi %psr; ~ Activate `file_open` `In Session`;
mapkey psr ~ Select `main_dlg_cur` `MenuBar1`1 `File`;\
mapkey(continued) ~ Close `main_dlg_cur` `MenuBar1`;~ Activate `main_dlg_cur` `File.psh_open`;\
mapkey(continued) ~ Select `file_open` `Type`1 `db_2`;



! ****************************************************************************
! DATUMS *

! remove all datum types from display (planes, axes, points, coordinate sys)
mapkey nd @MAPKEY_NAME Turn off display of all datum types;\
mapkey(continued) ~ Select `main_dlg_cur` `MenuBar1`1  `View`;\
mapkey(continued) ~ Close `main_dlg_cur` `MenuBar1`;\
mapkey(continued) ~ Activate `main_dlg_cur` `View.psh_view_dtmdisp`;\
mapkey(continued) ~ Activate `datumdisplay` `DtmDsply_PB_DtmPlanes`0 ;\
mapkey(continued) ~ Activate `datumdisplay` `DtmDsply_PB_DtmAxes`0 ;\
mapkey(continued) ~ Activate `datumdisplay` `DtmDsply_PB_Tags`0 ;\
mapkey(continued) ~ Activate `datumdisplay` `DtmDsply_PB_DtmPnts`0 ;\
mapkey(continued) ~ Activate `datumdisplay` `DtmDsply_PB_CSys`0 ;\
mapkey(continued) ~ Activate `datumdisplay` `DtmDsply_PB_Ok`;

!display all datum types
mapkey yd @MAPKEY_NAME Display all datum types;\
mapkey(continued) ~ Select `main_dlg_cur` `MenuBar1`1  `View`;\
mapkey(continued) ~ Close `main_dlg_cur` `MenuBar1`;\
mapkey(continued) ~ Activate `main_dlg_cur` `View.psh_view_dtmdisp`;\
mapkey(continued) ~ Activate `datumdisplay` `DtmDsply_PB_DtmPlanes`1 ;\
mapkey(continued) ~ Activate `datumdisplay` `DtmDsply_PB_DtmAxes`1 ;\
mapkey(continued) ~ Activate `datumdisplay` `DtmDsply_PB_DtmPnts`1 ;\
mapkey(continued) ~ Activate `datumdisplay` `DtmDsply_PB_Tags`1 ;\
mapkey(continued) ~ Activate `datumdisplay` `DtmDsply_PB_CSys`1 ;\
mapkey(continued) ~ Activate `datumdisplay` `DtmDsply_PB_Ok`;



! ****************************************************************************
! SELECT *

! Select named datums by menu with a mapkey
mapkey st #sel by menu;#datum;#name; ~ Select `sellist0` `Namelist`1 `TOP`;
mapkey sr #sel by menu;#datum;#name; ~ Select `sellist0` `Namelist`1 `RIGHT`;
mapkey sf #sel by menu;#datum;#name; ~ Select `sellist0` `Namelist`1 `FRONT`;

mapkey sx #sel by menu; #axis; ~ Select `sellist0` `Namelist`1 `A_1`;
mapkey sc #sel by menu; #coord sys; ~ Select `sellist0` `Namelist`1 `CS0`;

! Change direction of the Flip Arrow (FA)
mapkey fa #flip;

! Yea, Yea, get on with it.
mapkey aa #okay; #all; #all children; #alignment; #align; #yes;\
mapkey(continued) ~ FocusIn `compplace` `compselect`;~ Activate `compplace` `compselect`1;

! Activate OK button of feature creation dialog box.
mapkey baa ~ Activate `Odui_Dlg_01` `okay`;

! Select the last feature
mapkey lf #sel by menu; #last feature;

! Modify the last feature of the feature list
mapkey ml #done/return; #done; #modify; #sel by menu; #last feature;

! Redefine the last feature of the feature list
mapkey rdl #done/return; #feature; #redefine; #sel by menu; #last feature;

! Delete the last feature of the feature list (BE CAREFUL)
mapkey delf #feature; #delete; #sel by menu; #last feature; #done;

! Make feature Thru All or Revolve 360 / one side or both sides works the same.
mapkey ta #thru all; #360; #done; #thru all; #done;



! ****************************************************************************
! IMAGE DISPLAY *

! display exploded view
mapkey exp ~ Select `main_dlg_cur` `MenuBar1`1 `View`;\
mapkey(continued) ~ Close `main_dlg_cur` `MenuBar1`;\
mapkey(continued) ~ Activate `main_dlg_cur` `View.psh_view_explode`;

! display unexploded view
mapkey uxp ~ Select `main_dlg_cur` `MenuBar1`1 `View`;\
mapkey(continued) ~ Close `main_dlg_cur` `MenuBar1`;\
mapkey(continued) ~ Activate `main_dlg_cur` `View.psh_view_unexplode`;



! ****************************************************************************
! LAYERS *

mapkey vl @MAPKEY_LABELview_layers;\
mapkey(continued) ~ Select `main_dlg_cur` `MenuBar1`1 `View`;~ Close `main_dlg_cur` `MenuBar1`;\
mapkey(continued) ~ Activate `main_dlg_cur` `View.psh_view_lyrs`;

mapkey lvvc ~ Activate `min_layers` `RepaintBtn`;\
mapkey(continued) ~ Activate `min_layers` `CloseBtn`;
mapkey lvo ~ Activate `min_layers` `MakeShown`;
mapkey lvf ~ Activate `min_layers` `MakeBlank`;

mapkey lvcn %vl; ~ Select `min_layers` `AssyTree`1 `node0:2_DTM_CRVS`;%lvo;%lvvc;
mapkey lvcf %vl; ~ Select `min_layers` `AssyTree`1 `node0:2_DTM_CRVS`;%lvf;%lvvc;

mapkey lvsn %vl; ~ Select `min_layers` `AssyTree`1 `node0:3_SURF`;%lvo;%lvvc;
mapkey lvsf %vl; ~ Select `min_layers` `AssyTree`1 `node0:3_SURF`;%lvf;%lvvc;



! ****************************************************************************
! VIEWS *

mapkey +vr ~ Select `main_dlg_cur` `MenuBar1`1 `View`;\
mapkey(continued) ~ Close `main_dlg_cur` `MenuBar1`;\
mapkey(continued) ~ Activate `main_dlg_cur` `View.psh_view_named`;
mapkey -vr ~ Activate `vwsavretr` `VwSavRetr_PH.NameVw_PB_SetCur`;\
mapkey(continued) ~ Activate `vwsavretr` `Close`;
mapkey +vs ~ Select `main_dlg_cur` `MenuBar1`1 `View`;\
mapkey(continued) ~ Close `main_dlg_cur` `MenuBar1`;\
mapkey(continued) ~ Activate `main_dlg_cur` `View.psh_view_named`;
mapkey -vs ~ Activate `vwsavretr` `VwSavRetr_PH.NameVw_PB_Save`;yes;\
mapkey(continued) ~ Activate `vwsavretr` `Close`;

! display model in view number - VIEW1, etc...
mapkey v1 %+vr; ~ Select `vwsavretr` `VwSavRetr_PH.NameVw_List`1 `VIEW1`;\
mapkey(continued) %-vr;
mapkey v2 %+vr; ~ Select `vwsavretr` `VwSavRetr_PH.NameVw_List`1 `VIEW2`;\
mapkey(continued) %-vr;
mapkey v3 %+vr; ~ Select `vwsavretr` `VwSavRetr_PH.NameVw_List`1 `VIEW3`;\
mapkey(continued) %-vr;

! save current view orientation as view number - VIEW1, etc...
mapkey vs1 %+vs; ~ Input `vwsavretr` `VwSavRetr_PH.NameVw_IP` `view1`;\
mapkey(continued) ~ Update `vwsavretr` `VwSavRetr_PH.NameVw_IP` `view1`; %-vs;
mapkey vs2 %+vs; ~ Input `vwsavretr` `VwSavRetr_PH.NameVw_IP` `view2`;\
mapkey(continued) ~ Update `vwsavretr` `VwSavRetr_PH.NameVw_IP` `view2`; %-vs;
mapkey vs3 %+vs; ~ Input `vwsavretr` `VwSavRetr_PH.NameVw_IP` `view3`;\
mapkey(continued) ~ Update `vwsavretr` `VwSavRetr_PH.NameVw_IP` `view3`; %-vs;



! ****************************************************************************
! FEATURES *

! feature creation mapkeys (just a few to get the idea)

mapkey fdl #feature; #create; #datum; #plane;
mapkey fdp #feature; #create; #datum; #point;
mapkey fdc #feature; #create; #datum; #curve;

mapkey fsn #feature; #create; #surface; #new;
mapkey fsb %feat; #surface; #new; #advanced; #done; #boundaries; #done;
mapkey fss #feature; #create; #surface; #new; #copy; #done;

mapkey fsp #feature; #create; #solid; #protrusion;
mapkey fsc #feature; #create; #solid; #cut;
mapkey fr #feature; #create; #solid; #round; #sketch; #arc; #fillet;
! this also works in sketcher for creating a fillet radius as well.

mapkey ft #feature; #create; #solid; #tweak;
mapkey dft #feature; #create; #solid; #tweak; #draft;
mapkey dfn %ft; #draft; #neutral pln; #done; #no split; #constant; #done;

mapkey fct #feature; #create; #cosmetic; #thread;
mapkey fcu #feature; #create; #user defined; #search/retr;
mapkey fpl #feature; #pattern; %lf; #varying; #done;
! initiates the creation of a pattern of the last feature



! ****************************************************************************
! DRAWINGS *

! drawing mode works slightly different.  These mapkeys work from anywhere in
! the drawing mode.

mapkey dse #detail; #show/erase;
mapkey cn #detail; #create; #note;
mapkey cd #detail; #create; #dimension;
mapkey crd #detail; #create; #ref dim;

mapkey mtl #modify; #text; #note; #text line;
mapkey mtf #modify; #text; #note; #full note;
mapkey mts #modify; #text; #text style;
mapkey mth #modify; #text; #text height;

mapkey ns #sheets; #next;
mapkey ads #sheets;#add;

! aligns text to CENTER and MIDDLE
mapkey tcm ;#MODIFY; #TEXT; #TEXT STYLE;\
mapkey(continued) @MANUAL_PAUSESELECT TEXT TO MODIFY STYLE\nPUSH "RESUME" WHEN FINISHED;\
mapkey(continued) #DONE SEL; ~ Open `dial_txt_sty` `opt_horjust`;\
mapkey(continued) ~ Close `dial_txt_sty` `opt_horjust`;\
mapkey(continued) ~ Select `dial_txt_sty` `opt_horjust`1 `Center for text style dialog`;\
mapkey(continued) ~ Open `dial_txt_sty` `opt_verjust`;~ Close `dial_txt_sty` `opt_verjust`;\
mapkey(continued) ~ Select `dial_txt_sty` `opt_verjust`1 `Middle for text style dialog`;\
mapkey(continued) ~ Activate `dial_txt_sty` `psh_ok`;



! ****************************************************************************
! MEASURE / ANALYSIS *

mapkey mdd #info; #measure; #distance;
mapkey mdl #info; #measure; #distance; #absolute; #from plane;
mapkey mdi #info; #measure; #diameter;
mapkey mcl #info; #measure; #curve/edge; #length;

! measure clearance and interference
mapkey mci ~ Select `main_dlg_cur` `MenuBar1`1 `Analysis`;\
mapkey(continued) ~ Close `main_dlg_cur` `MenuBar1`;\
mapkey(continued) ~ Activate `main_dlg_cur` `Analysis.psh_analysis_modelanl`;\
mapkey(continued) ~ Select `modelprop` `MPTypeOptions`1 `PairsClearance`;

! calculate model mass properties
mapkey mp #info; #mass props; #assembly mp; ; #part mp; ; #default;



! ****************************************************************************
! MISCELLANEOUS *

! show a feature list
mapkey fl ~ Select `main_dlg_cur` `MenuBar1`1 `Info`;\
mapkey(continued) ~ Close `main_dlg_cur` `MenuBar1`;\
mapkey(continued) ~ Activate `main_dlg_cur` `Info.psh_info_feat_list`; #screen;\
mapkey(continued) ~ Select `featurelist` `select.SelModeGrp`1 `Top Level`;\
mapkey(continued) ~ Activate `featurelist` `apply.ApplyBtn`; #screen;

! The following 3 Model tree mapkeys may not work properly on every machine

mapkey ee ~ Select `main_dlg_cur` `MenuBar1`1 `Windows`;\
mapkey(continued) ~ Close `main_dlg_cur` `MenuBar1`;\
mapkey(continued) ~ Activate `main_dlg_cur` `Windows.chk_disp_mdltree`1 ;\
mapkey(continued) ~ FocusOut `newtree` `AssyTree`;

mapkey e1 ~ FocusOut `newtree` `AssyTree`;\
mapkey(continued) ~ Resize `newtree` `newtree`2 3.558162 12.590420 ;\
mapkey(continued) ~ Resize `newtree` `newtree`2 6.568915 12.590420 ;\
mapkey(continued) ~ Move `newtree` `newtree`2 25.126100 0.000000 ;\
mapkey(continued) ~ Resize `newtree` `newtree`2 6.568915 12.179863 ;\
mapkey(continued) ~ Move `newtree` `newtree`2 25.126100 0.410557 ;\
mapkey(continued) ~ Resize `newtree` `newtree`2 6.568915 23.264907 ;\
mapkey(continued) ~ Select `newtree` `MBar`1 `FileMenu`; %e2;

mapkey e2 ~ Select `newtree` `MBar`1 `FileMenu`;~ Close `newtree` `MBar`;\
mapkey(continued) ~ Activate `newtree` `LoadCfg`;\
mapkey(continued) ~ Update `file_open` `Inputname` `/share/ptc/pro_stds/configs/tree.cfg`;\
mapkey(continued) ~ Activate `file_open` `Open`;



! ****************************************************************************
! FINISH *

mapkey dd %dsk; #done;
mapkey dr #done/return; #done-return;



! EOF ########################################################################