5.0 - Период автоповтора
1000 - задержка автоповтора
ScrollLock- Наименование светодиода
Короче, надо сделать, что бы этот светодиод мигал (отключался и включался попеременно)
:rose:
uses crt;
Procedure ScrollON_OFF;
var b:byte absolute $0000:$0417;
begin
b:=b xor 16;
end;
begin
repeat
scrollON_OFF;
delay(200);
until keypressed;
end.