// // time: Tue Sep 5 07:51:53 1995 // // version: 3.0.0 (format), 3.1.0 (DX) // // // MODULE main // // comment: This visual program uses the sample module "ShowPick". First choose "Open All Control Panels" from the Windows menu. Execute once. Three white balls will appear. Now go into pick mode by choosing that option in the View Control dialog of the Image window. Click on one of the balls. Execute. The ball will turn a magenta color. This is because the ShowPick module is using the information put out by the Pick tool to find the element picked, and to color the entire field containing that element magenta. Go into execute-on-change mode. Now choose "vertex" in the control panel. Now just the point nearest the pick point will be colored magenta. Now choose "element" in the control panel. Now just the element containing the pick point will be colored magenta. // comment: // comment: Because the cache flag in the Pick tool is set to 0 (the default), subsequent executions after a pick is made will not show the last pick. If you want the last pick to remain in use, set the cache flag to 1. // workspace: width = 399, height = 634 // layout: snap = 0, width = 50, height = 50, align = UL // macro main( ) -> ( ) { // // node Construct[9]: x = 42, y = 49, inputs = 4, label = Construct // input[1]: defaulting = 0, visible = 1, type = 16777224, value = {[0 0 0]} // main_Construct_9_out_1 = Construct( main_Construct_9_in_1, main_Construct_9_in_2, main_Construct_9_in_3, main_Construct_9_in_4 ) [instance: 9, cache: 1]; // // node Construct[10]: x = 151, y = 54, inputs = 4, label = Construct // input[1]: defaulting = 0, visible = 1, type = 16777224, value = {[1 2 0]} // main_Construct_10_out_1 = Construct( main_Construct_10_in_1, main_Construct_10_in_2, main_Construct_10_in_3, main_Construct_10_in_4 ) [instance: 10, cache: 1]; // // node Construct[11]: x = 259, y = 52, inputs = 4, label = Construct // input[1]: defaulting = 0, visible = 1, type = 16777224, value = {[3 -1 -1]} // main_Construct_11_out_1 = Construct( main_Construct_11_in_1, main_Construct_11_in_2, main_Construct_11_in_3, main_Construct_11_in_4 ) [instance: 11, cache: 1]; // // node Collect[5]: x = 163, y = 204, inputs = 3, label = Collect // main_Collect_5_out_1 = Collect( main_Construct_9_out_1, main_Construct_10_out_1, main_Construct_11_out_1 ) [instance: 5, cache: 1]; // // node AutoGlyph[6]: x = 144, y = 295, inputs = 7, label = AutoGlyph // input[2]: defaulting = 0, visible = 1, type = 32, value = "spiffy" // main_AutoGlyph_6_out_1 = AutoGlyph( main_Collect_5_out_1, main_AutoGlyph_6_in_2, main_AutoGlyph_6_in_3, main_AutoGlyph_6_in_4, main_AutoGlyph_6_in_5, main_AutoGlyph_6_in_6, main_AutoGlyph_6_in_7 ) [instance: 6, cache: 1]; // // node Pick[1]: x = 223, y = 365, inputs = 8, label = Pick_1 // input[1]: defaulting = 0, visible = 0, type = 32, value = "Pick_1" // input[2]: defaulting = 0, visible = 0, type = 32, value = "Image_3" // input[3]: defaulting = 0, visible = 0, type = 16777224, value = NULL // input[4]: defaulting = 0, visible = 0, type = 3, value = 51 // input[5]: defaulting = 0, visible = 1, type = 3, value = NULL // main_Pick_1_out_1 = Pick( main_Pick_1_in_1, main_Pick_1_in_2, main_Pick_1_in_3, main_Pick_1_in_4, main_Pick_1_in_5, main_Pick_1_in_6, main_Pick_1_in_7, main_Pick_1_in_8 ) [instance: 1, cache: 1]; // // node Selector[5]: x = 334, y = 396, inputs = 7, label = Selector // input[1]: defaulting = 0, visible = 0, type = 32, value = "Selector_5" // input[2]: defaulting = 0, visible = 0, type = 32, value = "entire field" // input[3]: defaulting = 0, visible = 0, type = 29, value = 2 // input[4]: defaulting = 1, visible = 1, type = 16777248, value = { "element" "vertex" "entire field" } // input[5]: defaulting = 1, visible = 0, type = 16777245, value = { 0 1 2 } // output[1]: visible = 1, type = 29, value = 2 // output[2]: visible = 1, type = 32, value = "entire field" // // // node ShowPick[2]: x = 176, y = 477, inputs = 7, label = ShowPick // input[3]: defaulting = 0, visible = 1, type = 32, value = "magenta" // main_ShowPick_2_out_1 = ShowPick( main_AutoGlyph_6_out_1, main_Pick_1_out_1, main_ShowPick_2_in_3, main_Selector_5_out_1, main_ShowPick_2_in_5, main_ShowPick_2_in_6, main_ShowPick_2_in_7 ) [instance: 2, cache: 1]; // // node Image[3]: x = 244, y = 571, inputs = 42, label = Image // input[1]: defaulting = 0, visible = 0, type = 67108863, value = "Image_3" // input[4]: defaulting = 0, visible = 0, type = 1, value = 1 // input[5]: defaulting = 0, visible = 0, type = 8, value = [1.5 0.5 -0.5] // input[6]: defaulting = 0, visible = 0, type = 8, value = [1.5 0.5 18.802] // input[7]: defaulting = 0, visible = 0, type = 5, value = 10.3439 // input[8]: defaulting = 0, visible = 0, type = 1, value = 640 // input[9]: defaulting = 0, visible = 0, type = 5, value = 0.75 // input[10]: defaulting = 0, visible = 0, type = 8, value = [0 1 0] // input[11]: defaulting = 1, visible = 0, type = 5, value = 30.0 // input[12]: defaulting = 0, visible = 0, type = 1, value = 0 // input[14]: defaulting = 0, visible = 0, type = 1, value = 1 // input[19]: defaulting = 0, visible = 0, type = 3, value = 0 // input[29]: defaulting = 1, visible = 0, type = 3, value = 0 // depth: value = 8 // window: position = (0.3805,0.3311), size = 0.5109x0.5117 // interaction mode = NONE // internal caching: 1 // main_Image_3_out_1, main_Image_3_out_2 = Image( main_Image_3_in_1, main_ShowPick_2_out_1, main_Image_3_in_3, main_Image_3_in_4, main_Image_3_in_5, main_Image_3_in_6, main_Image_3_in_7, main_Image_3_in_8, main_Image_3_in_9, main_Image_3_in_10, main_Image_3_in_11, main_Image_3_in_12, main_Image_3_in_13, main_Image_3_in_14, main_Image_3_in_15, main_Image_3_in_16, main_Image_3_in_17, main_Image_3_in_18, main_Image_3_in_19, main_Image_3_in_20, main_Image_3_in_21, main_Image_3_in_22, main_Image_3_in_23, main_Image_3_in_24, main_Image_3_in_25, main_Image_3_in_26, main_Image_3_in_27, main_Image_3_in_28, main_Image_3_in_29, main_Image_3_in_30, main_Image_3_in_31, main_Image_3_in_32, main_Image_3_in_33, main_Image_3_in_34, main_Image_3_in_35, main_Image_3_in_36, main_Image_3_in_37, main_Image_3_in_38, main_Image_3_in_39, main_Image_3_in_40, main_Image_3_in_41, main_Image_3_in_42 ) [instance: 3, cache: 1]; // network: end of macro body CacheScene("Image_3", main_Image_3_out_1, main_Image_3_out_2); } main_Construct_9_in_1 = {[0 0 0]}; main_Construct_9_in_2 = NULL; main_Construct_9_in_3 = NULL; main_Construct_9_in_4 = NULL; main_Construct_9_out_1 = NULL; main_Construct_10_in_1 = {[1 2 0]}; main_Construct_10_in_2 = NULL; main_Construct_10_in_3 = NULL; main_Construct_10_in_4 = NULL; main_Construct_10_out_1 = NULL; main_Construct_11_in_1 = {[3 -1 -1]}; main_Construct_11_in_2 = NULL; main_Construct_11_in_3 = NULL; main_Construct_11_in_4 = NULL; main_Construct_11_out_1 = NULL; main_Collect_5_out_1 = NULL; main_AutoGlyph_6_in_2 = "spiffy"; main_AutoGlyph_6_in_3 = NULL; main_AutoGlyph_6_in_4 = NULL; main_AutoGlyph_6_in_5 = NULL; main_AutoGlyph_6_in_6 = NULL; main_AutoGlyph_6_in_7 = NULL; main_AutoGlyph_6_out_1 = NULL; main_Pick_1_in_1 = "Pick_1"; main_Pick_1_in_2 = "Image_3"; main_Pick_1_in_3 = NULL; main_Pick_1_in_4 = 51; main_Pick_1_in_5 = NULL; main_Pick_1_in_6 = NULL; main_Pick_1_in_7 = NULL; main_Pick_1_in_8 = NULL; main_Pick_1_out_1 = NULL; main_Selector_5_in_1 = "Selector_5"; main_Selector_5_in_2 = "entire field" ; main_Selector_5_in_3 = 2 ; main_Selector_5_in_4 = NULL; main_Selector_5_in_5 = NULL; main_Selector_5_in_6 = NULL; main_Selector_5_in_7 = NULL; main_Selector_5_out_1 = 2 ; main_ShowPick_2_in_3 = "magenta"; main_ShowPick_2_in_5 = NULL; main_ShowPick_2_in_6 = NULL; main_ShowPick_2_in_7 = NULL; main_ShowPick_2_out_1 = NULL; macro Image( id, object, where, useVector, to, from, width, resolution, aspect, up, viewAngle, perspective, options, buttonState = 1, buttonUpApprox = "none", buttonDownApprox = "none", buttonUpDensity = 1, buttonDownDensity = 1, renderMode = 0, defaultCamera, reset, backgroundColor, throttle, RECenable = 0, RECfile, RECformat, RECresolution, RECaspect, AAenable = 0, AAlabels, AAticks, AAcorners, AAframe, AAadjust, AAcursor, AAgrid, AAcolors, AAannotation, AAlabelscale, AAfont, interactionMode, title) -> ( object, camera) { ImageMessage( id, backgroundColor, throttle, RECenable, RECfile, RECformat, RECresolution, RECaspect, AAenable, AAlabels, AAticks, AAcorners, AAframe, AAadjust, AAcursor, AAgrid, AAcolors, AAannotation, AAlabelscale, AAfont, interactionMode, title) [instance: 1, cache: 1]; autoCamera = AutoCamera( object, "front", object, resolution, aspect, [0,1,0], perspective, viewAngle, backgroundColor) [instance: 1, cache: 1]; realCamera = Camera( to, from, width, resolution, aspect, up, perspective, viewAngle, backgroundColor) [instance: 1, cache: 1]; nullDefaultCamera = Inquire(defaultCamera, "is null + 1") [instance: 1, cache: 1]; resetCamera = Switch( nullDefaultCamera, defaultCamera, autoCamera) [instance: 1, cache: 1]; resetNull = Inquire( reset, "is null + 1") [instance: 2, cache: 1]; reset = Switch( resetNull, reset, 0) [instance: 2, cache: 1]; whichCamera = Compute( "($0 != 0 || $1 == 0) ? 1 : 2", reset, useVector) [instance: 1, cache: 1]; camera = Switch( whichCamera, resetCamera, realCamera) [instance: 3, cache: 1]; AAobject = AutoAxes( object, camera, AAlabels, AAticks, AAcorners, AAframe, AAadjust, AAcursor, AAgrid, AAcolors, AAannotation, AAlabelscale, AAfont) [instance: 1, cache: 1]; switchAAenable = Compute("$0+1", AAenable) [instance: 2, cache: 1]; object = Switch( switchAAenable, object, AAobject) [instance:4, cache: 1]; SWapproximation_options = Switch( buttonState, buttonUpApprox, buttonDownApprox) [instance: 5, cache: 1]; SWdensity_options = Switch( buttonState, buttonUpDensity, buttonDownDensity) [instance: 6, cache: 1]; HWapproximation_options = Format( "%s,%s", buttonDownApprox, buttonUpApprox) [instance: 1, cache: 1]; HWdensity_options = Format( "%d,%d", buttonDownDensity, buttonUpDensity) [instance: 2, cache: 1]; switchRenderMode = Compute( "$0+1", renderMode) [instance: 3, cache: 1]; approximation_options = Switch( switchRenderMode, SWapproximation_options, HWapproximation_options) [instance: 7, cache: 1]; density_options = Switch( switchRenderMode, SWdensity_options, HWdensity_options) [instance: 8, cache: 1]; renderModeString = Switch( switchRenderMode, "software", "hardware")[instance: 9, cache: 1]; annoted_object = Options( object, "send boxes", 0, "cache", 1, "rendering approximation", approximation_options, "render every", density_options, "rendering mode", renderModeString) [instance: 1, cache: 1]; RECresNull = Inquire( RECresolution, "is null + 1") [instance: 3, cache: 1]; ImageResolution = Inquire( camera, "camera resolution") [instance: 5, cache: 1]; RECresolution = Switch( RECresNull, RECresolution, ImageResolution) [instance: 10, cache: 1]; RECaspectNull = Inquire( RECaspect, "is null + 1") [instance: 4, cache: 1]; ImageAspect = Inquire( camera, "camera aspect") [instance: 5, cache: 1]; RECaspect = Switch( RECaspectNull, RECaspect, ImageAspect) [instance: 11, cache: 1]; switchRECenable = Compute( "$0 == 0 ? 1 : (($1 == $2) && ($3 == $4)) ? 2 : 3", RECenable, RECresolution, ImageResolution, RECaspect, ImageAspect) [instance: 4, cache: 1]; NoRECobject, RECNoRerenderObject, RECRerenderObject = Route(switchRECenable, annoted_object); Display( NoRECobject, camera, where, throttle) [instance: 1, cache: 1]; image = Render( RECNoRerenderObject, camera) [instance: 1, cache: 1]; Display( image, NULL, where, throttle) [instance: 2, cache: 1]; WriteImage( image, RECfile, RECformat) [instance: 1, cache: 1]; RECupdateCamera = UpdateCamera( camera, resolution=RECresolution, aspect=RECaspect) [instance: 1, cache: 1]; Display( RECRerenderObject, camera, where, throttle) [instance: 3, cache: 1]; image = Render( RECRerenderObject, RECupdateCamera) [instance: 2, cache: 1]; WriteImage( image, RECfile, RECformat) [instance: 2, cache: 1]; } main_Image_3_in_1 = "Image_3"; main_Image_3_in_3 = "X8,,"; main_Image_3_in_4 = 1; main_Image_3_in_5 = [1.5 0.5 -0.5]; main_Image_3_in_6 = [1.5 0.5 18.802]; main_Image_3_in_7 = 10.3439; main_Image_3_in_8 = 640; main_Image_3_in_9 = 0.75; main_Image_3_in_10 = [0 1 0]; main_Image_3_in_11 = NULL; main_Image_3_in_12 = 0; main_Image_3_in_13 = NULL; main_Image_3_in_14 = 1; main_Image_3_in_15 = NULL; main_Image_3_in_16 = NULL; main_Image_3_in_17 = NULL; main_Image_3_in_18 = NULL; main_Image_3_in_19 = 0; main_Image_3_in_20 = NULL; main_Image_3_in_21 = NULL; main_Image_3_in_22 = NULL; main_Image_3_in_23 = NULL; main_Image_3_in_25 = NULL; main_Image_3_in_26 = NULL; main_Image_3_in_27 = NULL; main_Image_3_in_28 = NULL; main_Image_3_in_29 = NULL; main_Image_3_in_30 = NULL; main_Image_3_in_31 = NULL; main_Image_3_in_32 = NULL; main_Image_3_in_33 = NULL; main_Image_3_in_34 = NULL; main_Image_3_in_35 = NULL; main_Image_3_in_36 = NULL; main_Image_3_in_37 = NULL; main_Image_3_in_38 = NULL; main_Image_3_in_39 = NULL; main_Image_3_in_40 = NULL; main_Image_3_in_41 = NULL; main_Image_3_in_42 = NULL; Executive("product version 3 1 0"); $sync main();