[Pascal] dzwięk

0

czy w dzwięku w pascalu było uses crt czy co innego

a i jeszcze jedno. jaka była komenda żeby zrobił dzwięk (z procesorka)

pomóżcie [jelen] !!!

0

eeeeeeeeeeeeeeehhhhhhhhhhhh

procedure mysound(soun,dela:integer);
begin
sound(soun);
delay(dela);
end;

begin
mysound(150,50);
end.

możesz też zrobić z wczytywaniem parametru soun:

var s:integer;
begin
write('Podaj soun: ');
readln(s);
mysound(s,1000);
end.

aha 1000 = 1sec.

0

dzwięk z procesorka? chyba odgłos spalania się jego :)
polecenie Sound(1000) na przyklad...

0

A na końcu to raczej powinno być NoSound; [nuda]

0

dzięki rudy, bo mi ipczało i cholera wiedziała jak to wyłączyć [szok]

0

programuje w delphi ale cos tam pamiętam z TP masz kodzik nie wiem czy jest dobry ale powinien:

w jakąs procedurke wpisz:
np.
begin
Sound(100); {oznacza wysokosc dzwieku}
Delay(100); {dlugosc tego dzwieku ile ma czasu trwac 1000 odp. 1s}
NoSound; {wyloncza dzwiek}
end;

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