Gibanje auta

No preview image

1 collaborator

Ivan Milinović (Author)

WHAT IS IT?

(a general understanding of what the model is trying to show or explain)

HOW IT WORKS

(what rules the agents use to create the overall behavior of the model)

HOW TO USE IT

(how to use the model, including a description of each of the items in the Interface tab)

THINGS TO NOTICE

(suggested things for the user to notice while running the model)

THINGS TO TRY

(suggested things for the user to try to do (move sliders, switches, etc.) with the model)

EXTENDING THE MODEL

(suggested things to add or change in the Code tab to make the model more complicated, detailed, accurate, etc.)

NETLOGO FEATURES

(interesting or unusual features of NetLogo that the model uses, particularly in the Code tab; or where workarounds were needed for missing features)

RELATED MODELS

(models in the NetLogo Models Library and elsewhere which are of related interest)

CREDITS AND REFERENCES

(a reference to the model's URL on the web if it has one, as well as any other necessary credits, citations, and links)

Comments and Questions

Please start the discussion about this model! (You'll first need to log in.)

Click to Run Model

globals
[d_x d_t v s x_B v1 v2 v3 d_t1 d_t2 d_t3 d_x1 d_x2 d_x3
]

to setup
clear-all
 setup-čestica
setup-pozadina
reset-ticks
end 

to go
  ask turtle 0
  [
  if xcor <= x_B
  
  [
    izračun
  ]
  ]
  
  ask turtle 1
  [
    if xcor <= x_B
    [
    izračun1
    ]
  ]
  
  ask turtle 2
  [
    if xcor <= x_B
    [
      izračun2
    ]
  ]
  
  ask turtle 3
  [
    if xcor <= x_B
    [
      izračun3
    ]
  ]
  tick
end 

to setup-čestica
create-turtles 4
ask turtle 0
[
  set v random 100
set shape "car"
set color green
set size 2
setxy -10 0
if putanja [
  pen-down
]
]
ask turtle 1
[
  set v1 random 100
 set shape "car"
 set color blue
 set size 2
 setxy -10 9
 if putanja [
   pen-down
 ]
]
ask turtle 2
[
  set v2 random 100
  set shape "car"
  set color brown
  set size 2
  setxy -10 6
  if putanja [
    pen-down
  ]
]  
ask turtle 3
[
  set v3 random 100
 set shape "car"
 set color black
 set size 2
 setxy -10 3
 if putanja [
   pen-down
 ]
]
end 

to setup-pozadina
  set x_B random 15
  ask patches
 [
 set pcolor white
 ]
 
 ask patch -10  0
[
 set pcolor grey
set plabel "A"
]

ask patch x_B 0
[
  set pcolor grey
  set plabel
 "B"
]

ask patch -10 9
[
  set pcolor grey
  set plabel "A"
]

ask patch x_B 9
[
 set pcolor grey
 set plabel "B"
]
end 

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

to izračun1
 
  set d_t1 0.001
   
  set d_x1 (v1 * d_t1)
  set xcor (xcor + d_x1)
  set s (s + d_x1)
end 

to izračun2
  
   set d_t2 0.001
   
   set d_x2 (v2 * d_t2)
   set xcor (xcor + d_x2)
   set s (s + d_x2)
end 

to izračun3
 
    set d_t3 0.001
    
    set d_x (v3 * d_t3)
    set xcor (xcor + d_x3)
    set s (s + d_x3)
end

There is only one version of this model, created over 8 years ago by Ivan Milinović.

Attached files

No files

This model does not have any ancestors.

This model does not have any descendants.

NetLogo