From 34705e60cdf731c1c96309d1aedaa50094b5e403 Mon Sep 17 00:00:00 2001 From: Rick Hennigan Date: Fri, 15 Nov 2024 14:12:51 -0500 Subject: [PATCH] Update icons for WL and WA tools --- .../ToolIcons/ToolIconWolframAlpha.wl | 69 ++++++++++++++++ .../ToolIconWolframLanguageEvaluator.wl | 79 +++++++++++++++++++ FrontEnd/TextResources/ChatbookResources.tr | 51 +++++++++++- .../DefaultToolDefinitions/WolframAlpha.wl | 2 +- .../WolframLanguageEvaluator.wl | 2 +- 5 files changed, 200 insertions(+), 3 deletions(-) create mode 100644 Developer/Resources/FrontEndResources/ToolIcons/ToolIconWolframAlpha.wl create mode 100644 Developer/Resources/FrontEndResources/ToolIcons/ToolIconWolframLanguageEvaluator.wl diff --git a/Developer/Resources/FrontEndResources/ToolIcons/ToolIconWolframAlpha.wl b/Developer/Resources/FrontEndResources/ToolIcons/ToolIconWolframAlpha.wl new file mode 100644 index 00000000..bcbbc732 --- /dev/null +++ b/Developer/Resources/FrontEndResources/ToolIcons/ToolIconWolframAlpha.wl @@ -0,0 +1,69 @@ +(* ::Package:: *) + +RawBoxes @ ToBoxes @ Graphics[ + { + Thickness[ 0.047619 ], + { + FaceForm @ RGBColor[ 0.2, 0.51373, 0.67451 ], + FilledCurve[ + { + { + { 0, 2, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 } + } + }, + { + { + { 12.379, 4.7163 }, + { 15.789, 3.2183 }, + { 15.419, 6.9253 }, + { 19.059, 7.7173 }, + { 16.581, 10.499 }, + { 19.06, 13.28 }, + { 15.42, 14.073 }, + { 15.791, 17.78 }, + { 12.38, 16.282 }, + { 10.5, 19.5 }, + { 8.6219, 16.283 }, + { 5.2109, 17.781 }, + { 5.5809, 14.074 }, + { 1.9409, 13.282 }, + { 4.4199, 10.5 }, + { 1.9409, 7.7193 }, + { 5.5799, 6.9263 }, + { 5.2099, 3.2193 }, + { 8.6209, 4.7173 }, + { 10.5, 1.5003 } + } + } + ] + }, + { + FaceForm @ { RGBColor[ 1.0, 1.0, 1.0 ], Opacity[ 1.0 ] }, + FilledCurve[ + { { { 0, 2, 0 }, { 0, 1, 0 }, { 0, 1, 0 } }, { { 0, 2, 0 }, { 0, 1, 0 }, { 0, 1, 0 } } }, + { { { 14.0, 11.571 }, { 7.0, 11.571 }, { 7.0, 13.0 }, { 14.0, 13.0 } }, { { 14.0, 8.0 }, { 7.0, 8.0 }, { 7.0, 9.429 }, { 14.0, 9.429 } } } + ] + } + }, + AspectRatio -> Automatic, + ImageSize -> { 21.0, 21.0 }, + PlotRange -> { { 0.0, 21.0 }, { 0.0, 21.0 } } +] \ No newline at end of file diff --git a/Developer/Resources/FrontEndResources/ToolIcons/ToolIconWolframLanguageEvaluator.wl b/Developer/Resources/FrontEndResources/ToolIcons/ToolIconWolframLanguageEvaluator.wl new file mode 100644 index 00000000..e725e7e9 --- /dev/null +++ b/Developer/Resources/FrontEndResources/ToolIcons/ToolIconWolframLanguageEvaluator.wl @@ -0,0 +1,79 @@ +(* ::Package:: *) + +RawBoxes @ ToBoxes @ Graphics[ + { + Thickness[ 0.0625 ], + { + FaceForm @ RGBColor[ 0.2, 0.51373, 0.67451 ], + FilledCurve[ + { + { + { 0, 2, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 }, + { 0, 1, 0 } + } + }, + { + { + { 7.9991, 17.0 }, + { 6.2381, 13.964 }, + { 3.0391, 15.379 }, + { 3.3871, 11.878 }, + { 0.00010014, 11.135 }, + { 0.00010014, 11.099 }, + { 2.2971, 8.5021 }, + { 0.00010014, 5.9081 }, + { 0.00010014, 5.8701 }, + { 3.3861, 5.1261 }, + { 3.0371, 1.6251 }, + { 6.2371, 3.0391 }, + { 8.0001, 0.0021 }, + { 9.7611, 3.0381 }, + { 12.961, 1.6231 }, + { 12.613, 5.1241 }, + { 16.0, 5.8681 }, + { 16.0, 5.9061 }, + { 13.703, 8.5001 }, + { 16.0, 11.096 }, + { 16.0, 11.134 }, + { 12.614, 11.876 }, + { 12.963, 15.377 }, + { 9.7621, 13.963 }, + { 8.0011, 17.0 }, + { 7.9991, 17.0 } + } + } + ] + }, + { + FaceForm @ { RGBColor[ 1.0, 1.0, 1.0 ], Opacity[ 1.0 ] }, + FilledCurve[ { { { 0, 2, 0 }, { 0, 1, 0 }, { 0, 1, 0 } } }, { { { 6.0, 12.502 }, { 6.0, 4.5018 }, { 12.0, 8.5218 }, { 6.0, 12.502 } } } ] + } + }, + AspectRatio -> Automatic, + BaselinePosition -> Center -> Center, + ImageSize -> { 17.0, 18.0 }, + PlotRange -> { { -0.5, 16.5 }, { -0.5, 17.5 } } +] \ No newline at end of file diff --git a/FrontEnd/TextResources/ChatbookResources.tr b/FrontEnd/TextResources/ChatbookResources.tr index 57b079f1..f5adcc06 100644 --- a/FrontEnd/TextResources/ChatbookResources.tr +++ b/FrontEnd/TextResources/ChatbookResources.tr @@ -5556,7 +5556,56 @@ cTGO5EynT3RyqKZq7RiYg6VF6z9PHeJwhrY1VoQLeixn9kgOQ0VKoZ6jmOfP StripOnInput->False]}, Dynamic[ CurrentValue["MouseOver"]], FrameMargins->0, - ImageSize->Automatic] + ImageSize->Automatic], + +"ToolIconWolframAlpha" -> GraphicsBox[ + {Thickness[0.047619], + {FaceForm[RGBColor[0.2, 0.51373, 0.67451]], + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { + 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, + 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIRIGYCYtO4XZ48hzQcztR77K+9K+TQLnbz3PfJ+g5M +e1iFRPZzOnjxMGm3X9Nz6Phy+3rjZmmHk2X75kvxGzs8W6f6pPmenMPtn3VZ +e6YYOBRnTHxb81/Fof/QV40YoDyY7tdyuL64wJbrup6Dj3mnY4KqjsMi122f +/07Rd/B4WCWy7rihw2GQMqD9Vyteqhl6GDgwgIEqhG4wdjh12Gltpp2iw5wj +ChuKgPJXn2dpf7su4sCnu2nue6D+gD8SxdeDxByArg5+DDSf5XmPxlve//ar +Pl7yTZqg5TAp5p/zr7WCcHNh8tK8D3QnPJBzMDtr7XcxUMxhsfLOP+1bpB12 +7+hl+3BNxMFc6kC0wkFOB1udK7Oe2SpC/SsENyeYdfEkK8Yf9gALCYZ6 + "]]}, + {FaceForm[{RGBColor[1., 1., 1.], Opacity[1.]}], + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, + 0}, {0, 1, 0}}}, {{{14., 11.571}, {7., 11.571}, {7., 13.}, {14., + 13.}}, {{14., 8.}, {7., 8.}, {7., 9.429}, {14., 9.429}}}]}}, + AspectRatio->Automatic, + ImageSize->{21., 21.}, + PlotRange->{{0., 21.}, {0., 21.}}], + +"ToolIconWolframLanguageEvaluator" -> GraphicsBox[ + {Thickness[0.0625], + {FaceForm[RGBColor[0.2, 0.51373, 0.67451]], + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { + 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, + 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIpIGYC4T2sQiL/5R0YwMDQ4e7WlpoLnyUcFDcUZUx8 +q+0QaqC1UjiAw8E0bpcnzyE9hx0OTY+OS3A7rDjmbd55UN0hy2K+pIeDlH3r +68Adcq5qcP6y2UcUNhipOfxX/PutNIHJYeUSPwdhRkW4fPff1O9PForD+dP/ +T6j7XSUOMn3GbjFuB3OpA9EKjSIOr4u3iv725nAoXNN9O4Phl/2htuXhpz5J +wN3VV1oozcug4CDa4/WKxSTRfuEPw2frWpUdFC7lx7P7cThUvlQz5Hij6TDH +eNEW8x8/7ROeXlC6banpAPZ3vQjU3wYOSQuvmbyvEIfzw+avXntjvrgDn+6m +ue/TtaH2KMLl/12pAJqsBuf/CH68dLaLmsO7GnvTOCtNh97peULNB9QdJkuw +hPG91XSQ1r+rwnZQz0FvwoIfhm3KUHFtB2neB7oTgO6HhT96fAAASQiSDg== + + "]]}, + {FaceForm[{RGBColor[1., 1., 1.], Opacity[1.]}], + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{6., 12.502}, {6., + 4.5018}, {12., 8.5218}, {6., 12.502}}}]}}, + AspectRatio->Automatic, + BaselinePosition->(Center -> Center), + ImageSize->{17., 18.}, + PlotRange->{{-0.5, 16.5}, {-0.5, 17.5}}] } @| @| diff --git a/Source/Chatbook/Tools/DefaultToolDefinitions/WolframAlpha.wl b/Source/Chatbook/Tools/DefaultToolDefinitions/WolframAlpha.wl index d0fff6c0..ce2d883c 100644 --- a/Source/Chatbook/Tools/DefaultToolDefinitions/WolframAlpha.wl +++ b/Source/Chatbook/Tools/DefaultToolDefinitions/WolframAlpha.wl @@ -13,7 +13,7 @@ Needs[ "Wolfram`Chatbook`Common`" ]; (* ::**************************************************************************************************************:: *) (* ::Subsection::Closed:: *) (*Icon*) -$wolframAlphaIcon = RawBoxes @ DynamicBox @ FEPrivate`FrontEndResource[ "FEBitmaps", "InsertionAlpha" ]; +$wolframAlphaIcon = chatbookIcon[ "ToolIconWolframAlpha", False ]; (* ::**************************************************************************************************************:: *) (* ::Subsection::Closed:: *) diff --git a/Source/Chatbook/Tools/DefaultToolDefinitions/WolframLanguageEvaluator.wl b/Source/Chatbook/Tools/DefaultToolDefinitions/WolframLanguageEvaluator.wl index fce3102c..13969137 100644 --- a/Source/Chatbook/Tools/DefaultToolDefinitions/WolframLanguageEvaluator.wl +++ b/Source/Chatbook/Tools/DefaultToolDefinitions/WolframLanguageEvaluator.wl @@ -13,7 +13,7 @@ Needs[ "Wolfram`Chatbook`Common`" ]; (* ::**************************************************************************************************************:: *) (* ::Subsection::Closed:: *) (*Icon*) -$wolframLanguageEvaluatorIcon = RawBoxes @ TemplateBox[ { }, "AssistantEvaluate" ]; +$wolframLanguageEvaluatorIcon = chatbookIcon[ "ToolIconWolframLanguageEvaluator", False ]; (* ::**************************************************************************************************************:: *) (* ::Subsection::Closed:: *)