startup charlie 1

m = peripheral.wrap("left")
mBack = peripheral.wrap("back")

local running = true

--local printCenter = function(text, side)
 --local monitor = peripheral.wrap(side)
 --local maxw, maxh = monitor.getSize()
 --local curx, cury = monitor.getCursorPos()

 --monitor.setCursorPos((maxw-#text)/2,cury)
 --monitor.write(text)
 --monitor.setCursorPos(curx,cury+1)
--end

--local maxw, maxh = m.getSize()
--m.setCursorPos(1,math.floor(maxh/2))       reference sets to top middle line

    --Broadcasts

local function platOneBroadcastOn()
  rednet.open("top")
  rednet.broadcast("platOneOn")
  print("First Layer")
  rednet.close("top")
end

     -- Button Functions

local function goRep()          -- flashes go on the screen
 m.setTextScale(10)
 m.setCursorPos(2,2)
 m.write("GO!")
 os.sleep(1)
 m.clear()
 os.sleep(0.5)
end

local function oneWither()      --One Wither has been selected
 m.setBackgroundColor(colors.black)
 m.clear()
 m.setTextScale(5)
 m.setTextColor(colors.lime)
 m.setCursorPos(5,2)
 m.write("5")
 os.sleep(1)
 m.clear()
 m.setCursorPos(5,2)
 m.write("4")
 os.sleep(1)
 m.clear()
 m.setCursorPos(5,2)
 m.write("3")
 os.sleep(1)
 m.clear()
 m.setCursorPos(5,2)
 m.write("2")
 os.sleep(1)
 m.clear()
 m.setCursorPos(5,2)
 m.write("1")
 os.sleep(1)
 m.clear()

 platOneBroadcastOn()

 goRep()
 goRep()
 goRep()
end

local function grnButton()      --Accept Arena challenge button
 m.setBackgroundColor(colors.black)
 m.clear()
 m.setTextScale(1)
 term.redirect(m)
   m.setCursorPos(1,1)
   m.clear()
   m.setBackgroundColor(colors.lime)
    for x = 20, 30 do
      for y = 12, 16 do
        m.setCursorPos(x, y)
        m.write(" ")
      end
    end
   m.setBackgroundColor(colors.black)
   m.setCursorPos(1,1)
   print("Double right click the green button at any point to skip the tutorial")
   m.setCursorPos(1,2)
   print("Touch the screen above the buttons to view the next page.")
   m.setCursorPos(1,4)
   textutils.slowPrint("Welcome to the Arena")
end

local function tut1()
   m.clear()
   m.setBackgroundColor(colors.lime)
    for x = 20, 30 do
      for y = 12, 16 do
        m.setCursorPos(x, y)
        m.write(" ")
      end
    end
   m.setBackgroundColor(colors.black)
   m.setCursorPos(1,1)
   print("This tutorial explains what you will need to do to safely battle the wither in our base \n")
end

local function tut2()
    m.clear()
    m.setBackgroundColor(colors.lime)
    for x = 20, 30 do
      for y = 12, 16 do
        m.setCursorPos(x, y)
        m.write(" ")
      end
    end
   m.setBackgroundColor(colors.black)
   m.setCursorPos(1,1)
   print("to start the battle you will touch the green button and a timer will count down from 5 and the screen will flash GO! \n")
end

local function tut3()
   m.clear()
   m.setBackgroundColor(colors.lime)
    for x = 20, 30 do
      for y = 12, 16 do
        m.setCursorPos(x, y)
        m.write(" ")
      end
    end
   m.setBackgroundColor(colors.black)
   m.setCursorPos(1,1)
   print("As soon as the timer ends and the go begins to flash a platform will appear directly off the left of the platform, jump down and type Ready in the world chat... use a capitol R in Ready \n")
end

local function tut4()
   m.clear()
   m.setBackgroundColor(colors.lime)
    for x = 20, 30 do
      for y = 12, 16 do
        m.setCursorPos(x, y)
        m.write(" ")
      end
    end
   m.setBackgroundColor(colors.black)
   m.setCursorPos(1,1)
   print("After you say the command in worldchat the blastshield will activate and the wither will start to be constructed \n")
end

local function tut5()
   m.clear()
   m.setBackgroundColor(colors.lime)
    for x = 20, 30 do
      for y = 12, 16 do
        m.setCursorPos(x, y)
        m.write(" ")
      end
    end
   m.setBackgroundColor(colors.black)
   m.setCursorPos(1,1)
   print("For this version, how you defeat the wither is up to you... But to prevent accidental release of the wither the force field can not be deactivated until the nether star is placed in the last slot of the turtle you will find at the corner of the arena \n")
end

local function tut6()
   m.clear()
   m.setBackgroundColor(colors.lime)
    for x = 20, 30 do
      for y = 12, 16 do
        m.setCursorPos(x, y)
        m.write(" ")
      end
    end
   m.setBackgroundColor(colors.black)
   m.setCursorPos(1,1)
   print("In the very real case of a player death the force field will finish the job. Good Luck soldier... \n")
   term.restore()
end

local function redButton()      --Dont Accept Arena Challenge
 m.clear()
 m.setTextScale(5)
 m.setCursorPos(2,2)
 m.setTextColor(colors.red)
 m.write("Next Time Then")
 os.sleep(4)
 os.reboot()
end

    --Monitor screens

local function swapScreen()
  m.clear()
  m.setBackgroundColor(colors.black)
  m.setTextScale(1)
  m.setCursorPos(14,12)
  term.redirect(m)
    print("Touch to Start")
  term.restore()
  os.sleep(2)
  os.reboot()
end

local function WelcomeScreen()
  m.clear()
  m.setBackgroundColor(colors.black)
  m.setTextScale(4)
  m.setCursorPos(0,1)
  m.setTextColor(colors.lime)
  m.write(" Welcome")
  m.setCursorPos(5,3)
  m.setTextColor(colors.yellow)
  m.write("to the")
  m.setCursorPos(8,5)
  m.setTextColor(colors.red)
  m.write("ARENA!")
end

local function yesNo(x1, x2, y1, y2)
local event, side, X, Y = os.pullEventRaw()
  if event == "monitor_touch" then
    if (x1 >= 10 and x2 <= 20 and y1 >=12 and y2 <= 16) then
      grnButton()
    elseif (x1 >= 30 and x2 <= 40 and y1 >= 12 and y2 <= 16) then
      redButton()
    else
      os.reboot()
    end
  end
end

local function screenTwo()
  m.clear()
  m.setBackgroundColor(colors.black)
  m.setTextScale(1)
  m.setCursorPos(9,1)
  m.setTextColor(colors.white)
  m.write("Welcome to HDbag's Wither Arena!!!")
  m.setCursorPos(4,2)
  m.write("Co-Hosting IPJ and the boss of the underworld")
  m.setCursorPos(8,5)
  m.write("simply push the green button to start")
  m.setCursorPos(11,6)
  m.write("Or push the red button to stop")
  m.setCursorPos(13,7)
  m.write("Double click the buttons")
  m.setCursorPos(1,9)
  m.write("Work In Progress - - - Owners not held responsible")
  m.setBackgroundColor(colors.lime)
    for x = 10, 20 do
      for y = 12, 16 do
        m.setCursorPos(x, y)
        m.write(" ")
    end
   end
 m.setBackgroundColor(colors.red)
   for x = 30, 40 do
     for y = 12, 16 do
       m.setCursorPos(x, y)
       m.write(" ")
     end
   end
 local event = (os.pullEvent())
   if event == "monitor_touch" then
     return
   end
end

    --Tables and executables
local function continue()
  return
end

local redGrnButtons ={
 [1] = {buttonType = 1, startX = 10, endX = 20, startY = 12, endY = 16, buttonText = "GO!", command = grnButton},
 [2] = {buttonType = 1, startX = 30, endX = 40, startY = 12, endY = 16, buttonText = "NO", command = redButton}
}

local tutorialButton ={
 [1] = {buttonType = 1, startX = 20, endX = 30, startY = 12, endY = 16, buttonText = " ", command = oneWither},
 [2] = {buttonType = 1, startX = 1, endX = 50, startY = 1, endY = 11, buttonText = " ", command = continue}
}

--local witherNum ={
 --[1] = {buttonType = 1, startX = 20, endX = 30, startY = 12, endY = 16, buttonText = "1", command = oneWither},
--}

local function buttonMenu(table)
 for k,v in ipairs(table) do
  m.setCursorPos(table[k].startX, table[k].startY)
 end
 while running do
  for k,v in ipairs(table) do
   event, button, x, y = os.pullEvent()
   if event == "monitor_touch" then
    if x >= table[k].startX and x <= table[k].endX and y >= table[k].startY and y <= table[k].endY then
      table[k].command()
    end
   end
  end
  return
 end
 m.clear()
end

local function clickCatch()
    local eventtocatch = "monitor_touch"
    local timeout = os.startTimer(3)
    local e, arg1, arg2, arg3 = os.pullEvent()
        if e == 'timer' and arg1 == timeout then
            swapScreen()
        elseif e == eventtocatch then
            screenTwo()
        end
end

-- end of functions list

m.clear()


WelcomeScreen()
clickCatch()

screenTwo()
buttonMenu(redGrnButtons)

grnButton()
buttonMenu(tutorialButton)

tut1()
buttonMenu(tutorialButton)

tut2()
buttonMenu(tutorialButton)

tut3()
buttonMenu(tutorialButton)

tut4()
buttonMenu(tutorialButton)

tut5()
buttonMenu(tutorialButton)

tut6()
buttonMenu(tutorialButton)