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