forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

add Arc Dark HL preset

This commit is contained in:
Basile Burg 2023-07-06 22:03:39 +02:00
parent cd19075e38
commit 1eeeaccdf0
1 changed files with 64 additions and 0 deletions

64
src/u_d2synpresets.pas
View File

@ -595,6 +595,70 @@ begin
selection.Foreground := clNone;
getHl.calls.Assign(getHl.identifiers);
end;
with fPresets.insertPreset(5) do
begin
fIsHardcoded := true;
name := 'Arc Dark';
getHl.phobosStyleType := False;
getHl.foldKinds := [fkBrackets, fkRegion];
getHl.whites.FrameEdges := sfeNone;
getHl.numbers.Foreground := 16761218;
getHl.numbers.FrameEdges := sfeNone;
getHl.symbols.Foreground := clYellow;
getHl.symbols.FrameEdges := sfeNone;
getHl.identifiers.Foreground := clWhite;
getHl.identifiers.FrameEdges := sfeNone;
getHl.comments.Foreground := 10664152;
getHl.comments.FrameEdges := sfeNone;
getHl.strings.Foreground := 5157104;
getHl.strings.FrameEdges := sfeNone;
getHl.keywords.Foreground := 8511369;
getHl.keywords.FrameEdges := sfeNone;
getHl.ddoc.Foreground := 14671730;
getHl.ddoc.FrameEdges := sfeNone;
getHl.inlineAsm.Foreground := 15500491;
getHl.inlineAsm.FrameEdges := sfeNone;
getHl.special.Foreground := 9684887;
getHl.special.FrameEdges := sfeNone;
getHl.errors.Foreground := 14807024;
getHl.attributes.Foreground := 8441210;
getHl.attributes.FrameEdges := sfeNone;
getHl.types.Foreground := 14807024;
getHl.calls.Foreground := clWhite;
getHl.calls.Style := [fsItalic];
background := 5391680;
bracketMatch.Background := clNone;
bracketMatch.Foreground := clGradientActiveCaption;
bracketMatch.FrameStyle := slsDashed;
bracketMatch.FrameEdges := sfeNone;
bracketMatch.Style := [fsBold];
currentLine.Background := 8816262;
currentLine.Foreground := clNone;
currentLine.BackAlpha := 50;
folding.Background := 7303023;
folding.Foreground := clYellow;
folding.FrameColor := clGray;
identifierMatch.Background := clMoneyGreen;
identifierMatch.Foreground := clNone;
identifierMatch.FrameColor := clInfoText;
identifierMatch.FrameEdges := sfeBottom;
identifierMatch.BackPriority := 1;
identifierMatch.BackAlpha := 30;
mouseLink.Background := clNone;
mouseLink.Foreground := clNone;
mouseLink.Style := [fsBold, fsUnderline];
selection.Background := 5987166;
selection.Foreground := clNone;
selection.BackPriority := 2;
end;
fEditor := TSynEdit.Create(self);
fEditor.Parent:= self;