Witam, chciałbym dodać do swojego programu wygaszacz. Wygaszacz mam juz gotowy (wstawki assemblera) ale nie wiem jak zrobić aby wygasz włączył się 60 sekund po ostatnim naciśnięciu klawisza. Macie jakiś pomysł jak to zrobić?
0
0
To przy nacisnieciu guzika wlacz ttimera i ustaw go na 60 sekund. w procedurze timera daj polecenie by wlaczlyl wygaszacz i sam się wylaczył.
Lub daj slepa Sleep(60000); a
0
Dodam, że robię to we Free Pascal.
0
heh... To może coś takiego:
program wygaszacz;
uses
crt;
var
x:integer;
begin
clrscr;
while 0=0 do
begin
x:=0;
repeat
delay(1000);
inc(x);
if x=60 then
begin
clrscr;
writeln('wygaszacz');
end;
until keypressed
end;
end.
Troche pozmieniaj i moze cos wymyslisz ;)
0
Podepnij się pod przerwanie zegarowe.