Stopping repeated messages

[cncmachineguy]

I usually have at least 1 byte dedicated to flagss, so

myflags var byte

then to set up the flags its just this:

alarm1F var myflags.0
alarm2F var myflags.1
alarm3F var myflags.2
...

then to use them it is this simple:

alarm1F = 1
alarm2F = 0
...

or 
myflags = 0 'this clears all flags

then for you case:

if portb.0 then 
 gosub alarm1
else
 alarm1F = 0
endif
...
return


alarm1:
 if alarm1F then return
 alarm1F = 1
 hser bla bla bla

hope that helps

[GatorGuy]

Pure Gold! Thank you!