Forum: Mikrocontroller und Digitale Elektronik [Bascom] HEX Code senden


von Papsi (Gast)


Lesenswert?

Hallo

ich habe eine Schaltung am laufen, die zu einem Beamer Hex Daten sendet.
Diese Schaltung incl. Max232 funktioniert und ich kann den Beamer damit 
bedienen.

Hier mal ein Auszug, damit ich den Beamer anschalte:
1
   $regfile = "m8def.dat"
2
   $crystal = 8000000
3
4
   Dim Beamer_ein(8) As Byte
5
6
   Config Com1 = 38400 , Synchrone = 0 , Parity = Even , Stopbits = 1 , Databits = 8 , Clockpol = 0
7
8
Main:
9
Do
10
   Abfrage von einem Taster, der dann nach Beamer_an springt
11
Loop
12
13
Beamer_an:
14
   Einaus(1) = &HA9
15
   Einaus(2) = &H17
16
   Einaus(3) = &H15
17
   Einaus(4) = &H00
18
   Einaus(5) = &H00
19
   Einaus(6) = &H00
20
   Einaus(7) = &H17
21
   Einaus(8) = &H9A
22
   Printbin Einaus(1) ; 8
23
Goto Main

Wie gesagt, das fuktioniert, nur will ich mit der gleichen 
funktionierenden Schaltung keinen Beamer schalten, sondern einen 
Verstärker.(Den Beamer habe ich nur zum testen hergenommen um die 
Schaltung zu testen)

Dazu bin ich genauso vorgegangen wie oben und habe nur die Parameter 
entsprechend den Werten der Anleitung angepasst.
Baud 4800 , 8 Datenbits, 1 Stopbit, no Parity,
Zum einschalten muss ich 4 Blöcke HEX senden
"80 70 C1 3E"

Dazu habe ich den Wert einaus angepasst:
   Einaus(1) = &H80
   Einaus(2) = &H70
   Einaus(3) = &HC1
   Einaus(4) = &H3E
   Printbin Einaus(1) ; 4

Nur klappt das hier nicht !
In der Anleitung steht noch : Flowcontrol: no(off)
Spielt das vieleicht eine Rolle und wo stelle ich das ein.


Die Bedienung den Verstärker über einen laufenden PC und Hyerterminal 
funktioniert, der kann also mit den gesendeten Daten was anfangen und 
schaltet ein.



Wer kann da weiterhelfen?

Gruß
Papsi

von Profi :-) (Gast)


Lesenswert?

Keiner eine Idee???

von Joachim R. (bastelbaer)


Lesenswert?

Papsi wrote:

> Zum einschalten muss ich 4 Blöcke HEX senden
> "80 70 C1 3E"

> Dazu habe ich den Wert einaus angepasst:
>    Einaus(1) = &H80
>    Einaus(2) = &H70
>    Einaus(3) = &HC1
>    Einaus(4) = &H3E
>    Printbin Einaus(1) ; 4
>
Was willst du denn wirklich wie senden? Die Printbin-Ausgabe sendet 
"Çp┴>", also die Zeichen die den Werten entsprechen. Gibts du dasselbe 
in Hyperterm so ein, also für &H80 die Tasten Alt-1-2-8 oder doch die 
Klartextzeichen "80 70 C1 3E" mit den Leerzeichen dazwischen?
Dann sollte es zum Testen folgendermassen gehen
Print Hex(Einaus(1));" ";Hex(Einaus(2));" ";Hex(Einaus(3));" 
";Hex(Einaus(4))

Flowcontrol off bedeutet, dass du keine Steuerung des Datenflusses 
machst, weder per Hard- noch per Software, also RXD, TXD und Masse 
reichen.

Bitte melde dich an um einen Beitrag zu schreiben. Anmeldung ist kostenlos und dauert nur eine Minute.
Bestehender Account
Schon ein Account bei Google/GoogleMail? Keine Anmeldung erforderlich!
Mit Google-Account einloggen
Noch kein Account? Hier anmelden.