bc1 d = {main = ledOn d}
bc2 d = {main = ledOff d}
bc3 = sds \x=1 In sds \pin=1 In {main =
		IF (digitalRead D3) (
			x =. x +. lit 1 :.
			pub x
		) (
			noOp
		) :.
		IF (pin ==. lit 1) (
			ledOn LED1
		) (
			IF (pin ==. lit 2) (
				ledOn LED2
			) (
				ledOn LED3
			)
		)}