Board und Software verbinden (r232)

[Richard]

Bascom Hilfe nach DATA suchen....Gibt es in c sicher auch! Mit Data wird ein Ram Bereich ab Adresse x bis Adresse y mit Daten gefüllt. Auf diese Daten kann man mit Data x x+1, x+2, x+y wieder zugreifen. wenn Du also eine Tabelle mit allen zu übertragenden Parametern als Data 1 bis Data (Ende der Tabelle) anlegst und die dann in einem Rutsch überträgst und damit beim Empfänger eine gleiche Tabelle anlegst, kannst Du z.B. Mittels Data 15 auf die 15. Stelle (Speicherplatz) zugreifen.

Die genaue Syntax habe ich nicht im Kopf, in C sowieso nicht. Natürlich kann man ähnliches auch mit einem Arry machen.


Tabellen und Data http://www.rn-wissen.de/index.php/Bascom_Tabellen

Gruß Richard

[Thomas Glas]

Also ich habe mich ganz flüchtig in das Thema Array eingelesen und wenn ich das richtig verstanden habe mache ich nun eine Kette

array(1,3,4,5,6,5,4,33,221,11,22,88,);

so speicher ich das ab und dann

gehe ich in Bascom raus und spreche die einzlnen Stellen an?

Es schaut einfach aus aber ist sicherlich so nicht funktionell?!
Auf diese Weise haut er immer alles raus da aber nicht ständig sich alles verändert...

So müssten nur die Daten übertragen werden die auch aktualisiert werden das würde
enormen Speed sicherlich ausmachen?

Oder ist das mit einem Array möglich durch auslassen eines Wertes in dem Array ergo

Array(1,"",4,5,"","",4,33,"",11,22,88,);

Gott ist das wieder kompliziert *grins*

[Thomas Glas]

Ok ich benötige bitte Hilfe ich möchte zum testen erstmal 3 zustände realisieren wobei es schon beim ersten Zustand zu Problemen kommt. Mit folgendem Code funktioniert es das eine Led an oder aus geht das allerdings äusserst selten. Ich glaube das sich da bei der Übertragung überschlägt. Die Leitung habe ich geprüft es kommen keine fehlerhaften Zeichen an ,... ich denke es liegt an einem ordentlichen Timing?

Warum wird trotz das ich eine eins oder zwei sende das bei der Led so nicht geschaltet?


Gruß Thomas

C# code

if ((data.lightBits3 & 0x10000) != 0)
                {
                    txtNoseGear.Text = "1";  // ausgefahren
                    serialPort1.Write("2");    // sende eine 2 an den Chip
                } else {
                    txtNoseGear.Text = "0"; // eingefahren
                    serialPort1.Write("1");   // sende eine 1 an den Chip

                }
                Thread.Sleep(1);

Bascom code

'LED1 an PB0
Led1 Alias Portb.0
Config Led1 = Output


Dim A As Byte


Do

  A = Inkey()                                               



  If A = 1 Then                                             
    Led1 = 0               //Rad eingefahren LED ausschalten
  End If

  If A = 2 Then                                            
    Led1 = 1              //Rad ausgefahren LED ausschalten
  End If


   'If A > 0 Then                                            'we got something
   ' Print "ASCII code " ; A ; " from serial"
   'End If

Loop                                                        


A = Waitkey()                                               'wait for a key

'Print Chr(a)

Do

Loop Until Inkey() = 27

End

Gegentest mit Putty // Werte in Bascom als ASCII ersetzt
Nun kann ich per Tastatur und den Tasten 1 & 2 die Led ein oder ausschalten.
Bei dieser Variante viel mir auch auf das wenn die Led eigentlich angehen sollte sie ausgeht und umgekehrt.
Tastatur 1 = Led geht an / Tastatur 2 = Led geht aus
Irgendwie ist doch hier der Wurm drin?

'LED1 an PB0
Led1 Alias Portb.0
Config Led1 = Output


Dim A As Byte


Do

  A = Inkey()                                               



  If A = 49 Then                                             
    Led1 = 0               //Rad eingefahren LED ausschalten
  End If

  If A = 50 Then                                            
    Led1 = 1              //Rad ausgefahren LED ausschalten
  End If


   'If A > 0 Then                                            'we got something
   ' Print "ASCII code " ; A ; " from serial"
   'End If

Loop                                                        


A = Waitkey()                                               'wait for a key

'Print Chr(a)

Do

Loop Until Inkey() = 27

[Richard]

Bei dieser Variante viel mir auch auf das wenn die Led eigentlich angehen sollte sie ausgeht und umgekehrt.
Tastatur 1 = Led geht an / Tastatur 2 = Led geht aus
Irgendwie ist doch hier der Wurm drin?

Das kann an der Verdrahtung liegen, wenn die LED's an Vcc Liegen werden die mit GND Ausgang = 0 An geschaltet.


Gruß Richard