Okay danke ich habe es begriffen.

Code:
 'TASTER1 an Pc1
Taster1 Alias Pinc.0
Config Pinc.0 = Input

Do
   If Taster1 = 1 Then
Locate 1 , 4
Lcd "Hallo1"
   Else
Locate 1 , 4
Lcd "Hallo2"
   End If
Loop
Darf ich noch was frageN ?
Wie bekomme ich jetzt das Hallo2 zum blinken ?

Das übertragen klappte mit dem ISP sofort ...