SHARE
TWEET

Untitled

a guest May 19th, 2017 39 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  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
RAW Paste Data
Top