[1.7.10] ComputerCraft [1.74]

[hidden][center][b]Возможности системы[/b][/center]Автоматическая переадресация через систему ДНСВозможность просмотра текстовых страничекВозможность скачки файлов с сайтов(ура выбрасываем дискеты!!!Настала эра интернета  Нотч )[b][center]Инструкция[/center][/b][center][b]По использыванию браузера[/b][/center]1[paste][/paste]Отредактируйте поле dnsId на ид днс сервера который Вы будете использывать и поле "side"2[paste][/paste]Запустите браузер и введите url сайта на который хотите отправится3[paste][/paste]Вводя названия страничек путешествуйте по сайту введите "back" для выбора другого сайта или "exit" для выхода из браузера[center][b]По настройке днс системы[/b][/center]1[paste][/paste]Сохраните на любом свободном копьютере програму днс сервера2[paste][/paste]Отредактируйте поле side3[paste][/paste]Отредактируйте добавив новые сайты и их ид вот так[code]Например мне нужно добавить сайт http://Dimach[paste][/paste]ua в днс системузначит мне нужно дописать после if url == "Название сайта" thenservId = "его ид"вот этоelseif url == "http://Dimach[paste][/paste]ua" then -- здесь название вашего сайтаservId = "10" -- здесь ид компа-сервера[/code]4[paste][/paste]Запустите систему днс (рекомендую файл с ней сохранять с названием "startup")[b][center]По созданию сервера[/center][/b]1[paste][/paste]Скопируйте програму сервера на комьпютер который будет "сервером"2[paste][/paste]Создайте странички для вашего сайта обязательно наличие страничек "404" и "index"(на 404 страничку будут попадать пользователи набравшие адрес несуществующей странички а на index все кто перешол на сайт) хранить странички нужно в файлах по принципу "ссылка на страничку[paste][/paste]MWSF" (MWSF - Minecraft Web Server File)3[paste][/paste]добавте странички в фильтр запросов по принципу [code]if needPage == "index" or needPage == "название странички" [/code]страницу 404 добавлять не надо4[paste][/paste]Реализуйте скачку файлов с вашего сайта для этого переименуйте програму на "ссылка на скачивание[paste][/paste]DWSF" и после добавте в блок фильтра запросов ваш файл[code]elseif needPage == "ссылка на скачивание" [/code]УЧТИТЕ ЧТО ПРИ УКАЗАНИИ ССЫЛКИ В БЛОКЕ ФИЛЬТРА ЗАПРОСОВ НЕ НУЖНО УКАЗЫВАТЬ [paste][/paste]DWSF[center][b]Програмы[/b][/center][center][b]Браузер[/b][/center][code]dnsId = ------- Отредактируйте эти 2 поля!!!!side = ""-------function writeFile (fileName)id, dFile = rednet[paste][/paste]receive()file = io[paste][/paste]open(fileName, "w")file:write(dFile)file:close()endhello = "<-------------Minecraft Web Browser-------------> \n<---Copyright 2012 Dimach[paste][/paste]All rights reserved---> \n<-----------------Vvedite adres----------------->"downloadSuc = "<-------------Fail zagrugen uspesno------------->"i = 0rednet[paste][/paste]open(side)while i<20 doi = i + 1print(hello)term[paste][/paste]clear()endc = truewhile c doprint(hello)url = read()a = truewhile a dorednet[paste][/paste]send(dnsId, url)id, servId = rednet[paste][/paste]receive(30)if id == dnsId thenif servId ~= "fail_404" thena = falseelseterm[paste][/paste]clear()print("<--Minecraft Web Browser ne moget nayti server-->")endelseendendservId = servId*1page = "index"b = truewhile b doterm[paste][/paste]clear()rednet[paste][/paste]send(servId, page)id, pageText = rednet[paste][/paste]receive(30)if pageText == "download" thenwriteFile (page)term[paste][/paste]clear()print(downloadSuc)elseterm[paste][/paste]clear()print(pageText)end page = read()if page == "exit" thenb = falsec = falseelseif page == "back" thenb = falseelseendterm[paste][/paste]clear()endendrednet[paste][/paste]close(side)term[paste][/paste]clear()[/code][center][b]Для системы ДНС[/b][/center][code]side = "сторона с которой у вас стоит модем" ----------отредактируйте это полеrednet[paste][/paste]open(side)while true doid, url = rednet[paste][/paste]receive()if url == "Название сайта" thenservId = "его ид"elseservId = "fail_404"endrednet[paste][/paste]send(id, servId)end[/code][b][center]Сервер[/center][/b][code]side = "Сторона с которой стоит модем" ---------- отредактируйте это полеfunction readPage (page)site = "Url Вшего сайта"[paste][/paste][paste][/paste]page ------------и это отредактируйтеpage = page[paste][/paste][paste][/paste] "[paste][/paste]MWSF"file = io[paste][/paste]open(page, "r")a=file:read()returnPage = site[paste][/paste][paste][/paste]"\n"repeat returnPage = returnPage[paste][/paste][paste][/paste] a[paste][/paste][paste][/paste] "\n"a=file:read()until a == nilfile:close()return returnPageendrednet[paste][/paste]open(side)while true doid, needPage = rednet[paste][/paste]receive()print(id)print(needPage)if needPage == "index" or needPage == "название странички" thenpageText = readPage(needPage)elseif needPage == "ссылка на скачивание" thenrednet[paste][/paste]send(id, "download")pageText = readPage(needPage)elsepageText = readPage("404")endrednet[paste][/paste]send(id, pageText)end[/code]Если у вас есть предложения или замечания по поводу браузера пишите в коментахCopyright 2012 Dimach[paste][/paste]All rights reserved!!![/hidden]