RockPaperBasicsv1

breed [papers paper]
breed [rocks rock]
breed [scissors scissor]

to setup
  clear-all
  reset-ticks
  create-rocks 10 [
    setxy random-xcor random-ycor
    ;set pen-mode "down"
    ;;set label "✂"
    set size 2
    set shape "rock"
    ;set shape one-of ["paper" "scissors" "rock"]
    set color 5
  ]
   create-papers 10 [
    setxy random-xcor random-ycor
    ;set pen-mode "down"
    ;;set label "✂"
    set size 2
    set shape "paper"
    ;set shape one-of ["paper" "scissors" "rock"]
    set color 5
  ]
create-scissors 10 [
    setxy random-xcor random-ycor
    ;set pen-mode "down"
    ;;set label "✂"
    set size 2
    set shape "scissors"
    ;set shape one-of ["paper" "scissors" "rock"]
    set color 5
  ]
end 

to go
 ; ask turtles [
  ;  ifelse random 2 = 0 [
      ; move up
     ; set ycor ycor + 1
   ; ]
    ;[
      ; move down
     ; set ycor ycor - 1
    ;]
  ;]

 ; paper > rock
 ; rock > scissors
 ; scissors > rock

  ask rocks [
    right random 90
    left random 90
    forward 0.1
  ]

   ask papers [
    right random 90
    left random 90
    forward 0.1
  ]
   ask scissors [
    right random 90
    left random 90
    forward 0.1
  ]
  ask papers [
   ask rocks-here [
     set color grey
     set shape "paper"
  ]]

   ask rocks [
   ask scissors-here [
     set color grey
     set shape "rock"
    ]]
    ask scissors [
   ask papers-here [
     set color grey
     set shape "scissors"
      ]]
;



 tick
end