Primeiro Desenho em Pascal

Bom. Como meu primeiro desenho em Pascal é bem recente, me lembro bem. Foi feito na primeira aula de PC sobre o programa, seguindo a lista de desafios, porém, fiz do último para o primeiro. Então ai está:




Não é lá grandes coisas mas até que é legalzinho =D.
Tá ai o codigo para quem quiser copiar a minha facanha: (x.x aheuaheuahuae)

program desafio10fvm;
{desafio 10}
begin
{Comandos}
pfrente(100);
pdireita(90);
pfrente(100);
pdireita(90);
pfrente(100);
pdireita(90);
pfrente(100);
pdireita(-150);
pfrente(30);
pdireita(-30);
pfrente(100);
pdireita(-90);
pfrente(100);
pdireita(-90);
pfrente(100);
pdireita(-90);
pfrente(100);
un;
pfrente(-100);
pdireita(120);
ul;
pfrente(30);
un;
pdireita(150);
pfrente(100);
pdireita(30);
pfrente(30);
pfrente(-30);
ul;
pfrente(30);
pdireita(60);
un;
pfrente(100);
ul;
pdireita(120);
pfrente(30);
dt;
end.

Espero que tenham curtido