Hab mal en einfachen Code geschrieben. Die Taster sind nur die Ports wo mit dem LM3915 verbunden werden. Da diese Ports des LM3915 nach Masse ziehen.

$regfile = "m32def.dat"
$crystal = 1000000

Led1 Alias Portb.0
Led2 Alias Portb.1
Led3 Alias Portb.2
Led4 Alias Portb.3
Led5 Alias Portb.4



Taster1 Alias Portc.0
Taster2 Alias Portc.1
Taster3 Alias Portc.2
Taster4 Alias Portc.3
Taster5 Alias Portc.4

Config Portc = Input
Config Portb = Output

Portc = 1

Do

If Taster1 = 0 Then
Led1 = 1
Else
Led1 = 0
End If

If Taster2 = 0 Then
Led2 = 1
Else
Led2 = 0
End If

If Taster3 = 0 Then
Led3 = 1
Else
Led3 = 0
End If

If Taster4 = 0 Then
Led4 = 1
Else
Led4 = 0
End If

If Taster5 = 0 Then
Led5 = 1
Else
Led5 = 0
End If

Loop
End