new accessors

db4
Doug Coleman 2008-09-02 12:36:43 -05:00
parent 9ad4b50855
commit 4425c471ca
1 changed files with 4 additions and 4 deletions

View File

@ -121,25 +121,25 @@ VARS: population-label cohesion-label alignment-label separation-label ;
"1 - Randomize" [ drop randomize ] button* add-gadget
<pile> 1 over set-pack-fill
<pile> 1 >>fill
population-label> add-gadget
"3 - Add 10" [ drop add-10-boids ] button* add-gadget
"2 - Sub 10" [ drop sub-10-boids ] button* add-gadget
add-gadget
<pile> 1 over set-pack-fill
<pile> 1 >>fill
cohesion-label> add-gadget
"q - +0.1" [ drop inc-cohesion-weight ] button* add-gadget
"a - -0.1" [ drop dec-cohesion-weight ] button* add-gadget
add-gadget
<pile> 1 over set-pack-fill
<pile> 1 >>fill
alignment-label> add-gadget
"w - +0.1" [ drop inc-alignment-weight ] button* add-gadget
"s - -0.1" [ drop dec-alignment-weight ] button* add-gadget
add-gadget
<pile> 1 over set-pack-fill
<pile> 1 >>fill
separation-label> add-gadget
"e - +0.1" [ drop inc-separation-weight ] button* add-gadget
"d - -0.1" [ drop dec-separation-weight ] button* add-gadget