Hi,
das hier ist doch das "Basic-Programmierung mit Bascom"-Forum oder?
Ich hab das Beispiel von Harryup schon probiert, ganz funktioniert hats aber noch nicht.. mal sehn...
ich welcher Programmiersprache eigentlich ?Zitat von Bierbauch
Hi,
das hier ist doch das "Basic-Programmierung mit Bascom"-Forum oder?
Ich hab das Beispiel von Harryup schon probiert, ganz funktioniert hats aber noch nicht.. mal sehn...
ooohps,
ich hab vergessen die az variable als string zu deklarieren, sorry.
das oben war nur ein auszug aus einem prog.
also muss irgendwo am programmanfang stehen:
dim az as string *8 (oder wie lang du den string eben brauchst)
dim level as byte (oder auch word, kommt auf deine werte an)
gruss, harry
p.s. das ist schon das Bascom forum
der kopf ist rund damit das denken seine richtung ändern kann...![]()
Zitat von Bierbauch
'tschuldigung, hab den Betreff nicht gelesen, peinlich!
Hi Harry,
ich bekomm das einfach nicht gebacken:
Der betreffende Code ist:
Dim U1 As Word 'Wert vom AD-Wandler
Dim U2 As Word 'AD-Wander/51,2 = Volt
Dim U3 As String * 4 'Spannung auf eine Nachkommastelle
...
U1 = Getadc(0) 'AD-Wandler0 auswerten
U2 = U1 / 51.2 'Spannung in Volt
U3 = Format(str(u2) "0.0")
Dann bekomm ich aufm LCD nur z.B. "1.6" angezeigt, bei 16V am Eingang.
Was muss ich ändern, damit ich da auf z.B. "13.5" komme (das V für Volt kann ich ja im LCD-Befehl dranhängen)???
arg irgendwie steh ich aufm Schlauch, ich hab bisschen rumgetüftelt komm aber auf nix richtiges irgendwie :-/
hi bierbauch,
das ist ja ok so, der format befehl macht ja nix anderes als das komma reinpacken. du musst aber das format mit "00,0" angeben, sonst wird alles auf eine vorkommastelle abgesägt.
geb doch mal deine U1 auf's display, die müsste ja 819 betragen.
wenn das so ist und du teilst durch 51,2 kriegst du 15,99, also 16 wegen rundung. wenn das display jetzt 16,0 anzeigen soll müsstest du die 16 mit 10 malnehmen, weil dein format alles wieder um 'ne 10er potenz verschiebt. das wär aber nicht sehr elegant, weil dabei genauigkeit verloren geht. besser so:
U1 = getadc(0) ' ergebnis 819
U2 = U1/5,12 ' gleich die 10er verschiebung berücksichtigen, gibt 159,9
U3 = format(str(u2) "00,0") ' sollte jetzt 15,9 zeigen
so müsst's funzen, ich kann's im moment nur nicht probieren.
gruss, harry
der kopf ist rund damit das denken seine richtung ändern kann...![]()
Hallo
@Bierbauch
könntest du bitte mal den ganzen programmcode einstellen, oder mir den per mail/ pn zukommen lassen,
würde mir nämlich gerne auch sowas basteln, nur habe ich im moment keine ahnung wie der programmcode dafür aussehen soll
danke
octi
Hallo zusammen!
Es hat geklappt, Danke schön Harry!
Wenn ich nur durch 5,12 teile gehts, perfekt!
Danke auch an alle anderen die mich unterstützt haben bei meinem ersten Thread.
@Octi: ich mail dir bei gelegenheit den kompletten Quelltext (muss den erst via Diskette vom anderen Rechner holen, der nicht am Netzwerk hängt).
Hallo zusammen!
Es hat geklappt, Danke schön Harry!
Wenn ich nur durch 5,12 teile gehts, perfekt!
Danke auch an alle anderen die mich unterstützt haben bei meinem ersten Thread.
@Octi: ich mail dir bei gelegenheit den kompletten Quelltext (muss den erst via Diskette vom anderen Rechner holen, der nicht am Netzwerk hängt).
Hallo
ja Danke Bierbauch, ich warte auf dein Listing.
Möchte doch auch mal Volts auf den LCD haben.
Danke nochmal
octi
Lesezeichen