;Soaring over Michael Airfield - New York,USA - 08-05-2004 - Designer F.Vargas
Header ( 1 N 44:10:53.40 N 42:10:53.40 W 75:7:55.80 W 77:7:55.80 )
LatRange ( N 42:10:53.40 N 44:10:53.40 )
Area ( B N43:10:53.40 W76:7:55.80 80 )
RefPoint( 2 : 1 N43:10:53.40 W76:7:55.80 )
SurfaceColor( 04 F0 )
TransformCall( :Cloud3 0 2133 0 0 0 0 0 0 0 ) ;draw cloud 1
TransformCall( :Cloud3 328 2133 9985 0 0 0 0 0 0 ) ;draw cloud 2
TransformCall( :Cloud3 141 2133 -10450 0 0 0 0 0 0 ) ;draw cloud 3
TransformCall( :Cloud3 9886 2133 46 0 0 0 0 0 0 ) ;draw cloud 4
TransformCall( :Cloud3 -10261 2133 -139 0 0 0 0 0 0 ) ;draw cloud 5
TransformCall( :Cloud3 -16070 2133 -139 0 0 0 0 0 0 ) ;draw cloud 6
TransformCall( :Cloud3 -5294 2133 -46 0 0 0 0 0 0 ) ;draw cloud 7
TransformCall( :Cloud3 4732 2133 139 0 0 0 0 0 0 ) ;draw cloud 8
TransformCall( :Cloud3 14852 2133 -232 0 0 0 0 0 0 ) ;draw cloud 9
TransformCall( :Cloud3 -141 2133 4877 0 0 0 0 0 0 ) ;draw cloud 10
TransformCall( :Cloud3 -234 2133 15373 0 0 0 0 0 0 ) ;draw cloud 11
TransformCall( :Cloud3 -141 2133 -5248 0 0 0 0 0 0 ) ;draw cloud 12
TransformCall( :Cloud3 -47 2133 -15559 0 0 0 0 0 0 ) ;draw cloud 13
TransformCall( :Cloud3 -12510 2133 10543 0 0 0 0 0 0 ) ;draw cloud 14
TransformCall( :Cloud3 12978 2133 10914 0 0 0 0 0 0 ) ;draw cloud 15
TransformCall( :Cloud3 -11947 2133 -12493 0 0 0 0 0 0 ) ;draw cloud 16
TransformCall( :Cloud3 11760 2133 -11100 0 0 0 0 0 0 ) ;draw cloud 17
TransformCall( :Cloud3 -8949 2133 17509 0 0 0 0 0 0 ) ;draw cloud 18
TransformCall( :Cloud3 -18413 2133 6642 0 0 0 0 0 0 ) ;draw cloud 19
TransformCall( :Cloud3 -17757 2133 -8221 0 0 0 0 0 0 ) ;draw cloud 20
TransformCall( :Cloud3 -7168 2133 -17974 0 0 0 0 0 0 ) ;draw cloud 21
TransformCall( :Cloud3 7449 2133 -17974 0 0 0 0 0 0 ) ;draw cloud 22
TransformCall( :Cloud3 18319 2133 -6920 0 0 0 0 0 0 ) ;draw cloud 23
TransformCall( :Cloud3 18413 2133 6734 0 0 0 0 0 0 ) ;draw cloud 24
TransformCall( :Cloud3 7731 2133 17695 0 0 0 0 0 0 ) ;draw cloud 25
TransformCall( :Cloud3 -7824 2133 6827 0 0 0 0 0 0 ) ;draw cloud 26
TransformCall( :Cloud3 7449 2133 6920 0 0 0 0 0 0 ) ;draw cloud 27
TransformCall( :Cloud3 -7637 2133 -6827 0 0 0 0 0 0 ) ;draw cloud 28
TransformCall( :Cloud3 6887 2133 -7106 0 0 0 0 0 0 ) ;draw cloud 29
TransformCall( :Cloud3 -1921 2133 46 0 0 0 0 0 0 ) ;draw cloud 30
TransformCall( :Cloud3 1827 2133 -46 0 0 0 0 0 0 ) ;draw cloud 31
TransformCall( :Cloud3 -141 2133 1533 0 0 0 0 0 0 ) ;draw cloud 32
TransformCall( :Cloud3 -141 2133 -1626 0 0 0 0 0 0 ) ;draw cloud 33
TransformCall( :Cloud3 -4732 2133 3855 0 0 0 0 0 0 ) ;draw cloud 34
TransformCall( :Cloud3 5482 2133 3762 0 0 0 0 0 0 ) ;draw cloud 35
TransformCall( :Cloud3 -4076 2133 -4970 0 0 0 0 0 0 ) ;draw cloud 36
TransformCall( :Cloud3 4638 2133 -3948 0 0 0 0 0 0 ) ;draw cloud 37
TransformCall( :Cloud3 -13728 2133 4877 0 0 0 0 0 0 ) ;draw cloud 38
TransformCall( :Cloud3 -5763 2133 12029 0 0 0 0 0 0 ) ;draw cloud 39
TransformCall( :Cloud3 6231 2133 11657 0 0 0 0 0 0 ) ;draw cloud 40
TransformCall( :Cloud3 12884 2133 4505 0 0 0 0 0 0 ) ;draw cloud 41
TransformCall( :Cloud3 -13634 2133 -5341 0 0 0 0 0 0 ) ;draw cloud 42
TransformCall( :Cloud3 -6138 2133 -13051 0 0 0 0 0 0 ) ;draw cloud 43
TransformCall( :Cloud3 5857 2133 -13144 0 0 0 0 0 0 ) ;draw cloud 44
TransformCall( :Cloud3 11385 2133 -5248 0 0 0 0 0 0 ) ;draw cloud 45
TransformCall( :Cloud3 2577 2133 16209 0 0 0 0 0 0 ) ;draw cloud 46
Th1( : )
Perspective
RefPoint( 2 : 1 N43:10:53.40 W76:7:55.80 )
Monitor3D( : -19413 19413 0 8619 -18974 18695 ) ; in area?
Monitor3D( :Check2 -610 609 395 7619 -610 609 ) ; in thermal 1?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check2
Monitor3D( :Check3 -282 937 395 7619 9375 10594 ) ; in thermal 2?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check3
Monitor3D( :Check4 -469 750 395 7619 -11060 -9841 ) ; in thermal 3?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check4
Monitor3D( :Check5 9276 10495 395 7619 -564 655 ) ; in thermal 4?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check5
Monitor3D( :Check6 -10871 -9652 395 7619 -749 470 ) ; in thermal 5?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check6
Monitor3D( :Check7 -16680 -15461 395 7619 -749 470 ) ; in thermal 6?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check7
Monitor3D( :Check8 -5904 -4685 395 7619 -656 563 ) ; in thermal 7?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check8
Monitor3D( :Check9 4122 5341 395 7619 -471 748 ) ; in thermal 8?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check9
Monitor3D( :Check10 14242 15461 395 7619 -842 377 ) ; in thermal 9?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check10
Monitor3D( :Check11 -751 468 395 7619 4267 5486 ) ; in thermal 10?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check11
Monitor3D( :Check12 -844 375 395 7619 14763 15982 ) ; in thermal 11?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check12
Monitor3D( :Check13 -751 468 395 7619 -5858 -4639 ) ; in thermal 12?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check13
Monitor3D( :Check14 -657 562 395 7619 -16169 -14950 ) ; in thermal 13?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check14
Monitor3D( :Check15 -13120 -11901 395 7619 9933 11152 ) ; in thermal 14?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check15
Monitor3D( :Check16 12368 13587 395 7619 10304 11523 ) ; in thermal 15?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check16
Monitor3D( :Check17 -12557 -11338 395 7619 -13103 -11884 ) ; in thermal 16?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check17
Monitor3D( :Check18 11150 12369 395 7619 -11710 -10491 ) ; in thermal 17?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check18
Monitor3D( :Check19 -9559 -8340 395 7619 16899 18118 ) ; in thermal 18?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check19
Monitor3D( :Check20 -19023 -17804 395 7619 6032 7251 ) ; in thermal 19?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check20
Monitor3D( :Check21 -18367 -17148 395 7619 -8831 -7612 ) ; in thermal 20?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check21
Monitor3D( :Check22 -7778 -6559 395 7619 -18584 -17365 ) ; in thermal 21?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check22
Monitor3D( :Check23 6839 8058 395 7619 -18584 -17365 ) ; in thermal 22?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check23
Monitor3D( :Check24 17709 18928 395 7619 -7530 -6311 ) ; in thermal 23?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check24
Monitor3D( :Check25 17803 19022 395 7619 6124 7343 ) ; in thermal 24?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check25
Monitor3D( :Check26 7121 8340 395 7619 17085 18304 ) ; in thermal 25?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check26
Monitor3D( :Check27 -8434 -7215 395 7619 6217 7436 ) ; in thermal 26?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check27
Monitor3D( :Check28 6839 8058 395 7619 6310 7529 ) ; in thermal 27?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check28
Monitor3D( :Check29 -8247 -7028 395 7619 -7437 -6218 ) ; in thermal 28?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check29
Monitor3D( :Check30 6277 7496 395 7619 -7716 -6497 ) ; in thermal 29?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check30
Monitor3D( :Check31 -2531 -1312 395 7619 -564 655 ) ; in thermal 30?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check31
Monitor3D( :Check32 1217 2436 395 7619 -656 563 ) ; in thermal 31?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check32
Monitor3D( :Check33 -751 468 395 7619 923 2142 ) ; in thermal 32?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check33
Monitor3D( :Check34 -751 468 395 7619 -2236 -1017 ) ; in thermal 33?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check34
Monitor3D( :Check35 -5342 -4123 395 7619 3245 4464 ) ; in thermal 34?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check35
Monitor3D( :Check36 4872 6091 395 7619 3152 4371 ) ; in thermal 35?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check36
Monitor3D( :Check37 -4686 -3467 395 7619 -5580 -4361 ) ; in thermal 36?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check37
Monitor3D( :Check38 4028 5247 395 7619 -4558 -3339 ) ; in thermal 37?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check38
Monitor3D( :Check39 -14338 -13119 395 7619 4267 5486 ) ; in thermal 38?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check39
Monitor3D( :Check40 -6373 -5154 395 7619 11419 12638 ) ; in thermal 39?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check40
Monitor3D( :Check41 5621 6840 395 7619 11047 12266 ) ; in thermal 40?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check41
Monitor3D( :Check42 12274 13493 395 7619 3895 5114 ) ; in thermal 41?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check42
Monitor3D( :Check43 -14244 -13025 395 7619 -5951 -4732 ) ; in thermal 42?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check43
Monitor3D( :Check44 -6748 -5529 395 7619 -13661 -12442 ) ; in thermal 43?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check44
Monitor3D( :Check45 5247 6466 395 7619 -13754 -12535 ) ; in thermal 44?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check45
Monitor3D( :Check46 10775 11994 395 7619 -5858 -4639 ) ; in thermal 45?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check46
Monitor3D( : 1967 3186 395 7619 15599 16818 ) ; in thermal 46?
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( 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
: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)
:Cloud7
Return
EndA
