Arduinoとの連携

Needs["NETLink`"]
InstallNET[];
ser = NETNew["System.IO.Ports.SerialPort","COM8",9600]
ser@Open[]
NETNew["System.IO.Ports.SerialPort","COM8",9600]

Button["A",ser@Write["A"]]
Button["B",ser@Write["B"]]