Komenda "delay(x);" W Pascal-u

[kuicets]

Otóż...

 

niby delay(1000) ma wprowadzić 1 sekundową przerwę a tu zonk. Dopiero ja dam 160000 (czyli 2x delay(60000); i delay(40000);) to wychodzi mi sekunda.

 

Na przykładzie...

 

sound(440);

delay(1000);

nosound;

 

Ma wydawac dzwięk "a" przez 1 sekunde, a tu ledwo pierdnie...

 

dopiero:

sound(440);

delay(60000);

delay(60000);

delay(40000);

nosound;

 

daje pożądany efekt.

 

Wszsytko by było git, gdybym tylko ja korzystal z tego programu. Jak na innym kompie go uruchamiam, to dzwięk trwa bardzo dlugo - czasem dłużej czasem krocej, czasem w sam raz :). Jak to jakoś UJEDNOLICIĆ???

 

Pozdrawiam...

 

P.S. (mój kompilator to Turbo Pascal 7.1);

[luminat]

Potrzebny jest Ci poprawiony modul crt, poniewaz na komputerach klasy P200 (i szybszych) funkcja delay nie dziala prawidlowo.

[kuicets]

A skąd dostać i jak zainstalować poprawiony moduł CRT?

[luminat]

www.google.pl (wynik szukania dla slow: 'delay pascal')

 

http://pascal.lo2.opole.pl/kompilatory.html (modul crt)

http://www.cku.torun.pl/Pascal/pascal.htm (howto)

 

Tylko nie mow, ze nie mogles znalezc. Czyste lenistwo!