Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- shell.run("clear")
- mon = peripheral.wrap("back")
- mon.setBackgroundColor(colors.white)
- mon.setTextColor(colors.blue)
- mon.setTextScale(1)
- mon.clear()
- gx,gy = mon.getSize()
- -- switches --
- t = {}
- t[1] = "GS zum Verkauf von 400$"
- t[2] = "Spawn"
- t[3] = "TekkitLiteShowcenter"
- t[4] = "ComputercraftShowcenter"
- t[5] = "Manarola Owner: Muzze77"
- t[6] = "GS von CyberD1"
- t[7] = "Bauteam bitte Plannieren"
- t[8] = "GS von Tobycraft2HD"
- t[9] = "GS von _HDCrafter_"
- t[10] = "GS von minecraftinf"
- -- /switches --
- black = colors.black
- red = colors.red
- green = colors.green
- white = colors.white
- blue = colors.blue
- bnorm = colors.white
- tnorm = colors.blue
- brown = colors.brown
- cyan = colors.cyan
- orange = colors.orange
- yellow = colors.yellow
- pink = colors.pink
- purple = colors.purple
- function cbut(cx, cy, text, bcol, tcol)
- mon.setCursorPos(cx, cy)
- if bcol == nil then
- bcol = bnorm
- end
- if tcol == nil then
- tcol = tnorm
- end
- mon.setBackgroundColor(bcol)
- mon.setTextColor(tcol)
- mon.write(text)
- mon.setBackgroundColor(bnorm)
- mon.setTextColor(tnorm)
- end
- function rune()
- --spawnbereich--
- cbut(gx/2-6,1," STADTPLAN MANAROLA ",colors.white,colors.blue)
- cbut(8,gy,"graue Pixel sind Strassen, angaben in Chunks!")
- cbut(gx-2,1,"[R]",colors.white,colors.green)
- cbut(2,3," ",colors.blue,colors.blue)
- cbut(3,3," ", colors.gray, colors.white)
- cbut(2,4," ",colors.blue,colors.blue)
- cbut(3,4," ", colors.gray, colors.white)
- cbut(2,5,"O",colors.green,colors.black)
- cbut(3,5," ", colors.gray, colors.white)
- cbut(2,6," ", colors.orange,colors.blue)
- cbut(3,6," ", colors.gray, colors.white)
- cbut(2,7," ", colors.orange,colors.blue)
- cbut(3,7," ", colors.gray, colors.white)
- cbut(3,8," ", colors.gray, colors.white)
- cbut(2,8," ", colors.gray, colors.white)
- cbut(4,6," ", colors.red,colors.white)
- cbut(4,7," ", colors.red,colors.white)
- cbut(5,6," ", colors.red,colors.white)
- cbut(5,7," ", colors.red,colors.white)
- cbut(1,8," ",colors.gray,colors.white)
- cbut(2,9," ",colors.blue)
- cbut(1,9," ",colors.blue)
- cbut(4,9," ",colors.blue)
- cbut(5,9," ",colors.blue)
- cbut(4,5," ",colors.cyan)
- cbut(4,4," ",colors.cyan)
- cbut(5,5," ",colors.cyan)
- cbut(5,4," ",colors.cyan)
- cbut(3,3," ",colors.cyan)
- cbut(4,3," ",colors.cyan)
- cbut(5,3," ",colors.cyan)
- cbut(3,9," ",colors.gray)
- cbut(4,8," ",colors.gray)
- cbut(5,8," ",colors.gray)
- --/spawnbereich--
- cbut(gx/2-6,gy-1," Ort anklicken für INFO", colors.white,colors.blue)
- sleep(0.15)
- end
- function showCount(id)
- cbut(gx/2-6,gy-3, " ",colors.white,colors.blue)
- sleep(0.01)
- cbut(gx/2-6,gy-3,t[id],colors.white,colors.black)
- end
- rune()
- pos = {}
- pos["X"] = 1
- pos["Y"] = 1
- function update()
- rune()
- evt,side,dx,dy = os.pullEvent("monitor_touch")
- if dx == gx-1 and dy == 1 then
- shell.run("reboot")
- end
- if dy > 1 and dy ~= gy-1 and dy ~= gy-3 then
- rune()
- cbut(1,gy-3," ",colors.white,colors.blue)
- print(dx,dy)
- mon.setCursorPos(dx,dy)
- mon.setBackgroundColor(colors.white)
- mon.setTextColor(colors.black)
- mon.write("X")
- mon.setCursorPos(pos["X"],pos["Y"])
- mon.write(" ")
- pos["X"] = dx
- pos["Y"] = dy
- if dx == 5 and dy == 6 then
- showCount(5)
- elseif dx == 4 and dy == 6 then
- showCount(5)
- elseif dx == 5 and dy == 7 then
- showCount(5)
- elseif dx == 4 and dy == 7 then
- showCount(5)
- elseif dx == 2 and dy == 3 then
- showCount(6)
- elseif dx == 2 and dy == 4 then
- showCount(6)
- elseif dx == 2 and dy == 5 then
- showCount(2)
- elseif dx == 2 and dy == 6 then
- showCount(3)
- elseif dx == 2 and dy == 7 then
- showCount(4)
- elseif dx == 1 and dy == 9 then
- showCount(10)
- elseif dx == 2 and dy == 9 then
- showCount(9)
- elseif dx == 4 and dy == 9 then
- showCount(8)
- elseif dx == 5 and dy == 9 then
- showCount(8)
- elseif dx == 4 and dy == 4 then
- showCount(7)
- elseif dx == 4 and dy == 5 then
- showCount(7)
- elseif dx == 5 and dy == 5 then
- showCount(7)
- elseif dx == 5 and dy == 4 then
- showCount(7)
- elseif dx == 4 and dy == 3 then
- showCount(7)
- elseif dx == 3 and dy == 3 then
- showCount(7)
- elseif dx == 5 and dy == 3 then
- showCount(7)
- end
- end
- end
- while true do
- update()
- end
- --------------------------------------------
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement