AT90S515 Serin,Serout

OP #2838534
Lesenswert?

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?
Gast #2838562
Lesenswert?

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
#2838922
Lesenswert?

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

Antwort schreiben

Bitte melde dich an, um einen Beitrag zu schreiben.

oder

Mit Google-Account einloggen

Die Registrierung ist kostenlos und dauert nur eine Minute.

Jetzt registrieren