| BCSerialRead
| BCSerialParseInt
//Pins
- | BCAnalogRead AnalogPin
- | BCAnalogWrite AnalogPin
+ | BCAnalogRead String
+ | BCAnalogWrite String
+ | BCDigitalRead String
+ | BCDigitalWrite String
+ | BCTest AnalogPin
//:: ByteCode a p = BC (BCState -> ([BC], BCState))
:: ByteCode a p = BC [BC]