Nun, es gibt einige üble Tricks, die aber in deinem Falle irgendwie über-drüber wären
Mach doch:
Code:
...
DIM zahl as byte

Do 
  incr zahl
  disable interrupts
  if Zahl > 4 then Zahl = 1
  Print str(Zahl) 
  enable interrupts
  Wait 1 
Loop 

Irq0: 
Print "interrup" 
  zahl = 0
Return 

End
Das mit disable/enable ist notwendig, sonst zeigt er vielleicht Kraut und Rüben