Ferrari

globals
[
  d_x
  s
  v
  d_t
  v2
  d_x2
  s2
  d_t2


]

to setup
    clear-all
setup-pozadina
setup-automobil
  reset-ticks
end 

to go
  ask turtle 0
  [
  unos
  izračun

  ]
  ask turtle 1
  [
    unos2
    izračun2
  ]
 tick
end 

to setup-automobil
  create-turtles 2
  ask turtle 0
  [
  setxy -10 -4
  set shape OblikPrvi
  set color red
  set size VeličinaPrva
  if PutanjaPrva
  [
    pen-down
  ]
  ]
  ask turtle 1
  [
    setxy -10 6
    set shape oblikdva
    set color yellow
    set size VeličinaDruga
    if PutanjaDruga
    [
      pen-down
    ]
  ]
end 

to unos
  set d_t 0.001
  set v BrzinaPrva
end 

to izračun
   set d_x (v * d_t)
   set xcor (xcor + d_x)
   set s (s + d_x)
end 

to unos2
  set d_t 0.001
  set v2 BrzinaDruga
end 

to izračun2
  set d_x2 (v2 * d_t)
  set xcor (xcor + d_x2)
  set s2 (s2 + d_x2)
end 

to setup-pozadina
  ask patches
  [
    set pcolor 97
  ]
end