55кк
ROB-35996Мой робот в размерах 15x15 см. Весит робот 0,873 г. Состоит из 1 контролера, 2 больших моторов, 1 ультразвуковой датчик, 2 датчиков освещённости, 4 шаровых опор для увеличения веса, 2 колёс с резиной и 1 без резины. Вот программа.
Motor.Start("DC", -100)
Sensor.SetMode(1,0)
Sensor.SetMode(2,0)
Sensor.SetMode(4,0)'первый ультразвуковой датчик'
flag = -1
While EV3.Time<30000
CheckLightSensor()
If S1<10 Or S2<10 Then
Motor.MovePower("DC", -100, 100, "True")
ElseIf S4<600 Then
Motor.StartSync("DC", 100, 100)
Else
Motor.StartSync("DC", 100, -100)
EndIf
EndWhile
Motor.Stop("AB","True")
'==============================
Sub CheckSensor()
S1 = Sensor.ReadPercent(1)
S2 = Sensor.ReadPercent(2)
S4 = Sensor.ReadPercent(4)
EndSub