Kuuletko ääntä?

[Alligaattori]

Lataa tästä tarvittava dll: http://www.freewebs.com/files-of-cppner ... speakr.dll

ja tallenna tämä koodi kansioon, johon latasit dll:än ja aja se CB:llä:

Code: Select all

SCREEN 320,240
FrameLimit 30
SAFEEXIT OFF
SetWindow "",0,"Jos piipittävä ääni kuuluu ja painat OK, ääni saattaa jäädä päälle. Haluatko varmasti lopettaa?"

Function Sound(frequency)
    If frequency = 0 Then
        NoSound()
    Else
        CallDLL "pcspeakr.dll","pcspeaker_snd_"+Str(10(Int(frequency/10)))+"Hz" 
    End If
End Function 

Function NoSound()
    CallDLL "pcspeakr.dll","pcspeaker_off"
End Function

t=0

Repeat
    oldsnd=snd
    If t Mod 7 = 0 Then
        snd = Not snd
    End If
    Text 0,0,"Jos kuulet tasaisesti piipittävän"
    Text 0,TextHeight(" "),"äänen, vastaa kyselyyn KYLLÄ."
    Text 0,TextHeight(" ")*3,"Muussa tapauksessa vastaa EI."
    Text 0,TextHeight(" ")*5,"Poistu painamalla jotakin näppäintä"
    If snd<>oldsnd Then
        Sound(snd*1500)
    End If
    DrawScreen
    t=t+1
Until GetKey()

NoSound()

Jos tietokoneesta kuuluu piipittävä ääni, voit vastata Kyllä.

Tarvitsen tuloksia pelien kehitykseen. Jos tämä toimii suurimmalla osalla koneista, voin tehdä musiikkia, joka puristuu levyllä erittäin pieneen tilaan.
Musiikkiformaatin olen jo tehnyt, ei tarvitse kenenkään koodarin ruveta sellaista tekemään.

[koodaaja]

Veikkaisin, että suurimmassa osassa pöytäkoneita on biipperi. Tosin jos sillä soitat musiikkia, tulee aika ysärimeininki. Joskaan ei kovin pahassa mielessä : D

[m1c]

Otahan toki huomioon, että kaikilla ei varmastikkaan ole piipperi kytkettynä. Itseäni alkoi ainakin ärsytti kovasti sen ääni ja en ole muutamaan viime koneeseen viitsinyt laittanut sitä ollenkaan kiinni. Midiäänet olisi varmaan ihan hyvä vaihtoehto? Niiden käyttämiseen voisi riittää jo pelkkä cb:n oma dll-tuki ja cbsdk:ssa saattaa ollakkin siihen jo valmiit funktiot.

[koodaaja]

Itse olen viimeksi kuullut piipperin äänen (jos ei koulun koneilla leikkimistä lasketa) kuukausia sitten, joten ei ainakaan itseäni käy piipperi pahemmin häiritsemään - kun ei siitä juuri ikinä mitään kuulu.

[Koodiapina]

Kyllä. Ärsyttävää kun tuo sama ääni kuuluu esim. BIOSsia avatessa.

[Awaclus]

Juu, kuuluu kyllä, muttei piipperistä. Vaan kaiuttimista. QBasicillakin tehdyistä peleistä saa kaikki rasittavat piipperiäänet pois hiljentämällä kaiuttimet. Joten en tiedä, pitäisikö vastata kyllä vai ei.

[elmo123]

Kyllä kuuluu, windows 98 käytössä

[tuhoojabotti]

Juu, kuuluu kyllä, muttei piipperistä. Vaan kaiuttimista. QBasicillakin tehdyistä peleistä saa kaikki rasittavat piipperiäänet pois hiljentämällä kaiuttimet. Joten en tiedä, pitäisikö vastata kyllä vai ei.

tarkoitushan oli kokeilla saako siitä ääntä pistät kajarit/äänet pois päältä ja vastaat ei kuulu on aika tyhmää...

[elmo123]

Hmm, vaikuttaa siltä, että et huomioinut lainkaan CB:n CallDLL:än parametrinvälitysominaisuuksia, jotka toimivat muistipaloilla. Olet varmaan tehnyt erikseen parametritunnistuksen komennolle, vai oletko sinä raukka tehnyt jokaiselle hertsille oman komentonsa äänen soittamiseen? Olisi kannattanut käyttää muistipaloja, niim olisi ollut helpompaa

[vms100]

onneks ei kuulunu

[Alligaattori]

Hmm, vaikuttaa siltä, että et huomioinut lainkaan CB:n CallDLL:än parametrinvälitysominaisuuksia, jotka toimivat muistipaloilla. Olet varmaan tehnyt erikseen parametritunnistuksen komennolle, vai oletko sinä raukka tehnyt jokaiselle hertsille oman komentonsa äänen soittamiseen? Olisi kannattanut käyttää muistipaloja, niim olisi ollut helpompaa

Tein DLL:än FreeBASICillä kun en saanut C++:aa toimimaan. En saanut silläkään parametrien välitystä toimimaan, joten laitoin funktiot joka kymmenennelle hertsimäärälle (kääntäjä kaatui kun yritin laittaa siihen jokaista hertsimäärää). Pistin muuten CoolBasicin kirjoittamaan funktiot... aikaa meni parisen sekuntia.