m.aa = ADIR(a,"c:\users\qpk\desktop\solarisboard\od lindy\ABC\pozice 1\jpg\*.jpg")
FOR m.i = 512 TO 553
   m.src = "c:\users\qpk\desktop\solarisboard\od lindy\vzory3\"+ALLTRIM(str(m.i,4,0))+".jpg"
   m.dst = "c:\users\qpk\desktop\solarisboard\ttt\"+ALLTRIM(str(m.i+1,4,0))+".jpg"
   COPY FILE  (src) TO (dst)
ENDFOR    
