come mai mi da errore su read(kbd, opzione) ????????

codice:
program Graf1(input, output); 
uses crt, graph3; 
var x, y, x1, y1: integer; 
    opzione: char; 
begin 
  graphcolormode; 
  gotoxy(5,24); 
  write('Premi esc per uscire'); 
    repeat 
      begin 
        x:=random(319); 
        y:=random(150); 
        x1:=random(319); 
        y1:=random(150); 
        plot(x+1, y+1, 2); 
        draw(x, y, x1, y1, 3); 
      end; 
    read(kbd, opzione); 
    until (opzione=#27); 
    textmode(co80); 
end.
e come posso correggere????????

help me! please...

ah... come compilatore sto usando il TurboPascal7

GRAZIE!