PROGRAMA EN 'C' QUE CREA UN GUSANITO.

#include"stdio.h"
#include"conio.h"
#include"dos.h"
char cadena[21];
int x,y;
main()
{
clrscr();
gotoxy(2,1);printf("cadena:");
scanf("%s",cadena);
for(x=2;x<=74;x++)
{
clrscr();
gotoxy(x,1);printf("%s",cadena);
delay(50);
}
for(x=74;x>=2;x--)
{
clrscr();
gotoxy(x,25);printf("%s",cadena);
delay(50);
}
for(y=1;y<=25;y++)
{
clrscr();
gotoxy(2,y);printf("%s",cadena);
delay(50);
}
for(y=25;y>=1;y--)
{
clrscr();
gotoxy(74,y);printf("%s",cadena);
delay(50);
}
clrscr();
printf("%s",cadena);
getch();
return 0;

}