Computercraft Elevator CallSide

controlComputerID = 6
currentFloor = 1
modemSide = "left"
cableSide = "right"

rednet.open(modemSide)
function main()
    id, message = rednet.receive()
    for i = 1, 100 do
        if message ~= nil then
            buttonTest()
        end
    end
    main()
end

function buttonTest()
    if redstone.getInput("front") == true then
        floorDifference = message - currentFloor
        if floorDifference ~= 0 then
            rednet.send(controlComputerID, floorDifference)
            main()
        end
    end
end

main()