breed.nlogo

breed [pleuros pleuro]        ;; Breed
breed [probos proboscis]      ;; Tongue
breed [hermis hermi]          ;; Food
probos-own [parent phase]
pleuros-own [sns-betaine-left sns-betaine-right sns-pleuro-right sns-pleuro-left
              action speed turn-angle nutrition satiation fear]
              
create-pleuros 1 [
    set shape "pleuro" 
    set color orange - 2 
    set size 10
    set action "wander"
    setxy random-xcor random-ycor
    set nutrition 0         ;; changed energy to "nutrition" 
    set satiation 0
    set time 0              ;; time for stimulus to zero
    set incentive 0         ;; set app-state 
    set fear 0
    
    ;; Add tongue 
    hatch-probos 1 [
      set shape "airplane" ;; Yes, the proboscis is actually a airplane
      set size 5
      set parent myself
    ]
    
    pen-down
]