Vad är det jag hör om att man inte kan ha en variabel pause? Typ i mitt
blinka-lysdiod-test så skulle jag vilja att pausen minskade men en ms varje loop.. Går inte det?
Variabel tid?
Kod: Markera allt
For A:=1 to 1000 do
Begin
Ms_delay(1);
If Status='Bryt' then
Begin
{Gör något}
A:=A+1;
End;
End;Edit:
En lite bättre variant:
Kod: Markera allt
Status:='Run';
RunTime:=1000; //Variabel tid att vänta.
repeat
begin
Delay_us(1);
De:=De+1;
If De>=RunTime then
Begin
Status:='Stop';
End;
If Status='Hmmm' then
Begin
{Gör något annat}
De:=De-1;
End;
If De<1 then
Begin
De:=0;
End;
end;
until Status = 'Stop';ge 'Hmmm' eller 'Run' & vid uppnådd tid 'Stop'.
Edit: Byte ut 'Pause' till 'Hmmm' efter att $tiff på pekade detta.
Tack.
Senast redigerad av lgrfbs 29 juli 2006, 17:46:51, redigerad totalt 1 gång.
Mitt ninlägg var egentligen riktat åt Mignon, men det träffade visst lgrfbs' kod kod också.
Generellt ska man vara försiktigt med alldeles för logiska och enkla namn på sina varibler, eftersom de med största sannolikhet då är reserverade. Man bör alltid upp sådant innan man kör igång med något nytt språk, det är inte säkert på att kompilatorn är trevlig nog att tala om för en precis vad felet beror i.
Generellt ska man vara försiktigt med alldeles för logiska och enkla namn på sina varibler, eftersom de med största sannolikhet då är reserverade. Man bör alltid upp sådant innan man kör igång med något nytt språk, det är inte säkert på att kompilatorn är trevlig nog att tala om för en precis vad felet beror i.
