Licensing:

Copyright © Fred Weinhaus

My scripts are available free of charge for non-commercial (non-profit) use, ONLY.

For use of my scripts in commercial (for-profit) environments or non-free applications, please contact me (Fred Weinhaus) for licensing arrangements. My email address is fmw at alink dot net.

If you: 1) redistribute, 2) incorporate any of these scripts into other free applications or 3) reprogram them in another scripting language, then you must contact me for permission, especially if the result might be used in a commercial or for-profit environment.

Usage, whether stated or not in the script, is restricted to the above licensing arrangements. It is also subject, in a subordinate manner, to the ImageMagick license, which can be found at: http://www.imagemagick.org/script/license.php

Please read the Pointers For Use on my home page to properly install and customize my scripts.

Original:
barbara

Clip Art:
heart

Arguments:
-d "64,16" -a "45,-45" -p 25 -c yellow

Original:
barbara

Clip Art:
star

Arguments:
-d "64,16" -a "45,-45" -p 35 -c cyan

Original:
barbara

Clip Art:
snowflake

Arguments:
-d "64,16" -a "45,-45" -p 55 -c white

Original:
barbara

Clip Art:
heart

Arguments:
-d "64,16" -a "45,-45" -p 50 -c random

Original:
barbara

Clip Art:
emojis

Arguments:
-d "64,16" -a "45,-45" -p 50 -c image

Original:
barbara

Clip Art:
emojis

Arguments:
-d "64,16" -a "45,-45" -p 50 -c image

Original:
barbara

Clip Art:
emojis

Arguments:
-d "64,16" -a "45,-45" -p 50 -c image

Original:
barbara

Clip Art:
emojis

Arguments:
-d "64,16" -a "45,-45" -p 50 -c image

Original:
barbara

Clip Art:
emojis

Arguments:
-d "64,16" -a "45,-45" -p 50 -c image

What the script does is as follows:

• Computes a list of unique random blocks of the image of size maxdim
• For each block, scale and rotate the clip art and optionally colorize it
• Computes the page offsets for the block
• flatten all modified copies of the clip art onto the input file

This is equivalent to the following IM commands for randomly colored clipart

• wh=`convert -ping "$infile" -format "%wx%h" info:`
• ww=`echo "$wh" | cut -dx -f1`
• hh=`echo "$wh" | cut -dx -f2`
• maxdim=`echo "$dims" | cut -d, -f1`
• mindim=`echo "$dims" | cut -d, -f2`
• maxangle=`echo "$angles" | cut -d, -f1`
• minangle=`echo "$angles" | cut -d, -f2`
• maxscale=100
• minscale=`convert xc: -format "%[fx:round(100*$mindim/$maxdim)]" info:`
• ww=`convert xc: -format "%[fx:$maxdim*floor($ww/$maxdim)]" info:`
• hh=`convert xc: -format "%[fx:$maxdim*floor($hh/$maxdim)]" info:`
• numx=$((ww/maxdim))
• numy=$((hh/maxdim))
• totnum=$((numx*numy))
• num=`convert xc: -format "%[fx:floor($totnum*$percent/100)]" info:`
• convert -quiet -regard-warnings "$infile" -crop ${ww}x${hh}+0+0 +repage $tmpA1
• convert -quiet -regard-warnings $clipartfiles -resize ${maxdim}x${maxdim} $tmpA2
• list=""
  list=`for ((i=0; i<totnum; i++)); do echo "$i" done`
• randArr=(`echo "$list" | awk 'BEGIN{srand();}{print rand()" "$0}' | sort -k1 -n | cut -d\ -f2`)
• diffangle=`convert xc: -format "%[fx:($maxangle-$minangle)]" info:`
• diffscale=`convert xc: -format "%[fx:($maxscale-$minscale)]" info:`
• proc_list=""
  for ((i=0; i<num; i++)); do
  tilenum=${randArr[$i]}
  tilenumx=`convert xc: -format "%[fx:mod($tilenum,$numx)]" info:`
  tilenumy=`convert xc: -format "%[fx:floor($tilenum/$numy)]" info:`
  left=`convert xc: -format "%[fx:$tilenumx*$maxdim]" info:`
  top=`convert xc: -format "%[fx:$tilenumy*$maxdim]" info:`
  angle=`jot -r 1 $minangle $maxangle`
  scale=`jot -r 1 $minscale $maxscale`
  layer=`jot -r 1 0 $numm3`
  rr=`jot -r 1 0 255`
  gg=`jot -r 1 0 255`
  bb=`jot -r 1 0 255`
  color="rgb($rr,$gg,$bb)"
  factor=`convert xc: -format \
  "%[fx:$scale/((abs(sin($angle*(pi/180)))+abs(cos($angle*(pi/180)))))]" info:`
  proc_list="$proc_list \( $tmpA2[$layer] -background \"$color\" -alpha shape +repage \
  -scale $factor% -background none -rotate $angle -set page +${left}+${top} \)"
  done
• eval 'convert -respect-parentheses \( $tmpA1 -set page +0+0 \)' $proc_list '-flatten "$outfile"'