Juego de Pelota en Pascal

Hola, necesito ayuda en un programa en Pascal donde el programa deba contener un procedimiento que simule el rebote de una pelotita en dos postes. No puede llevar gráficos, solo modo texto y la pelotita puede ser sustituida por la letra O.