10 FILE$=READDIR$("file:///c:/gels/*.png")
20 GELLOAD FILE$,"file:///c:/gels/"+FILE$
30 FILE$=READDIR$("")
40 IF FILE$="" THEN GOTO 70
50 GELLOAD FILE$,"file:///c:/gels/"+FILE$
60 gt 30
70 PRINT
"Completed!"
а что здесь не так?

Vapigor, это не пойдёт.
10 dim a$(10)
20 for i%=0 to 9
30 read s$:read d$
40 gl s$,d$
50 sg s$,s$
60 sm s$,5000,5000
70 a$(i%)=s$
80 next i%
90 data
a,a.png,b,b.png,c,c.png,d,d.png,e,e.png,f,f.png,g,g.png,k,k.png,j,j.png,l,l.png

limil (13.08.2012/21:50)
10 FILE$=READDIR$("file:///c:/gels/*.png")20 GELLOAD FILE$,"file:///c:/gels/"+FILE$30 FILE$=READDIR$("")40 IF FILE$="" THEN GOTO 7050 GELLOAD FILE$,"file:///c:/gels/"+FILE$60 gt 3070 PRINT"Completed!"Бейсик я уже плохо помню, но у тебя первый файл будет загружаться два раза.

NaruTREY, 20стр удалить нада?

limil, ой похоже не то... Совсеем МБ забыл...

limil, Ну да, я через такой гружу, только без 70 строки.

Vapigor, так что здесь не так?

limil, Я не знаю только сканер

limil, а что должно быть не так?

через дата попробую.
А где её ставить в начале или в конце?