mirror of https://github.com/dirtbags/moth.git
16 lines
489 B
Plaintext
16 lines
489 B
Plaintext
|
65 85 set-speed!
|
||
|
|
||
|
6 random 2 <= { 85 65 set-speed! } if
|
||
|
|
||
|
0 set-turret!
|
||
|
2 sensor? { 80 10 set-speed! get-turret 30 + set-turret! } if
|
||
|
3 sensor? { 10 80 set-speed! get-turret 30 - set-turret! } if
|
||
|
4 sensor? { 90 90 set-speed! } if
|
||
|
5 sensor? { 90 10 set-speed! get-turret 30 + set-turret! } if
|
||
|
6 sensor? { 10 90 set-speed! get-turret 30 - set-turret! } if
|
||
|
0 sensor? fire-ready? & { 90 90 set-speed! 0 set-turret! fire! } if
|
||
|
1 sensor? { -100 -100 set-speed! } if
|
||
|
|
||
|
fire-ready? set-led!
|
||
|
|