...ich weiß auch noch was!

En an Pin B4 eine 1 dann Pin B3 an
Wenn Du damit meinst, dass B3 auf High gehen soll, wenn an B4 ein High-Signal anliegt, dann steckt hier der Fehler:

If Pinb.4 = 1 Then
Pinb.3 = 1
End If
Und zwar in der 2. Zeile - finden musst Du ihn aber selber

Außerdem klingt Flackern in der Luft ganz schwer nach fehlendem PullUp-Widerstand. Wenn Du keinen Hardware-Widerstand verlötet hast, schreib´ doch mal die Zeile

PortB.4=1

rein.

Und wieso setzt Du den Vergleichswert Dip auf 10.000, wenn der Timer nur bis 255 zählen kann?

Gruß & Co.,

Daniel