statt
Ddrd = 1
Ddrb = 1
müsstest du die beiden register auf 255 setzen, um alle pins und nicht nur den ersten als ausgänge zu schalten...

in Bascom geht sowas aber auch einfacher, und zwar mit
config portb = output
config portd = output
das setzt automatishc die register richtig und schaltet die kompletten ports als ausgänge...