Sorry your browser is not supported!

Function HandleCollision()
    if ball.flag = 0 and GetSpriteCollision ( player.sprite, ball.sprite ) = 1
        PlaySound(hit_sound)
        ball.flag = 1    // That way the collision will be tested just once
        // invert ball y and x
        ballmid = GetSpriteXByOffSet(ball.sprite)
        playermid = GetSpriteXByOffSet(player.sprite)
        diff = playermid - ballmid
        ball.yv# = ball.yv# * -1
        if (ballmid < playermid-)
            // left edge
            diff = playermid - ballmid
            ball.xv# = - INITIAL_VELOCITY_BALL_X - (diff/ 5) - velocity_increase
        else
            if (ballmid > playermid + 5)
                diff = ballmid - playermid
                ball.xv# = INITIAL_VELOCITY_BALL_X + (diff/ 5) + velocity_increase
            else
                // perfect middle -5 +5
                ball.xv# = INITIAL_VELOCITY_BALL_X  + velocity_increase
                // 50% chance of inverting the signal
                RandomSign(ball.xv#)
            endif
        endif
        Log("Ball X Player collision. (" + Str(playermid) + "/" + Str(ballmid) + ") Diff = " + str(diff) + ", xv=" + str(ball.xv#))

    EndIf
    // turn off flag for collision check
    If ball.flag = 1 and GetSpriteCollision ( player.sprite, ball.sprite ) = 0
        // ball had collided with player, and now just left it
        ball.flag = 0
    EndIF
EndFuntcion

if ball.flag = 0 and GetSpriteCollision ( player.sprite, ball.sprite ) = 1

        anglel = 15.0
        angleh = 165.0
        factor as float
        ballmid as float
        angle_rad as float
        angle as float

        PlaySound(hit_sound)
        IncreaseBallSpeed()
        ball.flag = 1    // That way the collision will be tested just once
        // invert ball y and x
        ballmid = (ball.x#) - GetSpriteX(player.sprite)
        factor = ballmid / player.width
        // keep factor constrained
        if (factor < 0)
            factor = 0.001
        else
            if (factor > 1)
                factor = 0.999
            endif
        endif
        if (factor = 0.5)
            //exactly in the middle
            factor = 0.49
        endif
        // get the angle calculation
        angle = angleh - factor * (angleh - anglel)
        ball.angle = angle * (3.141517 / 180)
        ball.xv = velocity_increase * CosRad(ball.angle)
        ball.yv = -(velocity_increase * SinRad(ball.angle))
endif