/* EasyCalc 2.0 Arexx Script */

options results

'getresponse "This script makes the cursor bounce around the screen" "_Begin"'

quit = 0
dx=1
dy=1

getmincol
minx = result

getminrow
miny = result

getmaxrow
maxy = result

getmaxcol
maxx = result

cx = minx

cy = miny

easytofront

do while quit < 100

  movecursor cx cy
  cx = cx + dx
  cy = cy + dy
  
  if (cx = maxx - 1) then
    dx = -dx

  if (cx = minx ) then
    dx = -dx

  if (cy = maxy - 1) then
    dy = -dy

  if (cy = miny ) then
    dy = -dy

  quit = quit + 1
end