AT 9058525 Serin Problem

[horst h. (horst444)]

Hallo!

Möchte über Serin daten in meinen eeprom schreiben.
Bitte um Hilfe.Habe schon alles versucht.
Hier mein Code:

$regfile = "8515def.dat"                                    ' specify 
the used micro
$crystal = 4000000                                          ' used 
crystal frequency
$baud = 19200                                               ' use baud 
rate
$hwstack = 32                                               ' default 
use 32 for the hardware stack
$swstack = 10                                               ' default 
use 10 for the SW stack
$framesize = 40                                             ' default 
use 40 for the frame space
'tip : Also look at OPEN and CLOSE
'some variables we will use
Dim S As String * 10
Dim Mybaud As Long
Dim A As Byte
A = 1
'when you pass the baud rate with a variable, make sure you dimesion it 
as a LONG
$eeprom
Mybaud = 19200
Do
'first get some data
'now send it
Serin S , 0 , B , 7 , Mybaud , 0 , 8 , 1

'                                      ^ 1 stop bit

'                                  ^---- 8 data bits

'                                ^------ even parity (0=N, 1 = E, 2=O)

'                        ^-------------- baud rate

'                  ^-------------------- pin number

'               ^----------------------- port so PORTA.0 and PORTA.1 are 
used

'           ^--------------------------- for strings pass 0

'      ^-------------------------------- variable
Wait 1
Writeeeprom A , S
Wait 10
A = A + 1
Loop
End

Habe alle PortBs getestet.Läauft garnix.
Wäre dankbar für Hilfe

Danke im vorraus

[Peter D. (peda)]

Gehts nicht noch kleiner?
Ich erkenne nichts.

Und beschreib mal als Text, wie Dein Programm genau funktionieren soll.


Peter

[horst h. (horst444)]

Hallo nochmal!

Habe jetzt die Bilder vergrößert.

Also ich habe einen Multiprog 2003XXL,
und eine Funcard 4(siehe Anhang)
Ich arbeite mit Bascom AVR.

Mein Problem:

Ich möchte über Serin,Daten in den internen Eeprom einlesen
(später natürlich auch in den 24LC256),und dann über Serout
wieder ausgeben.
Ich habe das Codebeispiel aus der Hilfe genommen,und alle Pins
an PortB ausprobiert.
Nix wurde in den internen Eeprom geschrieben(mit obigem Code)
Dann habe ich eine kleine Schleife programmiert,welche den
gesammten ASCII Code ind den Eeprom schreiben soll das hat geklappt.

Ich hänge da jetzt schon ewig dran.
Ich wäre euch wirklich dankbar für etwas Hilfe.

Gruß
Horst

[Horst444 (Gast)]

Muss mann hier flehen um ein bisschen Hilfe.
Macht ihr daß immer so hier?
Bisher bekam ich nur Beleidigungen als Antwort.

[Spess53 (Gast)]

Hi

>Muss mann hier flehen um ein bisschen Hilfe.
>Macht ihr daß immer so hier?

Beachte bitte, das der Großteil hier nicht mit BASCOM programmiert. Ich 
auch nicht.

>Bisher bekam ich nur Beleidigungen als Antwort.

Ich sehe hier keine Beleidigung.

Zu deinem Problem fällt mir nach kurzem Blick in die Hilfedatei von 
BASCOM folgendes auf:

Das Ergebnis von 'Serin S , 0 , B , 7 , Mybaud , 0 , 8 , 1' ist der 
String S. 'Writeeeprom' schreibt aber ein Byte auf eine 
EEPROM-Adresse. Das sind zwei unterschiedliche Datentypen.

MfG Spess