moth/doc/2010-10-NMT/state/tanks/players/51152aaf/program

15 lines
363 B
Plaintext

82 80 set-speed!
0 set-turret!
5 sensor? { 100 40 set-speed! } if
6 sensor? { 40 100 set-speed! } if
3 sensor? { 0 0 set-speed! } if
1 sensor? { get-turret 3 + set-turret! } if
2 sensor? { get-turret 3 - set-turret! } if
8 sensor? { get-turret set-turret! } if
0 sensor? { fire-ready? { fire! } if } if
0 set-led!
fire-ready? { 1 set-led! } if