AT90S515 Serin,Serout

[horst h. (horst444)]

Hallo!

Wollte kurz mal fragen warum folgender Code nicht läuft.

$baud = 9600
$crystal = 3532900
$regfile = "8515def.dat"
Dim A As Byte
dim B as string
A = "3B 78 12 00 00 47 C4 02 05 FF FF 6F 04"
DO
SERIN B , 0 , B , 5 , 9600 , 1 , 8 , 1
WAIT 1
IF B <> "" THEN Serout A , 0 , B , 6 , 9600 , 1 , 8 , 1
LOOP
end
Die Pinbelegung ist:
MOSI=PortB5
MOSO=PortB6

Was mache ich da falsch?

[Peter D. (peda)]

horst holler schrieb:
> Dim A As Byte
> A = "3B 78 12 00 00 47 C4 02 05 FF FF 6F 04"

Wow, was bei Dir alles in nur ein Byte paßt.


Peter

[horst h. (horst444)]

Hallo Peter!

Du hast ja einen tollen Humor(lach)
Nee im ernst,wenn ich A="1" nehme was ist dann
noch falsch an meinem Code?

Bin echt purer Anfänger(nur Hobby)

[Spess53 (Gast)]

Hi

>Nee im ernst,wenn ich A="1" nehme was ist dann
>noch falsch an meinem Code?

Du scheinst massive Probleme mit Datentypen zu haben.

Dim A As Byte -> Byte
"1"           -> String

>Bin echt purer Anfänger(nur Hobby)

Dürfte BASCOM vollkommen egal sein.

MfG Spess

[Hannes L. (hannes)]

Spess53 schrieb:
> Du scheinst massive Probleme mit Datentypen zu haben.
>
> Dim A As Byte -> Byte

Vielleicht hat er ja den in VB üblichen Datentyp "Variant" im 
Hinterkopf?

horst holler schrieb:
> Du hast ja einen tollen Humor(lach)

Tip:
Lies mal nicht nur die Bascom-Doku, sondern auch das Datenblatt zum 
Controller.

...

[Peter D. (peda)]

horst holler schrieb:
> A = "3B 78 12 00 00 47 C4 02 05 FF FF 6F 04"

horst holler schrieb:
> Du hast ja einen tollen Humor(lach)

Ich kann kein Bascom, aber in C müßte A dafür mindestens 39 Byte groß 
sein.


horst holler schrieb:
> Bin echt purer Anfänger(nur Hobby)

Gerade Anfänger meinen, nichts kommentieren zu müssen. Das Gegenteil ist 
der Fall.
Man kann nämlich schlecht in Deinen Kopf sehen, was Du meinst, was eine 
Codezeile bewirken soll.


Peter