Te doy una idea:

Crea un array unidimensional y haz que se imprima entero en la pantalla en horizontal, entonces por defetca dibuja el tronco en la posicion que quieras, imagino que lo dibujas con carácteres iguales. Para moverlo simplemente haz que el vector n+1 del array pase a tener el valor de n (del anterior). No se si me he explicado  pero es una forma sencilla para desplazar.

Otra cosa que puedes hacer en pascal es utilizar "GotoX" para desplazar carácteres en pantalla en este caso de forma horizontal. Si quisieras de forma vertical sería con GotoY.

Espero haberte dado ideas. Utiliza esos comandos (gotox) dentro de un for que recorra la posición por pantalla, no es dificil de utilizar. Por google veras muchos ejemplos y es muy sencillo de hacer.

jajaja yo quiero ver eso

te puedo ayudar, ya que ando metido en la programacion de juegos, y ando probando con pascal(free pascal)

Pero como preguntaron antes, que modo visual usas? consola?