Abgesehen von Timer-Routinen, die asynchron ablaufen, kannst du noch folgendes tun
In der Main schleife eine einzigen Wait in des kleinsten sinnvollen Einheit,
bei dir, sagen wir, 100ms
Dann hast du zwei Zähler, einer zählt bis 5, blinkt, und fängt wieder bei 1 an, der andere bis 50 .
Code:
dim count1 as byte
dim count2 as byte
do 
   incr count1
   if count1 = 5 then
         count1 = 0
         if Pinc.0 = 0  then 
              toggle Portd.6
         end if
   end if   
   incr count2
   if count2 = 50 then
         count2 = 0
         if Pinc.1 = 0  then 
              toggle Portd.7
         end if
   end if   
   waitms 100
loop