globals [
  
  ; VARIABLES
  
  day ; the day of the month
  month ; the month of the year
  month-count ; variable used in calendar procedure
  month-array ; array that links numbers to names of months
  year ; the year
; bank-lending-rate: the rate at which the bank lends out, measured as a percentage in the form of a value between 0 and 1
  
  ; PARAMETERS
  
  
]

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

extensions [array]

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


breed [ firms firm ]
breed [ capital-firms capital-firm ]
breed [ households household ]
breed [ banks bank ]

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

firms-own [
  
  ; VARIABLES
  
  firm-deposit-account ; an account at the bank that the firm can draw funds from. This is one of the bank's liabilities, and an asset to the firm
  firm-loan-account ; an accounting measure that simply records the loan as an asset for the bank. 
  firm-deposit-calc
  firm-loan-calc

  
  ;PARAMETERS
  

  
]

capital-firms-own [
  
  ; VARIABLES
  

  
  ; PARAMETERS
  

  
]

households-own [
  
  ; VARIABLES
  
  household-deposit-account ; an account at the bank that the household can draw funds from. This is one of the bank's liabilities, and an asset to the household
  household-deposit-calc
  boss
  
  ; PARAMETERS
  

  
]

banks-own [ 
  
  vault ; the main vault at the central bank
  lending-quota ; how much the bank is set to lend out this period
  relending-quota
  bank-deposit-account
  bank-reserve-account
  bank-deposit-calc

]

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

to setup

;; (for this model to work with NetLogo's new plotting features,
  ;; __clear-all-and-reset-ticks should be replaced with clear-all at
  ;; the beginning of your setup procedure and reset-ticks at the end
  ;; of the procedure.)
clear-all 

setup-calendar
setup-banks
setup-firms
setup-capital-firms
setup-households

reset-ticks 

end  

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

to setup-calendar
  
  set month-array array:from-list ["Jan" "Feb" "Mar" "Apr" "May" "Jun" "Jul" "Aug" "Sep" "Oct" "Nov" "Dec"]
  
  set day 1
  set month-count 0
  set month array:item month-array month-count
  set year 2000

end

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

to setup-banks
  
  create-banks 1 [  
    
    set vault initial-money-stock  
    set bank-deposit-account 0
    

  ]
  
end


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

to setup-firms
  
  create-firms num-firms [    
    
    set firm-deposit-account 0
    set firm-loan-account 0
  ]
  
end

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

to setup-capital-firms
  
  create-capital-firms 0 [
    
  ]
  
end

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

to setup-households
  
  create-households num-households [   
    
    set household-deposit-account 0
    set boss [who] of one-of firms
    
  ]
  
end

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

to go
  
  if member? day [1 6 11 16] = true [
    do-weekly
  ]
  
  
  if day = 1 [
    do-monthly
  ]
  
  
  if (day = 1) and (month = "Jan") [
    do-yearly
  ]
  
    
  update-calendar
    
  tick
  
end

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

to update-calendar
  
    set day (day + 1)
    
    if day >= 21 [
      set day 1
      set month-count month-count + 1
      ]
    
    if month-count >= 11 [
      set month-count 0
      set year year + 1
    ]
    
   set month array:item month-array month-count  
  
end

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


to do-weekly
  
  firms-take-out-credit-and-service-debts
  
  households-and-banks-receive-income
  households-and-banks-go-shopping   
  firms-repay-loans
  
  if inject-new-money = true [banks-inject-new-money]
    
     
end

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

to do-monthly
  

  
end

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

to do-yearly
  

  
end

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

to  firms-take-out-credit-and-service-debts
  
  ask banks [      
       
       ; LENDING OF LOANS
       ; lending and relending of loans
       set lending-quota (vault * bank-lending-rate)
       set vault vault - (vault * bank-lending-rate)
       ask firms [set firm-deposit-account firm-deposit-account + ([lending-quota] of myself / count firms)]
       ask firms [set firm-loan-account firm-loan-account + ([lending-quota] of myself / count firms)]    
       
     ]
  
    ask firms [
      
      ; SORT OUT INTEREST TRANSFERS          
      ; some temporaray variables
      set firm-deposit-calc firm-deposit-account ; a temporary variable so that interest payments can be calculated from the same values throughout this routine
      set firm-loan-calc firm-deposit-account ; ditto
      
      ; recieve interest on deposits
      set firm-deposit-account firm-deposit-account + ((firm-deposit-calc * deposit-interest) / 48 ) ; recieve interest on deposited money
      set firm-loan-account firm-loan-account + ((firm-loan-calc * loan-interest) / 48 ) ; recieve interest on deposited money
      ask banks [set bank-deposit-account bank-deposit-account - (([firm-deposit-calc] of myself * deposit-interest) / 48 )] ; ask bank to deduct the deposit interest it paid
      
      ; pay interest on loans
      set firm-loan-account firm-loan-account - ((firm-loan-calc * loan-interest) / 48 ) ; pay interest on deposited money
      set firm-deposit-account firm-deposit-account - ((firm-loan-calc * loan-interest) / 48 ) ; pay interest on deposited money
      ask banks [set bank-deposit-account bank-deposit-account + (([firm-loan-calc] of myself * loan-interest) / 48 )] ; ask bank to add the loan interest it paid
      
    ]
  
end

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

to households-and-banks-receive-income
  
      ask households [
      
      ; CLAIM WAGES
      set household-deposit-account household-deposit-account + ([firm-deposit-account] of one-of firms with [who = [boss] of myself] * wage-rate)
      ask one-of firms with [who = [boss] of myself] [set firm-deposit-account firm-deposit-account - (firm-deposit-account * wage-rate)]
      
      ;INTEREST TRANSFERS
      set household-deposit-calc household-deposit-account
      set household-deposit-account household-deposit-account + (household-deposit-calc * deposit-interest)
      ask one-of firms with [who = [boss] of myself] [set firm-deposit-account firm-deposit-account - ([household-deposit-calc] of myself * deposit-interest)]
      
    ]
  
end

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

to households-and-banks-go-shopping
  
      ; GO SHOPPING
    
    ask households [
      set household-deposit-calc household-deposit-account
      set household-deposit-account household-deposit-account - (household-deposit-calc * household-spending-rate)
      ask one-of firms [set firm-deposit-account firm-deposit-account + ([household-deposit-calc] of myself * household-spending-rate)]
    ]
    
    ask banks [
      set bank-deposit-calc bank-deposit-account
      set bank-deposit-account bank-deposit-account - (bank-deposit-calc * bank-spending-rate)
      ask one-of firms [set firm-deposit-account firm-deposit-account + ([bank-deposit-calc] of myself * bank-spending-rate)]
    ]
  
end

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

to firms-repay-loans
  
      ; REPAY LOANS
    
    ask firms [
      set firm-deposit-calc firm-deposit-account
      set firm-deposit-account firm-deposit-account - (firm-deposit-calc * loan-repayment-rate)
      set firm-loan-account firm-loan-account - (firm-deposit-calc * loan-repayment-rate)
      ask banks [set vault vault + ([firm-deposit-calc] of myself * loan-repayment-rate)]
    ]
  
end

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

to banks-inject-new-money
  
      ; INVESTMENT IN GROWTH
    
    ask firms [
      set firm-deposit-calc firm-deposit-account
      set firm-deposit-account firm-deposit-account + (firm-deposit-calc * firm-investment-rate)
      set firm-loan-account firm-loan-account + (firm-deposit-calc * firm-investment-rate)
    ]
  
end

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
@#$#@#$#@
GRAPHICS-WINDOW
1162
18
1407
222
16
16
5.242424242424242
1
10
1
1
1
0
1
1
1
-16
16
-16
16
1
1
1
ticks
30.0

BUTTON
14
139
77
172
NIL
setup
NIL
1
T
OBSERVER
NIL
NIL
NIL
NIL
1

BUTTON
84
139
147
172
NIL
go
T
1
T
OBSERVER
NIL
NIL
NIL
NIL
1

SLIDER
12
56
415
89
num-firms
num-firms
0
250
25
1
1
NIL
HORIZONTAL

SLIDER
12
97
415
130
num-households
num-households
0
1000
250
1
1
NIL
HORIZONTAL

MONITOR
1290
236
1347
293
Year
year
17
1
14

MONITOR
1162
236
1219
293
Day
day
17
1
14

MONITOR
1225
236
1283
293
Month
month
17
1
14

SLIDER
157
139
413
172
initial-money-stock
initial-money-stock
0
1000
1000
1
1
NIL
HORIZONTAL

SLIDER
220
244
392
277
bank-lending-rate
bank-lending-rate
0
1
0.1
0.01
1
NIL
HORIZONTAL

PLOT
425
14
1148
535
Aggregated Assets and Liabilities
time
amount
0.0
10.0
0.0
10.0
true
true
"" ""
PENS
"bank-vault" 1.0 0 -16777216 true "" "ask banks [plot vault]"
"firm-deposits" 1.0 0 -2674135 true "" "plot sum [firm-deposit-account] of firms"
"bank-deposits" 1.0 0 -13840069 true "" "ask banks [plot bank-deposit-account]"
"firm-loans" 1.0 0 -13345367 true "" "plot sum [firm-loan-account] of firms"
"household-deposits" 1.0 0 -955883 true "" "plot sum [household-deposit-account] of households"
"" 1.0 0 -6459832 false "" ""

SLIDER
220
285
392
318
deposit-interest
deposit-interest
0
1
0.02
0.01
1
NIL
HORIZONTAL

SLIDER
220
325
392
358
loan-interest
loan-interest
0
1
0.06
0.01
1
NIL
HORIZONTAL

SLIDER
31
368
203
401
wage-rate
wage-rate
0
1
0.03
0.01
1
NIL
HORIZONTAL

SLIDER
30
243
207
276
household-spending-rate
household-spending-rate
0
1
0.24
0.01
1
NIL
HORIZONTAL

SLIDER
31
283
207
316
bank-spending-rate
bank-spending-rate
0
1
0.1
0.001
1
NIL
HORIZONTAL

SLIDER
32
325
205
358
loan-repayment-rate
loan-repayment-rate
0
1
0.014
0.001
1
NIL
HORIZONTAL

SLIDER
599
545
778
578
firm-investment-rate
firm-investment-rate
0
0.1
0.0050
0.001
1
NIL
HORIZONTAL

SWITCH
426
545
592
578
inject-new-money
inject-new-money
1
1
-1000

TEXTBOX
162
26
312
47
Initial Settings
16
13.0
1

TEXTBOX
177
213
327
234
Variables
16
13.0
1

@#$#@#$#@
## ## WHAT IS IT?

There are two actors in the model, shops and buyers.  The shops run on rules that decide their status as open or closed.  The buyers use a rule to decide when to window shop and when to buy.  The main variables for the shops are 'price' and 'cost'; both are changeable on the slider.  The variables for the shoppers are number of shoppers and how much window shopping they do before they buy.


## ## HOW IT WORKS

It is possible for the shops (patches) to be in 1 of 3 states: Closed (White), Open - but has not sold any units recently (Blue), and Open - and has sold units recently (Green).  When a shop is closed (White), there is a random chance that a new shop (Blue) will open in its place (changable with the 'startup_rate' slider on the interface).  Shops close when their cost is more than their price.  If shops do not sell any products (Blue) or have not sold any products recently (from Green to Blue), they will adjust their price in order to stay competitive.  If their still have not sold any units, then they may be randomly selected to go out of business.  After they have sold a unit of product, will turn green and adjust their price like the blue did, but at an independent rate.  Greens will not adjust their price if the margin between price and cost is $1 (an arbitrary low number) or less in order to prevent going out of business.

Buyers window shop before they buy, meaning they compare prices of X number of shops (on average) before they decide to buy.  They will then buy from the next store they run into that has a product price as low as or equal to the lowest price they found while window shopping.  After completing those tasks, the shopper effectivly resets and starts the process again.

## ## HOW TO USE IT

Price and cost of each unit of product for every shop is determined by a random number from a normal distribution.  There is a slider on the interface that allows you to adjust the mean and standard deviation of the random numbers.

There is also a slider for the the average number of shops a buyer will window shop before they buy and a slider for how many buyers there are.

## ## THINGS TO NOTICE

The "Frequency" graph shows the amount of shops in each state over time.  The green shops tend to be more constant than the blue or white, suggesting that those shops tend to have the best prices.  The "Cost and Price" graph shows how the average price lowers below the set average price.

## ## THINGS TO TRY

While running the model, move the 'price_compare' and 'startup_rate' sliders and see what happens. Also, toggle the mean price and cost and see how the graph reacts. Turn off the 'time_stop' switch to let the model keep going and then play with the sliders.

## ## EXTENDING THE MODEL

This model does not contain a cost function to determine its cost at different levels of output. This model would be better if a cost fuction was utilized in order to derive marginal cost and average cost. That would also mean a level of production must be determined also.  The model also relies heavily on probabilities, perhaps a different model could utilize tick counts for some things instead.

## ## CREDITS AND REFERENCES

Built by Corey Nyako, an undergradute student of economics at Florida State University.
@#$#@#$#@
default
true
0
Polygon -7500403 true true 150 5 40 250 150 205 260 250

airplane
true
0
Polygon -7500403 true true 150 0 135 15 120 60 120 105 15 165 15 195 120 180 135 240 105 270 120 285 150 270 180 285 210 270 165 240 180 180 285 195 285 165 180 105 180 60 165 15

arrow
true
0
Polygon -7500403 true true 150 0 0 150 105 150 105 293 195 293 195 150 300 150

box
false
0
Polygon -7500403 true true 150 285 285 225 285 75 150 135
Polygon -7500403 true true 150 135 15 75 150 15 285 75
Polygon -7500403 true true 15 75 15 225 150 285 150 135
Line -16777216 false 150 285 150 135
Line -16777216 false 150 135 15 75
Line -16777216 false 150 135 285 75

bug
true
0
Circle -7500403 true true 96 182 108
Circle -7500403 true true 110 127 80
Circle -7500403 true true 110 75 80
Line -7500403 true 150 100 80 30
Line -7500403 true 150 100 220 30

butterfly
true
0
Polygon -7500403 true true 150 165 209 199 225 225 225 255 195 270 165 255 150 240
Polygon -7500403 true true 150 165 89 198 75 225 75 255 105 270 135 255 150 240
Polygon -7500403 true true 139 148 100 105 55 90 25 90 10 105 10 135 25 180 40 195 85 194 139 163
Polygon -7500403 true true 162 150 200 105 245 90 275 90 290 105 290 135 275 180 260 195 215 195 162 165
Polygon -16777216 true false 150 255 135 225 120 150 135 120 150 105 165 120 180 150 165 225
Circle -16777216 true false 135 90 30
Line -16777216 false 150 105 195 60
Line -16777216 false 150 105 105 60

car
false
0
Polygon -7500403 true true 300 180 279 164 261 144 240 135 226 132 213 106 203 84 185 63 159 50 135 50 75 60 0 150 0 165 0 225 300 225 300 180
Circle -16777216 true false 180 180 90
Circle -16777216 true false 30 180 90
Polygon -16777216 true false 162 80 132 78 134 135 209 135 194 105 189 96 180 89
Circle -7500403 true true 47 195 58
Circle -7500403 true true 195 195 58

circle
false
0
Circle -7500403 true true 0 0 300

circle 2
false
0
Circle -7500403 true true 0 0 300
Circle -16777216 true false 30 30 240

cow
false
0
Polygon -7500403 true true 200 193 197 249 179 249 177 196 166 187 140 189 93 191 78 179 72 211 49 209 48 181 37 149 25 120 25 89 45 72 103 84 179 75 198 76 252 64 272 81 293 103 285 121 255 121 242 118 224 167
Polygon -7500403 true true 73 210 86 251 62 249 48 208
Polygon -7500403 true true 25 114 16 195 9 204 23 213 25 200 39 123

cylinder
false
0
Circle -7500403 true true 0 0 300

dot
false
0
Circle -7500403 true true 90 90 120

face happy
false
0
Circle -7500403 true true 8 8 285
Circle -16777216 true false 60 75 60
Circle -16777216 true false 180 75 60
Polygon -16777216 true false 150 255 90 239 62 213 47 191 67 179 90 203 109 218 150 225 192 218 210 203 227 181 251 194 236 217 212 240

face neutral
false
0
Circle -7500403 true true 8 7 285
Circle -16777216 true false 60 75 60
Circle -16777216 true false 180 75 60
Rectangle -16777216 true false 60 195 240 225

face sad
false
0
Circle -7500403 true true 8 8 285
Circle -16777216 true false 60 75 60
Circle -16777216 true false 180 75 60
Polygon -16777216 true false 150 168 90 184 62 210 47 232 67 244 90 220 109 205 150 198 192 205 210 220 227 242 251 229 236 206 212 183

fish
false
0
Polygon -1 true false 44 131 21 87 15 86 0 120 15 150 0 180 13 214 20 212 45 166
Polygon -1 true false 135 195 119 235 95 218 76 210 46 204 60 165
Polygon -1 true false 75 45 83 77 71 103 86 114 166 78 135 60
Polygon -7500403 true true 30 136 151 77 226 81 280 119 292 146 292 160 287 170 270 195 195 210 151 212 30 166
Circle -16777216 true false 215 106 30

flag
false
0
Rectangle -7500403 true true 60 15 75 300
Polygon -7500403 true true 90 150 270 90 90 30
Line -7500403 true 75 135 90 135
Line -7500403 true 75 45 90 45

flower
false
0
Polygon -10899396 true false 135 120 165 165 180 210 180 240 150 300 165 300 195 240 195 195 165 135
Circle -7500403 true true 85 132 38
Circle -7500403 true true 130 147 38
Circle -7500403 true true 192 85 38
Circle -7500403 true true 85 40 38
Circle -7500403 true true 177 40 38
Circle -7500403 true true 177 132 38
Circle -7500403 true true 70 85 38
Circle -7500403 true true 130 25 38
Circle -7500403 true true 96 51 108
Circle -16777216 true false 113 68 74
Polygon -10899396 true false 189 233 219 188 249 173 279 188 234 218
Polygon -10899396 true false 180 255 150 210 105 210 75 240 135 240

house
false
0
Rectangle -7500403 true true 45 120 255 285
Rectangle -16777216 true false 120 210 180 285
Polygon -7500403 true true 15 120 150 15 285 120
Line -16777216 false 30 120 270 120

leaf
false
0
Polygon -7500403 true true 150 210 135 195 120 210 60 210 30 195 60 180 60 165 15 135 30 120 15 105 40 104 45 90 60 90 90 105 105 120 120 120 105 60 120 60 135 30 150 15 165 30 180 60 195 60 180 120 195 120 210 105 240 90 255 90 263 104 285 105 270 120 285 135 240 165 240 180 270 195 240 210 180 210 165 195
Polygon -7500403 true true 135 195 135 240 120 255 105 255 105 285 135 285 165 240 165 195

line
true
0
Line -7500403 true 150 0 150 300

line half
true
0
Line -7500403 true 150 0 150 150

pentagon
false
0
Polygon -7500403 true true 150 15 15 120 60 285 240 285 285 120

person
false
0
Circle -7500403 true true 110 5 80
Polygon -7500403 true true 105 90 120 195 90 285 105 300 135 300 150 225 165 300 195 300 210 285 180 195 195 90
Rectangle -7500403 true true 127 79 172 94
Polygon -7500403 true true 195 90 240 150 225 180 165 105
Polygon -7500403 true true 105 90 60 150 75 180 135 105

plant
false
0
Rectangle -7500403 true true 135 90 165 300
Polygon -7500403 true true 135 255 90 210 45 195 75 255 135 285
Polygon -7500403 true true 165 255 210 210 255 195 225 255 165 285
Polygon -7500403 true true 135 180 90 135 45 120 75 180 135 210
Polygon -7500403 true true 165 180 165 210 225 180 255 120 210 135
Polygon -7500403 true true 135 105 90 60 45 45 75 105 135 135
Polygon -7500403 true true 165 105 165 135 225 105 255 45 210 60
Polygon -7500403 true true 135 90 120 45 150 15 180 45 165 90

square
false
0
Rectangle -7500403 true true 30 30 270 270

square 2
false
0
Rectangle -7500403 true true 30 30 270 270
Rectangle -16777216 true false 60 60 240 240

star
false
0
Polygon -7500403 true true 151 1 185 108 298 108 207 175 242 282 151 216 59 282 94 175 3 108 116 108

target
false
0
Circle -7500403 true true 0 0 300
Circle -16777216 true false 30 30 240
Circle -7500403 true true 60 60 180
Circle -16777216 true false 90 90 120
Circle -7500403 true true 120 120 60

tree
false
0
Circle -7500403 true true 118 3 94
Rectangle -6459832 true false 120 195 180 300
Circle -7500403 true true 65 21 108
Circle -7500403 true true 116 41 127
Circle -7500403 true true 45 90 120
Circle -7500403 true true 104 74 152

triangle
false
0
Polygon -7500403 true true 150 30 15 255 285 255

triangle 2
false
0
Polygon -7500403 true true 150 30 15 255 285 255
Polygon -16777216 true false 151 99 225 223 75 224

truck
false
0
Rectangle -7500403 true true 4 45 195 187
Polygon -7500403 true true 296 193 296 150 259 134 244 104 208 104 207 194
Rectangle -1 true false 195 60 195 105
Polygon -16777216 true false 238 112 252 141 219 141 218 112
Circle -16777216 true false 234 174 42
Rectangle -7500403 true true 181 185 214 194
Circle -16777216 true false 144 174 42
Circle -16777216 true false 24 174 42
Circle -7500403 false true 24 174 42
Circle -7500403 false true 144 174 42
Circle -7500403 false true 234 174 42

turtle
true
0
Polygon -10899396 true false 215 204 240 233 246 254 228 266 215 252 193 210
Polygon -10899396 true false 195 90 225 75 245 75 260 89 269 108 261 124 240 105 225 105 210 105
Polygon -10899396 true false 105 90 75 75 55 75 40 89 31 108 39 124 60 105 75 105 90 105
Polygon -10899396 true false 132 85 134 64 107 51 108 17 150 2 192 18 192 52 169 65 172 87
Polygon -10899396 true false 85 204 60 233 54 254 72 266 85 252 107 210
Polygon -7500403 true true 119 75 179 75 209 101 224 135 220 225 175 261 128 261 81 224 74 135 88 99

wheel
false
0
Circle -7500403 true true 3 3 294
Circle -16777216 true false 30 30 240
Line -7500403 true 150 285 150 15
Line -7500403 true 15 150 285 150
Circle -7500403 true true 120 120 60
Line -7500403 true 216 40 79 269
Line -7500403 true 40 84 269 221
Line -7500403 true 40 216 269 79
Line -7500403 true 84 40 221 269

x
false
0
Polygon -7500403 true true 270 75 225 30 30 225 75 270
Polygon -7500403 true true 30 75 75 30 270 225 225 270

@#$#@#$#@
NetLogo 5.0RC4
@#$#@#$#@
@#$#@#$#@
@#$#@#$#@
@#$#@#$#@
@#$#@#$#@
default
0.0
-0.2 0 0.0 1.0
0.0 1 1.0 0.0
0.2 0 0.0 1.0
link direction
true
0
Line -7500403 true 150 150 90 180
Line -7500403 true 150 150 210 180

@#$#@#$#@
0
@#$#@#$#@