Zur Übersicht - INFO - Neueste 50 Beiträge - Neuer Beitrag - Suchen - Zum C-Control-I-Forum - Zum C-Control-II-Forum

Re: Senden von AT-Befehlen über RS232 gelingt nicht Kategorie: CC-Pro Unit & Appl.Board (von fraju - 20.03.2012 12:16)
Als Antwort auf Re: Senden von AT-Befehlen über RS232 gelingt nicht von fraju - 20.03.2012 12:05
Ich nutze:
C-Control Pro Mega32
> > Hallo,
> > ich versuche seit mehreren Tagen, einfache AT-Befehle über die RS232-Schnittstelle
> > des CC-Pro 32 Application Boards auf ein GSM-Modem (Siemens MC45) zu übertragen.
> > Bislang ohne Erfolg.
> >
> >
> > 'Mit diesem Programm soll mit dem AT-Befehl AT+CPIN="0815" (Eingabe der PIN)
> > 'das Siemens MC45 GSM-Modem ans Netz angemeldet werden.
> >
> > Dim Text(60) As Char
> > Dim i, StrLen As Integer
> > Dim c As Byte
> >
> > Sub main()
> >
> >     Serial_Init(0,SR_8BIT Or SR_1STOP Or SR_NO_PAR,SR_BD19200)
> >     Text = "AT+CPIN=x0815x"
> >     Text(8) = 34        'Das x an 9. Stelle wird durch " ersetzt.
> >     Text(13) = 34       'Das x an 14. Stelle wird durch " ersetzt.
> >     StrLen = Str_Len(Text)
> >     For i = 0 To StrLen-1
> >         Serial_Write(0,Text(i)) 'Zeichen zum Modem schicken
> >         c = Serial_Read(0)      'Echo empfangen
> >         Msg_WriteChar(c)        'empfangenes Zeichen auf Konsole ausgeben
> >     Next
> >     Serial_Write(0,13)  'CR
> >     Serial_Write(0,10)  'LF
> >
> > End Sub
> >

> >
> > Um das Problem einzukreisen, habe ich Folgendes getestet:
> > - AT-Befehl über PC mit Hyperterm Terminalprogramm direkt an das Modem geschickt:
> >   Erfolg!
> > - Programm starten, aber anstelle des Modems den PC mit Hyperterminal als Gegen-
> >   stelle anschlieÃ?en und das Echo über die PC-Tastatur simulieren: Erfolg!
> > - Programm mit angeschlossenem Modem starten: Es wird kein Echo empfangen, das
> >   Programm hängt.
> > - Auch das einfache Verschicken eines AT-Befehls, ohne das Echo abzuwarten, bringt
> >   keinen Erfolg.
> >
> > Die RS232-Einstellungen (8 Bit, 1 Stopbit, keine Parität, 19200 Bd) sind überall
> > gleich. Das verwendete Kabel ist 1:1, also kein Nullmodem-Kabel.
> >
> > Wer hat eine Idee?
> >
> > Hoffnungsvolle Grü�e, Joris
> >
>
>
> Hallo
>
>        Serial_Write(0,Text(i)) 'Zeichen zum Modem schicken
> Kleine Pause
>         c = Serial_Read(0)      'Echo empfangen
>
>
> Mache mal ne Pause.
>


oder auch mal den string als einzelzeichen senden.
> fraju
>  


    Antwort schreiben


Antworten: