[1.7.10] ComputerCraft [1.74]

По совету Шторма, переполошил весь код.
Заработало!(######ц не правда ли)

Но всё же: как заставить читать любой файл из директории(по очереди)? Не присваивать же каждому ID.

strpart={}        file=io[paste][/paste]open("as_dat/test_prog[paste][/paste]dat", "r")        local i=1        while i<4 do                line=file:read()                if line==nil then break end                strpart[i]=line				print(strpart[i])                i=i+1        end        file:close()

Получившийся код кстати.

ты хочешь указать директорию и прочитать все файлы в ней? не проще залить всё в один файл? самое ужасное, что нельзя делать в программировании, это усложнять программу. оптимизация, знаете ли =)

В один файл? Нет. Просто потому что сами файлы могут быть созданы не мной, а еще должна быть ведь защита от конфликтов. Что-бы ID не конфликтовали.

strpart={}id=1        term[paste][/paste]clear()		term[paste][/paste]setCursorPos(1, 1)		print("====AppStore====")		        file=io[paste][/paste]open("as_dat/" [paste][/paste][paste][/paste] id [paste][/paste][paste][/paste] "[paste][/paste]dat", "r")        local i=1		print("================")        while true do                line=file:read()                if line==nil then break end                strpart[i]=line				print(strpart[i])                i=i+1        end		print("================")        file:close()		        file1=io[paste][/paste]open("as_dat/" [paste][/paste][paste][/paste] id+1 [paste][/paste][paste][/paste] "[paste][/paste]dat", "r")        local i1=1		print("================")        while true do                line1=file1:read()                if line1==nil then break end                strpart[i1]=line1				print(strpart[i1])                i1=i1+1        end		print("================")        file:close()

Няша пилит свой Mindows?

...или магазин приложений?

Да именно магазин приложений(только платить не надо :3) Кстати: подскажите коды стрелок вниз и вверх, а так-же ентера и двух любых кнопок(для установки приложений)

strpart={}id=1str1=4str2=11str3=11while true do  term[paste][/paste]clear()		term[paste][/paste]setCursorPos(1, 1)		print("====AppStore====")		print("")        file=io[paste][/paste]open("as_dat/" [paste][/paste][paste][/paste] id [paste][/paste][paste][/paste] "[paste][/paste]dat", "r")        local i=1		print("================")        while true do                line=file:read()                if line==nil then break end                strpart[i]=line				print(strpart[i])                i=i+1        end		print("================")        file:close()				term[paste][/paste]setCursorPos(18, 3)        file1=io[paste][/paste]open("as_dat/" [paste][/paste][paste][/paste] id+1 [paste][/paste][paste][/paste] "[paste][/paste]dat", "r")        local i1=1		print("================")        while true do                line1=file1:read()                if line1==nil then break end                strpart[i1]=line1				term[paste][/paste]setCursorPos(18, str1)				print(strpart[i1])                i1=i1+1				str1=str1+1        end		term[paste][/paste]setCursorPos(18, 8)		print("================")        file1:close()				term[paste][/paste]setCursorPos(1, 9)        file2=io[paste][/paste]open("as_dat/" [paste][/paste][paste][/paste] id+2 [paste][/paste][paste][/paste] "[paste][/paste]dat", "r")        local i2=1		print("================")        while true do                line2=file2:read()                if line2==nil then break end                strpart[i2]=line				print(strpart[i2])                i2=i2+1        end		print("================")        file2:close()		sleep(5)str1=4str2=10end