0 REM Developed by Eugeny Brychkov 05 Sep 2017
1 REM Requires firmware datecode 20170905 or later
10 PRINT"This program gets two files using"
20 PRINT"HTTP: device concurrently"
30 PRINT"Press any key to continue":A$=INPUT$(1):PRINT 
40 CALLNETSETHOST("www.gr8bit.ru"):MAXFILES=3
50 A$="/software/basic/@license.txt":OPEN"HTTPA:A$"AS#1
60 B$="/software/basic/capabilities/test-http.asc":OPEN"HTTPB:B$"AS#2
70 IF NOT EOF(1) THEN LINEINPUT#1,A$:PRINTLOC(1);" ";A$
80 IF NOT EOF(2) THEN LINEINPUT#2,A$:PRINTLOC(2);" ";A$
90 if EOF(1) AND EOF(2) THEN PRINT:PRINT"RECEIVED":CALLNETRESST:CLOSE:END
100 GOTO 70