795 lines
23 KiB
Text
795 lines
23 KiB
Text
--
|
|
-- sPhone Application Package
|
|
-- Built with SPK builder 1
|
|
--
|
|
{
|
|
files = "{\
|
|
[ \"beam.lua\" ] = \"--[[\\\
|
|
\\\
|
|
Beam by Ale32bit\\\
|
|
base64 by MultMine\\\
|
|
\\\
|
|
Beam Engine Build 3\\\
|
|
\\\
|
|
]]--\\\
|
|
\\\
|
|
local base64 = \\\"ABCDEFGHIJKLMNOPQRSTUVWXYZ\\\"\\\
|
|
.. \\\"abcdefghijklmnopqrstuvwxyz0123456789+/\\\"\\\
|
|
\\\
|
|
local function toBits(n)\\\
|
|
local t = {}\\\
|
|
for i = 8, 1, -1 do\\\
|
|
table.insert(t, bit.brshift(bit.band(n, 2^(i-1)), i - 1))\\\
|
|
end\\\
|
|
return t\\\
|
|
end\\\
|
|
\\\
|
|
local function encodeBlock(blk)\\\
|
|
local b64 = \\\"\\\"\\\
|
|
local b64_bits = {}\\\
|
|
for i = 1, 3 do\\\
|
|
local c = string.byte(blk:sub(i, i)) or 0\\\
|
|
for j = 8, 1, -1 do\\\
|
|
table.insert(b64_bits, bit.brshift(bit.band(c, 2^(j-1)), j - 1))\\\
|
|
end\\\
|
|
end\\\
|
|
local byteCount = #blk + 1\\\
|
|
for i = 1, byteCount do\\\
|
|
local n = 0\\\
|
|
for j = 1, 6 do\\\
|
|
n = n + (2 ^ (6 - j)) * b64_bits[(i - 1) * 6 + j]\\\
|
|
end\\\
|
|
b64 = b64 .. base64:sub(n + 1, n + 1)\\\
|
|
end\\\
|
|
return b64 .. string.rep(\\\"=\\\", 4 - byteCount)\\\
|
|
end\\\
|
|
\\\
|
|
local function decodeBlock(b64)\\\
|
|
local msg = \\\"\\\"\\\
|
|
local msg_bits = {}\\\
|
|
for i = 1, 4 do\\\
|
|
local c = b64:sub(i, i):byte()\\\
|
|
if c >= 0x30 and c <= 0x39 then\\\
|
|
local t = toBits(c + 4)\\\
|
|
for j = 3, 8 do\\\
|
|
table.insert(msg_bits, t[j])\\\
|
|
end\\\
|
|
elseif c == string.byte(\\\"+\\\") then\\\
|
|
for j = 1, 5 do\\\
|
|
table.insert(msg_bits, 1)\\\
|
|
end\\\
|
|
table.insert(msg_bits, 0)\\\
|
|
elseif c == string.byte(\\\"/\\\") then\\\
|
|
for j = 1, 6 do\\\
|
|
table.insert(msg_bits, 1)\\\
|
|
end\\\
|
|
elseif c >= 65 and c <= string.byte(\\\"Z\\\") then\\\
|
|
local t = toBits(c - 65)\\\
|
|
for j = 3, 8 do\\\
|
|
table.insert(msg_bits, t[j])\\\
|
|
end\\\
|
|
elseif c >= 97 and c <= string.byte(\\\"z\\\") then\\\
|
|
local t = toBits(c - 71)\\\
|
|
for j = 3, 8 do\\\
|
|
table.insert(msg_bits, t[j])\\\
|
|
end\\\
|
|
end\\\
|
|
end\\\
|
|
for i = 1, #msg_bits / 8 do\\\
|
|
local n = 0\\\
|
|
for j = 1, 8 do\\\
|
|
n = n + (2 ^ (8 - j)) * msg_bits[(i - 1) * 8 + j]\\\
|
|
end\\\
|
|
msg = msg .. string.char(n)\\\
|
|
end\\\
|
|
return msg\\\
|
|
end\\\
|
|
\\\
|
|
local function encode(msg)\\\
|
|
local b64 = \\\"\\\"\\\
|
|
for i = 1, math.ceil(#msg / 3) do\\\
|
|
b64 = b64 .. encodeBlock(msg:sub((i - 1) * 3 + 1, i * 3))\\\
|
|
end\\\
|
|
return b64\\\
|
|
end\\\
|
|
\\\
|
|
local function decode(b64)\\\
|
|
local msg = \\\"\\\"\\\
|
|
for i = 1, #b64 / 4 do\\\
|
|
msg = msg .. decodeBlock(b64:sub((i - 1) * 4 + 1, i * 4))\\\
|
|
end\\\
|
|
return msg\\\
|
|
end\\\
|
|
\\\
|
|
local version = 2.2\\\
|
|
local beamEngineBuild = 3\\\
|
|
local channel = 1\\\
|
|
local maxDistance = 30000000\\\
|
|
local status = true\\\
|
|
local config = \\\".beam-config\\\"\\\
|
|
local usedIDs = {}\\\
|
|
\\\
|
|
\\\
|
|
w,h = term.getSize()\\\
|
|
\\\
|
|
local function center(text)\\\
|
|
local _,y = term.getCursorPos()\\\
|
|
if pocket then\\\
|
|
term.setCursorPos(math.ceil(w/2)-math.ceil(#text/2)+1,y)\\\
|
|
else\\\
|
|
term.setCursorPos(math.ceil(w/2)-math.ceil(#text/2),y)\\\
|
|
end\\\
|
|
term.write(text)\\\
|
|
end\\\
|
|
\\\
|
|
local function redraw()\\\
|
|
term.setBackgroundColor(colors.white)\\\
|
|
term.clear()\\\
|
|
paintutils.drawLine(1,1,w,1,colors.blue)\\\
|
|
term.setCursorPos(1,1)\\\
|
|
term.setTextColor(colors.white)\\\
|
|
term.setBackgroundColor(colors.blue)\\\
|
|
term.write(\\\"Beam ID: \\\"..os.getComputerID())\\\
|
|
term.setCursorPos(w,1)\\\
|
|
term.setBackgroundColor(colors.red)\\\
|
|
term.write(\\\"X\\\")\\\
|
|
\\\
|
|
paintutils.drawFilledBox(2,4,w-1,6,colors.blue)\\\
|
|
term.setCursorPos(1,5)\\\
|
|
term.setBackgroundColor(colors.blue)\\\
|
|
term.setTextColor(colors.white)\\\
|
|
center(\\\"Send File\\\")\\\
|
|
\\\
|
|
paintutils.drawFilledBox(2,8,w-1,10,colors.gray)\\\
|
|
term.setCursorPos(1,9)\\\
|
|
term.setBackgroundColor(colors.gray)\\\
|
|
term.setTextColor(colors.white)\\\
|
|
center(\\\"Settings\\\")\\\
|
|
\\\
|
|
\\\
|
|
term.setCursorPos(1,2)\\\
|
|
term.setTextColor(colors.black)\\\
|
|
term.setBackgroundColor(colors.white)\\\
|
|
term.setCursorPos(1,h-3)\\\
|
|
if status then\\\
|
|
term.write(\\\"Status: Listening\\\")\\\
|
|
else\\\
|
|
term.write(\\\"Status: Standby\\\")\\\
|
|
end\\\
|
|
term.setCursorPos(1,h-2)\\\
|
|
term.write(\\\"Channel: \\\"..channel)\\\
|
|
term.setCursorPos(1,h-1)\\\
|
|
term.write(\\\"Max Distance: \\\"..maxDistance)\\\
|
|
term.setCursorPos(1,h)\\\
|
|
term.write(\\\"Version: \\\"..version)\\\
|
|
term.setCursorBlink(false)\\\
|
|
end\\\
|
|
local modem = peripheral.find(\\\"modem\\\")\\\
|
|
\\\
|
|
if not modem then\\\
|
|
term.setBackgroundColor(colors.black)\\\
|
|
term.setTextColor(colors.white)\\\
|
|
term.clear()\\\
|
|
term.setCursorPos(1,1)\\\
|
|
printError(\\\"Modem not found\\\")\\\
|
|
return\\\
|
|
end\\\
|
|
\\\
|
|
modem.open(channel)\\\
|
|
\\\
|
|
while true do\\\
|
|
redraw()\\\
|
|
local ev = {os.pullEvent()}\\\
|
|
if ev[1] == \\\"mouse_click\\\" then\\\
|
|
local x,y = ev[3],ev[4]\\\
|
|
if x == w and y == 1 then\\\
|
|
modem.close(channel)\\\
|
|
term.setBackgroundColor(colors.black)\\\
|
|
term.setTextColor(colors.white)\\\
|
|
term.clear()\\\
|
|
term.setCursorPos(1,1)\\\
|
|
print(\\\"Thanks for using Beam by Ale32bit\\\")\\\
|
|
break\\\
|
|
elseif (x >= 2 and y >= 4) and (x <= w-1 and y <= 6) then\\\
|
|
local function redrawSend()\\\
|
|
paintutils.drawFilledBox(1,2,w,h,colors.white)\\\
|
|
term.setTextColor(colors.black)\\\
|
|
term.setCursorPos(1,3)\\\
|
|
center(\\\"Send file\\\")\\\
|
|
term.setCursorPos(2,5)\\\
|
|
write(\\\"Receiver ID: \\\")\\\
|
|
term.setCursorPos(2,7)\\\
|
|
write(\\\"File: \\\")\\\
|
|
term.setCursorPos(15,5)\\\
|
|
term.setCursorBlink(true)\\\
|
|
end\\\
|
|
while true do\\\
|
|
redrawSend()\\\
|
|
local e,_,x,y = os.pullEvent()\\\
|
|
if e == \\\"mouse_click\\\" and x == w and y == 1 then\\\
|
|
break\\\
|
|
elseif e == \\\"key\\\" then\\\
|
|
term.setCursorPos(15,5)\\\
|
|
local receiver = read()\\\
|
|
if tonumber(receiver) then\\\
|
|
term.setCursorPos(8,7)\\\
|
|
local file = read()\\\
|
|
if file ~= \\\"\\\" and fs.exists(file) then\\\
|
|
local f = fs.open(file,\\\"r\\\")\\\
|
|
local con = f.readAll()\\\
|
|
f.close()\\\
|
|
-- Beam Engine\\\
|
|
local randomID = math.random(0,65535)\\\
|
|
usedIDs[randomID] = true\\\
|
|
modem.transmit(channel,os.getComputerID(),{\\\
|
|
content = encode(con),\\\
|
|
version = beamEngineBuild,\\\
|
|
receiver = encode(receiver),\\\
|
|
id = randomID,\\\
|
|
})\\\
|
|
\\\
|
|
term.setCursorPos(1,9)\\\
|
|
center(\\\"File sent to \\\"..receiver)\\\
|
|
break\\\
|
|
else\\\
|
|
term.setCursorPos(2,9)\\\
|
|
term.setTextColor(colors.red)\\\
|
|
term.write(\\\"The file does not exist\\\")\\\
|
|
sleep(2)\\\
|
|
end\\\
|
|
else\\\
|
|
term.setCursorPos(2,9)\\\
|
|
term.setTextColor(colors.red)\\\
|
|
term.write(\\\"Receiver must be number\\\")\\\
|
|
sleep(2)\\\
|
|
end\\\
|
|
end\\\
|
|
end\\\
|
|
elseif (x >= 2 and y >= 8) and (x <= w-1 and y <= 10) then\\\
|
|
local function redrawSett()\\\
|
|
paintutils.drawFilledBox(1,2,w,h,colors.white)\\\
|
|
term.setTextColor(colors.black)\\\
|
|
term.setCursorPos(1,3)\\\
|
|
center(\\\"Settings\\\")\\\
|
|
term.setCursorPos(1,5)\\\
|
|
if status then\\\
|
|
center(\\\"Disable receiver\\\")\\\
|
|
else\\\
|
|
center(\\\"Enable receiver\\\")\\\
|
|
end\\\
|
|
term.setCursorPos(1,6)\\\
|
|
center(\\\"Set channel\\\")\\\
|
|
term.setCursorPos(1,7)\\\
|
|
center(\\\"Set max distance\\\")\\\
|
|
end\\\
|
|
while true do\\\
|
|
redrawSett()\\\
|
|
local _,_,x,y = os.pullEvent(\\\"mouse_click\\\")\\\
|
|
if x == w and y == 1 then\\\
|
|
break\\\
|
|
elseif y == 5 then\\\
|
|
if status then\\\
|
|
modem.close(channel)\\\
|
|
status = false\\\
|
|
else\\\
|
|
modem.open(channel)\\\
|
|
status = true\\\
|
|
end\\\
|
|
elseif y == 6 then\\\
|
|
while true do\\\
|
|
paintutils.drawFilledBox(1,2,w,h,colors.white)\\\
|
|
term.setTextColor(colors.black)\\\
|
|
term.setCursorPos(1,3)\\\
|
|
center(\\\"Set channel\\\")\\\
|
|
term.setCursorPos(2,4)\\\
|
|
write(\\\"(0-65535) \\\")\\\
|
|
local cch = read()\\\
|
|
if tonumber(cch) or (cch >= 0 and cch <= 65535) then\\\
|
|
modem.close(channel)\\\
|
|
channel = tonumber(cch)\\\
|
|
modem.open(channel)\\\
|
|
break\\\
|
|
else\\\
|
|
term.setCursorPos(1,6)\\\
|
|
term.setTextColor(colors.red)\\\
|
|
center(\\\"Channel must be number\\\")\\\
|
|
term.setCursorPos(1,7)\\\
|
|
center(\\\"and in 0-65535\\\")\\\
|
|
sleep(2)\\\
|
|
end\\\
|
|
end\\\
|
|
elseif y == 7 then\\\
|
|
while true do\\\
|
|
paintutils.drawFilledBox(1,2,w,h,colors.white)\\\
|
|
term.setTextColor(colors.black)\\\
|
|
term.setCursorPos(1,3)\\\
|
|
center(\\\"Set max distance\\\")\\\
|
|
term.setCursorPos(2,4)\\\
|
|
local diss = read()\\\
|
|
if tonumber(diss) then\\\
|
|
maxDistance = tonumber(diss)\\\
|
|
break\\\
|
|
else\\\
|
|
term.setCursorPos(1,6)\\\
|
|
term.setTextColor(colors.red)\\\
|
|
center(\\\"Channel must be number\\\")\\\
|
|
sleep(2)\\\
|
|
end\\\
|
|
end\\\
|
|
end\\\
|
|
end\\\
|
|
end\\\
|
|
elseif ev[1] == \\\"modem_message\\\" then\\\
|
|
ch = ev[3]\\\
|
|
rch = ev[4]\\\
|
|
content = ev[5]\\\
|
|
distance = ev[6]\\\
|
|
if ch == channel and distance <= maxDistance and (content.content and content.version and content.receiver) then\\\
|
|
if content.version == beamEngineBuild and tonumber(decode(content.receiver)) == os.getComputerID() and not usedIDs[randomID] then\\\
|
|
paintutils.drawFilledBox(1,2,w,h,colors.white)\\\
|
|
term.setTextColor(colors.black)\\\
|
|
term.setCursorPos(1,3)\\\
|
|
center(\\\"File received from \\\"..rch)\\\
|
|
term.setCursorPos(1,4)\\\
|
|
center(\\\"Download file?\\\")\\\
|
|
paintutils.drawFilledBox(2,6,8,8,colors.lime)\\\
|
|
term.setCursorPos(4,7)\\\
|
|
term.setTextColor(colors.white)\\\
|
|
term.write(\\\"Yes\\\")\\\
|
|
paintutils.drawFilledBox(w-8,6,w-2,8,colors.red)\\\
|
|
term.setCursorPos(w-6,7)\\\
|
|
term.setTextColor(colors.white)\\\
|
|
term.write(\\\"No\\\")\\\
|
|
while true do\\\
|
|
local _,_,x,y = os.pullEvent(\\\"mouse_click\\\")\\\
|
|
\\\
|
|
if y == 1 and x == w then\\\
|
|
break\\\
|
|
elseif (x >= 2 and y >= 6) and (x <= 8 and y <= 8) then\\\
|
|
paintutils.drawFilledBox(1,2,w,h,colors.white)\\\
|
|
term.setCursorPos(1,3)\\\
|
|
term.setTextColor(colors.black)\\\
|
|
center(\\\"Save file as\\\")\\\
|
|
term.setCursorPos(2,4)\\\
|
|
term.setCursorBlink(true)\\\
|
|
while true do\\\
|
|
local e, p, x, y = os.pullEvent()\\\
|
|
if e == \\\"mouse_click\\\" and x == w and y == 1 then\\\
|
|
break\\\
|
|
elseif e == \\\"key\\\" then\\\
|
|
local name = read()\\\
|
|
local f = fs.open(name, \\\"w\\\")\\\
|
|
f.write(decode(content.content))\\\
|
|
f.close()\\\
|
|
term.setCursorPos(1,6)\\\
|
|
center(\\\"File saved!\\\")\\\
|
|
term.setCursorPos(1,8)\\\
|
|
center(\\\"Press any key\\\")\\\
|
|
os.pullEvent(\\\"key\\\")\\\
|
|
break\\\
|
|
end\\\
|
|
end\\\
|
|
break\\\
|
|
elseif (x >= w-8 and y >= 6) and (x <= w-2 and y <= 8) then\\\
|
|
break\\\
|
|
end\\\
|
|
end\\\
|
|
else\\\
|
|
if content.version ~= beamEngineBuild then\\\
|
|
paintutils.drawFilledBox(1,2,w,h,colors.white)\\\
|
|
term.setTextColor(colors.black)\\\
|
|
term.setCursorPos(1,3)\\\
|
|
center(\\\"Can't get file from \\\"..rch)\\\
|
|
term.setCursorPos(1,4)\\\
|
|
if content.version < beamEngineBuild then\\\
|
|
center(\\\"Sender Beam is obsolete\\\")\\\
|
|
elseif content.version > beamEngineBuild then\\\
|
|
center(\\\"Your Beam is obsolete\\\")\\\
|
|
end\\\
|
|
term.setCursorPos(1,6)\\\
|
|
center(\\\"Press any key\\\")\\\
|
|
os.pullEvent(\\\"key\\\")\\\
|
|
end\\\
|
|
end\\\
|
|
end\\\
|
|
end\\\
|
|
end\\\
|
|
--[[\\\
|
|
\\\
|
|
Beam by Ale32bit\\\
|
|
\\\
|
|
]]--\\\
|
|
\\\
|
|
-- base64 API by MultMine\\\
|
|
local base64 = \\\"ABCDEFGHIJKLMNOPQRSTUVWXYZ\\\"\\\
|
|
.. \\\"abcdefghijklmnopqrstuvwxyz0123456789+/\\\"\\\
|
|
\\\
|
|
local function toBits(n)\\\
|
|
local t = {}\\\
|
|
for i = 8, 1, -1 do\\\
|
|
table.insert(t, bit.brshift(bit.band(n, 2^(i-1)), i - 1))\\\
|
|
end\\\
|
|
return t\\\
|
|
end\\\
|
|
\\\
|
|
local function encodeBlock(blk)\\\
|
|
local b64 = \\\"\\\"\\\
|
|
local b64_bits = {}\\\
|
|
for i = 1, 3 do\\\
|
|
local c = string.byte(blk:sub(i, i)) or 0\\\
|
|
for j = 8, 1, -1 do\\\
|
|
table.insert(b64_bits, bit.brshift(bit.band(c, 2^(j-1)), j - 1))\\\
|
|
end\\\
|
|
end\\\
|
|
local byteCount = #blk + 1\\\
|
|
for i = 1, byteCount do\\\
|
|
local n = 0\\\
|
|
for j = 1, 6 do\\\
|
|
n = n + (2 ^ (6 - j)) * b64_bits[(i - 1) * 6 + j]\\\
|
|
end\\\
|
|
b64 = b64 .. base64:sub(n + 1, n + 1)\\\
|
|
end\\\
|
|
return b64 .. string.rep(\\\"=\\\", 4 - byteCount)\\\
|
|
end\\\
|
|
\\\
|
|
local function decodeBlock(b64)\\\
|
|
local msg = \\\"\\\"\\\
|
|
local msg_bits = {}\\\
|
|
for i = 1, 4 do\\\
|
|
local c = b64:sub(i, i):byte()\\\
|
|
if c >= 0x30 and c <= 0x39 then\\\
|
|
local t = toBits(c + 4)\\\
|
|
for j = 3, 8 do\\\
|
|
table.insert(msg_bits, t[j])\\\
|
|
end\\\
|
|
elseif c == string.byte(\\\"+\\\") then\\\
|
|
for j = 1, 5 do\\\
|
|
table.insert(msg_bits, 1)\\\
|
|
end\\\
|
|
table.insert(msg_bits, 0)\\\
|
|
elseif c == string.byte(\\\"/\\\") then\\\
|
|
for j = 1, 6 do\\\
|
|
table.insert(msg_bits, 1)\\\
|
|
end\\\
|
|
elseif c >= 65 and c <= string.byte(\\\"Z\\\") then\\\
|
|
local t = toBits(c - 65)\\\
|
|
for j = 3, 8 do\\\
|
|
table.insert(msg_bits, t[j])\\\
|
|
end\\\
|
|
elseif c >= 97 and c <= string.byte(\\\"z\\\") then\\\
|
|
local t = toBits(c - 71)\\\
|
|
for j = 3, 8 do\\\
|
|
table.insert(msg_bits, t[j])\\\
|
|
end\\\
|
|
end\\\
|
|
end\\\
|
|
for i = 1, #msg_bits / 8 do\\\
|
|
local n = 0\\\
|
|
for j = 1, 8 do\\\
|
|
n = n + (2 ^ (8 - j)) * msg_bits[(i - 1) * 8 + j]\\\
|
|
end\\\
|
|
msg = msg .. string.char(n)\\\
|
|
end\\\
|
|
return msg\\\
|
|
end\\\
|
|
\\\
|
|
local function encode(msg)\\\
|
|
local b64 = \\\"\\\"\\\
|
|
for i = 1, math.ceil(#msg / 3) do\\\
|
|
b64 = b64 .. encodeBlock(msg:sub((i - 1) * 3 + 1, i * 3))\\\
|
|
end\\\
|
|
return b64\\\
|
|
end\\\
|
|
\\\
|
|
local function decode(b64)\\\
|
|
local msg = \\\"\\\"\\\
|
|
for i = 1, #b64 / 4 do\\\
|
|
msg = msg .. decodeBlock(b64:sub((i - 1) * 4 + 1, i * 4))\\\
|
|
end\\\
|
|
return msg\\\
|
|
end\\\
|
|
\\\
|
|
local version = 2.2\\\
|
|
local beamEngineBuild = 3\\\
|
|
local channel = 1\\\
|
|
local maxDistance = 30000000\\\
|
|
local status = true\\\
|
|
local config = \\\".beam-config\\\"\\\
|
|
local usedIDs = {}\\\
|
|
\\\
|
|
\\\
|
|
w,h = term.getSize()\\\
|
|
\\\
|
|
local function center(text)\\\
|
|
local _,y = term.getCursorPos()\\\
|
|
if pocket then\\\
|
|
term.setCursorPos(math.ceil(w/2)-math.ceil(#text/2)+1,y)\\\
|
|
else\\\
|
|
term.setCursorPos(math.ceil(w/2)-math.ceil(#text/2),y)\\\
|
|
end\\\
|
|
term.write(text)\\\
|
|
end\\\
|
|
\\\
|
|
local function redraw()\\\
|
|
term.setBackgroundColor(colors.white)\\\
|
|
term.clear()\\\
|
|
paintutils.drawLine(1,1,w,1,colors.blue)\\\
|
|
term.setCursorPos(1,1)\\\
|
|
term.setTextColor(colors.white)\\\
|
|
term.setBackgroundColor(colors.blue)\\\
|
|
term.write(\\\"Beam ID: \\\"..os.getComputerID())\\\
|
|
term.setCursorPos(w,1)\\\
|
|
term.setBackgroundColor(colors.red)\\\
|
|
term.write(\\\"X\\\")\\\
|
|
\\\
|
|
paintutils.drawFilledBox(2,4,w-1,6,colors.blue)\\\
|
|
term.setCursorPos(1,5)\\\
|
|
term.setBackgroundColor(colors.blue)\\\
|
|
term.setTextColor(colors.white)\\\
|
|
center(\\\"Send File\\\")\\\
|
|
\\\
|
|
paintutils.drawFilledBox(2,8,w-1,10,colors.gray)\\\
|
|
term.setCursorPos(1,9)\\\
|
|
term.setBackgroundColor(colors.gray)\\\
|
|
term.setTextColor(colors.white)\\\
|
|
center(\\\"Settings\\\")\\\
|
|
\\\
|
|
\\\
|
|
term.setCursorPos(1,2)\\\
|
|
term.setTextColor(colors.black)\\\
|
|
term.setBackgroundColor(colors.white)\\\
|
|
term.setCursorPos(1,h-3)\\\
|
|
if status then\\\
|
|
term.write(\\\"Status: Listening\\\")\\\
|
|
else\\\
|
|
term.write(\\\"Status: Standby\\\")\\\
|
|
end\\\
|
|
term.setCursorPos(1,h-2)\\\
|
|
term.write(\\\"Channel: \\\"..channel)\\\
|
|
term.setCursorPos(1,h-1)\\\
|
|
term.write(\\\"Max Distance: \\\"..maxDistance)\\\
|
|
term.setCursorPos(1,h)\\\
|
|
term.write(\\\"Version: \\\"..version)\\\
|
|
term.setCursorBlink(false)\\\
|
|
end\\\
|
|
local modem = peripheral.find(\\\"modem\\\")\\\
|
|
\\\
|
|
if not modem then\\\
|
|
term.setBackgroundColor(colors.black)\\\
|
|
term.setTextColor(colors.white)\\\
|
|
term.clear()\\\
|
|
term.setCursorPos(1,1)\\\
|
|
printError(\\\"Modem not found\\\")\\\
|
|
return\\\
|
|
end\\\
|
|
\\\
|
|
modem.open(channel)\\\
|
|
\\\
|
|
while true do\\\
|
|
redraw()\\\
|
|
local ev = {os.pullEvent()}\\\
|
|
if ev[1] == \\\"mouse_click\\\" then\\\
|
|
local x,y = ev[3],ev[4]\\\
|
|
if x == w and y == 1 then\\\
|
|
modem.close(channel)\\\
|
|
term.setBackgroundColor(colors.black)\\\
|
|
term.setTextColor(colors.white)\\\
|
|
term.clear()\\\
|
|
term.setCursorPos(1,1)\\\
|
|
print(\\\"Thanks for using Beam by Ale32bit\\\")\\\
|
|
break\\\
|
|
elseif (x >= 2 and y >= 4) and (x <= w-1 and y <= 6) then\\\
|
|
local function redrawSend()\\\
|
|
paintutils.drawFilledBox(1,2,w,h,colors.white)\\\
|
|
term.setTextColor(colors.black)\\\
|
|
term.setCursorPos(1,3)\\\
|
|
center(\\\"Send file\\\")\\\
|
|
term.setCursorPos(2,5)\\\
|
|
write(\\\"Receiver ID: \\\")\\\
|
|
term.setCursorPos(2,7)\\\
|
|
write(\\\"File: \\\")\\\
|
|
term.setCursorPos(15,5)\\\
|
|
term.setCursorBlink(true)\\\
|
|
end\\\
|
|
while true do\\\
|
|
redrawSend()\\\
|
|
local e,_,x,y = os.pullEvent()\\\
|
|
if e == \\\"mouse_click\\\" and x == w and y == 1 then\\\
|
|
break\\\
|
|
elseif e == \\\"key\\\" then\\\
|
|
term.setCursorPos(15,5)\\\
|
|
local receiver = read()\\\
|
|
if tonumber(receiver) then\\\
|
|
term.setCursorPos(8,7)\\\
|
|
local file = read()\\\
|
|
if file ~= \\\"\\\" and fs.exists(file) then\\\
|
|
local f = fs.open(file,\\\"r\\\")\\\
|
|
local con = f.readAll()\\\
|
|
f.close()\\\
|
|
-- Beam Engine\\\
|
|
local randomID = math.random(0,65535)\\\
|
|
usedIDs[randomID] = true\\\
|
|
modem.transmit(channel,os.getComputerID(),{\\\
|
|
content = encode(con),\\\
|
|
version = beamEngineBuild,\\\
|
|
receiver = encode(receiver),\\\
|
|
id = randomID,\\\
|
|
})\\\
|
|
\\\
|
|
term.setCursorPos(1,9)\\\
|
|
center(\\\"File sent to \\\"..receiver)\\\
|
|
break\\\
|
|
else\\\
|
|
term.setCursorPos(2,9)\\\
|
|
term.setTextColor(colors.red)\\\
|
|
term.write(\\\"The file does not exist\\\")\\\
|
|
sleep(2)\\\
|
|
end\\\
|
|
else\\\
|
|
term.setCursorPos(2,9)\\\
|
|
term.setTextColor(colors.red)\\\
|
|
term.write(\\\"Receiver must be number\\\")\\\
|
|
sleep(2)\\\
|
|
end\\\
|
|
end\\\
|
|
end\\\
|
|
elseif (x >= 2 and y >= 8) and (x <= w-1 and y <= 10) then\\\
|
|
local function redrawSett()\\\
|
|
paintutils.drawFilledBox(1,2,w,h,colors.white)\\\
|
|
term.setTextColor(colors.black)\\\
|
|
term.setCursorPos(1,3)\\\
|
|
center(\\\"Settings\\\")\\\
|
|
term.setCursorPos(1,5)\\\
|
|
if status then\\\
|
|
center(\\\"Disable receiver\\\")\\\
|
|
else\\\
|
|
center(\\\"Enable receiver\\\")\\\
|
|
end\\\
|
|
term.setCursorPos(1,6)\\\
|
|
center(\\\"Set channel\\\")\\\
|
|
term.setCursorPos(1,7)\\\
|
|
center(\\\"Set max distance\\\")\\\
|
|
end\\\
|
|
while true do\\\
|
|
redrawSett()\\\
|
|
local _,_,x,y = os.pullEvent(\\\"mouse_click\\\")\\\
|
|
if x == w and y == 1 then\\\
|
|
break\\\
|
|
elseif y == 5 then\\\
|
|
if status then\\\
|
|
modem.close(channel)\\\
|
|
status = false\\\
|
|
else\\\
|
|
modem.open(channel)\\\
|
|
status = true\\\
|
|
end\\\
|
|
elseif y == 6 then\\\
|
|
while true do\\\
|
|
paintutils.drawFilledBox(1,2,w,h,colors.white)\\\
|
|
term.setTextColor(colors.black)\\\
|
|
term.setCursorPos(1,3)\\\
|
|
center(\\\"Set channel\\\")\\\
|
|
term.setCursorPos(2,4)\\\
|
|
write(\\\"(0-65535) \\\")\\\
|
|
local cch = read()\\\
|
|
if tonumber(cch) or (cch >= 0 and cch <= 65535) then\\\
|
|
modem.close(channel)\\\
|
|
channel = tonumber(cch)\\\
|
|
modem.open(channel)\\\
|
|
break\\\
|
|
else\\\
|
|
term.setCursorPos(1,6)\\\
|
|
term.setTextColor(colors.red)\\\
|
|
center(\\\"Channel must be number\\\")\\\
|
|
term.setCursorPos(1,7)\\\
|
|
center(\\\"and in 0-65535\\\")\\\
|
|
sleep(2)\\\
|
|
end\\\
|
|
end\\\
|
|
elseif y == 7 then\\\
|
|
while true do\\\
|
|
paintutils.drawFilledBox(1,2,w,h,colors.white)\\\
|
|
term.setTextColor(colors.black)\\\
|
|
term.setCursorPos(1,3)\\\
|
|
center(\\\"Set max distance\\\")\\\
|
|
term.setCursorPos(2,4)\\\
|
|
local diss = read()\\\
|
|
if tonumber(diss) then\\\
|
|
maxDistance = tonumber(diss)\\\
|
|
break\\\
|
|
else\\\
|
|
term.setCursorPos(1,6)\\\
|
|
term.setTextColor(colors.red)\\\
|
|
center(\\\"Channel must be number\\\")\\\
|
|
sleep(2)\\\
|
|
end\\\
|
|
end\\\
|
|
end\\\
|
|
end\\\
|
|
end\\\
|
|
elseif ev[1] == \\\"modem_message\\\" then\\\
|
|
ch = ev[3]\\\
|
|
rch = ev[4]\\\
|
|
content = ev[5]\\\
|
|
distance = ev[6]\\\
|
|
if ch == channel and distance <= maxDistance and (content.content and content.version and content.receiver) then\\\
|
|
if content.version == beamEngineBuild and tonumber(decode(content.receiver)) == os.getComputerID() and not usedIDs[randomID] then\\\
|
|
paintutils.drawFilledBox(1,2,w,h,colors.white)\\\
|
|
term.setTextColor(colors.black)\\\
|
|
term.setCursorPos(1,3)\\\
|
|
center(\\\"File received from \\\"..rch)\\\
|
|
term.setCursorPos(1,4)\\\
|
|
center(\\\"Download file?\\\")\\\
|
|
paintutils.drawFilledBox(2,6,8,8,colors.lime)\\\
|
|
term.setCursorPos(4,7)\\\
|
|
term.setTextColor(colors.white)\\\
|
|
term.write(\\\"Yes\\\")\\\
|
|
paintutils.drawFilledBox(w-8,6,w-2,8,colors.red)\\\
|
|
term.setCursorPos(w-6,7)\\\
|
|
term.setTextColor(colors.white)\\\
|
|
term.write(\\\"No\\\")\\\
|
|
while true do\\\
|
|
local _,_,x,y = os.pullEvent(\\\"mouse_click\\\")\\\
|
|
\\\
|
|
if y == 1 and x == w then\\\
|
|
break\\\
|
|
elseif (x >= 2 and y >= 6) and (x <= 8 and y <= 8) then\\\
|
|
paintutils.drawFilledBox(1,2,w,h,colors.white)\\\
|
|
term.setCursorPos(1,3)\\\
|
|
term.setTextColor(colors.black)\\\
|
|
center(\\\"Save file as\\\")\\\
|
|
term.setCursorPos(2,4)\\\
|
|
term.setCursorBlink(true)\\\
|
|
while true do\\\
|
|
local e, p, x, y = os.pullEvent()\\\
|
|
if e == \\\"mouse_click\\\" and x == w and y == 1 then\\\
|
|
break\\\
|
|
elseif e == \\\"key\\\" then\\\
|
|
local name = read()\\\
|
|
local f = fs.open(name, \\\"w\\\")\\\
|
|
f.write(decode(content.content))\\\
|
|
f.close()\\\
|
|
term.setCursorPos(1,6)\\\
|
|
center(\\\"File saved!\\\")\\\
|
|
term.setCursorPos(1,8)\\\
|
|
center(\\\"Press any key\\\")\\\
|
|
os.pullEvent(\\\"key\\\")\\\
|
|
break\\\
|
|
end\\\
|
|
end\\\
|
|
break\\\
|
|
elseif (x >= w-8 and y >= 6) and (x <= w-2 and y <= 8) then\\\
|
|
break\\\
|
|
end\\\
|
|
end\\\
|
|
else\\\
|
|
if content.version ~= beamEngineBuild then\\\
|
|
paintutils.drawFilledBox(1,2,w,h,colors.white)\\\
|
|
term.setTextColor(colors.black)\\\
|
|
term.setCursorPos(1,3)\\\
|
|
center(\\\"Can't get file from \\\"..rch)\\\
|
|
term.setCursorPos(1,4)\\\
|
|
if content.version < beamEngineBuild then\\\
|
|
center(\\\"Sender Beam is obsolete\\\")\\\
|
|
elseif content.version > beamEngineBuild then\\\
|
|
center(\\\"Your Beam is obsolete\\\")\\\
|
|
end\\\
|
|
term.setCursorPos(1,6)\\\
|
|
center(\\\"Press any key\\\")\\\
|
|
os.pullEvent(\\\"key\\\")\\\
|
|
end\\\
|
|
end\\\
|
|
end\\\
|
|
end\\\
|
|
end\\\
|
|
\",\
|
|
}",
|
|
config = "{\
|
|
type = \"Networking\",\
|
|
author = \"Ale32bit\",\
|
|
name = \"Beam\",\
|
|
id = \"ale32bit.beam\",\
|
|
version = 2.2,\
|
|
main = \"beam.lua\",\
|
|
}",
|
|
}
|