Moneybags Alpha 1.4

-- PROGRAM CONFIGURATION:

tickSpeed = 0.05  -- How fast the game goes. Higher the slower. 0.05 is the recommended speed.
MPtickSpeed = 0.05 -- How fast the game goes in Multiplayer. This data will be sent to your opponent so you two will be at the same speed. 0.05 is the recommended speed.

-- END OF CONFIGURATION

version = "a1.4"


function titleScreen()
    term.clear()
    term.setCursorPos(1, 1)
    print("")
    print("               $$$  Moneybags  $$$               ")
    print("                    Alpha 1.4                    ")
    print("")
    print("")
    menuPos = 1
    while true do
        term.setCursorPos(1, 6)
        if menuPos == 1 then
            print("                > Single Player <                ")
        else
            print("                  Single Player                  ")
        end
        print("")
        if menuPos == 2 then
            print("                 > Multiplayer <                 ")
        else
            print("                   Multiplayer                   ")
        end
        print("")
        if menuPos == 3 then
            print("                  > Quit Game <                  ")
        else
            print("                    Quit Game                    ")
        end
        event, key = os.pullEvent("key")
        if (key == 17 or key == 200) and (menuPos >= 2) then
            menuPos = menuPos - 1
        elseif (key == 31 or key == 208) and (menuPos <= 2) then
            menuPos = menuPos + 1
        elseif key == 28 and menuPos == 1 then
            parallel.waitForAny(singlePlayer, keyListener)
            if lose then
                term.setCursorPos(1, 5)
                print("          -----------------------------          ")
                print("          |         You Lose!         |          ")
                print("          -----------------------------          ")
                print("          |     $$  Game Data  $$     |          ")
                print("          |---------------------------|          ")
                print("          | Score: "..score)
                term.setCursorPos(39, 10)
                print("|")
                print("          | Ticks: "..tickCount)
                term.setCursorPos(39, 11)
                print("|")
                print("          -----------------------------          ")
                sleep(1)
                print("          | Press any key to continue |          ")
                print("          |     to the Main Menu.     |          ")
                print("          -----------------------------          ")
                os.pullEvent("key")
            end
            term.clear()
            term.setCursorPos(1, 1)
            print("")
            print("               $$$  Moneybags  $$$               ")
            print("                    Alpha 1.4                    ")
            print("")
            print("")
        elseif key == 28 and menuPos == 2 then
            parallel.waitForAny(multiPlayer, keyListener, packetListener)
        elseif key == 28 and menuPos == 3 then
            term.clear()
            term.setCursorPos(1, 1)
            break
        end
        term.setCursorPos(1, 6)
        term.clearLine()
        term.clearLine()
        term.clearLine()
    end

end

function singlePlayer()
    -- Variable Definitions
    money = 300
    payday = 0
    playerPos = 8
    score = 0
    prevLifeScore = 0
    lives = 3
    lose = false
    gameExit = false
    moneybagTimer = 0
    moneybagOne =
    {
        onScreen = false,
        xPos = 0
    }
    moneybagTwo =
    {
        onScreen = false,
        xPos = 0
    }
    moneybagThree =
    {
        onScreen = false,
        xPos = 0
    }
    moneybagFour =
    {
        onScreen = false,
        xPos = 0
    }
    moneybagFive =
    {
        onScreen = false,
        xPos = 0
    }
    moneybagSix =
    {
        onScreen = false,
        xPos = 0
    }
    moneybagSeven =
    {
        onScreen = false,
        xPos = 0
    }
    moneybagEight =
    {
        onScreen = false,
        xPos = 0
    }
    moneybagNine =
    {
        onScreen = false,
        xPos = 0
    }
    moneybagTen =
    {
        onScreen = false,
        xPos = 0
    }
    moneybagEleven =
    {
        onScreen = false,
        xPos = 0
    }
    moneybagTwelve =
    {
        onScreen = false,
        xPos = 0
    }
    moneybagThirteen =
    {
        onScreen = false,
        xPos = 0
    }
    moneybagFourteen =
    {
        onScreen = false,
        xPos = 0
    }
    moneybagFifteen =
    {
        onScreen = false,
        xPos = 0
    }
    moneybagSixteen =
    {
        onScreen = false,
        xPos = 0
    }

    playerMove = false
    tickCount = 0
    -- End of Variable Definitions


    -- Tick Loop
    repeat
        if playerMove == true then
            if currentKey == "up" and playerPos > 1 then
                playerPos = playerPos - 1
                currentKey = false
            elseif currentKey == "down" and playerPos < 17 then
                playerPos = playerPos + 1
                currentKey = false
            end
            playerMove = false
        else
            playerMove = true
        end
        if payday == 120 then
            money = money + 300
            payday = 0
        else
            payday = payday + 1
        end
        if moneybagTimer == 3 and money >= 10 then
            moneybagTimer = 0
            money = money - 10
            if moneybagOne.onScreen == false then
                moneybagOne.onScreen = true
                moneybagOne.yPos = math.random(1, 17)
            elseif moneybagTwo.onScreen == false then
                moneybagTwo.onScreen = true
                moneybagTwo.yPos = math.random(1, 17)
            elseif moneybagThree.onScreen == false then
                moneybagThree.onScreen = true
                moneybagThree.yPos = math.random(1, 17)
            elseif moneybagFour.onScreen == false then
                moneybagFour.onScreen = true
                moneybagFour.yPos = math.random(1, 17)
            elseif moneybagFive.onScreen == false then
                moneybagFive.onScreen = true
                moneybagFive.yPos = math.random(1, 17)
            elseif moneybagSix.onScreen == false then
                moneybagSix.onScreen = true
                moneybagSix.yPos = math.random(1, 17)
            elseif moneybagSeven.onScreen == false then
                moneybagSeven.onScreen = true
                moneybagSeven.yPos = math.random(1, 17)
            elseif moneybagEight.onScreen == false then
                moneybagEight.onScreen = true
                moneybagEight.yPos = math.random(1, 17)
            elseif moneybagNine.onScreen == false then
                moneybagNine.onScreen = true
                moneybagNine.yPos = math.random(1, 17)
            elseif moneybagTen.onScreen == false then
                moneybagTen.onScreen = true
                moneybagTen.yPos = math.random(1, 17)
            elseif moneybagEleven.onScreen == false then
                moneybagEleven.onScreen = true
                moneybagEleven.yPos = math.random(1, 17)
            elseif moneybagTwelve.onScreen == false then
                moneybagTwelve.onScreen = true
                moneybagTwelve.yPos = math.random(1, 17)
            elseif moneybagThirteen.onScreen == false then
                moneybagThirteen.onScreen = true
                moneybagThirteen.yPos = math.random(1, 17)
            elseif moneybagFourteen.onScreen == false then
                moneybagFourteen.onScreen = true
                moneybagFourteen.yPos = math.random(1, 17)
            elseif moneybagFifteen.onScreen == false then
                moneybagFifteen.onScreen = true
                moneybagFifteen.yPos = math.random(1, 17)
            elseif moneybagSixteen.onScreen == false then
                moneybagSixteen.onScreen = true
                moneybagSixteen.yPos = math.random(1, 17)
            end
        elseif money >= 10 then
            moneybagTimer = moneybagTimer + 1
        end
        if moneybagOne.onScreen == true then
            if moneybagOne.xPos == 48 then
                moneybagOne.onScreen = false
                moneybagOne.xPos = 0
                score = score + 1
            else
                moneybagOne.xPos = moneybagOne.xPos + 1
            end
        end
        if moneybagTwo.onScreen == true then
            if moneybagTwo.xPos == 48 then
                moneybagTwo.onScreen = false
                moneybagTwo.xPos = 0
                score = score + 1
            else
                moneybagTwo.xPos = moneybagTwo.xPos + 1
            end
        end
        if moneybagThree.onScreen == true then
            if moneybagThree.xPos == 48 then
                moneybagThree.onScreen = false
                moneybagThree.xPos = 0
                score = score + 1
            else
                moneybagThree.xPos = moneybagThree.xPos + 1
            end
        end
        if moneybagFour.onScreen == true then
            if moneybagFour.xPos == 48 then
                moneybagFour.onScreen = false
                moneybagFour.xPos = 0
                score = score + 1
            else
                moneybagFour.xPos = moneybagFour.xPos + 1
            end
        end
        if moneybagFive.onScreen == true then
            if moneybagFive.xPos == 48 then
                moneybagFive.onScreen = false
                moneybagFive.xPos = 0
                score = score + 1
            else
                moneybagFive.xPos = moneybagFive.xPos + 1
            end
        end
        if moneybagSix.onScreen == true then
            if moneybagSix.xPos == 48 then
                moneybagSix.onScreen = false
                moneybagSix.xPos = 0
                score = score + 1
            else
                moneybagSix.xPos = moneybagSix.xPos + 1
            end
        end
        if moneybagSeven.onScreen == true then
            if moneybagSeven.xPos == 48 then
                moneybagSeven.onScreen = false
                moneybagSeven.xPos = 0
                score = score + 1
            else
                moneybagSeven.xPos = moneybagSeven.xPos + 1
            end
        end
        if moneybagEight.onScreen == true then
            if moneybagEight.xPos == 48 then
                moneybagEight.onScreen = false
                moneybagEight.xPos = 0
                score = score + 1
            else
                moneybagEight.xPos = moneybagEight.xPos + 1
            end
        end
        if moneybagNine.onScreen == true then
            if moneybagNine.xPos == 48 then
                moneybagNine.onScreen = false
                moneybagNine.xPos = 0
                score = score + 1
            else
                moneybagNine.xPos = moneybagNine.xPos + 1
            end
        end
        if moneybagTen.onScreen == true then
            if moneybagTen.xPos == 48 then
                moneybagTen.onScreen = false
                moneybagTen.xPos = 0
                score = score + 1
            else
                moneybagTen.xPos = moneybagTen.xPos + 1
            end
        end
        if moneybagEleven.onScreen == true then
            if moneybagEleven.xPos == 48 then
                moneybagEleven.onScreen = false
                moneybagEleven.xPos = 0
                score = score + 1
            else
                moneybagEleven.xPos = moneybagEleven.xPos + 1
            end
        end
        if moneybagTwelve.onScreen == true then
            if moneybagTwelve.xPos == 48 then
                moneybagTwelve.onScreen = false
                moneybagTwelve.xPos = 0
                score = score + 1
            else
                moneybagTwelve.xPos = moneybagTwelve.xPos + 1
            end
        end
        if moneybagThirteen.onScreen == true then
            if moneybagThirteen.xPos == 48 then
                moneybagThirteen.onScreen = false
                moneybagThirteen.xPos = 0
                score = score + 1
            else
                moneybagThirteen.xPos = moneybagThirteen.xPos + 1
            end
        end
        if moneybagFourteen.onScreen == true then
            if moneybagFourteen.xPos == 48 then
                moneybagFourteen.onScreen = false
                moneybagFourteen.xPos = 0
                score = score + 1
            else
                moneybagFourteen.xPos = moneybagFourteen.xPos + 1
            end
        end
        if moneybagFifteen.onScreen == true then
            if moneybagFifteen.xPos == 48 then
                moneybagFifteen.onScreen = false
                moneybagFifteen.xPos = 0
                score = score + 1
            else
                moneybagFifteen.xPos = moneybagFifteen.xPos + 1
            end
        end
        if moneybagSixteen.onScreen == true then
            if moneybagSixteen.xPos == 48 then
                moneybagSixteen.onScreen = false
                moneybagSixteen.xPos = 0
                score = score + 1
            else
                moneybagSixteen.xPos = moneybagSixteen.xPos + 1
            end
        end
        if ((((moneybagOne.yPos == playerPos and moneybagOne.xPos == 47) or (moneybagTwo.yPos == playerPos and moneybagTwo.xPos == 47)) or ((moneybagThree.yPos == playerPos and moneybagThree.xPos == 47) or (moneybagFour.yPos == playerPos and moneybagFour.xPos == 47)) or ((moneybagFive.yPos == playerPos and moneybagFive.xPos == 47) or (moneybagSix.yPos == playerPos and moneybagSix.xPos == 47)) or ((moneybagSeven.yPos == playerPos and moneybagSeven.xPos == 47) or (moneybagEight.yPos == playerPos and moneybagEight.xPos == 47))) or (((moneybagNine.yPos == playerPos and moneybagNine.xPos == 47) or (moneybagTen.yPos == playerPos and moneybagTen.xPos == 47)) or ((moneybagEleven.yPos == playerPos and moneybagEleven.xPos == 47) or (moneybagTwelve.yPos == playerPos and moneybagTwelve.xPos == 47)) or ((moneybagThirteen.yPos == playerPos and moneybagThirteen.xPos == 47) or (moneybagFourteen.yPos == playerPos and moneybagFourteen.xPos == 47)) or ((moneybagFifteen.yPos == playerPos and moneybagFifteen.xPos == 47) or (moneybagSixteen.yPos == playerPos and moneybagSixteen.xPos == 47)))) then
            lives = lives - 1
        elseif score - prevLifeScore == 500 then
            prevLifeScore = prevLifeScore + 500
            lives = lives + 1
        end
        if lives == 0 then
            lose = true
        end
        if currentKey == "enter" then
            singlePlayerMenu()
            currentKey = true
        end
        tickCount = tickCount + 1
        refreshSinglePlayerGraphics()
        sleep(tickSpeed)
    until lose or gameExit
    -- End of Tick Loop
end

function singlePlayerMenu()
    term.clear()
    term.setCursorPos(1, 1)
    print("Ticks: "..tickCount.."  Score: "..score.."  Money: $"..money.."  Lives: "..lives)
    term.setCursorPos(1, 4)
    print("     ---------------------------------------     ")
    print("     |           Game is paused.           |     ")
    print("     ---------------------------------------     ")
    print("     |                                     |     ")
    SPmenuPos = 1
    while true do
        term.setCursorPos(1, 8)
        if SPmenuPos == 1 then
            print("     |          > Back to Game <           |     ")
        else
            print("     |            Back to Game             |     ")
        end
        print("     |                                     |     ")
        if SPmenuPos == 2 then
            print("     |        > Exit to Main Menu <        |     ")
        else
            print("     |          Exit to Main Menu          |     ")
        end
        print("     |                                     |     ")
        print("     ---------------------------------------     ")

        event, key = os.pullEvent("key")
        if key == 17 or key == 200 then
            SPmenuPos = 1
        elseif key == 31 or key == 208 then
            SPmenuPos = 2
        elseif key == 28 and SPmenuPos == 1 then
            break
        elseif key == 28 and SPmenuPos == 2 then
            gameExit = true
            break
        end
    end
end

function keyListener()
    while true do
        event, key = os.pullEvent("key")
        if currentKey ~= true then
            if key == 17 or key == 200 then
                currentKey = "up"
            elseif key == 31 or key == 208 then
                currentKey = "down"
            elseif key == 28 then
                currentKey = "enter"
            end
        else
        currentKey = false
        end
    end
end

function refreshSinglePlayerGraphics()
    term.clear()
    term.setCursorPos(1, 1)
    print("Ticks: "..tickCount.."  Score: "..score.."  Money: $"..money.."  Lives: "..lives)
    term.setCursorPos(48, playerPos + 1)
    print("X")
    if moneybagOne.onScreen == true then
        term.setCursorPos(moneybagOne.xPos, moneybagOne.yPos + 1)
        print(">$")
    end
    if moneybagTwo.onScreen == true then
        term.setCursorPos(moneybagTwo.xPos, moneybagTwo.yPos + 1)
        print(">$")
    end
    if moneybagThree.onScreen == true then
        term.setCursorPos(moneybagThree.xPos, moneybagThree.yPos + 1)
        print(">$")
    end
    if moneybagFour.onScreen == true then
        term.setCursorPos(moneybagFour.xPos, moneybagFour.yPos + 1)
        print(">$")
    end
    if moneybagFive.onScreen == true then
        term.setCursorPos(moneybagFive.xPos, moneybagFive.yPos + 1)
        print(">$")
    end
    if moneybagSix.onScreen == true then
        term.setCursorPos(moneybagSix.xPos, moneybagSix.yPos + 1)
        print(">$")
    end
    if moneybagSeven.onScreen == true then
        term.setCursorPos(moneybagSeven.xPos, moneybagSeven.yPos + 1)
        print(">$")
    end
    if moneybagEight.onScreen == true then
        term.setCursorPos(moneybagEight.xPos, moneybagEight.yPos + 1)
        print(">$")
    end
    if moneybagNine.onScreen == true then
        term.setCursorPos(moneybagNine.xPos, moneybagNine.yPos + 1)
        print(">$")
    end
    if moneybagTen.onScreen == true then
        term.setCursorPos(moneybagTen.xPos, moneybagTen.yPos + 1)
        print(">$")
    end
    if moneybagEleven.onScreen == true then
        term.setCursorPos(moneybagEleven.xPos, moneybagEleven.yPos + 1)
        print(">$")
    end
    if moneybagTwelve.onScreen == true then
        term.setCursorPos(moneybagTwelve.xPos, moneybagTwelve.yPos + 1)
        print(">$")
    end
    if moneybagThirteen.onScreen == true then
        term.setCursorPos(moneybagThirteen.xPos, moneybagThirteen.yPos + 1)
        print(">$")
    end
    if moneybagFourteen.onScreen == true then
        term.setCursorPos(moneybagFourteen.xPos, moneybagFourteen.yPos + 1)
        print(">$")
    end
    if moneybagFifteen.onScreen == true then
        term.setCursorPos(moneybagFifteen.xPos, moneybagFifteen.yPos + 1)
        print(">$")
    end
    if moneybagSixteen.onScreen == true then
        term.setCursorPos(moneybagSixteen.xPos, moneybagSixteen.yPos + 1)
        print(">$")
    end
end

function multiPlayer()

end

function packetListener()
    while true do
        id, message = rednet.receive()
        if id == opcompid then
            packet = message
        end
    end
end



titleScreen()