version 2.01
platform ollo
o main
o begin
o while(1)
o begin
o wait param_src:cm:30 lop:== param_src:bool_num:0 rop:then
o load param_dest:var:RecievedData param_src:cm:28
- 
o compute param_dest:var:MovingControlKey param_src:var:RecievedData aop:& param_src:rc100z_num:15
o if param_src:var:MovingControlKey lop:== param_src:rc100z_num:1 rop:then
o call faddr_dest:Forward
o elseif param_src:var:MovingControlKey lop:== param_src:rc100z_num:2 rop:then
o call faddr_dest:Reverse
o elseif param_src:var:MovingControlKey lop:== param_src:rc100z_num:4 rop:then
o call faddr_dest:TurnLeft
o elseif param_src:var:MovingControlKey lop:== param_src:rc100z_num:8 rop:then
o call faddr_dest:TurnRight
o elseif param_src:var:MovingControlKey lop:== param_src:rc100z_num:0 rop:then
o call faddr_dest:Stop
o end
o end
- 
o function faddr_src:Forward
o begin
o load param_dest:aux_motor:1 param_src:dir_num:1023
o load param_dest:aux_motor:2 param_src:dir_num:2047
o end
- 
o function faddr_src:Reverse
o begin
o load param_dest:aux_motor:1 param_src:dir_num:2047
o load param_dest:aux_motor:2 param_src:dir_num:1023
o end
- 
o function faddr_src:TurnLeft
o begin
o load param_dest:aux_motor:1 param_src:dir_num:0
o load param_dest:aux_motor:2 param_src:dir_num:2047
o end
- 
o function faddr_src:TurnRight
o begin
o load param_dest:aux_motor:1 param_src:dir_num:1023
o load param_dest:aux_motor:2 param_src:dir_num:1024
o end
- 
o function faddr_src:Stop
o begin
o load param_dest:aux_motor:1 param_src:dir_num:0
o load param_dest:aux_motor:2 param_src:dir_num:1024
o end
Ò>