Attiny 2313 BCD Eingang und Stromstoßschaltung Ausgang

[baschdi1649]

hi,
der Quellcode hat leider nicht funktioniert.
Ich bin einfach hingegangen und habe einen BCD Dezimaldecoder hinter den DTMF IC (MT8870) geschaltet, Parallel dazu noch 4 LEDs, damit man sehen kann, wann die BCD Signale rauskommen. Dann habe ich hinter den BCD Dezimaldecoder den Attiny 2313 gemacht. Und an die Ausgänge des Attiny 2313 habe ich einen ULN 2803 geschaltet.
Den Quellcode habe ich mal selbst geschrieben, ist sehr simpel und sieht folgender Maßen aus:

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

Config Portd.0 = Input
Config Portd.1 = Input
Config Porta.1 = Input
Config Porta.0 = Input
Config Portd.2 = Input
Config Portd.3 = Input
Config Portd.4 = Input
Config Portd.5 = Input

Taster_1 Alias Pind.0
Taster_2 Alias Pind.1
Taster_3 Alias Pina.1
Taster_4 Alias Pina.0
Taster_5 Alias Pind.2
Taster_6 Alias Pind.3
Taster_7 Alias Pind.4
Taster_8 Alias Pind.5


Config Portb.7 = Output
Config Portb.6 = Output
Config Portb.5 = Output
Config Portb.4 = Output
Config Portb.3 = Output
Config Portb.2 = Output
Config Portb.1 = Output
Config Portb.0 = Output

LED_1 Alias Portb.7
LED_2 Alias Portb.6
LED_3 Alias Portb.5
LED_4 Alias Portb.4
LED_5 Alias Portb.3
LED_6 Alias Portb.2
LED_7 Alias Portb.1
LED_8 Alias Portb.0

LED_1 = 0
LED_2 = 0
LED_3 = 0
LED_4 = 0
LED_5 = 0
LED_6 = 0
LED_7 = 0
LED_8 = 0



Do

Waitms 200

If Taster_1 = 1 Then
Toggle LED_1
Waitms 200
End If

If Taster_2 = 1 Then
Toggle LED_2
Waitms 100
End If

If Taster_3 = 1 Then
Toggle LED_3
Waitms 100
End If

If Taster_4 = 1 Then
Toggle LED_4
Waitms 100
End If

If Taster_5 = 1 Then
Toggle LED_5
Waitms 100
End If

If Taster_6 = 1 Then
Toggle LED_6
Waitms 100
End If

If Taster_7 = 1 Then
Toggle LED_7
Waitms 100
End If

If Taster_8 = 1 Then
Toggle LED_8
Waitms 100
End If

Loop

End

Danke euch vielmals für die Hilfe!