2017-09-28から1日間の記事一覧

Hub の内蔵スピーカーを鳴らす

Hub の裏にスピーカーがついている。 Revised: Define sound()= Prgm :Local scale,i :scale:={294,294,330,330,349,349,392,440} : :For i,1,4 : Send "SET SOUND 110 TIME 0.2" : Wait 0.8 :EndFor : :While getKey()≠"esc" : For i,1,dim(scale) : Send "…