;macrodesc V2 Lombardy Poplar
;defaultscale  1
;textures LMPOP.BMP,LMPOP_WI.BMP,LMPOP_FA.BMP,LMPOP_SP.BMP
;designshape -1,0,-1,0,1,0,1,0
;--------------------------------------------
; Filename: V2_LMPOP.api
; Project:  
; Designer: Robert Palmer
; Date:     02-04-10
; Update:   02-11-29
; Credits:  Robert Palmer
; Macro generated using EOD 2.1.72
; Any commercial distribution or use of this file is prohibited
;--------------------------------------------
; %1 = Latitude
; %2 = Longtitude
; %4 = Scale
; %5 = Rotation
; %6 = Not Used
; %7 = Not Used
; %8 = Not Used
; %9 = Not Used
; %10 = Visibility range
; %11 = Altitude
; %12 = Detail level
; 36 = Radial visibility range (*2)
; %15 = User defined


Area( B %1 %2 22 )
  mif( %12  )
    IfVarRange(  :  0346  %12  5  )
  mifend
  PerspectiveCall( :Psp )
  Jump( : )

 :Psp
  Perspective
 :Pos
  mif( %11  )
    RefPoint(  2  :End  %4 %1 %2 v1=  %10 E=  %11 )
  melse
    RefPoint(  7  :End  %4 %1 %2 v1=  %10 )
  mifend
  mif( %5 )
    RotatedCall( :Begin 0 0 %5 )
  melse
    Call( :Begin )
  mifend
 :End
  Return
 :Begin

  RotateToAircraft( :part000    0    0    0 0 0 1 0 0 0 ) ;Wall  1
Return

;-------
:part000
; wall - Wall  1
VecPoints( a 0
    4   0   0 ; 0
    4  18   0 ; 1
   -3  18   0 ; 2
   -3   0   0 ; 3
)
LoadBitmap( 0 WFS6 EF 0 0 0 "LMPOP.BMP" )
BitmapMode( 1 ) ; transparent
ShadedTexPoly(        0      0  32767        0    0  74   0   1  74 255   2 177 255   3 177   0 ) ;Front
BitmapMode( 0 )
BitmapMode( 1 ) ; transparent
ShadedTexPoly(        0      0 -32767        0    3  74   0   2  74 255   1 177 255   0 177   0 ) ;Back
BitmapMode( 0 )
Return

EndA


