Antwort schreiben  Thema schreiben 
Seiten (8): « Erste < Vorherige 4 5 6 7 [8] Letzte »
Sprachausgabe von Analogwerten
Verfasser Nachricht
AVRNix
Administrator
*******


Beiträge: 1.538
Gruppe: Administrators
Registriert seit: Dec 2007
Status: Offline
Bewertung: 0
Beitrag: #71
RE: Sprachausgabe von Analogwerten

ALso vielleicht solltest du nach dem Empfnag

dinable Urxc schreiben bevor du auf das LCD schreibst, du unterbindest damit einen Interrupt.


Gruss
-----------------------------
AVRNix - http://www.comwebnet.de
Administrator
-----------------------------
10.07.2010 13:23
Webseite des Benutzers besuchen Alle Beiträge dieses Benutzers finden Diese Nachricht in einer Antwort zitieren
Veryoldman
Member
***


Beiträge: 52
Gruppe: Registered
Registriert seit: May 2010
Status: Offline
Bewertung: 0
Beitrag: #72
RE: Sprachausgabe von Analogwerten

Hallo AVRNix,

Du meinst doch 'Disable Urcx' oder? Ich hab das mal ausprobiert und bekomme jedesmal die Fehlermeldung 'Unknown Interrupt source'. Die Displayroutine ist als Unterroutine Angelegt und wenn die Anzeige auf dem Display erfolgt, sollte die Anweisung 'Disable Urcx' erfolgen. Dann ist ja das Problem, dass man den Interrupt ja wieder aktivieren muss um eine weitere Anzeige zu bekommen. Das hab ich versucht, in der Do Loop Schleife einzugeben 'If S = Asc( "D:\>cr" then' usw. Enable Urcx' 'End if'. Das funktioniert also so nicht.

Gruß
Klaus

11.07.2010 18:04
Alle Beiträge dieses Benutzers finden Diese Nachricht in einer Antwort zitieren
AVRNix
Administrator
*******


Beiträge: 1.538
Gruppe: Administrators
Registriert seit: Dec 2007
Status: Offline
Bewertung: 0
Beitrag: #73
RE: Sprachausgabe von Analogwerten

Ja das meine ich
Disable Urcx
dann Ausgabe auf LCD
Enable Urcx

oder

Springe eine Unterroutine die alle Zeichen bis CR einliest und dann zurück springt. LCD Ausgabe und weiter.

ggf taugt deine Routine nicht soviel, keine Ahnung.
Diese Routine steht auch im Sample Verzeichnis im Bascom.

So Ähnlich wie hier:

Code:
Declare Sub Getline(s As String)
Declare Sub Flushbuf()

Dim Sret As String * 66 , Stemp As String * 6

do
Getline Sret ' lese von der Seriellen Schnittstelle
Lcd Sret     ' Ausgabe auf LCD
Wait 5
Flushbuf     ' Freigabe
Cls
..
..
..
loop

Sub Getline(s As String)
  S = ""
  Do
    B = Inkey()
    Select Case B
       Case 0                                               'nothing
       Case 13                                              ' we do not need this one
       Case 10                                              ': If S <> "" Then Exit Do                    ' if we have received something
       Case Else
         S = S + Chr(b) ' Empfangener String


'  Wann soll aus der Routine rausgesprungen werden, oder was anderes '   gemacht werden.

        If S = "> " Then Exit Do            
        If Right(s , 2) = "OK" Then Exit Do
        If S = "OK" Then Exit Do


    End Select
  Loop
End Sub


'flush input buffer
Sub Flushbuf()
  Waitms 100                                                'give some time to get data if it is there
  Do
    B = Inkey()                                             ' flush buffer
  Loop Until B = 0
End Sub


Gruss
-----------------------------
AVRNix - http://www.comwebnet.de
Administrator
-----------------------------

Dieser Beitrag wurde zuletzt bearbeitet: 11.07.2010 19:43 von AVRNix.

11.07.2010 19:33
Webseite des Benutzers besuchen Alle Beiträge dieses Benutzers finden Diese Nachricht in einer Antwort zitieren
AVRNix
Administrator
*******


Beiträge: 1.538
Gruppe: Administrators
Registriert seit: Dec 2007
Status: Offline
Bewertung: 0
Beitrag: #74
RE: Sprachausgabe von Analogwerten

Veryoldman schrieb:
Hallo AVRNix,

einzugeben 'If S = Asc( "D:\>cr" then' usw. Enable Urcx' 'End if'. Das funktioniert also so nicht.

Gruß
Klaus


Das geht auch nicht ASC ist ein zeichen nicht ein String!
Das musst du dann einzeln machen !


Gruss
-----------------------------
AVRNix - http://www.comwebnet.de
Administrator
-----------------------------
11.07.2010 19:49
Webseite des Benutzers besuchen Alle Beiträge dieses Benutzers finden Diese Nachricht in einer Antwort zitieren
Veryoldman
Member
***


Beiträge: 52
Gruppe: Registered
Registriert seit: May 2010
Status: Offline
Bewertung: 0
Beitrag: #75
RE: Sprachausgabe von Analogwerten

Hallo AVRNix,

Mhmmmm! Muss ich wohl noch mal ran.

Gruß
Klaus

12.07.2010 22:53
Alle Beiträge dieses Benutzers finden Diese Nachricht in einer Antwort zitieren
Seiten (8): « Erste < Vorherige 4 5 6 7 [8] Letzte »
Antwort schreiben  Thema schreiben 

Druckversion anzeigen
Thema einem Freund senden
Thema abonnieren | Thema zu den Favoriten hinzufügen

Gehe zu Forum: