Hallo Leute,

ich hab da ein kleines Problem. Und zwar:

Warum springt mein Controller nach dem Reset sofort zur Sprungmarke "Fstart"??? Er überspringt also das erste Menü.....

Code:
$regfile = "m32def.dat"
$crystal = 1000000
$baud = 9600

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

ldi r24, $24                                                'die Anpassungen für das Reichelt-LCD(162C)
rcall _lcd_control                                          'die Anpassungen für das Reichelt-LCD
ldi r24, $9                                                 'die Anpassungen für das Reichelt-LCD
rcall _lcd_control                                          'die Anpassungen für das Reichelt-LCD
ldi r24,$20                                                 'die Anpassungen für das Reichelt-LCD
rcall _lcd_control                                          'die Anpassungen für das Reichelt-LCD

Initlcd                                                     'LCD initialisieren

Config Porta.0 = Output                                     'PortA als Output setzten
Config Portd = Input                                        'PortD Als Input Setzten
Portd = &B11111111                                          'Internen PullUp´s an PortD aktivieren

Dim Frequenz As Integer
Dim Izeit As Integer
Dim Pzeit As Integer

Dim F As Integer
Dim A As Integer
Dim B As Integer
Dim C As Integer
Dim D As Integer

Config Debounce = 30                                        'Entprellzeit für Tester auf 30ms
Wait 1                                                      'warte wegen LCD



                                                               'Programm Start

'+---------------------------------+
'| Startbildschirm & erste Auswahl |
'+---------------------------------+

   Cls                                                      'lösche LCD
   Locate 1 , 1
   Lcd "1-> Frequenz"
   Locate 2 , 1
   Lcd "2-> Puls/Pause"

   While Pind.2 = 0 Or Pind.3 = 0
      Debounce Pind.2 , 0 , Fstart , Sub
      Debounce Pind.3 , 0 , Fstart , Sub
   Wend




'+---------------------+
'| Frequenz einstellen |
'+---------------------+

   Fstart:
   F = 10                                                   'setzt F =10
   Cls
   Locate 1 , 1
   Lcd "Frequenz =   Hz"
   Locate 1 , 12
   Lcd F
   Locate 2 , 1
   Lcd "1->ändern OK->OK"


   While Pind.4 = 0 Or Pind.2 = 0
      Debounce Pind.2 , 0 , Fok , Sub
      Debounce Pind.4 , 0 , Frequenznok , Sub
   Wend


.
.
.
.
.