octave_packages/fpl-1.2.0/FPL2ptcshowmesh.net

   1 //
   2 // time: Sun Jan  6 13:50:14 2008
   3 //
   4 // version: 3.2.0 (format), 4.4.4 (DX)
   5 //
   6 //
   7 // MODULE main
   8 // workspace: width = 489, height = 756
   9 // layout: snap = 1, width = 10, height = 10, align = CC
  10 //
  11 macro main(
  12 ) -> (
  13 ) {
  14     //
  15     // node CollectMultiGrid[1]: x = 55, y = 504, inputs = 4, label = CollectMultiGrid
  16     //
  17 main_CollectMultiGrid_1_out_1 =
  18     CollectMultiGrid(
  19     main_CollectMultiGrid_1_in_1,
  20     main_CollectMultiGrid_1_in_2,
  21     main_CollectMultiGrid_1_in_3,
  22     main_CollectMultiGrid_1_in_4
  23     ) [instance: 1, cache: 1];
  24     //
  25     // node StringList[1]: x = 128, y = 34, inputs = 0, label = StringList
  26     // output[1]: visible = 1, type = 16777248, value = { "FILELIST" }
  27     //
  28     //
  29     // node ForEachMember[1]: x = 105, y = 134, inputs = 1, label = ForEachMember
  30     //
  31 main_ForEachMember_1_out_1,
  32 main_ForEachMember_1_out_2,
  33 main_ForEachMember_1_out_3 =
  34     ForEachMember(
  35     main_StringList_1_out_1
  36     ) [instance: 1, cache: 1];
  37     //
  38     // node Import[1]: x = 119, y = 244, inputs = 6, label = Import
  39     //
  40 main_Import_1_out_1 =
  41     Import(
  42     main_ForEachMember_1_out_1,
  43     main_Import_1_in_2,
  44     main_Import_1_in_3,
  45     main_Import_1_in_4,
  46     main_Import_1_in_5,
  47     main_Import_1_in_6
  48     ) [instance: 1, cache: 1];
  49     //
  50     // node ShowConnections[1]: x = 89, y = 354, inputs = 1, label = ShowConnections
  51     //
  52 main_ShowConnections_1_out_1 =
  53     ShowConnections(
  54     main_Import_1_out_1
  55     ) [instance: 1, cache: 1];
  56     //
  57     // node StringList[2]: x = 278, y = 34, inputs = 0, label = StringList
  58     // output[1]: visible = 1, type = 16777248, value = { "COLORLIST" }
  59     //
  60     //
  61     // node ForEachMember[2]: x = 255, y = 134, inputs = 1, label = ForEachMember
  62     //
  63 main_ForEachMember_2_out_1,
  64 main_ForEachMember_2_out_2,
  65 main_ForEachMember_2_out_3 =
  66     ForEachMember(
  67     main_StringList_2_out_1
  68     ) [instance: 2, cache: 1];
  69     //
  70     // node Color[1]: x = 239, y = 454, inputs = 5, label = Color
  71     //
  72 main_Color_1_out_1 =
  73     Color(
  74     main_ShowConnections_1_out_1,
  75     main_ForEachMember_2_out_1,
  76     main_Color_1_in_3,
  77     main_Color_1_in_4,
  78     main_Color_1_in_5
  79     ) [instance: 1, cache: 1];
  80     //
  81     // node GetLocal[1]: x = 422, y = 494, inputs = 3, label = GetLocal
  82     //
  83 main_GetLocal_1_out_1,
  84 main_GetLocal_1_out_2 =
  85     GetLocal(
  86     main_GetLocal_1_in_1,
  87     main_GetLocal_1_in_2,
  88     main_GetLocal_1_in_3
  89     ) [instance: 1, cache: 1];
  90     //
  91     // node Append[1]: x = 235, y = 574, inputs = 5, label = Append
  92     //
  93 main_Append_1_out_1 =
  94     Append(
  95     main_CollectMultiGrid_1_out_1,
  96     main_Color_1_out_1,
  97     main_Append_1_in_3,
  98     main_GetLocal_1_out_1,
  99     main_Append_1_in_5
 100     ) [instance: 1, cache: 1];
 101     //
 102     // node Image[1]: x = 249, y = 694, inputs = 49, label = Image
 103     // input[1]: defaulting = 0, visible = 0, type = 32, value = "Image_1"
 104     // input[4]: defaulting = 0, visible = 0, type = 1, value = 0
 105     // input[14]: defaulting = 0, visible = 0, type = 1, value = 1
 106     // input[19]: defaulting = 0, visible = 0, type = 3, value = 0
 107     // depth: value = 24
 108     // internal caching: 1
 109     //
 110 main_Image_1_out_1,
 111 main_Image_1_out_2,
 112 main_Image_1_out_3 =
 113     Image(
 114     main_Image_1_in_1,
 115     main_Append_1_out_1,
 116     main_Image_1_in_3,
 117     main_Image_1_in_4,
 118     main_Image_1_in_5,
 119     main_Image_1_in_6,
 120     main_Image_1_in_7,
 121     main_Image_1_in_8,
 122     main_Image_1_in_9,
 123     main_Image_1_in_10,
 124     main_Image_1_in_11,
 125     main_Image_1_in_12,
 126     main_Image_1_in_13,
 127     main_Image_1_in_14,
 128     main_Image_1_in_15,
 129     main_Image_1_in_16,
 130     main_Image_1_in_17,
 131     main_Image_1_in_18,
 132     main_Image_1_in_19,
 133     main_Image_1_in_20,
 134     main_Image_1_in_21,
 135     main_Image_1_in_22,
 136     main_Image_1_in_23,
 137     main_Image_1_in_24,
 138     main_Image_1_in_25,
 139     main_Image_1_in_26,
 140     main_Image_1_in_27,
 141     main_Image_1_in_28,
 142     main_Image_1_in_29,
 143     main_Image_1_in_30,
 144     main_Image_1_in_31,
 145     main_Image_1_in_32,
 146     main_Image_1_in_33,
 147     main_Image_1_in_34,
 148     main_Image_1_in_35,
 149     main_Image_1_in_36,
 150     main_Image_1_in_37,
 151     main_Image_1_in_38,
 152     main_Image_1_in_39,
 153     main_Image_1_in_40,
 154     main_Image_1_in_41,
 155     main_Image_1_in_42,
 156     main_Image_1_in_43,
 157     main_Image_1_in_44,
 158     main_Image_1_in_45,
 159     main_Image_1_in_46,
 160     main_Image_1_in_47,
 161     main_Image_1_in_48,
 162     main_Image_1_in_49
 163     ) [instance: 1, cache: 1];
 164     //
 165     // node SetLocal[1]: x = 422, y = 644, inputs = 3, label = SetLocal
 166     //
 167     SetLocal(
 168     main_Append_1_out_1,
 169     main_GetLocal_1_out_2,
 170     main_SetLocal_1_in_3
 171     ) [instance: 1, cache: 1];
 172 // network: end of macro body
 173 CacheScene(main_Image_1_in_1, main_Image_1_out_1, main_Image_1_out_2);
 174 }
 175 main_CollectMultiGrid_1_in_1 = NULL;
 176 main_CollectMultiGrid_1_in_2 = NULL;
 177 main_CollectMultiGrid_1_in_3 = NULL;
 178 main_CollectMultiGrid_1_in_4 = NULL;
 179 main_CollectMultiGrid_1_out_1 = NULL;
 180 main_StringList_1_out_1 = { "FILELIST" };
 181 main_ForEachMember_1_out_1 = NULL;
 182 main_Import_1_in_2 = NULL;
 183 main_Import_1_in_3 = NULL;
 184 main_Import_1_in_4 = NULL;
 185 main_Import_1_in_5 = NULL;
 186 main_Import_1_in_6 = NULL;
 187 main_Import_1_out_1 = NULL;
 188 main_ShowConnections_1_out_1 = NULL;
 189 main_StringList_2_out_1 = { "COLORLIST" };
 190 main_ForEachMember_2_out_1 = NULL;
 191 main_Color_1_in_3 = NULL;
 192 main_Color_1_in_4 = NULL;
 193 main_Color_1_in_5 = NULL;
 194 main_Color_1_out_1 = NULL;
 195 main_GetLocal_1_in_1 = NULL;
 196 main_GetLocal_1_in_2 = NULL;
 197 main_GetLocal_1_in_3 = NULL;
 198 main_GetLocal_1_out_1 = NULL;
 199 main_GetLocal_1_out_2 = NULL;
 200 main_Append_1_in_3 = NULL;
 201 main_Append_1_in_5 = NULL;
 202 main_Append_1_out_1 = NULL;
 203 macro Image(
 204         id,
 205         object,
 206         where,
 207         useVector,
 208         to,
 209         from,
 210         width,
 211         resolution,
 212         aspect,
 213         up,
 214         viewAngle,
 215         perspective,
 216         options,
 217         buttonState = 1,
 218         buttonUpApprox = "none",
 219         buttonDownApprox = "none",
 220         buttonUpDensity = 1,
 221         buttonDownDensity = 1,
 222         renderMode = 0,
 223         defaultCamera,
 224         reset,
 225         backgroundColor,
 226         throttle,
 227         RECenable = 0,
 228         RECfile,
 229         RECformat,
 230         RECresolution,
 231         RECaspect,
 232         AAenable = 0,
 233         AAlabels,
 234         AAticks,
 235         AAcorners,
 236         AAframe,
 237         AAadjust,
 238         AAcursor,
 239         AAgrid,
 240         AAcolors,
 241         AAannotation,
 242         AAlabelscale,
 243         AAfont,
 244         interactionMode,
 245         title,
 246         AAxTickLocs,
 247         AAyTickLocs,
 248         AAzTickLocs,
 249         AAxTickLabels,
 250         AAyTickLabels,
 251         AAzTickLabels,
 252         webOptions) -> (
 253         object,
 254         camera,
 255         where)
 256 {
 257     ImageMessage(
 258         id,
 259         backgroundColor,
 260         throttle,
 261         RECenable,
 262         RECfile,
 263         RECformat,
 264         RECresolution,
 265         RECaspect,
 266         AAenable,
 267         AAlabels,
 268         AAticks,
 269         AAcorners,
 270         AAframe,
 271         AAadjust,
 272         AAcursor,
 273         AAgrid,
 274         AAcolors,
 275         AAannotation,
 276         AAlabelscale,
 277         AAfont,
 278         AAxTickLocs,
 279         AAyTickLocs,
 280         AAzTickLocs,
 281         AAxTickLabels,
 282         AAyTickLabels,
 283         AAzTickLabels,
 284         interactionMode,
 285         title,
 286         renderMode,
 287         buttonUpApprox,
 288         buttonDownApprox,
 289         buttonUpDensity,
 290         buttonDownDensity) [instance: 1, cache: 1];
 291     autoCamera =
 292         AutoCamera(
 293             object,
 294             "front",
 295             object,
 296             resolution,
 297             aspect,
 298             [0,1,0],
 299             perspective,
 300             viewAngle,
 301             backgroundColor) [instance: 1, cache: 1];
 302     realCamera =
 303         Camera(
 304             to,
 305             from,
 306             width,
 307             resolution,
 308             aspect,
 309             up,
 310             perspective,
 311             viewAngle,
 312             backgroundColor) [instance: 1, cache: 1];
 313     coloredDefaultCamera =
 314          UpdateCamera(defaultCamera,
 315             background=backgroundColor) [instance: 1, cache: 1];
 316     nullDefaultCamera =
 317         Inquire(defaultCamera,
 318             "is null + 1") [instance: 1, cache: 1];
 319     resetCamera =
 320         Switch(
 321             nullDefaultCamera,
 322             coloredDefaultCamera,
 323             autoCamera) [instance: 1, cache: 1];
 324     resetNull =
 325         Inquire(
 326             reset,
 327             "is null + 1") [instance: 2, cache: 1];
 328     reset =
 329         Switch(
 330             resetNull,
 331             reset,
 332             0) [instance: 2, cache: 1];
 333     whichCamera =
 334         Compute(
 335             "($0 != 0 || $1 == 0) ? 1 : 2",
 336             reset,
 337             useVector) [instance: 1, cache: 1];
 338     camera = Switch(
 339             whichCamera,
 340             resetCamera,
 341             realCamera) [instance: 3, cache: 1];
 342     AAobject =
 343         AutoAxes(
 344             object,
 345             camera,
 346             AAlabels,
 347             AAticks,
 348             AAcorners,
 349             AAframe,
 350             AAadjust,
 351             AAcursor,
 352             AAgrid,
 353             AAcolors,
 354             AAannotation,
 355             AAlabelscale,
 356             AAfont,
 357             AAxTickLocs,
 358             AAyTickLocs,
 359             AAzTickLocs,
 360             AAxTickLabels,
 361             AAyTickLabels,
 362             AAzTickLabels) [instance: 1, cache: 1];
 363     switchAAenable = Compute("$0+1",
 364              AAenable) [instance: 2, cache: 1];
 365     object = Switch(
 366              switchAAenable,
 367              object,
 368              AAobject) [instance:4, cache: 1];
 369     SWapproximation_options =
 370         Switch(
 371             buttonState,
 372             buttonUpApprox,
 373             buttonDownApprox) [instance: 5, cache: 1];
 374     SWdensity_options =
 375         Switch(
 376             buttonState,
 377             buttonUpDensity,
 378             buttonDownDensity) [instance: 6, cache: 1];
 379     HWapproximation_options =
 380         Format(
 381             "%s,%s",
 382             buttonDownApprox,
 383             buttonUpApprox) [instance: 1, cache: 1];
 384     HWdensity_options =
 385         Format(
 386             "%d,%d",
 387             buttonDownDensity,
 388             buttonUpDensity) [instance: 2, cache: 1];
 389     switchRenderMode = Compute(
 390              "$0+1",
 391              renderMode) [instance: 3, cache: 1];
 392     approximation_options = Switch(
 393              switchRenderMode,
 394             SWapproximation_options,
 395              HWapproximation_options) [instance: 7, cache: 1];
 396     density_options = Switch(
 397              switchRenderMode,
 398             SWdensity_options,
 399             HWdensity_options) [instance: 8, cache: 1];
 400     renderModeString = Switch(
 401             switchRenderMode,
 402             "software",
 403             "hardware")[instance: 9, cache: 1];
 404     object_tag = Inquire(
 405             object,
 406             "object tag")[instance: 3, cache: 1];
 407     annoted_object =
 408         Options(
 409             object,
 410             "send boxes",
 411             0,
 412             "cache",
 413             1,
 414             "object tag",
 415             object_tag,
 416             "ddcamera",
 417             whichCamera,
 418             "rendering approximation",
 419             approximation_options,
 420             "render every",
 421             density_options,
 422             "button state",
 423             buttonState,
 424             "rendering mode",
 425             renderModeString) [instance: 1, cache: 1];
 426     RECresNull =
 427         Inquire(
 428             RECresolution,
 429             "is null + 1") [instance: 4, cache: 1];
 430     ImageResolution =
 431         Inquire(
 432             camera,
 433             "camera resolution") [instance: 5, cache: 1];
 434     RECresolution =
 435         Switch(
 436             RECresNull,
 437             RECresolution,
 438             ImageResolution) [instance: 10, cache: 1];
 439     RECaspectNull =
 440         Inquire(
 441             RECaspect,
 442             "is null + 1") [instance: 6, cache: 1];
 443     ImageAspect =
 444         Inquire(
 445             camera,
 446             "camera aspect") [instance: 7, cache: 1];
 447     RECaspect =
 448         Switch(
 449             RECaspectNull,
 450             RECaspect,
 451             ImageAspect) [instance: 11, cache: 1];
 452     switchRECenable = Compute(
 453           "$0 == 0 ? 1 : (($2 == $3) && ($4 == $5)) ? ($1 == 1 ? 2 : 3) : 4",
 454             RECenable,
 455             switchRenderMode,
 456             RECresolution,
 457             ImageResolution,
 458             RECaspect,
 459              ImageAspect) [instance: 4, cache: 1];
 460     NoRECobject, RECNoRerenderObject, RECNoRerHW, RECRerenderObject = Route(switchRECenable, annoted_object);
 461     Display(
 462         NoRECobject,
 463         camera,
 464         where,
 465         throttle) [instance: 1, cache: 1];
 466     image =
 467         Render(
 468             RECNoRerenderObject,
 469             camera) [instance: 1, cache: 1];
 470     Display(
 471         image,
 472         NULL,
 473         where,
 474         throttle) [instance: 2, cache: 1];
 475     WriteImage(
 476         image,
 477         RECfile,
 478         RECformat) [instance: 1, cache: 1];
 479     rec_where = Display(
 480         RECNoRerHW,
 481         camera,
 482         where,
 483         throttle) [instance: 1, cache: 0];
 484     rec_image = ReadImageWindow(
 485         rec_where) [instance: 1, cache: 1];
 486     WriteImage(
 487         rec_image,
 488         RECfile,
 489         RECformat) [instance: 1, cache: 1];
 490     RECupdateCamera =
 491         UpdateCamera(
 492             camera,
 493             resolution=RECresolution,
 494             aspect=RECaspect) [instance: 2, cache: 1];
 495     Display(
 496         RECRerenderObject,
 497         camera,
 498         where,
 499         throttle) [instance: 1, cache: 1];
 500     RECRerenderObject =
 501         ScaleScreen(
 502             RECRerenderObject,
 503             NULL,
 504             RECresolution,
 505             camera) [instance: 1, cache: 1];
 506     image =
 507         Render(
 508             RECRerenderObject,
 509             RECupdateCamera) [instance: 2, cache: 1];
 510     WriteImage(
 511         image,
 512         RECfile,
 513         RECformat) [instance: 2, cache: 1];
 514 }
 515 main_Image_1_in_1 = "Image_1";
 516 main_Image_1_in_3 = "X24,,";
 517 main_Image_1_in_4 = 0;
 518 main_Image_1_in_5 = NULL;
 519 main_Image_1_in_6 = NULL;
 520 main_Image_1_in_7 = NULL;
 521 main_Image_1_in_8 = NULL;
 522 main_Image_1_in_9 = NULL;
 523 main_Image_1_in_10 = NULL;
 524 main_Image_1_in_11 = NULL;
 525 main_Image_1_in_12 = NULL;
 526 main_Image_1_in_13 = NULL;
 527 main_Image_1_in_14 = 1;
 528 main_Image_1_in_15 = NULL;
 529 main_Image_1_in_16 = NULL;
 530 main_Image_1_in_17 = NULL;
 531 main_Image_1_in_18 = NULL;
 532 main_Image_1_in_19 = 0;
 533 main_Image_1_in_20 = NULL;
 534 main_Image_1_in_21 = NULL;
 535 main_Image_1_in_22 = NULL;
 536 main_Image_1_in_23 = NULL;
 537 main_Image_1_in_25 = NULL;
 538 main_Image_1_in_26 = NULL;
 539 main_Image_1_in_27 = NULL;
 540 main_Image_1_in_28 = NULL;
 541 main_Image_1_in_29 = NULL;
 542 main_Image_1_in_30 = NULL;
 543 main_Image_1_in_31 = NULL;
 544 main_Image_1_in_32 = NULL;
 545 main_Image_1_in_33 = NULL;
 546 main_Image_1_in_34 = NULL;
 547 main_Image_1_in_35 = NULL;
 548 main_Image_1_in_36 = NULL;
 549 main_Image_1_in_37 = NULL;
 550 main_Image_1_in_38 = NULL;
 551 main_Image_1_in_39 = NULL;
 552 main_Image_1_in_40 = NULL;
 553 main_Image_1_in_41 = NULL;
 554 main_Image_1_in_42 = NULL;
 555 main_Image_1_in_43 = NULL;
 556 main_Image_1_in_44 = NULL;
 557 main_Image_1_in_45 = NULL;
 558 main_Image_1_in_46 = NULL;
 559 main_Image_1_in_47 = NULL;
 560 main_Image_1_in_48 = NULL;
 561 main_Image_1_in_49 = NULL;
 562 main_SetLocal_1_in_3 = NULL;
 563 Executive("product version 4 4 4");
 564 $sync
 565 main();