X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?p=clnl;a=blobdiff_plain;f=resources%2FUI-test.nlogo;h=9427f3eb66ad96bcac57b0ac05263e2e9a54691e;hp=2ba8b49e4f425cf93f2990b5ae6e59d5b80c59f1;hb=89cb3482de1fefc2d8e5f67e1e04a0790e8cd243;hpb=bb7b48443976f5cea04f5dd1c9bac64659d0a2c7

diff --git a/resources/UI-test.nlogo b/resources/UI-test.nlogo
index 2ba8b49..9427f3e 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
@@ -35,7 +41,7 @@ BUTTON
 102
 61
 setup
-crt 10
+crt 10 [ if new-turtles-green [ set color green ] ]
 NIL
 1
 T
@@ -80,6 +86,141 @@ NIL
 NIL
 1
 
+BUTTON
+78
+182
+160
+215
+forever
+go
+T
+1
+T
+OBSERVER
+NIL
+NIL
+NIL
+NIL
+1
+
+BUTTON
+111
+443
+206
+476
+stopping
+create-and-move
+T
+1
+T
+OBSERVER
+NIL
+NIL
+NIL
+NIL
+1
+
+SWITCH
+13
+127
+198
+160
+new-turtles-green
+new-turtles-green
+1
+1
+-1000
+
+TEXTBOX
+9
+442
+111
+474
+Textbox 1
+12
+0.0
+1
+
+TEXTBOX
+48
+387
+141
+438
+this is a larger test
+12
+0.0
+1
+
+TEXTBOX
+54
+485
+142
+544
+this\nis a test and it goes like\nthis
+12
+0.0
+1
+
+SLIDER
+15
+233
+187
+266
+basic-slider
+basic-slider
+0
+100
+50
+5
+1
+NIL
+HORIZONTAL
+
+SLIDER
+294
+501
+564
+534
+code-slider
+code-slider
+0
+count turtles
+65
+1
+1
+NIL
+HORIZONTAL
+
+SLIDER
+16
+275
+115
+308
+inverted-inc-slider
+inverted-inc-slider
+10
+30
+21
+-1
+1
+NIL
+HORIZONTAL
+
+SLIDER
+12
+322
+204
+355
+reversed-min-max-slider
+reversed-min-max-slider
+100
+0
+20
+5
+1
+NIL
+HORIZONTAL
+
 @#$#@#$#@
 ## WHAT IS IT?