求帮助~从串口读取陀螺仪信息并画图时IF语句随缘不灵

Question

代码是这个样子的
obj1 = DeviceOpen["Serial", "COM4"];
data1 = {};
Dynamic[If[ToExpression[DeviceRead[obj1]] != 10, 
  AppendTo[data1, FromCharacterCode@ToExpression@DeviceRead[obj1]], 
  data2 = ToExpression@
    StringSplit[StringJoin[DeleteCases[data1, FromCharacterCode[13]]],
      ","]; list1 = data1; data1 = {}]]  (*这个分割感谢苹果大大*)
Dynamic[Graphics3D[
  GeometricTransformation[Cuboid[{0, 0, 0}, {3, 6, 1}], 
   RollPitchYawMatrix[list1]]]]

 

这一块儿代码是从串口读取链接在Arduino uno上的陀螺仪信息并画图,陀螺仪输出的信息是"滚动角,俯仰角,水平角,回车换行",所有语句自己编数据测试都正常,但是放到Dynamic中的IF里会有判断失误的情况出现:比如放在data1中的数据应该是没有换行符(ToExpression[DeviceRead[obj1]] != 10),但是换行符有时候却会出现在data1中....

请问这大概是哪儿出了问题

 

Comments

一直想玩Arduino。。。。。。可是我不会