Miért nem működik?

[Friedrich Gábor]

Üdv Lista!
Bascom. Tiny12 belső oszcival, b.3-on egy nyomógomb a táp felé, ellenállás a 
gnd-re, b.4-en led.

$crystal = 1200000
$regfile = "AT12DEF.dat"
Config Pinb.4 = Output
Config Pinb.3 = Input
Do
If Pinb.3 = 0 Then Portb.4 = 1 Else Portb.4 = 0
Loop

Nyomógomb megnyomásra világítania kellene a lednek, Tiny2313-al simán megy 
(d.6-al meg d.2-vel).
Led villogtató működik rajta, tehát reset meg oszci oké. Csak a bemenet 
kezelése nem jó.
Válaszokat köszi
Fidó