// pintar soga

  for (int a=1;a<30;a++)
    cprintf("Û");
  gotoxy(8,21);
  for (int b=1;b<26;b++)
    cprintf("Û");
  for (int f=1,y=20;f<=17;f++,y--) {
    gotoxy(19,y);
    for (int c=1;c<=4;c++)
      cprintf("Û");
  }
  for (int d=1;d<44;d++)
    cprintf("Û");
  gotoxy(64,3);
  cprintf("Û");
  gotoxy(65,3);
  cprintf("Û");
  gotoxy(64,5);
  cprintf("Û");
  gotoxy(65,5);
  cprintf("Û");
  for (int g=1,y2=4;g<=5;g++,y2++) {
    gotoxy(62,y2);
    textcolor(14);
    cprintf("Û");
  }
// Inicializaci¢n de la soga.
  soga [0][2]='Û';soga [1][1]='Û';soga [1][3]='Û';soga [2][0]='Û';
  soga [2][4]='Û';soga [3][1]='Û';soga [3][3]='Û';soga [4][2]='Û';

  for (int jfila=0;jfila<=4;jfila++)
    for (int jcolumna=0;jcolumna<=4;jcolumna++) {
      gotoxy (jcolumna+60,jfila+8);
      if (soga[jfila][jcolumna]=='Û') {
	textcolor(14);
	cprintf ("%c",soga[jfila][jcolumna]);
      }
    }
// Inicializaci¢n de la cabeza.
  cabeza [0][3]='Û';cabeza [1][2]='Û';cabeza [2][1]='Û';cabeza [3][0]='Û';
  cabeza [4][1]='Û';cabeza [5][2]='Û';cabeza [6][3]='Û';cabeza [5][4]='Û';
  cabeza [4][5]='Û';cabeza [3][6]='Û';cabeza [2][5]='Û';cabeza [1][4]='Û';
  cabeza [1][3]='Û';cabeza [2][3]='Û';cabeza [3][3]='Û';cabeza [4][3]='Û';
  cabeza [5][3]='Û';cabeza [2][2]='Û';cabeza [3][2]='Û';cabeza [4][2]='Û';
  cabeza [3][1]='Û';cabeza [2][4]='Û';cabeza [3][4]='Û';cabeza [4][4]='Û';
  cabeza [3][5]='Û';cabeza [4][5]='Û';
  for (jfila=0;jfila<=6;jfila++)
    for (jcolumna=0;jcolumna<=6;jcolumna++) {
      gotoxy (jcolumna+60,jfila+7);
      if (cabeza[jfila][jcolumna]=='Û') {
	textcolor(6);
	cprintf ("%c",cabeza[jfila][jcolumna]);
      }
    }
// fin pintar soga