#com 1
#picaxe 28X1 'A.2
#terminal 4800
setfreq em4
main:
sertxd ("main",13,10)'DEBUG
disconnect 'not necessary
serrxd [1000,main],b0 'enter digit to continue past this point
reconnect 'comment out this line and processing stops at count
gosub display_count
goto main
display_count:
sertxd ("get count",13,10)'DEBUG
count 0,600,w1
sertxd ("count = ",#w1,13,10)'DEBUG
return