fly/fgdata
1
0
Fork 0
Code Activity

AW sets parameters for scattering phenomena

Browse source
This commit is contained in:
Thorsten Renk 2015-12-21 13:49:23 +02:00
parent a6110f9b48
commit 4c4044b15c
2 changed files with 25 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

24
Nasal/local_weather/local_weather.nas
View file

@ -792,6 +792,30 @@ compat_layer.setDewpoint(D);
if (p>0.0) {compat_layer.setPressure(p);} if (p>0.0) {compat_layer.setPressure(p);}
# determine whether low haze is icy and whether we see scattering
var ice_hex_sheet = 0.0;
var ice_hex_column = 0.0;
if (T < -5.0)
{
ice_hex_column = (-T - 5.0) /10.0;
ice_hex_sheet = (-T - 10.0 + (T-D)) /20.0;
var sheet_bias = (T-D)/ 20;
if (sheet_bias > 1.0) {sheet_bias = 1.0;}
ice_hex_column = ice_hex_column * sheet_bias;
if (ice_hex_sheet > 1.0) {ice_hex_sheet = 1.0;}
if (ice_hex_column > 1.0) {ice_hex_column = 1.0;}
}
#print("Col: ",ice_hex_column);
#print("Sheet: ", ice_hex_sheet);
setprop("/environment/scattering-phenomena/ice-hexagonal-column-factor", ice_hex_column);
setprop("/environment/scattering-phenomena/ice-hexagonal-sheet-factor", ice_hex_sheet);
# now determine the local wind # now determine the local wind

2
Nasal/local_weather/weather_tiles.nas
View file

@ -1701,7 +1701,7 @@ calc_geo(blat);
var vis = 9000.0 + rand() * 10000.0; var vis = 9000.0 + rand() * 10000.0;
var T = 10.0 + rand() * 15.0; var T = 10.0 + rand() * 15.0;
var spread = 6.0 + 2.0 * rand(); var spread = 8.0 + 4.0 * rand();
var D = T - spread; var D = T - spread;
var p = 1000 + rand() * 10.0; p = adjust_p(p); var p = 1000 + rand() * 10.0; p = adjust_p(p);