Загрузка гелей из папки
- 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!"
С помощью данного алгоритма можно загрузить все гели из определённой папки (здесь это папка 'gels').
