[Pascal] pytanie o kursor

0

czy wie ktos jak zrobic zeby w trybie tekstowym kursor nie byl widoczny?

0

Procedure coff; {wyłączanie kursora}
Begin
Asm
mov AH,3
int 10h
Or CH,20h
mov AH,1
int 10h
End;
End;

Procedure con; {włączanie kursora}
Begin
Asm
mov AH,3
int 10h
and CH,0DFh
mov AH,1
int 10h
End;
End;

0

A może tak ?:


procedure kursor_wylacz; assembler;
asm
mov ah,01h;
mov ch,10h;
mov cl,00h
int 10h;
end;

procedure kursor_wlacz; assembler;
asm
mov ah,01h;
mov ch,07h;
mov cl,08h;
int 10h
end;

1 użytkowników online, w tym zalogowanych: 0, gości: 1