Pic 16F84 Serin Problem

[rulle]

Hi zusammen

Ich möchte Daten in den internen eeprom schreiben
die mit 9600 baud ankommen.
Mein pic speichert aber nichts.
Ist der code richtig dazu?


SI con 6 '
B0 var BYTE
B1 var byte
b1=0
loop: Serin SI,T9600,B0
if b1 <31 then
write b1,b0
b1=b1+1
endif
goto loop

Bin anfänger,sorry!

gruß
rulle