SHOW:
|
|
- or go back to the newest paste.
| 1 | - | radar = peripheral.wrap("bottom")
|
| 1 | + | modem = peripheral.wrap("right")
|
| 2 | - | radius = 500 |
| 2 | + | Nradar = "radar_0" |
| 3 | Nmon = "monitor_0" | |
| 4 | ||
| 5 | radius = 10000 | |
| 6 | scale = 50 | |
| 7 | ||
| 8 | w, h = term.getSize() | |
| 9 | ||
| 10 | - | for a = 2,w-1 do |
| 10 | + | |
| 11 | - | for b = 1,h do |
| 11 | + | |
| 12 | - | paintutils.drawPixel(a,b,color) |
| 12 | + | |
| 13 | - | end |
| 13 | + | for a = 2,w-1 do |
| 14 | for b = 1,h do | |
| 15 | paintutils.drawPixel(a,b,color) | |
| 16 | end | |
| 17 | end | |
| 18 | end | |
| 19 | ||
| 20 | function textOut(x, y, text, fg, bg) | |
| 21 | term.setCursorPos(x, y) | |
| 22 | term.setTextColor(fg) | |
| 23 | term.setBackgroundColor(bg) | |
| 24 | term.write(text) | |
| 25 | local xt,yt = term.getCursorPos() | |
| 26 | term.setCursorPos(1, yt + 1) | |
| 27 | - | local x = radarX - oldX |
| 27 | + | |
| 28 | - | local z = radarZ - oldZ |
| 28 | + | |
| 29 | - | |
| 29 | + | |
| 30 | local x = radarX - oldX | |
| 31 | local z = radarZ - oldZ | |
| 32 | x = x / (radius / scale) | |
| 33 | z = z / (radius / scale) | |
| 34 | x = x + (w / 2) | |
| 35 | z = z + (h / 2) | |
| 36 | - | |
| 36 | + | |
| 37 | z = math.floor(z); | |
| 38 | return x,z | |
| 39 | - | |
| 39 | + | |
| 40 | - | return x,z |
| 40 | + | |
| 41 | function drawContact(x, y, z, name, color) | |
| 42 | local newX, newZ = translateXZ(x, z) | |
| 43 | ||
| 44 | paintutils.drawPixel(newX, newZ, color) | |
| 45 | textOut(newX - 3, newZ + 1, "[" .. name .. "]", colors.white, colors.black) | |
| 46 | end | |
| 47 | ||
| 48 | function scanAndDraw() | |
| 49 | if (modem.callRemote(Nradar,"getEnergyLevel") < radius*radius) then | |
| 50 | hh = math.floor(h / 2); | |
| 51 | - | if (radar.getEnergyLevel() < radius*radius) then |
| 51 | + | |
| 52 | ||
| 53 | paintutils.drawLine(hw - 5, hh - 1, hw + 5, hh - 1, colors.red); | |
| 54 | paintutils.drawLine(hw - 5, hh, hw + 5, hh, colors.red); | |
| 55 | textOut(hw - 4, hh,"LOW POWER", colors.white, colors.red); | |
| 56 | paintutils.drawLine(hw - 5, hh + 1, hw + 5, hh + 1, colors.red); | |
| 57 | sleep(1); | |
| 58 | ||
| 59 | return 0; | |
| 60 | end; | |
| 61 | modem.callRemote(Nradar,"scanRadiusW",radius); | |
| 62 | sleep(2); | |
| 63 | - | radar.scanRadiusW(radius); |
| 63 | + | |
| 64 | redraw(); | |
| 65 | ||
| 66 | numResults = modem.callRemote(Nradar,"getResultsCountW"); | |
| 67 | ||
| 68 | - | numResults = radar.getResultsCountW(); |
| 68 | + | |
| 69 | for i = 0, numResults-1 do | |
| 70 | freq, cx, cy, cz = modem.callRemote(Nradar,"getResultW",i); | |
| 71 | ||
| 72 | - | freq, cx, cy, cz = radar.getResultW(i); |
| 72 | + | |
| 73 | end | |
| 74 | end | |
| 75 | ||
| 76 | drawContact(radarX, radarY, radarZ, "RAD", colors.yellow); | |
| 77 | end | |
| 78 | ||
| 79 | function redraw() | |
| 80 | colorScreen(colors.green) | |
| 81 | textOut(1, h, "Energy: " .. modem.callRemote(Nradar,"getEnergyLevel") .. " Eu | Scan radius: " .. radius, colors.white, colors.black) | |
| 82 | - | --shell.run("clear")
|
| 82 | + | |
| 83 | ||
| 84 | - | |
| 84 | + | --mrun = true |
| 85 | - | paintutils.drawLine(1, 1, w, 1, colors.black) |
| 85 | + | --while (mrun) do |
| 86 | - | |
| 86 | + | radarX = modem.callRemote(Nradar,"getRadarX"); |
| 87 | - | textOut(h, 1, "= Q-Radar v0.1 =", colors.white, colors.black) |
| 87 | + | radarY = modem.callRemote(Nradar,"getRadarY"); |
| 88 | - | |
| 88 | + | radarZ = modem.callRemote(Nradar,"getRadarZ"); |
| 89 | - | textOut(w - 3, 1, "[X]", colors.white, colors.red) |
| 89 | + | |
| 90 | - | |
| 90 | + | --end |
| 91 | - | paintutils.drawLine(1, h, w, h, colors.black); |
| 91 | + | |
| 92 | - | textOut(4, h, "Energy: " .. radar.getEnergyLevel() .. " Eu | Scan radius: " .. radius, colors.white, colors.black) |
| 92 | + |