| |
| |
|
Matthias
Arlt | ¡Hola Personas,
después de längerer Abwesenheit veces otra vez de lo que me.
Tuve lo ya en el RGH-Foro gestellt, nun auch hier otra vez a Sicherheit... Aber zuerst veces nen schönen Gruss en el Runde !
Cuestión a unsere Modem-Experten:
Der nachfolgende Code se como Teil uno Telefon-Software dienen...
Das Modem se hierbei el Audiosignal el Telefonleitung aufgeschaltet.
Mi Überlegung war nun, el Output (después de el Messagebox) en un WAV-Expediente
a escribir o. a esta anzuhängen. Alle Versuche mittels @BlockWrite usw.
schlugen desafortunadamente fehl, como me el saubere Filterung (readcom) no gelingt...
Soweit el problema en el Foro ya angesprochen, wurde, Yo intenta, el
entsprechend einzuarbeiten, sin embargo desafortunadamente con unbefriedigendem Ergebnis.
Tal vez ha hier alguien una hilfreiche Concepto oder gar ne probate Solución.
Theoretisch debería lo sí eigentlich machbar ser !
Freue me de cualquier Referencia !
Matthias
---------------------------------------------------------------------------
Code-Auszug:
declarar com%,com$,ende%
declarar comm#,lperror&,Byte%,szRxChar#,dwBytesRead&,ovRead#
dim comm#,12
dim ovRead#,20
dim szRxChar#,65000
proc comread
clear comm#,lperror&,Byte%,szRxChar#,dwBytesRead&,ovRead#,com$
external(kernel32.dll,ClearCommError,com%,addr(lperror&),comm#)
dwBytesRead&=@long(comm#,4)
if dwBytesRead& > 0
external(kernel32.dll,ReadFile,com%,szRxChar#,dwBytesRead&,addr(dwBytesRead&),ovRead#)
Byte%=1
com$=@char$(szRxChar#,0,dwBytesRead&)
volver com$
endif
ENDPROC
Proc modemoutput
comread
imprimir com$;
ENDPROC
proc modemCOM y Init-String ggf. adaptar
com%=opencom(COM3,65000,65000)
setcom(COM3:9600,N,8,1)
writecom(com%,AT&FE1V1S0=0&C0&D2+MR=2;+DR=1;+ER=1;W2
)
modemoutput(com%)
writecom(com%,at+fclass=8
)
modemoutput(com%)
writecom(com%,at+vsm=130,8000,0,0
)
modemoutput(com%)
writecom(com%,at+vls=1
)
modemoutput(com%)
messagebox(Modemaufzeichnug starten,Modemtest,0)
writecom(com%,at+vrx
)
modemoutput(com%)
ENDPROC
Ventana 0,0-%MaxX,(%MaxY-50)
modem
clear ende%
whilenot ende%
caso inkey$()=~:ende%=1
modemoutput(com%)
wend
closecom(com%)
disponer comm#
disponer ovRead#
disponer szRxChar#
end
Anm.: Lo va en Prf 7.6 bajo Win XP |
|
| |
| WinXP SP2, Win7 - XProfan 10/11/FreeProfan32 - Xpia | 16.08.2005 ▲ |
|
| |
|
|
Michael
Wodrich | [quote:f9como9fffcd=Matthias]
Das Modem se hierbei el Audiosignal el Telefonleitung aufgeschaltet.
Mi Überlegung war nun, el Output (después de el Messagebox) en un WAV-Expediente
a escribir o. a esta anzuhängen. Alle Versuche mittels @BlockWrite usw.
schlugen desafortunadamente fehl, como me el saubere Filterung (readcom) no gelingt...
[/quote:f9como9fffcd]
Steh Yo como ahora en el Leitung? Wird no cada Modem-Empfang por Audiosignal en el Telefonleitung aufgeschaltet?
Normalerweise mußt Usted also sólo una richtiges Modem haben y el korrekte Baudrate etc. wissen.
Yo habe ya etliche Telefonanlagen angezapft (Hotel). Entweder uno schaltet una Puffer zwischen (sólo en exotischen Einstellungen oder viel Datenmüll erforderlich) oder uno nimmt lo direkt a el Schnittstelle oder por Modem en.
Hast Usted como nähere Angaben a el Anlage?
Hast Usted ya una Datenempfang por HyperTerminal hinbekommen? HyperTerminal es bajo Zubehör - Kommunikation para encontrar (muß evtl. de el Windows-CD nachinstalliert voluntad).
Wenn dieses Programa feste Datensatz-Estructuras anzeigt, entonces spare Usted el API-Geschichten. Profano puede auch así, allerdings es en el Ayuda: ReadCom().
El Función liefert aber una String, heißt also ReadCom$().
Ein Tipp al Rande. Verlasse Usted niemals darauf, el auch wirklich siempre klare Datensätze ankommen. Telefonanlagen verschlucken ya veces el una u otros Byte. Como mußt Usted etliche Plausibilitätsprüfungen einbauen, así el Programa no Müll verarbeitet.
Besonders si una Telefonanlage accidentes y una Reset durchführt, landet jede Menge Diagnose-Müll en el Leitung. Auch voluntad de algunos Anlagen en el Zuge uno Reset Altdaten übertragen, así el horchende Programa fehlende Reservas nachtragen kann.
Schöne Grüße
Michael Wodrich |
|
| |
| Programmieren, das spannendste Detektivspiel der Welt. | 17.08.2005 ▲ |
|
| |
|
|
Matthias
Arlt | ¡Hola Michael,
danke para Su Erläuterungen. Yo incluso habe mich nämlich con Terminalsoftware usw. bisher más weniger beschäftigt. Dies igual veces vorweg.
Und klar, natürlich schaltet se cada Modem quasi el Audiosignal en.
Tiempo algo para Hintergrund des Vorhabens:
Hier es konkret por lo tanto, vorhandene analoge PCI-Modems para reine Telefonie-Zwecke weiterzuverwenden. El Mehrzahl dieser Modems son zwar voice-fähig, verfügen sin embargo no encima una eigenen Audiochip oder -ausgang.
Como una hardwareseitiger Eingriff de unterschiedlichen Gründen no gewollt es, muss Yo also softwareseitig a el Audiosignal herankommen, lo also hörbar hacer (como etwa como Mithör-Función). Ideal wäre como natürlich, el Signal direkt a una MCI-Device umzulenken. Desde que no blanco, si y ggf. como algo como realisierbar es, versuche Yo primero el Umweg una WAV-Expediente.
Prinzipiell funktioniert el en efecto, sólo es eben el Signal entonces durchmischt con besagtem Datenschrott, como Usted en efecto schreibst. Das momentane Problema es Así que el Filterung (como y después de welchen Kriterien), en letztlich una sauberes Audio a obtener. Diverse Anrufbeantworter-Programas beherrschen lo en efecto.
Tal vez hay dafür auch ni otro bessere Solución. Yo blanco no oder komme momentan no en él. Deshalb mi Cuestión...
Also zusammengefasst es a saubere Auskopplung vom reinen Tonsignal.
Saludo Matthias |
|
| |
| WinXP SP2, Win7 - XProfan 10/11/FreeProfan32 - Xpia | 17.08.2005 ▲ |
|
| |
|
(2.293)
Deutsch
English
Français
Español
Italia