Diagrammproblem LCD Werte richtig umrechnen und Dimensionier

[mirco99]

Habe ein problem mit meinem Array und der LCD Anzeige.

Ich muss meinen Stromwert zB. 2,455 A in eine Pixelposition umrechnen.
Kann jemand mal über die Dimensionierung der Variablen schauen und die Machbarkeit meiner Berechnung bei Bascom? Mein Taschenrechner machts richtig.
Der Stromwert muss mal 7,5 gerechnet werden um in meinem Diagramm an der richtigen Stelle zu sein. Achja o Ampere ist bei mir bei der Pixelzeile 52. Den Wert habe ich dann mit mal minus 1 wieder positiv gedreht. da mein diagramm ja nicht auf dem kopf stehen soll.
Das Diagramm Fängt bei Pixel 8 an. Deshalb schreibe ich auch erst bei Zeiger 8 in das Array.
Wenn noch nichts in das Array geschrieben worden ist, lese ich dann Nullen aus?

Die Pixel werden leider am oberen Rand des Displays angezeigt und auch nur jedes 2. Das Display oder der Atmega 168 stürzt ab.

Pixelzeiger = 8     'beim programmstart vor do
Dim Pixelpuffer(127) As Byte
Dim Pixelzeiger As Byte
Dim Pixelschreibzeiger As Byte
Dim Pixel As Single
Dim Pixel1 As byte

'Wird jede sekunde abgefragt
'----------------------------------Diagramm Pixelwerte speichern------------
   Pixelzeiger = Pixelzeiger + 1
   If Pixelzeiger => 127 Then
   Pixelzeiger = 8
   end if
   Pixel = Strom * 7.5
   Pixel = 52 - Pixel                                       'pixelposition 0 A
   Pixel = Pixel1                                           ' single in byte umwandeln  

   Pixelpuffer(pixelzeiger) = Pixel1
 
  End If

'auslesen auf Display

For Pixelschreibzeiger = 8 To 127
Pset Pixelschreibzeiger , Pixelpuffer(pixelschreibzeiger) , 1
Next

[mirco99]

hat keiner ne idee ?

[mirco99]

achtung habe selber noch fehler gefunden.
Programm stürzt jetzt auch nicht mehr ab. Fehler der gleiche.

Habe die Programmteile editiert!

[for_ro]

Ich war gerade dabei, dir diese Fehler auch zu sagen.
Übriggeblieben ist der in der Zeile
Pixel = Pixel1 ' single in byte umwandeln
Pixelpuffer(pixelzeiger) = Pixel1 'Müsste das evtl. anders herum sein???????

Pixel1 hast du nirgendwo benutzt oder gesetzt, wird also immer 0 sein.
Dein Programm ist ja sicherlich umfangreicher als nur der Ausschnitt hier.
Denn so für sich wird das sicherlich nicht gehen.

Gruß

Rolf

[PicNick]

Du mischt da ein paar datentypen, das mag der Bascom nicht so sehr

DIM  pixelstring AS STRING  * 4
DIM  pixelzahl AS BYTE 

   Pixelstring = Fusing(pixel1 , "#.")    ' fusing ergibt einen string
   Pixelzahl = VAL(Pixelstring)            
   Pixelpuffer(pixelzeiger) = Pixelzahl

[PicNick]

ah ja.

kann das verkehrt sein ?

Pixel = Pixel1 ' single in byte umwandeln
soll wohl sein
Pixel1 = Pixel

[mirco99]

Hi for_ro,
habe mir gerade das Array in Text ausgeben lassen, kommt immer eine null raus. Da hast du recht. Was meinst du mit pixel 1 habe ich niergendwo benutzt oder gesetzt?
Pixel 1 ist nur für die byteumwandlung für das array un dort steht doch pixel1 drin!?
Pixelpuffer(pixelzeiger) = Pixel1

Liegt hier mein denkfehler? es müsste doch so richtig rum geschrieben sein. Ich möchte den wert pixel1 in das array schreiben.

Ich danke dir für deine mühe.

Ja mein Programm ist mittlerweile 13kb groß, da sieht man leicht den Wald vor lauter Bäumen nicht.

[mirco99]

DDDDAAAANNNKKKEE
Pixel1 = Pixel war der Fehler.

Ich war gestern bestimmt 13 Stunden am programmieren.
Zuerst wollte ich mit fusing eine ganzzahl bekommen. Das hat mich 4 Stunden gekostet.

Ich bin happy......endlich, wenns nicht weiter geht, dann verliehrt man die Lust

Ich danke euch.

[for_ro]

Sorry, mein Kommentar war in die falsche Zeile gerutscht.
Ich meinte: Pixel = Pixel1 andersherum, du willst ja die single in eine Byte quetschen. Ob das so geht musst du mal sehen. Single benutzen bringt dir immer eine Menge Zusatzcode in dein Programm. Und du brauchst das hier nicht wirklich. Du könntest auch mit 15 multiplizieren und dann shiften (durch 2 teilen).

Gruß

Rolf

[mirco99]

Du meinst damit ich keine kommastellen benutzen brauch?
Aber mein Amperewert hat kommerstellen. 0,332 A z.B

Funktioniert das trotzdem?
Wie sollte ich dan Pixel dimensionieren?