X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?p=clnl;a=blobdiff_plain;f=resources%2FUI-test.nlogo;h=5b08fe04f8dce150c66834e1af0c8709a7305d1a;hp=51bc13783c95ab2bd41801bbba655929414812bf;hb=6cb99e3ea911190e3b73adab3a92e75ef36731f1;hpb=bd5ae8451480d80028599e004960f683bab0ad2f

diff --git a/resources/UI-test.nlogo b/resources/UI-test.nlogo
index 51bc137..5b08fe0 100644
--- a/resources/UI-test.nlogo
+++ b/resources/UI-test.nlogo
@@ -1,6 +1,12 @@
 to go
   ask turtles [ fd 1 ]
 end
+
+to create-and-move
+  if 40 < count turtles [ stop ]
+  crt 1
+  ask turtles [ fd 1 ]
+end
 @#$#@#$#@
 GRAPHICS-WINDOW
 219
@@ -97,6 +103,23 @@ NIL
 NIL
 1
 
+BUTTON
+66
+276
+161
+309
+stopping
+create-and-move
+T
+1
+T
+OBSERVER
+NIL
+NIL
+NIL
+NIL
+1
+
 @#$#@#$#@
 ## WHAT IS IT?