.NETの初期化

Needs["NETLink`"]
InstallNET[];

.NETの情報の表示

NETTypeInfo["System.IO.Ports.SerialPort"]

シリアルポートの初期化

ser =NETNew["System.IO.Ports.SerialPort","COM8",9600]
ser@Open[]

LEDのオンオフのプログラム

Button["メリーさんの羊",ser@Write["A"]]
Button["チューリップ",ser@Write["B"]]
Button["大きな栗の木の下で",ser@Write["C"]]
Button["プログラムを止める",ser@Close[]]