Gibts die Hilfe au in deutsch???

Ich versteh die Zahlen nicht 16 bei nichts und 19... Keine Ahnung!

Mein Programm sicht z.Zt so aus:

Code:
'####################ALARMANLAGEV1.0####################'
'Copyright: Tobias Hocke || 05.07.2005 - 06.07.2005     '
'#######################################################'

$regfile = "m8def.dat"                                      'ATmega8
$crystal = 10000000                                         '10 MHz

Config Portb = Input                                        'Keyboard
Config Portd = Input                                        'Sensoren bei Alarm Aktoren

Config Lcdpin = Pin , E = Portc.0 , E2 = Portc.1 , Rs = Portc.2 , Db4 = Portc.3 , Db5 = Portc.4 , Db6 = Portc.5 , Db7 = Portc.6
Config Lcd = 16 * 2

Config Kbd = Portb

Declare Sub Pause(byval D As Word)
Declare Sub Tastatur()
Declare Sub Funktion_taste()

Dim Akttaste As Word
Dim ___lcdno As Bit

Dim B As Byte

Deflcdchar 0 , 4 , 14 , 14 , 14 , 14 , 14 , 31 , 4
Deflcdchar 1 , 32 , 32 , 1 , 2 , 20 , 8 , 32 , 32
Deflcdchar 2 , 32 , 17 , 27 , 14 , 14 , 27 , 17 , 32
Deflcdchar 3 , 4 , 14 , 31 , 14 , 4 , 12 , 4 , 28

'Hauptprogramm
Do
 B = Getkbd()
 Print B
 Call Tastatur()
 Call Funktion_taste()
 Lcd Akttaste
 Lcd 0
 Lcd 1
 Lcd 2
 Lcd 3
 Lcd B
 Lcd "geht"
 Call Pause(10)
Loop

'Prozeduren
Sub Pause(byval D As Word)
Dim I As Word
 For I = 0 To D
  nop
 Next I
End Sub