question for the Arexx gurus out there!

[trgse]

there is a easier way to handle that.
since I did a similar (but diffrent) arexx proggy for ArtEffect

it goes into a directory makes a list of all files in the directory
then you simply traverse the list until you reach the end of the list, at work currently will send a bit more info later.

[trgse]

here is the code


IF ~SHOW('L', "rexxsupport.library") THEN
  IF ~ADDLIB('rexxsupport.library', 0, -30) THEN DO
    REQUESTNOTIFY TITLE '"System error"' PROMPT '"rexxsupport.library
    could not be opened"'
    EXIT 10
  END

/*
this is actually a internal arteffect function
so change it to either a photogenics function that does the same or use the requestfile etc. files (or the asl.library as a rexx library)
*/
REQUESTFILE VAR carddir PATH "PROGDIR:" TITLE '"Choose the cardset directory"' DIR

filelist = ShowDir(carddir, FILE)

LOCKGUI
DO WHILE ~(Compress(filelist) = "")
 currfile = SubWord(filelist, 1, 1)
  extension = upper(substr(currfile, lastpos(".", currfile)))
 newfilename = carddir || currfile || ".jpg"

  END
 END
 filelist = SubStr(filelist, Length(currfile)+2)
END

EXIT

you will have to add some photogenics specific stuff like loading etc.