[1.7.10] ComputerCraft [1.74]

strpart={}id=1str1=4str2=10while 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("================")				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("=================")				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]=line2				print(strpart[i2])                i2=i2+1        end		print("================")				term[paste][/paste]setCursorPos(18, 9)        file3=io[paste][/paste]open("as_dat/" [paste][/paste][paste][/paste] id+3 [paste][/paste][paste][/paste] "[paste][/paste]dat", "r")        local i3=1		print("=================")        while true do                line3=file3:read()                if line3==nil then break end                strpart[i3]=line3				term[paste][/paste]setCursorPos(18, str2)				print(strpart[i3])                i3=i3+1				str2=str2+1        end		term[paste][/paste]setCursorPos(18, 14)		print("=================")		print()		print()		print()		print("E[X]it")		local event , param1 = os[paste][/paste]pullEvent()if event == "key" then  if param1 == 200 and id>=3 then  id = id-2  end  if param1 == 208 then  id = id+2  end  if param1 == 45 then  term[paste][/paste]clear()  term[paste][/paste]setCursorPos(1, 1)  break  endend        file:close()        file1:close()        file2:close()        file3:close()		sleep(1)str1=4str2=10end

os.pullEvent("key") пиши в lua, нажимай клавиши, узнаешь коды

Спасибо за совет. Нашел нужные коды. Но у меня до сих пор один вопрос: как мне исправить вылет с ошибкой nil при отсутствии файла?

strpart={}id=1str1=4str2=10while 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("================")				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("=================")				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]=line2				print(strpart[i2])                i2=i2+1        end		print("================")				term[paste][/paste]setCursorPos(18, 9)        file3=io[paste][/paste]open("as_dat/" [paste][/paste][paste][/paste] id+3 [paste][/paste][paste][/paste] "[paste][/paste]dat", "r")        local i3=1		print("=================")        while true do                line3=file3:read()                if line3==nil then break end                strpart[i3]=line3				term[paste][/paste]setCursorPos(18, str2)				print(strpart[i3])                i3=i3+1				str2=str2+1        end		term[paste][/paste]setCursorPos(18, 14)		print("=================")		print()		print()		print()		print("E[X]it")		local event , param1 = os[paste][/paste]pullEvent()if event == "key" then  if param1 == 200 and id>=3 then  id = id-2  end  if param1 == 208 then  id = id+2  end  if param1 == 45 then  term[paste][/paste]clear()  term[paste][/paste]setCursorPos(1, 1)  break  endend        file:close()        file1:close()        file2:close()        file3:close()		sleep(1)str1=4str2=10end

Вот код если что.

os.pullEvent("key") пиши в lua, нажимай клавиши, узнаешь коды

Спасибо за совет. Нашел нужные коды. Но у меня до сих пор один вопрос: как мне исправить вылет с ошибкой nil при отсутствии файла?

strpart={}id=1str1=4str2=10while 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("================")				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("=================")				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]=line2				print(strpart[i2])                i2=i2+1        end		print("================")				term[paste][/paste]setCursorPos(18, 9)        file3=io[paste][/paste]open("as_dat/" [paste][/paste][paste][/paste] id+3 [paste][/paste][paste][/paste] "[paste][/paste]dat", "r")        local i3=1		print("=================")        while true do                line3=file3:read()                if line3==nil then break end                strpart[i3]=line3				term[paste][/paste]setCursorPos(18, str2)				print(strpart[i3])                i3=i3+1				str2=str2+1        end		term[paste][/paste]setCursorPos(18, 14)		print("=================")		print()		print()		print()		print("E[X]it")		local event , param1 = os[paste][/paste]pullEvent()if event == "key" then  if param1 == 200 and id>=3 then  id = id-2  end  if param1 == 208 then  id = id+2  end  if param1 == 45 then  term[paste][/paste]clear()  term[paste][/paste]setCursorPos(1, 1)  break  endend        file:close()        file1:close()        file2:close()        file3:close()		sleep(1)str1=4str2=10end

Вот код если что.

Что должно происходить при отсутствии файла?

strpart={}id=1str1=4str2=10while 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("================")				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("=================")				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		        if shell[paste][/paste]resolveProgram("as_dat/" [paste][/paste][paste][/paste] id+2 [paste][/paste][paste][/paste] "[paste][/paste]dat")==nil then break end                line2=file2:read()                if line2==nil then break end                strpart[i2]=line2				print(strpart[i2])                i2=i2+1        end		term[paste][/paste]setCursorPos(1, 14)		print("================")				term[paste][/paste]setCursorPos(18, 9)        file3=io[paste][/paste]open("as_dat/" [paste][/paste][paste][/paste] id+3 [paste][/paste][paste][/paste] "[paste][/paste]dat", "r")        local i3=1		print("=================")        while true do		        if shell[paste][/paste]resolveProgram("as_dat/" [paste][/paste][paste][/paste] id+3 [paste][/paste][paste][/paste] "[paste][/paste]dat")==nil then break end                line3=file3:read()                if line3==nil then break end                strpart[i3]=line3				term[paste][/paste]setCursorPos(18, str2)				print(strpart[i3])                i3=i3+1				str2=str2+1        end		term[paste][/paste]setCursorPos(18, 14)		print("=================")		print()		print()		print()		print("E[X]it")		local event , param1 = os[paste][/paste]pullEvent()if event == "key" then  if param1 == 200 and id>=1 then  id = id-2  end  if param1 == 208 then  id = id+2  end  if param1 == 45 then  term[paste][/paste]clear()  term[paste][/paste]setCursorPos(1, 1)  break  endend        file:close()        file1:close()        file2:close()        file3:close()		sleep(1)str1=4str2=10end

term[paste][/paste]setCursorPos(1, 1)      print("=============AppStore=============")      print("")        if shell[paste][/paste]resolveProgram("as_dat/" [paste][/paste][paste][/paste] id+2 [paste][/paste][paste][/paste] "[paste][/paste]dat")==nil then 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("================")end