bouncing ball animation in matlab

main.m
clc;
clear all;
close all;

% Initialization
x = 0; % x-position of the ball
y = 0; % y-position of the ball
vx = 0.2; % x-velocity of the ball
vy = 0.5; % y-velocity of the ball
g = 0.01; % acceleration due to gravity
dt = 0.01; % time step

% Set up figure
figure;
axes('XLim',[-1 1],'YLim',[-1 1],'Position',[0.1 0.1 0.8 0.8]);
h = rectangle('Position',[x y 0.1 0.1],'Curvature',[1 1],'FaceColor','r');

% Loop for animation
while true
    % Update position and velocity
    x = x + vx*dt;
    y = y + vy*dt;
    vy = vy - g*dt;

    % Bounce off the walls
    if x < -1 || x > 1
        vx = -vx;
    end
    if y < -1
        vy = -vy;
    end

    % Update ball position
    set(h,'Position',[x y 0.1 0.1]);

    % Pause for a short time
    pause(dt);
end
763 chars
39 lines