#!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 43/40" $!VARSET |ZONE| = |NUMZONES| # --- Row A flap --- $!SliceAttributes 1 ShowGroup = Yes $!SliceAttributes 1 SliceSurface = Arbitrary $!SliceAttributes 1 EdgeLayer{Show = Yes} $!SliceAttributes 1 SliceSource = SurfaceZones $!SetArbitrarySliceUsingThreePoints Group = 1 X1 = 0.00000 Y1 = 94.19977 Z1 = 0.00000 X2 = 0.00000 Y2 = 92.42529 Z2 = 10.00000 X3 = 10.00000 Y3 = 94.94866 Z3 = 0.00000 $!ExtractSlices Group = 1 $!VARSET |ZONE| += 1 $!RenameDataSetZone Zone = |ZONE| Name = '|LABEL| Row A flap |INFO|' # --- Row B flap --- $!SliceAttributes 1 ShowGroup = Yes $!SliceAttributes 1 SliceSurface = Arbitrary $!SliceAttributes 1 EdgeLayer{Show = Yes} $!SliceAttributes 1 SliceSource = SurfaceZones $!SetArbitrarySliceUsingThreePoints Group = 1 X1 = 0.00000 Y1 = 199.09283 Z1 = 0.00000 X2 = 0.00000 Y2 = 197.31835 Z2 = 10.00000 X3 = 10.00000 Y3 = 199.84172 Z3 = 0.00000 $!ExtractSlices Group = 1 $!VARSET |ZONE| += 1 $!RenameDataSetZone Zone = |ZONE| Name = '|LABEL| Row B flap |INFO|' # --- Row C flap --- $!SliceAttributes 1 ShowGroup = Yes $!SliceAttributes 1 SliceSurface = Arbitrary $!SliceAttributes 1 EdgeLayer{Show = Yes} $!SliceAttributes 1 SliceSource = SurfaceZones $!SetArbitrarySliceUsingThreePoints Group = 1 X1 = 0.00000 Y1 = 303.98589 Z1 = 0.00000 X2 = 0.00000 Y2 = 302.21141 Z2 = 10.00000 X3 = 10.00000 Y3 = 304.73478 Z3 = 0.00000 $!ExtractSlices Group = 1 $!VARSET |ZONE| += 1 $!RenameDataSetZone Zone = |ZONE| Name = '|LABEL| Row C flap |INFO|' # --- Row D flap --- $!SliceAttributes 1 ShowGroup = Yes $!SliceAttributes 1 SliceSurface = Arbitrary $!SliceAttributes 1 EdgeLayer{Show = Yes} $!SliceAttributes 1 SliceSource = SurfaceZones $!SetArbitrarySliceUsingThreePoints Group = 1 X1 = 0.00000 Y1 = 630.28688 Z1 = 0.00000 X2 = 0.00000 Y2 = 626.37383 Z2 = 10.00000 X3 = 10.00000 Y3 = 629.83950 Z3 = 0.00000 $!ExtractSlices Group = 1 $!VARSET |ZONE| += 1 $!RenameDataSetZone Zone = |ZONE| Name = '|LABEL| Row D flap |INFO|' # --- Row E flap --- $!SliceAttributes 1 ShowGroup = Yes $!SliceAttributes 1 SliceSurface = Arbitrary $!SliceAttributes 1 EdgeLayer{Show = Yes} $!SliceAttributes 1 SliceSource = SurfaceZones $!SetArbitrarySliceUsingThreePoints Group = 1 X1 = 0.00000 Y1 = 796.33812 Z1 = 0.00000 X2 = 0.00000 Y2 = 792.42507 Z2 = 10.00000 X3 = 10.00000 Y3 = 795.89074 Z3 = 0.00000 $!ExtractSlices Group = 1 $!VARSET |ZONE| += 1 $!RenameDataSetZone Zone = |ZONE| Name = '|LABEL| Row E flap |INFO|' # --- Row F flap --- $!SliceAttributes 1 ShowGroup = Yes $!SliceAttributes 1 SliceSurface = Arbitrary $!SliceAttributes 1 EdgeLayer{Show = Yes} $!SliceAttributes 1 SliceSource = SurfaceZones $!SetArbitrarySliceUsingThreePoints Group = 1 X1 = 0.00000 Y1 = 962.38936 Z1 = 0.00000 X2 = 0.00000 Y2 = 958.47632 Z2 = 10.00000 X3 = 10.00000 Y3 = 961.94198 Z3 = 0.00000 $!ExtractSlices Group = 1 $!VARSET |ZONE| += 1 $!RenameDataSetZone Zone = |ZONE| Name = '|LABEL| Row F flap |INFO|'