Hi,
der Code sieht so aus:
Code:
$regfile = "2313def.dat"
$crystal = 3686400
$baud = 9600

 Dim Eingabe As Long (habe es aber auch schon mit byte, string versucht)
 

 Config Lcdpin = Pin , Db4 = Portb.4 , Db5 = Portb.5 , Db6 = Portb.6 , Db7 = Portb.7 , E = Portb.3 , Rs = Portb.2


Config Lcd = 16 * 4                                         'configure lcd screen

Config Portb = Output
Config Portd = Input
                                                'write mode for display
Initlcd
Cls
Do
home
input eingabe
Lcd Eingabe
Loop