//this is the program's source code, its really simple, i have rounded the gravity to 9m/s and made a pixel 10 meters. sorry for the Turkish comments. 
const clamp = (val, min, max) => Math.min(Math.max(val, min), max)
var b_x, b_y;
var b_r;
var b_vely, b_velx;
var radiuscontroller;
function setup() {
  radiuscontroller = createSlider(4, 100);
  radiuscontroller.position(10,410)
  radiuscontroller.value(30);
  b_velx = 0;
  b_x = 200;
  b_y = 0;
  b_r = 30;
  b_vely = 1;
  createCanvas(400, 400);
  
}

function draw() {
  handleEvents();
  b_r = radiuscontroller.value();
  background(220);
  line(0,200,400,200);
  
  
  fill(122,122,255)
  rect(0,200,400,200);
  fill(255,255,255)
  ellipse(b_x, b_y%400, b_r*2, b_r*2);
  
  
  text("x="+mouseX+"y="+mouseY,mouseX,mouseY)
  b_y = clamp(b_y + b_vely,-5000, 400);
  b_x = clamp(b_x + b_velx,0+b_r, 400 - b_r);
  //batmazlık = yoğunluk * yerçekimi * derinlik(aslında alan ama olsun :])
  if(b_y+b_r>200) {
    b_vely-= 1*0.01*(b_y-200);
  }
  b_velx *= 0.99;
  b_vely+=0.1;
  b_vely=clamp(b_vely*0.99,-300,300)
  //b_vely += 9.3;
}
function handleEvents() {
  //handle arrows
  if (keyIsDown(LEFT_ARROW)) {
    b_velx -= 0.1;
  }
  if (keyIsDown(RIGHT_ARROW)) {
    b_velx += 0.1;
  }
  if (keyIsDown(UP_ARROW)) {
    b_vely -= 0.06;
  }
  if (keyIsDown(DOWN_ARROW)) {
    b_vely += 0.06;
  }
}