So, das compilieren hab ich nun hinbekommen und in der Hilfe auch ein bisschen gestöbert, aber das bringt mich nun auch nicht weiter.
Mit diesem Code kommen nur 1er auf dem Display, egal ob ich am Eingang des ADC etwas anlege oder frei lasse.
Code:
$regfile = "2313def.dat"
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db4 = Portd.0 , Db5 = Portd.1 , Db6 = Portd.2 , Db7 = Portd.3 , E = Portd.5 , Rs = Portd.4
Config Lcdbus = 4
Dim Leitung As Byte
Dim A As Byte
Dim Ein As Byte
Dim Ein2 As Integer
Dim Ein3 As Byte
Dim Volt As Byte
Dim Volt2 As Byte
Dim Volt3 As Byte
Do
Portb.3 = 1
Portb.3 = 0
For Leitung = 7 To 0 Step -1
If Pinb.2 = 0 Then A = 0
If Pinb.2 = 1 Then A = 1
Ein = A * 16
Ein2 = Ein And 16
Ein3 = Ein2 / 16
Volt = Volt + Ein3
Volt2 = Volt * 2
Volt3 = Volt2 ^ Leitung
Portb.1 = 1
Portb.1 = 0
Next
Lcd Volt3
Loop
Was mir auch noch komisch vorkommt, ist soewtwas hier:
Code:
a = a + b
a2 = a * c
a3= a2 ^ d
In FreeBASIC wäre das so a = a + b * c ^ d gewesen, aber wenn ich das so reinschreibe, bringt der Compiler wieder Fehlermeldungen
//edit2:
jar_: Ja der Dialekt ist eigen, aber dein Code hat doch hoffentlich nichts mit meinem Problem zu tun oder? Da komm ich nich mit...
Lesezeichen