A Deep Thought
COMMENT
Here you can adjust some values:
If TextAboveImg is false, the text will be put into the image. Anything with font should be clear (weight=thickness), Text to top=Space between text and top, TextToPhoto=Space between text and photo. Grayscale% is the intensity of the black&white filter and BGColor is the color of the background
DICTIONARY

Dictionary
SCRIPTING
If
Shortcut Input
has any value
MEDIA
Get images from
Shortcut Input

Images
SCRIPTING
Otherwise
PHOTOS

Photos
SCRIPTING
End If

If Result
MEDIA
Convert
If Result
to
PNG
Options Under Construction

Converted Image
MEDIA
Resize
Converted Image
to
1000
x
Auto Height

Resized Image
SCRIPTING
Mode
Resized Image
with base64

Base64 Encoded
VARIABLES
Set variable
ThoughtFulImage
to
Base64 Encoded
SCRIPTING
Continue in Shortcuts app
COMMENT
-webkit-filter: grayscale(50%);
SCRIPTING

Provided Input
SCRIPTING
Get
All Keys
in
Dictionary

Dictionary Value
SCRIPTING
Repeat with each item in
Dictionary Value

Repeat Results
SCRIPTING
Get
Value
for
Repeat Item
in
Dictionary

Dictionary Value
DOCUMENTS
Replace
,
with
.
in
Dictionary Value

Updated Text
SCRIPTING
Set
Repeat Item
to
Updated Text
in
Dictionary

Dictionary
VARIABLES
Set variable
NewDictionary
to
Dictionary
SCRIPTING
End Repeat

Repeat Results
SCRIPTING
Get
Value
for
TextAboveImg
in
Dictionary

Dictionary Value
SCRIPTING
If
Dictionary Value
is
<value>
MATHS
TextToTop
+
FontSize
Options Under Construction

Calculation Result
MATHS
Calculation Result
+
TextToPhoto
Options Under Construction

Calculation Result
DOCUMENTS
Replace
,
with
.
in
Calculation Result

Updated Text
SCRIPTING
Otherwise
NUMBER
0

Number
SCRIPTING
End If

If Result

Text
DOCUMENTS
Make rich text from
Text

Rich Text from HTML
DOCUMENTS
Make PDF from
Rich Text from HTML

PDF
MEDIA
Convert
PDF
to
PNG
Options Under Construction

Converted Image
MATHS
Converted Image
÷
Resized Image
Options Under Construction

Calculation Result
MATHS
Resized Image
×
Calculation Result
Options Under Construction

Calculation Result
DOCUMENTS
Replace
.
with
,
in
If Result

Updated Text
MATHS
Updated Text
×
Calculation Result
Options Under Construction

Calculation Result
MATHS
Calculation Result
+
Calculation Result
Options Under Construction

Calculation Result
MEDIA
Crop
Converted Image
Height
Calculation Result

Cropped Image
DOCUMENTS
Show
Cropped Image
in Quick Look
SCRIPTING
Choose from Menu

Menu Result
SCRIPTING
Save Image

Menu Result
SCRIPTING
Lower Resolution

Menu Result
MATHS
Cropped Image
÷
5
Options Under Construction

Calculation Result
MATHS
Cropped Image
÷
5
Options Under Construction

Calculation Result
MEDIA
Resize
Cropped Image
to
Calculation Result
x
Calculation Result

Resized Image
DOCUMENTS
Show
Resized Image
in Quick Look
SCRIPTING
End Menu

Menu Result
PHOTOS
Save
Menu Result
to
Ask Each Time

Saved Photo Media
Showcuts