#!MC 1410 # INSTRUCTIONS: # 1. Load Surface Zones from CFD solution into Tecplot360 EX (the surface info should include CP and # any other surface information desired) # 2. Assign LABEL variable in this file as the "XXX" identifier of the dataset # 3. Assign INFO variable with appropriate information for the particular case # 4. Run macro. It should create/extract zones for Row A slat, Row A wing, Row A flap, Row B... etc. # 5. You can write out these zones to data files as appropriate, including any data desired # # XXX: Participant ID (To be assigned by HiLiftPW workshop committee) # #++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ $!VARSET |LABEL| = "XXX" $!VARSET |INFO| = "aoa 7.05 case1a 37/34" $!VARSET |ZONE| = |NUMZONES| # --- Row A slat --- $!SliceAttributes 1 EdgeLayer{Show = Yes} $!SliceAttributes 1 SliceSource = SurfaceZones $!SliceLayers Show = Yes $!SliceAttributes 1 ShowGroup = Yes $!SliceAttributes 1 SliceSurface = Arbitrary $!SetArbitrarySliceUsingThreePoints Group = 1 X1 = 0.00000 Y1 = 249.61888 Z1 = 0.00000 X2 = 0.00000 Y2 = 252.55277 Z2 = 10.00000 X3 = 10.00000 Y3 = 248.52787 Z3 = 0.00000 $!ExtractSlices Group = 1 $!VARSET |ZONE| += 1 $!RenameDataSetZone Zone = |ZONE| Name = '|LABEL| Row A slat |INFO|' # --- Row B slat --- $!SliceAttributes 1 ShowGroup = Yes $!SliceAttributes 1 SliceSurface = Arbitrary $!SliceAttributes 1 EdgeLayer{Show = Yes} $!SliceAttributes 1 SliceSource = SurfaceZones $!SetArbitrarySliceUsingThreePoints Group = 1 X1 = 0.00000 Y1 = 357.54696 Z1 = 0.00000 X2 = 0.00000 Y2 = 360.48084 Z2 = 10.00000 X3 = 10.00000 Y3 = 356.45594 Z3 = 0.00000 $!ExtractSlices Group = 1 $!VARSET |ZONE| += 1 $!RenameDataSetZone Zone = |ZONE| Name = '|LABEL| Row B slat |INFO|' # --- Row D slat --- $!SliceAttributes 1 ShowGroup = Yes $!SliceAttributes 1 SliceSurface = Arbitrary $!SliceAttributes 1 EdgeLayer{Show = Yes} $!SliceAttributes 1 SliceSource = SurfaceZones $!SetArbitrarySliceUsingThreePoints Group = 1 X1 = 0.00000 Y1 = 564.91976 Z1 = 0.00000 X2 = 0.00000 Y2 = 567.97890 Z2 = 10.00000 X3 = 10.00000 Y3 = 563.88409 Z3 = 0.00000 $!ExtractSlices Group = 1 $!VARSET |ZONE| += 1 $!RenameDataSetZone Zone = |ZONE| Name = '|LABEL| Row D slat |INFO|' # --- Row E slat --- $!SliceAttributes 1 ShowGroup = Yes $!SliceAttributes 1 SliceSurface = Arbitrary $!SliceAttributes 1 EdgeLayer{Show = Yes} $!SliceAttributes 1 SliceSource = SurfaceZones $!SetArbitrarySliceUsingThreePoints Group = 1 X1 = 0.00000 Y1 = 727.27781 Z1 = 0.00000 X2 = 0.00000 Y2 = 730.33695 Z2 = 10.00000 X3 = 10.00000 Y3 = 726.24215 Z3 = 0.00000 $!ExtractSlices Group = 1 $!VARSET |ZONE| += 1 $!RenameDataSetZone Zone = |ZONE| Name = '|LABEL| Row E slat |INFO|' # --- Row F slat --- $!SliceAttributes 1 ShowGroup = Yes $!SliceAttributes 1 SliceSurface = Arbitrary $!SliceAttributes 1 EdgeLayer{Show = Yes} $!SliceAttributes 1 SliceSource = SurfaceZones $!SetArbitrarySliceUsingThreePoints Group = 1 X1 = 0.00000 Y1 = 889.63587 Z1 = 0.00000 X2 = 0.00000 Y2 = 892.69501 Z2 = 10.00000 X3 = 10.00000 Y3 = 888.60020 Z3 = 0.00000 $!ExtractSlices Group = 1 $!VARSET |ZONE| += 1 $!RenameDataSetZone Zone = |ZONE| Name = '|LABEL| Row F slat |INFO|' # --- Row G slat --- $!SliceAttributes 1 ShowGroup = Yes $!SliceAttributes 1 SliceSurface = Arbitrary $!SliceAttributes 1 EdgeLayer{Show = Yes} $!SliceAttributes 1 SliceSource = SurfaceZones $!SetArbitrarySliceUsingThreePoints Group = 1 X1 = 0.00000 Y1 = 1051.99392 Z1 = 0.00000 X2 = 0.00000 Y2 = 1055.05306 Z2 = 10.00000 X3 = 10.00000 Y3 = 1050.95826 Z3 = 0.00000 $!ExtractSlices Group = 1 $!VARSET |ZONE| += 1 $!RenameDataSetZone Zone = |ZONE| Name = '|LABEL| Row G slat |INFO|' # --- Row H slat --- $!SliceAttributes 1 ShowGroup = Yes $!SliceAttributes 1 SliceSurface = Arbitrary $!SliceAttributes 1 EdgeLayer{Show = Yes} $!SliceAttributes 1 SliceSource = SurfaceZones $!SetArbitrarySliceUsingThreePoints Group = 1 X1 = 0.00000 Y1 = 1160.23263 Z1 = 0.00000 X2 = 0.00000 Y2 = 1163.29177 Z2 = 10.00000 X3 = 10.00000 Y3 = 1159.19696 Z3 = 0.00000 $!ExtractSlices Group = 1 $!VARSET |ZONE| += 1 $!RenameDataSetZone Zone = |ZONE| Name = '|LABEL| Row H slat |INFO|'