Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;; sniff left and right, and go where the strongest smell is
- to uphill-nest-scent ;; turtle procedure
- let scent-ahead nest-scent-at-angle 0
- let scent-right nest-scent-at-angle 45
- let scent-left nest-scent-at-angle -45
- if (scent-right > scent-ahead) or (scent-left > scent-ahead)
- [ ifelse scent-right > scent-left
- [ rt 45 ]
- [ lt 45 ] ]
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement