NetLogoウォールコリジョン - 'バウンス'機能

Question

NetLogoの亀は、迷路の壁を通り続ける。どのようにして彼らが壁を通過するのを止め、代わりに方向を変えさせるのですか？

私は何か助けに感謝します。

私のコードは、これまで：

breed [ defaults default ] 
defaults-own [ new-heading ] 
breed [squares1 square] 
breed [squares2 square] 
breed [squares3 square] 
globals [ score ] 

to setup-row [row colour segments] 
    foreach segments 
    [ 
     if pycor = row * row-patches-width and 
     (pxcor >= col-patches-width * (item 0 ?)) and (pxcor <= col-patches-width * (item 1 ?)) 
      [set pcolor colour] 
    ] 
end 

to setup-col [col colour segments] 
    foreach segments 
    [ 
     if pxcor = col * col-patches-width and 
     (pycor >= row-patches-width * (item 0 ?)) and (pycor <= row-patches-width * (item 1 ?)) 
      [set pcolor colour] 
    ] 
end 

to setup-arwels-maze 
    clear-all 
    set score 0 
    setup-defaults 
    setup-squares1 
    setup-squares2 
    setup-squares3 
    ask patches 
    [  if (pxcor >= min-pxcor and pxcor <= max-pxcor and 
     pycor >= min-pycor and pycor <= max-pycor) 
      [set pcolor black] 

     setup-row 8 white [[-15 15]] 
     setup-row 6 white [[-15 -10][10 15]] 
     setup-row 3 white [[-15 -10][10 15]] 
     setup-row 6 white [[-4 4]] 
     setup-row 4 white [[-6 6]] 
     setup-row -1 white [[-2 2]] 
     setup-row -3 white [[-4 4]] 
     setup-row 1 white [[-3 3]] 
     setup-row 0 white [[-15 -10][10 15]] 
     setup-row -4 white [[-15 -10][10 15]] 
     setup-row -7 white [[-15 -10][10 15]] 
     setup-row -6 white [[-3 -2][2 3]] 
     setup-row -9 white [[-3 3]] 
     setup-row -11 white [[-11 11]] 
     setup-row -13 white [[-15 15]] 

     setup-col 15 white [[ 0 8][-13 -4]] 
     setup-col 10 white [[-7 -4][0 3]] 
     setup-col 12 white [[ 3 4]] 
     setup-col 7 white [[-7.5 2][6 8]] 
     setup-col 3 white [[-9 -6][1 4]] 
     setup-col 0 white [[-3 -1]] 
     setup-col -3 white [[-9 -6][1 4]] 
     setup-col -7 white [[-7.5 2][6 8]] 
     setup-col -10 white [[-7 -4][0 3]] 
     setup-col -12 white [[ 3 4]] 
     setup-col -15 white [[ 0 8][-13 -4]] 
    ] 
end 

to setup-defaults 
    create-defaults 1 
    [ set color yellow 
    set shape "default" 
    set size 4 
    setxy 2 -48 
    set heading 0    
     ] 
end 

to setup-squares1 
    create-squares1 1 
    [ 
    set shape "square" 
    set color random 14 * 10 + 5 
    set size 3 
    setxy 38 28 
    set heading 0 
     ] 
end 

to setup-squares2 
    create-squares2 1 
    [ 
    set shape "square" 
    set color random 14 * 10 + 5 
    set size 3 
    setxy -5 -8 
    set heading 0 

     ] 
end 

to setup-squares3 
    create-squares3 1 
    [ 
    set shape "square" 
    set color random 14 * 10 + 5 
    set size 3 
    setxy 40 -45 
    set heading 0 
     ] 
end 


to move-up 
    ask defaults[ fd 1.00 ] 
end 

to move-right 
    ask defaults [ rt 90 ] 
end 

to move-down 
    ask defaults [ bk 1.00 ] 
end 

to move-left 
    ask defaults [ lt 90 ] 
end 

はあなたの時間と助けをいただき、ありがとうございます。

Answer 1

あなたはバウンスを自分で実装する必要があります。あなたのコードはそれをしません。カメは先行するものに関係なく1だけ動きます。

（ボールのように、入射角を維持する）簡単なバウンス機能は次のとおりです。

は

to bounce 
    if [pcolor] of patch-at dx 0 = white [ 
    set heading (- heading) 
    ] 
    if [pcolor] of patch-at 0 dy = white [ 
    set heading (180 - heading) 
    ] 
end 

それは白い斑点に対してバウンス。あなたのカメは動いている方向に向かっている必要があります。