motion

globals
[
 d_x v s d_t  d_x1 v1 s1 d_t1
]

to setup
  clear-all
  setup-auto
  setup-auto2
  reset-ticks
end 

to go
  ask turtle 0
  [
    unos
    izracun
  ]

  ask turtle 1
  [
    unos1
    izracun1
  ]
tick
end 

to setup-auto

  create-turtles 1
  ask turtle 0
  [
  set shape oblik
  set color boja
  set size 3
  set heading 0
  set ycor 0
  ]
end 

to setup-auto2
  create-turtles 1
  ask turtle 1
  [
  set shape oblik1
  set color boja1
  set size 3
  set heading 0
  set ycor -5
  ]
end 

to unos
  set d_t 0.05
  set v brzina
end 

to izracun
  set xcor (xcor + d_x)
  set s (s + d_x)
  set d_x (v * d_t)
end 

to unos1
  set d_t1 0.05
  set v1 brzina1
end 

to izracun1
  set xcor (xcor + d_x1)
  set s1 (s1 + d_x1)
  set d_x1 (v1 * d_t1)
end