symbol counter = b3
symbol flash_count = b4
symbol ledPin = 2

flash_count = 4

main:

	'wait for incoming tank data
	serin 4,N2400,("ABC"),b1,b2	

	'flash LED
	gosub flashLED

	'send tank data to serial cable
	sertxd ("tank,",#b1,",",#b2,cr,lf)

	'flash LED
	gosub flashLED


	goto main

flashLED:
	for counter = 1 to flash_count
		high ledPin
		pause 100
		low ledPin
		pause 100
	next counter
	return