Hi, I am working on a new EBAW project wich will replace my old one, now I am working with a photorealistic surface and so I am making a custom build rwy. Well for buildings I use gmax, but the airport I still making with airport for windows, and some simply thinghs like a taxilight (blue) or rwylight (white)I still make with the good old EOD program, this works fine but there is a problem with the rwylights. There fade from a distance, so I want the rwylights to be brighter from a distance like the lights when you use the standard rwy option in most designer programs, these lights can you see from a great distance, I suspect that it is something in the scm code. So here is de scm code that EOD as made.........
;ASDesign Compatible Macro
;Name=Taxilight, Type=EOD , Bitmap=EBAW-TAXI-WIT.bmp, \
;FixedLength=0, FixedWidth=0, autoscale, \
;Latitude, Longitude, Rotation, Scale=1, Density=0, \
;Visibility=0, Range=10, Elevation=0, Shadow=1,
;
; Designer: Robert Buysen
; Credits:
; Macro generated using EOD 2.2.85
; EOD Website: http://www.echos.ch/eod/
; ASD Macro (*.scm). Date: 04-19-2008 Time: 18:09:30
Area( 5 %1 %2 %7 )
PerspectiveCall(
os )
Jump( : )
os
Perspective
:Shadows
mif( %8 )
RefPoint( 2 :SubEnd 1 %1 %2 E= %8 )
melse
RefPoint( 7 :SubEnd 1 %1 %2 )
mifend
SetScaleX( :SubEnd %6 0 12 ) ; Scale=0,0625
RotatedCall( :Begin 0 0 %3 )
:SubEnd
Return
:Begin
Call( :Lamps )
RotateToAircraft(
art000 0 0 0 0 0 1 0 0 0 ) ;Wall 1
Call(
art002 ) ;Base 3
Return
:Lamps
;Lamp: Object 2
IfVarAnd( :EndofLamp1 28c 6 )
RGBLcolor( BF 255 255 255 )
Dot( 0 0 0 )
:EndofLamp1
Return
;-------
art000
; wall - Wall 1
Points( 0
1 0 0 ; 0
1 1 0 ; 1
-1 1 0 ; 2
-1 0 0 ; 3
)
LoadBitmap( 0 L6 EF 0 0 0 "EBAW-TRANS2.bmp" )
TexPoly( 0 0 32767 0 0 216 90 1 216 123 2 247 123 3 247 90 ) ;Front
Return
;-------
art002
; base - Base 3
Points( 4
-6 0 -6 ; 0
6 0 -6 ; 1
6 0 6 ; 2
-6 0 6 ; 3
)
LoadBitmap( 0 L6 EF 0 0 0 "lichtschijnpaal2.bmp" )
TexPoly( 0 32767 0 0 4 0 0 7 0 255 6 254 255 5 254 0 ) ;Top
Return
EndA
Can I change here some values the get the result I need, wich is that the white "lamps" could be seen from a great distance...........
Thanks in advance
;ASDesign Compatible Macro
;Name=Taxilight, Type=EOD , Bitmap=EBAW-TAXI-WIT.bmp, \
;FixedLength=0, FixedWidth=0, autoscale, \
;Latitude, Longitude, Rotation, Scale=1, Density=0, \
;Visibility=0, Range=10, Elevation=0, Shadow=1,
;
; Designer: Robert Buysen
; Credits:
; Macro generated using EOD 2.2.85
; EOD Website: http://www.echos.ch/eod/
; ASD Macro (*.scm). Date: 04-19-2008 Time: 18:09:30
Area( 5 %1 %2 %7 )
PerspectiveCall(
Jump( : )
Perspective
:Shadows
mif( %8 )
RefPoint( 2 :SubEnd 1 %1 %2 E= %8 )
melse
RefPoint( 7 :SubEnd 1 %1 %2 )
mifend
SetScaleX( :SubEnd %6 0 12 ) ; Scale=0,0625
RotatedCall( :Begin 0 0 %3 )
:SubEnd
Return
:Begin
Call( :Lamps )
RotateToAircraft(
Call(
Return
:Lamps
;Lamp: Object 2
IfVarAnd( :EndofLamp1 28c 6 )
RGBLcolor( BF 255 255 255 )
Dot( 0 0 0 )
:EndofLamp1
Return
;-------
; wall - Wall 1
Points( 0
1 0 0 ; 0
1 1 0 ; 1
-1 1 0 ; 2
-1 0 0 ; 3
)
LoadBitmap( 0 L6 EF 0 0 0 "EBAW-TRANS2.bmp" )
TexPoly( 0 0 32767 0 0 216 90 1 216 123 2 247 123 3 247 90 ) ;Front
Return
;-------
; base - Base 3
Points( 4
-6 0 -6 ; 0
6 0 -6 ; 1
6 0 6 ; 2
-6 0 6 ; 3
)
LoadBitmap( 0 L6 EF 0 0 0 "lichtschijnpaal2.bmp" )
TexPoly( 0 32767 0 0 4 0 0 7 0 255 6 254 255 5 254 0 ) ;Top
Return
EndA
Can I change here some values the get the result I need, wich is that the white "lamps" could be seen from a great distance...........
Thanks in advance

