Symbol Tone = W0
Symbol ToneType = pin3
Symbol Trigger = pin4

main:
	
	if Trigger = 1 then
		Readadc10 1,Tone
		Tone = Tone / 8
		if Tone = 0 then
			Tone = 1
		end if
		if Tone > 126 then
			Tone = 126
		end if
		if ToneType = 1 then
			Tone = Tone + 128
		end if
		sound 2, (Tone,140)
	end if

	goto main