[Pascal] dzwięk

Odpowiedz Nowy wątek
2003-01-17 17:29

Rejestracja: 17 lat temu

Ostatnio: 15 lat temu

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] !!!

Pozostało 580 znaków

2003-01-17 17:40

Rejestracja: 17 lat temu

Ostatnio: 1 rok temu

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.

Pozostało 580 znaków

2003-01-17 18:00
Moderator

Rejestracja: 17 lat temu

Ostatnio: 16 minut temu

0

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

Pozostało 580 znaków

2003-01-17 18:50

Rejestracja: 17 lat temu

Ostatnio: 10 lat temu

0

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


Pozostało 580 znaków

2003-01-17 20:23

Rejestracja: 17 lat temu

Ostatnio: 15 lat temu

0

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

Pozostało 580 znaków

Anonim
2003-01-18 00:58
Anonim
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;

Pozostało 580 znaków

Odpowiedz

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