Utrka

No preview image

1 collaborator

Default-person Dino Bulat (Author)

Tags

(This model has yet to be categorized with any tags)
Visible to everyone | Changeable by everyone
Model was written in NetLogo 5.1.0 • Viewed 79 times • Downloaded 5 times • Run 0 times
Download the 'Utrka' modelDownload this modelEmbed this model

Do you have questions or comments about this model? Ask them here! (You'll first need to log in.)


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_x1 d_x2 d_t d_t1 d_t2 s s1 s2 x_B x_B1 x_B2 v1 v2 v3
]

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

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

to setup-čestica
  create-turtles 3
  ask turtle 0
  [
    set v1 random 100
    set shape "fish"
    set color red
    set size 4
    setxy -20 0
    if Putanja 
    [
      pen-down
    ]
  ]
  ask turtle 1
  [
    set v2 random 100
    set shape "bug"
    set color black
    set size 4
    setxy -20 -5
    if Putanja 
    [
      pen-down
    ]
  ]
  ask turtle 2
  [
    set v3 random 100
    set shape "wolf"
    set color green
    set size 4
    setxy -20 -10
    if Putanja 
    [
      pen-down
    ]
  ]
end 

to setup-pozadina
  ask patches
  [
    set pcolor blue
   
  ]
  
  ask patch -20 0
  [
    set pcolor grey
  set plabel "A"
  ]
  
   ask patch 20 0 
  [
    set pcolor grey
  set plabel "B"
  ]
  
   ask patch -20 -5
  [
    set pcolor grey
  set plabel "A"
  ]

 
   ask patch 20 -5
  [
    set pcolor grey
  set plabel "B"
  ]
  
   ask patch -20 -10
  [
    set pcolor grey
  set plabel "A"
  ]
  
 
   ask patch 20 -10
  [
    set pcolor grey
  set plabel "B"
  ]
end 

to izračun1
 
    set d_t 0.01
    
   set d_x (v1 * d_t)
  set xcor (xcor + d_x)
  set s (s + d_x)
end 

to izračun2
  
    set d_t1 0.01
   
   set d_x1 (v2 * d_t1)
  set xcor (xcor + d_x1)
  set s1 (s1 + d_x1)
end 

to izračun3
set d_t2 0.01
    
   set d_x2 (v3 * d_t2)
  set xcor (xcor + d_x2)
  set s2 (s2 + d_x2)
end 

There is only one version of this model, created about 7 years ago by Dino Bulat.

Attached files

No files

This model does not have any ancestors.

This model does not have any descendants.