How to make Satan 25 times lighter

Macros for Affinity Photo

On services such as flounder.online, where I keep my capsule, it is possible to host graphics that can be displayed by gemini clients. Embeding large photos on light websites does not go well together, so I made a macro pack for Affinity Photo to quickly create photos suitable for the small web. Macros resize photos to 600px on a long edge and apply one of dither filters: monochrome or web safe colours. Both macros are suitable for pictures that have been cropped before running a macro.

Installation

Simply add macros to Affinity Library panel and it is all done for you:

  1. Download small web macros (smallweb.afmacros 478kB)
  2. Open Library panel: ViewStudioLibrary
  3. Import macros (top right small hamburger menu icon and chose Import macros… in macros panel)
  4. With a photo for downsizing in layers panel selected, click one of two available options: mono dither or colour dither
  5. Voilà!

Export

After photos are converted, you can choose suitable export options. I use JPEG (low quality) with the following options: quality about 10, embed ICC Profile (use document profile), metadata removed.

Example

Here is the photo from Parque del Buen Retiro in Madrid with the fountain of Lucifer. After running the macro, Satan is 25 times lighter. 😈

Do it yourself

If you wish to amend the macros (for example to change the long edge size), here are the details of all steps, so you can record your own:

dither monochrome

  1. LayerUnlock
  2. LayerRasterize and Trim
  3. Convert Format / ICC ProfileGrey8 Greyscale D50
  4. FiltersDistortEquations
    • Insert equation x = (x/600)*max(h,w)
    • Insert equation y = (y/600)*max(h,w)
  5. DocumentClip Canvas
  6. LayerRasterize
  7. SelectAlpha RangeSelect Partially Transparent
  8. EditFillInpainting
  9. FiltersColoursMonochrome dither
  10. Convert Format / ICC ProfileGreyBlack & White
  11. SelectDeselect

dither colour

  1. LayerUnlock
  2. LayerRasterize and Trim
  3. Convert Format / ICC ProfileRGB/8sRGB IEC61966-2.1
  4. FiltersDistortEquations
    • Insert equation x = (x/600)*max(h,w)
    • Insert equation y = (y/600)*max(h,w)
  5. DocumentClip Canvas
  6. LayerRasterize
  7. SelectAlpha RangeSelect Partially Transparent
  8. EditFillInpainting
  9. FiltersColoursWebsafe Dither
  10. SelectDeselect