;Soaring over Hamilton,N.Y.,USA - Iroquois Soaring Association - Designer F.Vargas 28-5-2005
Header ( 1 N 43:50:16.20    N 41:50:16.20    W 74:33:29.40    W 76:33:29.40   )

LatRange (  N 41:50:16.20    N 43:50:16.20  )

Area (  B  N42:50:16.20   W075:33:29.40    80  )

RefPoint( 2 : 1 N42:50:16.20   W075:33:29.40 )
SurfaceColor( 04 F0 )

TransformCall( :Cloud3              0        2133               0     0 0 0 0 0 0 ) ;draw cloud 1
TransformCall( :Cloud3      -328        2133        9614     0 0 0 0 0 0 ) ;draw cloud 2
TransformCall( :Cloud3         47        2133      19739     0 0 0 0 0 0 ) ;draw cloud 3
TransformCall( :Cloud3   -10167        2133          46     0 0 0 0 0 0 ) ;draw cloud 4
TransformCall( :Cloud3       9980        2133        -46     0 0 0 0 0 0 ) ;draw cloud 5
TransformCall( :Cloud3         47        2133      -9985     0 0 0 0 0 0 ) ;draw cloud 6
TransformCall( :Cloud3     -5575        2133         139     0 0 0 0 0 0 ) ;draw cloud 7
TransformCall( :Cloud3       4638        2133        -46     0 0 0 0 0 0 ) ;draw cloud 8
TransformCall( :Cloud3      -234        2133        4877     0 0 0 0 0 0 ) ;draw cloud 9
TransformCall( :Cloud3      -141        2133      -5620     0 0 0 0 0 0 ) ;draw cloud 10
TransformCall( :Cloud3   -16164        2133        -46     0 0 0 0 0 0 ) ;draw cloud 11
TransformCall( :Cloud3     15695        2133         325     0 0 0 0 0 0 ) ;draw cloud 12
TransformCall( :Cloud3      -141        2133    -14630     0 0 0 0 0 0 ) ;draw cloud 13
TransformCall( :Cloud3         47        2133      14816     0 0 0 0 0 0 ) ;draw cloud 14
TransformCall( :Cloud3     -3795        2133        2926     0 0 0 0 0 0 ) ;draw cloud 15
TransformCall( :Cloud3       3327        2133        3298     0 0 0 0 0 0 ) ;draw cloud 16
TransformCall( :Cloud3     -3514        2133      -3390     0 0 0 0 0 0 ) ;draw cloud 17
TransformCall( :Cloud3       2671        2133      -2740     0 0 0 0 0 0 ) ;draw cloud 18
TransformCall( :Cloud3     -6700        2133        6270     0 0 0 0 0 0 ) ;draw cloud 19
TransformCall( :Cloud3       6231        2133        5620     0 0 0 0 0 0 ) ;draw cloud 20
TransformCall( :Cloud3       5482        2133      -5248     0 0 0 0 0 0 ) ;draw cloud 21
TransformCall( :Cloud3     -7543        2133      -6363     0 0 0 0 0 0 ) ;draw cloud 22
TransformCall( :Cloud3   -10167        2133        8406     0 0 0 0 0 0 ) ;draw cloud 23
TransformCall( :Cloud3       9136        2133        8964     0 0 0 0 0 0 ) ;draw cloud 24
TransformCall( :Cloud3       8761        2133      -8778     0 0 0 0 0 0 ) ;draw cloud 25
TransformCall( :Cloud3   -10261        2133      -9335     0 0 0 0 0 0 ) ;draw cloud 26
TransformCall( :Cloud3   -19818        2133         232     0 0 0 0 0 0 ) ;draw cloud 27
TransformCall( :Cloud3     19163        2133        -46     0 0 0 0 0 0 ) ;draw cloud 28
TransformCall( :Cloud3      -141        2133    -18903     0 0 0 0 0 0 ) ;draw cloud 29
TransformCall( :Cloud3   -13915        2133      13422     0 0 0 0 0 0 ) ;draw cloud 30
TransformCall( :Cloud3     14477        2133      12865     0 0 0 0 0 0 ) ;draw cloud 31
TransformCall( :Cloud3   -13915        2133    -12958     0 0 0 0 0 0 ) ;draw cloud 32
TransformCall( :Cloud3     11760        2133    -14444     0 0 0 0 0 0 ) ;draw cloud 33
TransformCall( :Cloud3     -5482        2133      11472     0 0 0 0 0 0 ) ;draw cloud 34
TransformCall( :Cloud3       4826        2133      11750     0 0 0 0 0 0 ) ;draw cloud 35
TransformCall( :Cloud3   -13540        2133      -4784     0 0 0 0 0 0 ) ;draw cloud 36
TransformCall( :Cloud3     -5482        2133    -12958     0 0 0 0 0 0 ) ;draw cloud 37
TransformCall( :Cloud3       5107        2133    -11936     0 0 0 0 0 0 ) ;draw cloud 38
TransformCall( :Cloud3     12884        2133      -4598     0 0 0 0 0 0 ) ;draw cloud 39
TransformCall( :Cloud3     12884        2133        5620     0 0 0 0 0 0 ) ;draw cloud 40
TransformCall( :Cloud3   -15414        2133        5434     0 0 0 0 0 0 ) ;draw cloud 41
TransformCall( :Cloud3     -6700        2133      15559     0 0 0 0 0 0 ) ;draw cloud 42
TransformCall( :Cloud3       7918        2133      14444     0 0 0 0 0 0 ) ;draw cloud 43
TransformCall( :Cloud3     -8105        2133    -16766     0 0 0 0 0 0 ) ;draw cloud 44
TransformCall( :Cloud3   -17101        2133      -6642     0 0 0 0 0 0 ) ;draw cloud 45
TransformCall( :Cloud3     15321        2133      -9707     0 0 0 0 0 0 ) ;draw cloud 46
TransformCall( :Cloud3       5669        2133    -17324     0 0 0 0 0 0 ) ;draw cloud 47

Th1( : )
Perspective

RefPoint( 2 : 1 N42:50:16.20   W075:33:29.40  )
Monitor3D( : -20818     20163    0     8619    -19903     20739 )  ; in area?

   Monitor3D( :Check2  -610   609   620   7619  -610   609  ) ; in thermal 1?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check2
   Monitor3D( :Check3  -938   281   620   7619   9004   10223  ) ; in thermal 2?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check3
   Monitor3D( :Check4  -563   656   620   7619   19129   20348  ) ; in thermal 3?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check4
   Monitor3D( :Check5  -10777  -9558   620   7619  -564   655  ) ; in thermal 4?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check5
   Monitor3D( :Check6   9370   10589   620   7619  -656   563  ) ; in thermal 5?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check6
   Monitor3D( :Check7  -563   656   620   7619  -10595  -9376  ) ; in thermal 6?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check7
   Monitor3D( :Check8  -6185  -4966   620   7619  -471   748  ) ; in thermal 7?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check8
   Monitor3D( :Check9   4028   5247   620   7619  -656   563  ) ; in thermal 8?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check9
   Monitor3D( :Check10  -844   375   620   7619   4267   5486  ) ; in thermal 9?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check10
   Monitor3D( :Check11  -751   468   620   7619  -6230  -5011  ) ; in thermal 10?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check11
   Monitor3D( :Check12  -16774  -15555   620   7619  -656   563  ) ; in thermal 11?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check12
   Monitor3D( :Check13   15085   16304   620   7619  -285   934  ) ; in thermal 12?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check13
   Monitor3D( :Check14  -751   468   620   7619  -15240  -14021  ) ; in thermal 13?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check14
   Monitor3D( :Check15  -563   656   620   7619   14206   15425  ) ; in thermal 14?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check15
   Monitor3D( :Check16  -4405  -3186   620   7619   2316   3535  ) ; in thermal 15?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check16
   Monitor3D( :Check17   2717   3936   620   7619   2688   3907  ) ; in thermal 16?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check17
   Monitor3D( :Check18  -4124  -2905   620   7619  -4000  -2781  ) ; in thermal 17?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check18
   Monitor3D( :Check19   2061   3280   620   7619  -3350  -2131  ) ; in thermal 18?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check19
   Monitor3D( :Check20  -7310  -6091   620   7619   5660   6879  ) ; in thermal 19?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check20
   Monitor3D( :Check21   5621   6840   620   7619   5010   6229  ) ; in thermal 20?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check21
   Monitor3D( :Check22   4872   6091   620   7619  -5858  -4639  ) ; in thermal 21?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check22
   Monitor3D( :Check23  -8153  -6934   620   7619  -6973  -5754  ) ; in thermal 22?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check23
   Monitor3D( :Check24  -10777  -9558   620   7619   7796   9015  ) ; in thermal 23?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check24
   Monitor3D( :Check25   8526   9745   620   7619   8354   9573  ) ; in thermal 24?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check25
   Monitor3D( :Check26   8151   9370   620   7619  -9388  -8169  ) ; in thermal 25?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check26
   Monitor3D( :Check27  -10871  -9652   620   7619  -9945  -8726  ) ; in thermal 26?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check27
   Monitor3D( :Check28  -20428  -19209   620   7619  -378   841  ) ; in thermal 27?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check28
   Monitor3D( :Check29   18553   19772   620   7619  -656   563  ) ; in thermal 28?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check29
   Monitor3D( :Check30  -751   468   620   7619  -19513  -18294  ) ; in thermal 29?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check30
   Monitor3D( :Check31  -14525  -13306   620   7619   12812   14031  ) ; in thermal 30?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check31
   Monitor3D( :Check32   13867   15086   620   7619   12255   13474  ) ; in thermal 31?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check32
   Monitor3D( :Check33  -14525  -13306   620   7619  -13568  -12349  ) ; in thermal 32?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check33
   Monitor3D( :Check34   11150   12369   620   7619  -15054  -13835  ) ; in thermal 33?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check34
   Monitor3D( :Check35  -6092  -4873   620   7619   10862   12081  ) ; in thermal 34?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check35
   Monitor3D( :Check36   4216   5435   620   7619   11140   12359  ) ; in thermal 35?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check36
   Monitor3D( :Check37  -14150  -12931   620   7619  -5394  -4175  ) ; in thermal 36?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check37
   Monitor3D( :Check38  -6092  -4873   620   7619  -13568  -12349  ) ; in thermal 37?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check38
   Monitor3D( :Check39   4497   5716   620   7619  -12546  -11327  ) ; in thermal 38?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check39
   Monitor3D( :Check40   12274   13493   620   7619  -5208  -3989  ) ; in thermal 39?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check40
   Monitor3D( :Check41   12274   13493   620   7619   5010   6229  ) ; in thermal 40?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check41
   Monitor3D( :Check42  -16024  -14805   620   7619   4824   6043  ) ; in thermal 41?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check42
   Monitor3D( :Check43  -7310  -6091   620   7619   14949   16168  ) ; in thermal 42?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check43
   Monitor3D( :Check44   7308   8527   620   7619   13834   15053  ) ; in thermal 43?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check44
   Monitor3D( :Check45  -8715  -7496   620   7619  -17376  -16157  ) ; in thermal 44?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check45
   Monitor3D( :Check46  -17711  -16492   620   7619  -7252  -6033  ) ; in thermal 45?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check46
   Monitor3D( :Check47   14711   15930   620   7619  -10317  -9098  ) ; in thermal 46?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Check47
 Monitor3D( :   5059   6278   620   7619  -17934  -16715  ) ; in thermal 47?
   Dlx( 044C0057)
   Dlx( 00320014 )
   Dwx( 0000 )

:Cloud1
 Points(  0 
 -125  0    0 
  125  0  0
  0  0  125  
  0  0  -125  
 -125  250  0
  0  250  125
  125  250    0
 0   250  -125
)

Bitmap( CLD7.BMP  0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
0  0  5
4  0  255
6  250  255
1  250  5
)
BitmapMode(0)


Bitmap( CLD7.BMP 0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
1  0  5
6  0  255
4  250  255
0  250  5
)
BitmapMode(0)




Bitmap( CLD7.BMP 0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
3  0  5
7  0  255
5  250  255
2  250  5
)
BitmapMode(0)




Bitmap( CLD7.BMP 0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
2  0  5
5  0  255
7  250  255
3  250  5
)
BitmapMode(0)

Return

:Cloud2
 Points(  0 
 -200  0    0 
  200  0  0
  0  0  200  
 0  0  -200  
 -200  400  0
  0  400  200
  200  400    0
 0   400  -200
)

Bitmap( CLD1.BMP  0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
0  0  5
4  0  255
6  250  255
1  250  5
)
BitmapMode(0)


Bitmap( CLD1.BMP 0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
1  0  5
6  0  255
4  250  255
0  250  5
)
BitmapMode(0)




Bitmap( CLD1.BMP 0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
3  0  5
7  0  255
5  250  255
2  250  5
)
BitmapMode(0)




Bitmap( CLD1.BMP 0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
2  0  5
5  0  255
7  250  255
3  250  5
)
BitmapMode(0)

Return

:Cloud3
 Points(  0 
 -300  0    0 
  300  0  0
  0  0  300 
  0  0  -300 
 -300  600  0
  0  600  300
  300  600    0
 0   600  -300
)

Bitmap( CLD2.BMP  0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
0  0  5
4  0  255
6  250  255
1  250  5
)
BitmapMode(0)


Bitmap( CLD2.BMP 0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
1  0  5
6  0  255
4  250  255
0  250  5
)
BitmapMode(0)




Bitmap( CLD2.BMP 0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
3  0  5
7  0  255
5  250  255
2  250  5
)
BitmapMode(0)




Bitmap( CLD2.BMP 0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
2  0  5
5  0  255
7  250  255
3  250  5
)
BitmapMode(0)

Return

:Cloud4
 Points(  0 
 -500  0    0 
  500  0  0
  0  0  500 
  0  0  -500 
 -500  750  0
  0  750  500
  500  750    0
 0   750  -500
)

Bitmap( CLD3.BMP  0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
0  0  5
4  0  255
6  250  255
1  250  5
)
BitmapMode(0)


Bitmap( CLD3.BMP 0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
1  0  5
6  0  255
4  250  255
0  250  5
)
BitmapMode(0)




Bitmap( CLD3.BMP 0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
3  0  5
7  0  255
5  250  255
2  250  5
)
BitmapMode(0)




Bitmap( CLD3.BMP 0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
2  0  5
5  0  255
7  250  255
3  250  5
)
BitmapMode(0)

Return

:Cloud5
 Points(  0 
 -500  0    0 
  500  0  0
  0  0  500 
  0  0  -500 
 -500  750  0
  0  750  500
  500  750    0
 0   750  -500
)

Bitmap( CLD9.BMP  0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
0  0  5
4  0  255
6  250  255
1  250  5
)
BitmapMode(0)


Bitmap( CLD3.BMP 0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
1  0  5
6  0  255
4  250  255
0  250  5
)
BitmapMode(0)




Bitmap( CLD3.BMP 0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
3  0  5
7  0  255
5  250  255
2  250  5
)
BitmapMode(0)




Bitmap( CLD3.BMP 0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
2  0  5
5  0  255
7  250  255
3  250  5
)
BitmapMode(0)

Return

:Cloud6
 Points(  0 
 -500  0    0 
  500  0  0
  0  0  500 
  0  0  -500 
 -500  750  0
  0  750  500
  500  750    0
 0   750  -500
)

Bitmap( CLD10.BMP  0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
0  0  5
4  0  255
6  250  255
1  250  5
)
BitmapMode(0)


Bitmap( CLD10.BMP 0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
1  0  5
6  0  255
4  250  255
0  250  5
)
BitmapMode(0)




Bitmap( CLD10.BMP 0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
3  0  5
7  0  255
5  250  255
2  250  5
)
BitmapMode(0)




Bitmap( CLD10.BMP 0 0 0 0 )
Inst_7D
BitmapMode(1)
ShadedTexPoly( a 
2  0  5
5  0  255
7  250  255
3  250  5
)
BitmapMode(0)

Return

:Cloud7
Return

EndA


