[CC V1.4.1]Square's Scripts - CCComunicator and more!

function menu()
local n = 1
while true do
local x, y = term.getCursorPos()
term.clearLine()
if n == 1 then
write("[YES] NO")
else
write("YES [NO]")
end
term.setCursorPos(x, y)
a, b = os.pullEvent()
while a ~= "key" do
a, b = os.pullEvent()
end
if b == 203 and n == 2 then n = 1 end
if b == 205 and n == 1 then n = 2 end
if b == 28 then
print("")
break
end
end
if n == 1 then return true end
if n == 2 then return false end
return false
end
function programSelect(m)
n=1
l=#m
while true do
term.clear()
term.setCursorPos(1,2)
for i=1, l, 1 do
if i==n then print(i, " ["..m[i].."]") else print(i, " ", m[i]) end
end
print("Select a program[arrow up/arrow down]")
a, b= os.pullEventRaw()
if a == "key" then
if b==200 and n>1 then n=n-1 end
if b==208 and n<=l then n=n+1 end
if b==28 then break end
end
end
term.clear() term.setCursorPos(1,1)
return n
end
function modemSideSelect(m)
n=1
l=#m
while true do
term.clear()
term.setCursorPos(1,2)
for i=1, l, 1 do
if i==n then print(i, " ["..m[i].."]") else print(i, " ", m[i]) end
end
print("What side is your modem on?")
print("Select a side[arrow up/arrow down]")
a, b= os.pullEventRaw()
if a == "key" then
if b==200 and n>1 then n=n-1 end
if b==208 and n<=l then n=n+1 end
if b==28 then break end
end
end
term.clear() term.setCursorPos(1,1)
return n
end
------------------------------------------------------------------------------------------------------------
print("Are You Calling A Program?")
local choice = menu()
local sides = {"Right", "Back", "Left", "Front", "Top", "Bottom"}
local modemSide = modemSideSelect(sides)
if modemSide == 1 then
rednet.open("right")
elseif modemSide == 2 then
rednet.open("back")
elseif modemSide == 3 then
rednet.open("left")
elseif modemSide == 4 then
rednet.open("front")
elseif modemSide == 5 then
rednet.open("top")
elseif modemSide == 6 then
rednet.open("bottom")
end

print("What ID is your Turtle/PC?")
ID = io.read() --Find the ID of the receiving Turtle/PC
ID = tonumber(ID)
if choice == true then
print("Are You Sending To a Turtle?")
local choice2 = menu()
if choice2 == true then
while true do
local programs = {"Excavate", "Tunnel", "Lumberjack", "Dance", "Move", "Exit"}
local program = programSelect(programs)
if program == 1 then
info = "Excavate"
rednet.send(ID, info)
local TID, question = rednet.receive(10)
if TID == ID then
print(question)
info2 = io.read()
rednet.send(ID, info2)
else
print("Out-of-Range or Interferance, try again later.")
end
elseif program == 2 then
info = "Tunnel"
rednet.send(ID, info)
local TID, question = rednet.receive(10)
if TID == ID then
print(question)
info2 = io.read()
rednet.send(ID, info2)
else
print("Out-of-Range or Interferance, try again later.")
end
elseif program == 3 then
info = "Lumberjack"
rednet.send(ID, info)
elseif program == 4 then
info = "Dance"
rednet.send(ID, info)
elseif program == 5 then
local dirs = {"Right", "Back", "Left", "Forward", "Up", "Down", "Back"}
while true do
local dir = programSelect(dirs)
if dir == 1 then
info = "right"
rednet.send(ID, info)
elseif dir == 2 then
info = "back"
rednet.send(ID, info)
elseif dir == 3 then
info = "left"
rednet.send(ID, info)
elseif dir == 4 then
info = "forward"
rednet.send(ID, info)
elseif dir == 5 then
info = "up"
rednet.send(ID, info)
elseif dir == 6 then
info = "down"
rednet.send(ID, info)
elseif dir == 7 then
break
end
end
elseif program == 6 then
break
end
end
else
local programs = {DJ}
local program = programSelect(programs)
if program == 1 then
info = "DJ"
rednet.send(ID, info)
end
end
else
term.write("Info to send:")
local info = io.read() --Gather the info/program to send/run
end
if choice == false then
rednet.send(ID, info) -- Send the info
end

function modemSideSelect(m)
n=1
l=#m
while true do
term.clear()
term.setCursorPos(1,2)
for i=1, l, 1 do
if i==n then print(i, " ["..m[i].."]") else print(i, " ", m[i]) end
end
print("What side is your modem on?")
print("Select a side[arrow up/arrow down]")
a, b= os.pullEventRaw()
if a == "key" then
if b==200 and n>1 then n=n-1 end
if b==208 and n<=l then n=n+1 end
if b==28 then break end
end
end
term.clear() term.setCursorPos(1,1)
return n
end
----------------------------------------------------------------------------------------------------
while true do
local sides = {"Right", "Back", "Left", "Front", "Top", "Bottom"}
local modemSide = modemSideSelect(sides)
if modemSide == 1 then
rednet.open("right")
elseif modemSide == 2 then
rednet.open("back")
elseif modemSide == 3 then
rednet.open("left")
elseif modemSide == 4 then
rednet.open("front")
elseif modemSide == 5 then
rednet.open("top")
elseif modemSide == 6 then
rednet.open("bottom")
end
print("Now Listening forever for a message, press Ctl+T to exit")
id, message = rednet.receive() -- listen indefinatly for a message
if message == "DJ" then
shell.run("dj")
else
print("Incoming Info From PC/Turtle #",id)
print("Info:")
print(message)
end
end

while true do
rednet.open("right") -- open ports so the turtle can "hear"
print("Now Listening forever for a message, press Ctl+T to exit")
id, message = rednet.receive() -- listen indefinatly for a message
if message == "Excavate" then
rednet.send(id, "Radius:")
local id2, answer = rednet.receive(10)
if id2 == id then
answer = tonumber(answer)
shell.run("Excavate ", answer)
else
print("Out-of-Range or Interferance, try again later.")
end
elseif message == "Tunnel" then
rednet.send(id, "How Far?")
local id2, answer = rednet.receive(10)
if id2 == id then
answer = tonumber(answer)
shell.run("Tunnel ", answer)
else
print("Out-of-Range or Interferance, try again later.")
end
elseif message == "Lumberjack" then
shell.run("Lumberjack")
elseif message == "Dance" then
shell.run("Dance")
elseif message == "right" then
turtle.turnRight()
turtle.forward()
elseif message == "back" then
turtle.back()
elseif message == "left" then
turtle.turnLeft()
turtle.forward()
elseif message == "forward" then
turtle.forward()
elseif message == "up" then
turtle.up()
elseif message == "down" then
turtle.down()
else
print("Incoming Info From PC/Turtle #",id)
print("Info:")
print(message)
end
end

while turtle.detect() do
print("Chopping")
turtle.dig()
turtle.digUp()
print("Moving")
turtle.up()
end
while not turtle.detect() and not turtle.detectDown() do
print("Moving down")
turtle.down()
print("Job done!")
programHasRan = 1
end
if programHasRan == 1 then
turtle.select(9)
turtle.place()
end

local args = { ... }
pass = false
if #args == 1 or #args == 2 then
if args[1] == "yes" or "no" then
  if args[1] == "yes" then
   if not args[2] then
	print("Usage: cut <replant (yes or no)> <Slot# 1-12 (for replanting, not needed if no)>")
	return
   elseif tonumber(args[2]) > 0 and tonumber(args[2]) < 13 then
	pass = true
   end
  elseif args[1] == "no" then
   pass = true
  end
end
if pass == false then
  print("Usage: cut <replant (yes or no)> <Slot# 1-12 (for replanting, not needed if no)>")
  return
end
else
print("Usage: cut <replant (yes or no)> <Slot# 1-12 (for replanting, not needed if no)>")
return
end
print("Welcome to SquareMan's Tree Cutting Script")
print()
--Height relative to the starting point of turtle
local height = 0
while true do
--Check if there is a block in front of the turtle
if turtle.detect() then
  turtle.dig()
else
  print("Finished")
  break
end

--Check if there is a block above the turtle before moving up and if so, break it
if turtle.detectUp() then
  turtle.digUp()
  turtle.up()
  height = height + 1
else
  turtle.up()
  height = height + 1
end
end
for n=0,height - 1 do
turtle.down()
end
if args[1] == "yes" then
turtle.select(tonumber(args[2]))
turtle.place()
return
else
return
end