From 7cda2d1ae724a319b6b7a16f4e88ab48e8c33838 Mon Sep 17 00:00:00 2001
From: Lorenzo Balugani <lorenzo.balugani@gmail.com>
Date: Tue, 5 May 2020 17:51:24 +0200
Subject: [PATCH] Importa progetto dal vecchio repository

---
 Progetto.nlogo | 83 +++++++++++++++++++++++++++++++++++++++-----------
 1 file changed, 65 insertions(+), 18 deletions(-)

diff --git a/Progetto.nlogo b/Progetto.nlogo
index 9aa2711..8707ce0 100644
--- a/Progetto.nlogo
+++ b/Progetto.nlogo
@@ -2,7 +2,7 @@ breed [ants ant]
 patches-own [pheromone food nest distance-from-nest]
 ants-own [carrying-food hunger]
 
-globals [food-in-nest]
+globals [food-in-nest born]
 
 to setup
   clear-all
@@ -45,6 +45,7 @@ to setup-nest
     p-setup-nest
   ]
   set food-in-nest 0
+  set born 0
 end
 
 to p-setup-nest
@@ -223,6 +224,16 @@ to p-respawn-food
   ]
 end
 
+to birth
+  create-ants 1 [set color ant-color
+  set carrying-food 0
+  set hunger 0
+  setxy nest-x nest-y
+    fd nest-size]
+  set food-in-nest food-in-nest - ant-food-cost
+  set born born + 1
+end
+
 to go
   tick
   ask ants [t-work]
@@ -233,6 +244,9 @@ to go
   if enable-food-respawn and ticks mod food-ticks = 0[
     p-respawn-food
   ]
+  if enable-birth and (food-in-nest - ant-food-cost) >= food-surplus-threshold[
+    birth
+  ]
 end
 @#$#@#$#@
 GRAPHICS-WINDOW
@@ -735,35 +749,35 @@ enable-food-respawn
 -1000
 
 INPUTBOX
-1195
+1240
 90
-1280
+1325
 150
 food-ticks
-1500.0
+200.0
 1
 0
 Number
 
 SLIDER
-1285
+1330
 90
-1322
+1367
 280
 food-respawn-pct
 food-respawn-pct
 0
 100
-0.0
+48.0
 1
 1
 %
 VERTICAL
 
 INPUTBOX
-1195
+1240
 155
-1280
+1325
 215
 hunger-per-tick
 0.1
@@ -772,9 +786,9 @@ hunger-per-tick
 Number
 
 INPUTBOX
-1195
+1240
 220
-1280
+1325
 280
 hunger-threshold
 30.0
@@ -783,9 +797,9 @@ hunger-threshold
 Number
 
 INPUTBOX
-1195
+1240
 285
-1280
+1325
 345
 hunger-max
 35.0
@@ -828,14 +842,14 @@ true
 "" ""
 PENS
 "Alive" 1.0 0 -2674135 true "" "plot count turtles"
-"Dead" 1.0 0 -16777216 true "" "plot (ants-qty - count turtles)"
+"Dead" 1.0 0 -16777216 true "" "plot ((ants-qty + born) - count turtles)"
 "Starving" 1.0 0 -817084 true "" "plot count turtles with [hunger > hunger-threshold]"
 
 SLIDER
-1325
-91
-1362
-281
+1370
+90
+1407
+280
 hunger-increase-pct
 hunger-increase-pct
 0
@@ -846,6 +860,39 @@ hunger-increase-pct
 %
 VERTICAL
 
+SWITCH
+360
+775
+530
+808
+enable-birth
+enable-birth
+0
+1
+-1000
+
+INPUTBOX
+1240
+350
+1410
+410
+food-surplus-threshold
+1000.0
+1
+0
+Number
+
+INPUTBOX
+1330
+285
+1410
+345
+ant-food-cost
+10.0
+1
+0
+Number
+
 @#$#@#$#@
 ## WHAT IS IT?