Advertisement
Guest User

Untitled

a guest
May 19th, 2017
54
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.83 KB | None | 0 0
  1. ; C'est ce fichier que vous devez remplir
  2.  
  3. globals [
  4. g_team ;tous les agents de mon �quipe
  5. ]
  6.  
  7. ;code du comportement de mon �quipe
  8. to g_run
  9. ask g_team [
  10. look_to (max-pxcor / 2) (max-pycor / 2)
  11. ifelse charge = false [
  12. ifelse pcolor = black [
  13. ;let l dist_to_me (max-pxcor / 2) (max-pycor / 2)
  14. ;let x item 0 l
  15. ;let y item 1 l
  16. ;move_to x y
  17. fd 1
  18. ] [
  19. let l accessible_boxes
  20. ifelse not empty? l [
  21. let x item 0 l
  22. let px item 0 x
  23. let py item 1 x
  24. prendre_boite px py
  25. ] [
  26. move_alea
  27. ]
  28. ]
  29. ] [
  30. to_base
  31. let l direction_base
  32. if l != false [
  33. let px item 0 l
  34. let py item 1 l
  35. deposer_boite px py ]
  36. ]
  37. ]
  38.  
  39. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement