Artillary Controller

-- Print a line of dashes for aesthetics
local function lineBreak()
    local width, height = term.getSize()
    for i = 1, width do
      io.write("-")
    end
    io.write("\n")
end
-- Function to clear the screen
local function clearScreen()
    term.clear()
    term.setCursorPos(1, 1)
end

clearScreen()
-- Print the welcome message
print("Artillary Controller")
lineBreak()
print("Select a weapon!")
print("1. TNT")
print("2. Napalm")
print("3. Nuke")
lineBreak()

local choice = read()

if choice == "1" then
  projectileType = "TNT"
elseif choice == "2" then
  projectileType = "Napalm"
elseif choice == "3" then
  projectileType = "Nuke"
end

clearScreen()
print("Artillary Controller")
lineBreak()
print("Weapon:"..projectileType)
lineBreak()
print("Select a targeting method")
print("1. Current Position")
print("2. Custom Position")
lineBreak()

local choice = read()

if choice == "1" then
  targetX, targetY, targetZ = gps.locate()
elseif choice == "2" then
    print("X: ")
    targetX = read()
    print("Y: ")
    targetY = read()
    print("Z: ")
    targetZ = read()
end

clearScreen()
print("Artillary Controller")
lineBreak()
print("Weapon:"..projectileType)
print("X:"..targetX)
print("Y:"..targetY)
print("Z:"..targetZ)
lineBreak()
print("Please Confirm")
print("1. Confirm Input")
print("2. Cancel")
lineBreak()


local choice = read()

if choice == "1" then
    print("Confrimed Fiering!")

    local modem = peripheral.find("modem") or error("No modem attached", 0)
    modem.open(43) -- Open 43 so we can receive replies

    modem.transmit(15, 43, projectileType)
    os.sleep(1)
    modem.transmit(15, 43, targetX)
    os.sleep(1)
    modem.transmit(15, 43, targetY)
    os.sleep(1)
    modem.transmit(15, 43, targetZ)

    local event, side, channel, replyChannel, message, distance
    repeat
      event, side, channel, replyChannel, message, distance = os.pullEvent("modem_message")
    until channel == 43

    clearScreen()

    print(tostring(message))
elseif choice == "2" then
  print("Cancelled")
end