config porta.1 as output
dim zaehler as byte '<- wichtig, dass es byte ist
dim trigger as byte

trigger=127

do
if zaehler > trigger then set porta.1 else reset porta.1
zaehler = zaehler +1
loop