;Soaring over Grenoble,France - 06-09-2005 - Designer Francisco Vargas
Header ( 1 N 46:13:09.00 N 44:13:09.00 E 6:50:58.80 E 4:50:58.80 )
LatRange ( N 44:13:09.00 N 46:13:09.00 )
Area ( B N45:13:09.00 E005:50:58.80 80 )
RefPoint( 2 : 1 N45:13:09.00 E005:50:58.80 )
SurfaceColor( 04 F0 )
TransformCall( :Cloud6 0 2133 0 0 0 0 0 0 0 ) ;draw cloud 1
TransformCall( :Cloud6 -375 2133 9949 0 0 0 0 0 0 ) ;draw cloud 2
TransformCall( :Cloud6 0 2133 19675 0 0 0 0 0 0 ) ;draw cloud 3
TransformCall( :Cloud6 -19635 2133 -74 0 0 0 0 0 0 ) ;draw cloud 4
TransformCall( :Cloud6 -9817 2133 -74 0 0 0 0 0 0 ) ;draw cloud 5
TransformCall( :Cloud6 9817 2133 74 0 0 0 0 0 0 ) ;draw cloud 6
TransformCall( :Cloud6 19785 2133 -74 0 0 0 0 0 0 ) ;draw cloud 7
TransformCall( :Cloud6 4197 2133 16631 0 0 0 0 0 0 ) ;draw cloud 8
TransformCall( :Cloud6 -225 2133 -9800 0 0 0 0 0 0 ) ;draw cloud 9
TransformCall( :Cloud6 -150 2133 -19527 0 0 0 0 0 0 ) ;draw cloud 10
TransformCall( :Cloud6 -15213 2133 12325 0 0 0 0 0 0 ) ;draw cloud 11
TransformCall( :Cloud6 13789 2133 13884 0 0 0 0 0 0 ) ;draw cloud 12
TransformCall( :Cloud6 -12815 2133 -14478 0 0 0 0 0 0 ) ;draw cloud 13
TransformCall( :Cloud6 12740 2133 -14107 0 0 0 0 0 0 ) ;draw cloud 14
TransformCall( :Cloud6 -9742 2133 7499 0 0 0 0 0 0 ) ;draw cloud 15
TransformCall( :Cloud6 8393 2133 7870 0 0 0 0 0 0 ) ;draw cloud 16
TransformCall( :Cloud6 -9068 2133 -7944 0 0 0 0 0 0 ) ;draw cloud 17
TransformCall( :Cloud6 9143 2133 -8241 0 0 0 0 0 0 ) ;draw cloud 18
TransformCall( :Cloud6 -15063 2133 4677 0 0 0 0 0 0 ) ;draw cloud 19
TransformCall( :Cloud6 -7119 2133 13290 0 0 0 0 0 0 ) ;draw cloud 20
TransformCall( :Cloud6 -5321 2133 4381 0 0 0 0 0 0 ) ;draw cloud 21
TransformCall( :Cloud6 5246 2133 13216 0 0 0 0 0 0 ) ;draw cloud 22
TransformCall( :Cloud6 4197 2133 4306 0 0 0 0 0 0 ) ;draw cloud 23
TransformCall( :Cloud6 13864 2133 5568 0 0 0 0 0 0 ) ;draw cloud 24
TransformCall( :Cloud6 -14988 2133 -5346 0 0 0 0 0 0 ) ;draw cloud 25
TransformCall( :Cloud6 -4721 2133 -4677 0 0 0 0 0 0 ) ;draw cloud 26
TransformCall( :Cloud6 4496 2133 -4232 0 0 0 0 0 0 ) ;draw cloud 27
TransformCall( :Cloud6 13789 2133 -5123 0 0 0 0 0 0 ) ;draw cloud 28
TransformCall( :Cloud6 2923 2133 16483 0 0 0 0 0 0 ) ;draw cloud 29
TransformCall( :Cloud6 -5845 2133 -14032 0 0 0 0 0 0 ) ;draw cloud 30
TransformCall( :Cloud6 5321 2133 -14107 0 0 0 0 0 0 ) ;draw cloud 31
TransformCall( :Cloud6 824 2133 445 0 0 0 0 0 0 ) ;draw cloud 32
TransformCall( :Cloud6 1424 2133 891 0 0 0 0 0 0 ) ;draw cloud 33
TransformCall( :Cloud6 -525 2133 -445 0 0 0 0 0 0 ) ;draw cloud 34
TransformCall( :Cloud6 -1199 2133 -742 0 0 0 0 0 0 ) ;draw cloud 35
Th1( : )
Perspective
RefPoint( 2 : 1 N45:13:09.00 E005:50:58.80 )
Monitor3D( : -20635 20785 0 8619 -20527 20675 ) ; in area?
Monitor3D( :Check2 -610 609 494 7619 -610 609 ) ; in thermal 1?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check2
Monitor3D( :Check3 -985 234 494 7619 9339 10558 ) ; in thermal 2?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check3
Monitor3D( :Check4 -610 609 494 7619 19065 20284 ) ; in thermal 3?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check4
Monitor3D( :Check5 -20245 -19026 494 7619 -684 535 ) ; in thermal 4?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check5
Monitor3D( :Check6 -10427 -9208 494 7619 -684 535 ) ; in thermal 5?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check6
Monitor3D( :Check7 9207 10426 494 7619 -536 683 ) ; in thermal 6?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check7
Monitor3D( :Check8 19175 20394 494 7619 -684 535 ) ; in thermal 7?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check8
Monitor3D( :Check9 3587 4806 494 7619 16021 17240 ) ; in thermal 8?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check9
Monitor3D( :Check10 -835 384 494 7619 -10410 -9191 ) ; in thermal 9?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check10
Monitor3D( :Check11 -760 459 494 7619 -20137 -18918 ) ; in thermal 10?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check11
Monitor3D( :Check12 -15823 -14604 494 7619 11715 12934 ) ; in thermal 11?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check12
Monitor3D( :Check13 13179 14398 494 7619 13274 14493 ) ; in thermal 12?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check13
Monitor3D( :Check14 -13425 -12206 494 7619 -15088 -13869 ) ; in thermal 13?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check14
Monitor3D( :Check15 12130 13349 494 7619 -14717 -13498 ) ; in thermal 14?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check15
Monitor3D( :Check16 -10352 -9133 494 7619 6889 8108 ) ; in thermal 15?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check16
Monitor3D( :Check17 7783 9002 494 7619 7260 8479 ) ; in thermal 16?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check17
Monitor3D( :Check18 -9678 -8459 494 7619 -8554 -7335 ) ; in thermal 17?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check18
Monitor3D( :Check19 8533 9752 494 7619 -8851 -7632 ) ; in thermal 18?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check19
Monitor3D( :Check20 -15673 -14454 494 7619 4067 5286 ) ; in thermal 19?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check20
Monitor3D( :Check21 -7729 -6510 494 7619 12680 13899 ) ; in thermal 20?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check21
Monitor3D( :Check22 -5931 -4712 494 7619 3771 4990 ) ; in thermal 21?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check22
Monitor3D( :Check23 4636 5855 494 7619 12606 13825 ) ; in thermal 22?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check23
Monitor3D( :Check24 3587 4806 494 7619 3696 4915 ) ; in thermal 23?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check24
Monitor3D( :Check25 13254 14473 494 7619 4958 6177 ) ; in thermal 24?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check25
Monitor3D( :Check26 -15598 -14379 494 7619 -5956 -4737 ) ; in thermal 25?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check26
Monitor3D( :Check27 -5331 -4112 494 7619 -5287 -4068 ) ; in thermal 26?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check27
Monitor3D( :Check28 3886 5105 494 7619 -4842 -3623 ) ; in thermal 27?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check28
Monitor3D( :Check29 13179 14398 494 7619 -5733 -4514 ) ; in thermal 28?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check29
Monitor3D( :Check30 2313 3532 494 7619 15873 17092 ) ; in thermal 29?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check30
Monitor3D( :Check31 -6455 -5236 494 7619 -14642 -13423 ) ; in thermal 30?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check31
Monitor3D( :Check32 4711 5930 494 7619 -14717 -13498 ) ; in thermal 31?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check32
Monitor3D( :Check33 214 1433 494 7619 -165 1054 ) ; in thermal 32?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check33
Monitor3D( :Check34 814 2033 494 7619 281 1500 ) ; in thermal 33?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check34
Monitor3D( :Check35 -1135 84 494 7619 -1055 164 ) ; in thermal 34?
Dlx( 044C0057)
Dlx( 00320014 )
Dwx( 0000 )
:Check35
Monitor3D( : -1809 -590 494 7619 -1352 -133 ) ; in thermal 35?
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
