equal
deleted
inserted
replaced
443 Delete(s, 1, i); |
443 Delete(s, 1, i); |
444 i:= Pos(',', s); |
444 i:= Pos(',', s); |
445 c2.g:= StrToInt(Trim(Copy(s, 1, Pred(i)))); |
445 c2.g:= StrToInt(Trim(Copy(s, 1, Pred(i)))); |
446 Delete(s, 1, i); |
446 Delete(s, 1, i); |
447 c2.b:= StrToInt(Trim(s)); |
447 c2.b:= StrToInt(Trim(s)); |
|
448 if cGrayScale then |
|
449 begin |
|
450 t:= round(SkyColor.r * RGB_LUMINANCE_RED + SkyColor.g * RGB_LUMINANCE_GREEN + SkyColor.b * RGB_LUMINANCE_BLUE); |
|
451 if t > 255 then t:= 255; |
|
452 c2.r:= t; |
|
453 c2.g:= t; |
|
454 c2.b:= t |
|
455 end; |
448 cExplosionBorderColor:= c2.value or AMask; |
456 cExplosionBorderColor:= c2.value or AMask; |
449 end |
457 end |
450 else if key = 'water-top' then |
458 else if key = 'water-top' then |
451 begin |
459 begin |
452 i:= Pos(',', s); |
460 i:= Pos(',', s); |