Загрузка гелей из папки

  1. 10 FILE$=READDIR$("file:///c:/gels/*.png")
  2. 20 GELLOAD FILE$,"file:///c:/gels/"+FILE$
  3. 30 FILE$=READDIR$("")
  4. 40 IF FILE$="" THEN GOTO 70
  5. 50 GELLOAD FILE$,"file:///c:/gels/"+FILE$
  6. 60 gt 30
  7. 70 PRINT "Completed!"
С помощью данного алгоритма можно загрузить все гели из определённой папки (здесь это папка 'gels').

  • +15
  • views 1434
  • XakepPRO XakepPRO
  • comments 3

Мы в соцсетях

vk tw tg yt

Пожертвования

Аноним2850 р.
Freddy1700 р.
riseremi1611 р.
NaruTrey800 р.
vlavolk637 р.
  © aNNiMON (Melnik Software)