Romain Guy
fbb8742cbd
* Add new color grading feature: shadows/mid-tones/highlights This feature can be used to color correct specific tonal ranges. The tonal zones can be precisely controlled.
198 lines
7.6 KiB
Mathematica
198 lines
7.6 KiB
Mathematica
(* Content-type: application/vnd.wolfram.mathematica *)
|
|
|
|
(*** Wolfram Notebook File ***)
|
|
(* http://www.wolfram.com/nb *)
|
|
|
|
(* CreatedBy='Mathematica 12.1' *)
|
|
|
|
(*CacheID: 234*)
|
|
(* Internal cache information:
|
|
NotebookFileLineBreakTest
|
|
NotebookFileLineBreakTest
|
|
NotebookDataPosition[ 158, 7]
|
|
NotebookDataLength[ 7662, 189]
|
|
NotebookOptionsPosition[ 6996, 170]
|
|
NotebookOutlinePosition[ 7393, 186]
|
|
CellTagsIndexPosition[ 7350, 183]
|
|
WindowFrame->Normal*)
|
|
|
|
(* Beginning of Notebook Content *)
|
|
Notebook[{
|
|
Cell[TextData[{
|
|
StyleBox["Shadows/mid-tones/highlights ranges\n", "Subsection"],
|
|
"This notebook explores how to define the shadows/mid-tones/highlights \
|
|
ranges for color grading. This implementation is based loosely on the log mod \
|
|
of the color wheels palette of DaVinci Resolve (see \
|
|
https://documents.blackmagicdesign.com/UserManuals/DaVinci_Resolve_14_\
|
|
Reference_Manual.pdf for details)."
|
|
}], "Text",
|
|
CellChangeTimes->{{3.7996982241825457`*^9, 3.7996982477885103`*^9}, {
|
|
3.800036555016198*^9,
|
|
3.8000366861328773`*^9}},ExpressionUUID->"f0eee150-e72e-4950-83b3-\
|
|
9d4eb478523d"],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{
|
|
RowBox[{"smoothStep", "[",
|
|
RowBox[{"e0_", ",", " ", "e1_", ",", " ", "x_"}], "]"}], ":=",
|
|
RowBox[{"Module", "[",
|
|
RowBox[{
|
|
RowBox[{"{", "t", "}"}], ",", "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{"t", "=",
|
|
RowBox[{"Clip", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{"x", "-", "e0"}], ")"}], "/",
|
|
RowBox[{"(",
|
|
RowBox[{"e1", "-", "e0"}], ")"}]}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "1"}], "}"}]}], "]"}]}], ";",
|
|
"\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{"t", "^", "2"}], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"3", " ", "-", " ",
|
|
RowBox[{"2", " ", "*", " ", "t"}]}], ")"}]}]}]}],
|
|
"\[IndentingNewLine]", "]"}]}]], "Input",
|
|
CellChangeTimes->{{3.800035828984764*^9, 3.800035897263982*^9}, {
|
|
3.800035928251821*^9, 3.800035935254816*^9}},
|
|
CellLabel->"In[5]:=",ExpressionUUID->"b2cca214-3159-4432-b089-098eda680ce0"],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Manipulate", "[", "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{"Plot", "[",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"1", "-",
|
|
RowBox[{"smoothStep", "[",
|
|
RowBox[{"shadow", ",", "dark", ",", "x"}], "]"}]}], ",",
|
|
RowBox[{"1", "-",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "-",
|
|
RowBox[{"smoothStep", "[",
|
|
RowBox[{"shadow", ",", "dark", ",", "x"}], "]"}]}], ")"}], "-",
|
|
RowBox[{"smoothStep", "[",
|
|
RowBox[{"light", ",", "highlight", ",", "x"}], "]"}]}], ",",
|
|
RowBox[{"smoothStep", "[",
|
|
RowBox[{"light", ",", "highlight", ",", "x"}], "]"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"x", ",", "0", ",", "1"}], "}"}], ",",
|
|
RowBox[{"ImageSize", "\[Rule]", "Large"}], ",",
|
|
RowBox[{"Filling", "->", "Axis"}]}], "]"}], ",", "\[IndentingNewLine]",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"shadow", ",", "0.0"}], "}"}], ",", "0.0", ",", "0.9999"}],
|
|
"}"}], ",", "\[IndentingNewLine]",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"dark", ",", "0.333"}], "}"}], ",", "0.0001", ",", "0.9999"}],
|
|
"}"}], ",", "\[IndentingNewLine]",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"light", ",", "0.550"}], "}"}], ",", "0.0001", ",", "0.9999"}],
|
|
"}"}], ",", "\[IndentingNewLine]",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"highlight", ",", "1.0"}], "}"}], ",", "0.0001", ",", "1.0"}],
|
|
"}"}]}], "\[IndentingNewLine]", "]"}]], "Input",
|
|
CellChangeTimes->{{3.800035899978855*^9, 3.800036212318406*^9}, {
|
|
3.800036351085218*^9, 3.800036352868197*^9}, {3.8000369201535683`*^9,
|
|
3.800036935029261*^9}, {3.8000372433968763`*^9, 3.800037243786892*^9}, {
|
|
3.800037310348159*^9, 3.800037376071424*^9}},
|
|
CellLabel->"In[28]:=",ExpressionUUID->"0a516cc2-23b9-453a-a83b-dc42b3dce7ac"],
|
|
|
|
Cell[BoxData[
|
|
TagBox[
|
|
StyleBox[
|
|
DynamicModuleBox[{$CellContext`dark$$ = 0.333, $CellContext`highlight$$ =
|
|
1., $CellContext`light$$ = 0.55, $CellContext`shadow$$ = 0.,
|
|
Typeset`show$$ = True, Typeset`bookmarkList$$ = {},
|
|
Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ =
|
|
1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{{
|
|
Hold[$CellContext`shadow$$], 0.}, 0., 0.9999}, {{
|
|
Hold[$CellContext`dark$$], 0.333}, 0.0001, 0.9999}, {{
|
|
Hold[$CellContext`light$$], 0.55}, 0.0001, 0.9999}, {{
|
|
Hold[$CellContext`highlight$$], 1.}, 0.0001, 1.}}, Typeset`size$$ = {
|
|
576., {175., 179.}}, Typeset`update$$ = 0, Typeset`initDone$$,
|
|
Typeset`skipInitDone$$ = True},
|
|
DynamicBox[Manipulate`ManipulateBoxes[
|
|
1, StandardForm,
|
|
"Variables" :> {$CellContext`dark$$ = 0.333, $CellContext`highlight$$ =
|
|
1., $CellContext`light$$ = 0.55, $CellContext`shadow$$ = 0.},
|
|
"ControllerVariables" :> {},
|
|
"OtherVariables" :> {
|
|
Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$,
|
|
Typeset`animator$$, Typeset`animvar$$, Typeset`name$$,
|
|
Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
|
|
Typeset`skipInitDone$$}, "Body" :>
|
|
Plot[{1 - $CellContext`smoothStep[$CellContext`shadow$$, \
|
|
$CellContext`dark$$, $CellContext`x], 1 - (
|
|
1 - $CellContext`smoothStep[$CellContext`shadow$$, \
|
|
$CellContext`dark$$, $CellContext`x]) - \
|
|
$CellContext`smoothStep[$CellContext`light$$, $CellContext`highlight$$, \
|
|
$CellContext`x],
|
|
$CellContext`smoothStep[$CellContext`light$$, \
|
|
$CellContext`highlight$$, $CellContext`x]}, {$CellContext`x, 0, 1}, ImageSize ->
|
|
Large, Filling -> Axis],
|
|
"Specifications" :> {{{$CellContext`shadow$$, 0.}, 0.,
|
|
0.9999}, {{$CellContext`dark$$, 0.333}, 0.0001,
|
|
0.9999}, {{$CellContext`light$$, 0.55}, 0.0001,
|
|
0.9999}, {{$CellContext`highlight$$, 1.}, 0.0001, 1.}},
|
|
"Options" :> {}, "DefaultOptions" :> {}],
|
|
ImageSizeCache->{621., {262., 268.}},
|
|
SingleEvaluation->True],
|
|
Deinitialization:>None,
|
|
DynamicModuleValues:>{},
|
|
SynchronousInitialization->True,
|
|
UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
|
|
UnsavedVariables:>{Typeset`initDone$$},
|
|
UntrackedVariables:>{Typeset`size$$}], "Manipulate",
|
|
Deployed->True,
|
|
StripOnInput->False],
|
|
Manipulate`InterpretManipulate[1]]], "Output",
|
|
CellChangeTimes->{{3.800035909887515*^9, 3.800035924906485*^9}, {
|
|
3.800035963413073*^9, 3.800036037313202*^9}, {3.800036095635211*^9,
|
|
3.800036213562434*^9}, {3.8000363288112383`*^9, 3.80003635325991*^9},
|
|
3.8000364348959017`*^9, 3.8000365413816338`*^9, 3.800036962971013*^9, {
|
|
3.800037354906559*^9, 3.800037376658716*^9}, 3.800037480044058*^9},
|
|
CellLabel->"Out[28]=",ExpressionUUID->"3b35b3b2-6445-4c38-9b7d-bc731c2eccce"]
|
|
}, Open ]]
|
|
},
|
|
WindowSize->{983, 1064},
|
|
WindowMargins->{{584, Automatic}, {232, Automatic}},
|
|
FrontEndVersion->"12.1 for Mac OS X x86 (64-bit) (March 18, 2020)",
|
|
StyleDefinitions->"Default.nb",
|
|
ExpressionUUID->"ed9be208-fe57-4431-8fc3-063e24460812"
|
|
]
|
|
(* End of Notebook Content *)
|
|
|
|
(* Internal cache information *)
|
|
(*CellTagsOutline
|
|
CellTagsIndex->{}
|
|
*)
|
|
(*CellTagsIndex
|
|
CellTagsIndex->{}
|
|
*)
|
|
(*NotebookFileOutline
|
|
Notebook[{
|
|
Cell[558, 20, 590, 11, 110, "Text",ExpressionUUID->"f0eee150-e72e-4950-83b3-9d4eb478523d"],
|
|
Cell[1151, 33, 974, 27, 94, "Input",ExpressionUUID->"b2cca214-3159-4432-b089-098eda680ce0"],
|
|
Cell[CellGroupData[{
|
|
Cell[2150, 64, 1912, 47, 178, "Input",ExpressionUUID->"0a516cc2-23b9-453a-a83b-dc42b3dce7ac"],
|
|
Cell[4065, 113, 2915, 54, 549, "Output",ExpressionUUID->"3b35b3b2-6445-4c38-9b7d-bc731c2eccce"]
|
|
}, Open ]]
|
|
}
|
|
]
|
|
*)
|
|
|