...vielleicht einfach so :


dim a as word 'je kleiner, je höher die Ausgabefrequenz

do
waitus a
toggle Portx.x
loop
end