adding bee-keepers

Source/beekeepers-initial-location.txt

@@ -0,0 +1 @@
+6	"Covasna"	6	"Giurgiu"	6	"Brasov"	6	"Vrancea"	6	"Satu Mare"	6	"Alba"	6	"Harghita"	6	"Ialomita"	6	"Bihor"	6	"Bistrita-Nasaud"	6	"Constanta"	6	"Gorj"	6	"Galati"	6	"Calarasi"	6	"Sibiu"	12	"Braila"	12	"Neamt"	12	"Olt"	12	"Suceava"	12	"Hunedoara"	12	"Mehedinti"	12	"Cluj"	12	"Maramures"	12	"Dambovita"	12	"Teleorman"	12	"Salaj"	12	"Vaslui"	12	"Dolj"	12	"Botosani"	12	"Prahova"	12	"Caras-Severin"	12	"Tulcea"	18	"Mures"	18	"Timis"	18	"Iasi"	18	"Buzau"	18	"Arad"	24	"Bacau"	24	"Arges"	24	"Valcea"	

Source/main.nlogo

@@ -99,21 +99,6 @@ NIL
 NIL
 1
 
-SLIDER
-10
-47
-43
-242
-amount-of-bk
-amount-of-bk
-10
-440
-101
-1
-1
-NIL
-VERTICAL
-
 SLIDER
 94
 49
@@ -123,7 +108,7 @@ harvesting-uncertainty
 harvesting-uncertainty
 0
 10
-1
+3.3
 0.1
 1
 NIL

Source/vmodel.nls

@@ -16,13 +16,21 @@ to setup-spots
 end
 
 to setup-beekeepers
-  create-beekeepers amount-of-bk
-  [ set shape "person"
-    set size 1
-    move-to one-of centroids
+  file-open "beekeepers-initial-location.txt"
+  while [not file-at-end?]
+  [
+    let amount-of-bk file-read
+    let location-bk file-read
+    show amount-of-bk
+    create-beekeepers amount-of-bk
+    [ set shape "person"
+      set size 1
+      show location-bk
+      move-to one-of patches with [ county-name = location-bk ]  
     if trace-on [ set color red pd ] ]
+  ]
+  file-close
 end
-
 to setup-seasons-uncertainty
   set abegin-uncertainty random-normal 0 season-uncertainty
   set aend-uncertainty random-normal 0 season-uncertainty