mit Mikrofon Aufnehmen...
Übersicht BlitzBasic Allgemein
joachim_neuBetreff: mit Mikrofon Aufnehmen... |
Mi, Dez 17, 2003 16:13 Antworten mit Zitat |
|
---|---|---|
Hallo,
kann man mit BlitzBasic2D von einem Mikrofon etwas afnehmen und in eine Sound-Datei schreiben??? thx JOACHIM NEU |
||
http://www.joachim-neu.de | http://www.orbitalpirates.de | http://www.middleageworld.de |
Jan_Ehemaliger Admin |
Mi, Dez 17, 2003 16:14 Antworten mit Zitat |
|
---|---|---|
Nein, nur mit Userlibs! | ||
between angels and insects |
joachim_neuBetreff: ... |
Mi, Dez 17, 2003 16:27 Antworten mit Zitat |
|
---|---|---|
Was sind UserLibs??? Sie die bei BB2D mitgeliefert???
mfg JOACHIM NEU |
||
http://www.joachim-neu.de | http://www.orbitalpirates.de | http://www.middleageworld.de |
Gossi |
Mi, Dez 17, 2003 16:41 Antworten mit Zitat |
|
---|---|---|
Ich weiß dass es mit DLL's geht, da ich es damit selbst schon gemacht hab. Ich weiß aber nicht mehr welche das war. | ||
joachim_neuBetreff: ... |
Mi, Dez 17, 2003 16:45 Antworten mit Zitat |
|
---|---|---|
mist,
ich nehme mir nähmlich immer so eine Sendung im Radio auf, und da wollte ich das an den Tagen, an denen ich nicht da bin das per Task vom Computer machen lassen. mfg JOACHIM NEU |
||
http://www.joachim-neu.de | http://www.orbitalpirates.de | http://www.middleageworld.de |
Vertex |
Mi, Dez 17, 2003 17:06 Antworten mit Zitat |
|
---|---|---|
Code: [AUSKLAPPEN] ; ----------------------------------------------------------------------------
Zitat:Global Window = CreateWindow("Soundrecording" ,200,200,143,120,0,1) Global Button1 = CreateButton("Aufnahme Start" ,5,05,128,20,Window) Global Button2 = CreateButton("Aufnahme Pause" ,5,27,128,20,Window) Global Button3 = CreateButton("Aufnahme Stop" ,5,49,128,20,Window) Global Button4 = CreateButton("Aufnahme apspielen",5,71,128,20,Window) Global Path$ = "C:\Test.wav" Global RS = CreateBank(128) Global Pause = 1 ; ---------------------------------------------------------------------------- ; ---------------------------------------------------------------------------- While WaitEvent() <> $803 If EventID() = $401 Select EventSource() Case Button1 : Button1_Click() Case Button2 : Button2_Click() Case Button3 : Button3_Click() Case Button4 : Button4_Click() End Select EndIf Wend End ; ---------------------------------------------------------------------------- ; ---------------------------------------------------------------------------- Function Button1_Click() Space(RS,128) mciSendString("open new type waveaudio alias capture",RS,128,0) mciSendString("record capture",RS,128,0) DisableGadget Button1 EnableGadget Button2 EnableGadget Button3 DisableGadget Button4 End Function Function Button2_Click() If Pause = 1 Then mciSendString("pause capture",RS,128,0) SetGadgetText Button2,"Aufnahme weiter" : Pause = 0 DisableGadget Button1 DisableGadget Button3 DisableGadget Button4 Else mciSendString("record capture",RS,128,0) SetGadgetText Button2,"Aufnahme Pause" : Pause = 1 DisableGadget Button1 EnableGadget Button3 DisableGadget Button4 EndIf End Function Function Button3_Click() Space(RS,128) mciSendString("stop capture",RS,128,0) mciSendString("save capture " + Path$,RS,128,0) mciSendString("close capture",RS,128,0) EnableGadget Button1 DisableGadget Button2 DisableGadget Button3 EnableGadget Button4 End Function Function Button4_Click() sndPlaySound(Path$,0) EnableGadget Button1 DisableGadget Button2 DisableGadget Button3 End Function ; ---------------------------------------------------------------------------- ; ---------------------------------------------------------------------------- Function Space(Bank,Count) Local I For I = 1 To Count PokeByte Bank,I - 1,Asc(" ") Next End Function ; ---------------------------------------------------------------------------- .lib "winmm.dll" mciSendString%(lpstrCommand$,lpstrReturnString%,uReturnLength%,hwndCallback%) : "mciSendStringA" sndPlaySound%(lpszSoundName$,uFlags%) : "sndPlaySoundA" mfg olli |
||
Master C |
Mi, Dez 17, 2003 17:13 Antworten mit Zitat |
|
---|---|---|
Er hat doch gesagt BB2D. Das unterstützt weder Buttons, Fenster oder Userlibs. | ||
Vertex |
Mi, Dez 17, 2003 17:19 Antworten mit Zitat |
|
---|---|---|
Ja, aber falls es andere gerne wissen möchten
Aber ich könnte ja mal ne Wrapper für B2D schreiben. mfg olli |
||
Plasma(alt)Betreff: aufnehmen |
Mi, Dez 17, 2003 18:09 Antworten mit Zitat |
|
---|---|---|
geht auch mit b2d | ||
ApocalypticBetreff: Re: aufnehmen |
Mi, Dez 17, 2003 18:20 Antworten mit Zitat |
|
---|---|---|
Plasma hat Folgendes geschrieben: geht auch mit b2d
Was meinst du? Userlibs funktionieren auf gar keinen Fall unter B2D... |
||
Suum cuique
[ www.ffs-net.de.vu ] [ Raycaster ] |
lettorTrepuS |
Fr, Dez 19, 2003 3:16 Antworten mit Zitat |
|
---|---|---|
-aus Sicherheitsgründen gelöscht- Diese Information ist mit Ihrer Sicherheitsfreigabe leider nicht erhältlich, Bürger. | ||
Übersicht BlitzBasic Allgemein
Powered by phpBB © 2001 - 2006, phpBB Group