>D
bu1=0
bl=0
bub=0

>B
spinm(8 1)
spin(8 0)

>S
print Pin %pin[8]%
print bub %0bub%
print bl %0bl%

if bl<1 
and bub>0
 then
 bl=1
 spin(8 0)
else
 bl=0 
 spin(8 1)
endif

if bu1>0
then
spin(8 0)
endif



>W
bu(bu1 "LED aus" "LED blau")
bu(bub "LED aus" "LED blinkt" )