tfm.exec.disableAutoShaman(true)
tfm.exec.disableAutoNewGame(true);
tfm.exec.newGame("@4734030")
maps={"@2386206", "@2221623", "@2186198", "@4734030"}
    function eventLoop(timePassed, timeLeft)
    if alive == 0 or timeLeft < 1000 then
        nextRound();
    end
end
function nextRound()
    tfm.exec.newGame(maps[math.random(#maps)]);
end

function eventNewGame()
    alive=0
    for name,player in pairs(tfm.get.room.playerList) do
        alive=alive+1
end
end


         local players = {}
            local objects = {}

            function main()
                    objects = queue.new()
                    tfm.exec.disableAutoScore(false)
                    tfm.exec.disableAutoShaman(true)
                    tfm.exec.setUIMapName('<ROSE> </B>                                    #SNIPER                                      ')
            end
            print("<rose>Welcome to new game - Sniper! [TUTORIAL] Use the mouse to aim and shoot!")
                      function eventNewGame()
                    players = {}
                    for name in pairs(tfm.get.room.playerList) do
                            initPlayer(name)
                    end
            end

            function initPlayer(name)
                    players[name] = {ammo = 0}
                    ui.addTextArea(0, "", name, 10, 30, 6 * 15, 20, 0x010101, 0x000000, 0.5)
                    system.bindMouse(name, true)
            end

            function eventMouse(name, x, y)
                    local player = players[name]
                    if player and player.ammo > 0 then
                            -- remove one ammo
                            ui.removeTextArea(player.ammo * 2 - 1, name)
                            ui.removeTextArea(player.ammo * 2, name)
                            player.ammo = player.ammo - 1

                            local roomPlayer = tfm.get.room.playerList[name]

                            -- calculate angle between player and click
                            local dx = x - roomPlayer.x
                            local dy = y - roomPlayer.y
                            local angle = math.atan2(dy, dx)

                            -- calculate speeds to direct arrow and always have the same total speed
                            local vx = math.cos(angle)
                            local vy = math.sin(angle)

                            -- spawn arrow and add to queue
                            queue.insert(objects, tfm.exec.addShamanObject(35, roomPlayer.x + 20 * vx, roomPlayer.y + 20 * vy, angle*180/math.pi, 50 * vx, 50 * vy, false))

                            local recoil = -vx * 10
                            -- workaround to avoid argument exception bug
                            if recoil <= -1 or recoil >= 1 then
                                    tfm.exec.movePlayer(name, 0, 0, true, recoil, 0, true)
                            end

                            -- remove first arrow when there are too many
                            if objects.size > 10 then
                                    tfm.exec.removeObject(queue.remove(objects))
                            end
                    end
            end

            local loopCount = 0
            function eventLoop()
                    -- loopCount resets after a certain amount
                    if loopCount == 0 then
                            ammo()
                    end
                    loopCount = (loopCount + 3) % 2
            end

            function ammo()
                    for name, player in pairs(players) do
                            local ammo = player.ammo
                            if ammo < 6 then
                                    -- add one ammo
                                    player.ammo = ammo + 1
                                    ui.addTextArea(ammo * 2 + 1, "", name, 14 + ammo * 15, 39, 3, 3, 0x990000, 0x990000, 1)
                                    ui.addTextArea(ammo * 2 + 2, "", name, 15 + ammo * 15, 40, 1, 1, 0xff0000, 0xcc0000, 1)

                            end
                    end
            end

            function eventNewPlayer(name)
                    initPlayer(name)

            end


            function eventPlayerWon(name)

            end


            -- simple queue for performance, much faster than system table queues, can contain nils
            queue = {}
            function queue.new()
                    return {
                            tail = nil,
                            head = nil,
                            size = 0
                    }
            end
            function queue.insert(self, v)
                    local i = {
                            value = v,
                            next = nil
                    }
                    if self.tail and self.head then
                            self.tail.next = i
                    else
                            self.head = i
                    end
                    self.tail = i
                    self.size = self.size + 1
            end
            function queue.peek(self)
                    if self.head then
                            return self.head.value
                    else
                            error("queue is empty")
                    end
            end
            function queue.remove(self)
                    local r = queue.peek(self)
                    self.head = self.head.next
                    if not self.head then
                            tail = nil
                    end
                    self.size = self.size - 1
                    return r
            end


    function eventChatCommand(name,command)
    if command == "credits" then
    ui.addPopup(1, 0, "Creators: Ovcapolska & Kubaws. Thanks for: Gunitor.", name, 280, 100, 270)
    elseif command== "q" then
    for p in pairs(tfm.get.room.playerList) do
    tfm.exec.setNameColor("Ovcapolska",0x12cd5f)
    tfm.exec.setNameColor("Kubaws",0x12cd5f)
            end
        end
    end

            main()