procedure kujund;
begin
 textbackground(black); textcolor(14);
 gotoxy(47, 1); write ('É');
 for i:=48 to 79 do write('Í');
 for i:=2 to 12 do
 begin
  gotoxy(47, i); write('º');
  gotoxy(80, i); write('º');
 end;
 gotoxy(47,13); write('È');
 for i:=48 to 79 do write('Í');
 gotoxy(80, 1); write('»');
 gotoxy(80, 13); write('¼');
 gotoxy(49,2); textcolor(12+blink); write('        Press 2 times: '); textcolor(7);
 gotoxy(49,3); write('n'); textcolor(14);
 gotoxy(50,3); write ('-if you want to move ');
 gotoxy(49,4); write('  to the next level  '); textcolor(9);
 gotoxy(49,5); write('r'); textcolor(14);
 gotoxy(50,5); write ('-if you want to repeat');
 gotoxy(49,6); write('  this level'  ); textcolor(10);
 gotoxy(49,7); write('p'); textcolor(14);
 gotoxy(50,7); write ('-if you want to move ');
 gotoxy(49,8); write('  to the previous level'); textcolor(11);
 gotoxy(49,9); write('q'); textcolor(14);
 gotoxy(50,9); write ('-if you want to finish');
 gotoxy(49,10);write('  your game'); textcolor(13);
 gotoxy(49,11);write('s'); textcolor(14);
 gotoxy(50,11);write ('-if you want to start');
 gotoxy(49,12);write('  the game again');
end;