Welcome, Guest. Please login or register.

Author Topic: question for the Arexx gurus out there!  (Read 2258 times)

Description:

0 Members and 1 Guest are viewing this topic.

Offline pVC

Re: question for the Arexx gurus out there!
« on: March 26, 2003, 10:16:31 AM »
Here's really quickly made script for it... it may be ugly, but at least you get started :)
This converts pic0001.jpg to newpic0001.jpg etc in defined directory (path).

Save following text to file (don't forget the first commentline) and run it with rx when Photogenics is running:


/* photogenics test */

options results

/* ======config====== */

path="ram:"
verbose=1
jpegquality=80

/* ===end of config== */


address PHOTOGENICS.1

DO i=1 TO 9999

   num=RIGHT(i,4,'0')

   IF EXISTS(path'pic'num'.jpg') THEN DO

      LOADHIDE path"pic"num".jpg"
      image=result

      /* put the wanted effect here */
      PAINTMODE image "Brightness"
      MODEOPTS image 150
      FILLIMAGE image
      FIX image
      /* end of effect */

      SAVE image "JPEG" path'newpic'num'.jpg' jpegquality

      CLOSE image

   END
   ELSE EXIT

   IF verbose=1 THEN say 'Image 'path'pic'num'.jpg done.'
END

EXIT
 
Daily MorphOS user and Amiga active.