stamp-demo


Information

Created with NetLogo version NetLogo 3.0
Running with NetLogoLite.jar version 302.


Stamp-demo by James Steiner, June, 2005
This model is in the public domain.
This model demonstrates the new function of STAMP in NetLogo 3.x

Procedures

NetLogo Version: NetLogo 3.0

;;;; SUMMARY
;; A demonstration of the STAMP primitive
;; COPYRIGHT & LICENSE
;;;; by James P. Steiner
;;;; Dedicated to the Public Domain, June, 2005
;;;; 
;;;;

to go
   ca
   crt 5
   let i 0
   ;; choose a shape (excluding the default shape)
   let the-shape random-one-of BUT-FIRST shapes
   print the-shape
   set-default-shape turtles the-shape
   repeat screen-edge-x * .4
   [ ask turtles [ die ]
     crt (i + 5)
     ask turtles
     [ home
       rt i * 5
       fd i * 2
       set size 2
     ]
     without-interruption
     [ 
       ask turtles
     [ ; set size (i + 1) 
       repeat 30 [ jump 4 rt 6 jump -4 rt 6 stamp ]
     ]
     ]
     set i i + 1
   ]
end
   

                    


Download Link

View or download the complete model file (to download: right-click, save-link-as):
-- Download stamp-demo --