equal
deleted
inserted
replaced
554 c2.b:= t |
554 c2.b:= t |
555 end; |
555 end; |
556 ExplosionBorderColorR:= c2.r; |
556 ExplosionBorderColorR:= c2.r; |
557 ExplosionBorderColorG:= c2.g; |
557 ExplosionBorderColorG:= c2.g; |
558 ExplosionBorderColorB:= c2.b; |
558 ExplosionBorderColorB:= c2.b; |
559 ExplosionBorderColor:= (c2.r shl RShift) or (c2.g shl GShift) or (c2.b shl BShift) or AMask; |
559 ExplosionBorderColorNoA:= |
|
560 (c2.r shl RShift) or (c2.g shl GShift) or (c2.b shl BShift); |
|
561 ExplosionBorderColor:= ExplosionBorderColorNoA or AMask; |
560 end |
562 end |
561 else if key = 'water-top' then |
563 else if key = 'water-top' then |
562 begin |
564 begin |
563 i:= Pos(',', s); |
565 i:= Pos(',', s); |
564 WaterColorArray[1].r:= StrToInt(Trim(Copy(s, 1, Pred(i)))); |
566 WaterColorArray[1].r:= StrToInt(Trim(Copy(s, 1, Pred(i)))); |