Random 协调随机选择的海龟及其特征

我正在尝试建立一个简单的市场模型，如下所示

breed [ firms firm ]
breed [ consumers consumer ]
firms-own [ price ]
hogus-own [ money stock ]
globals [ m0 ] 

还有100个客户和10家公司。公司的价格在0到10之间随机设定，每个消费者的初始资本为100

to setup
  set m0 [ 0 ]
  set m0 lput p0 m0
end

to go
tick
buy
sell
set m0 fput p0 m0  
end 

to-report p0 
  report [ price ] of one-of firms 
end 

to-report recent 
  report item ticks m0 
end 

to-report past 
  report item ( ticks - 1 ) m0 
end 

我已经列出了一个清单，这样我就可以比较公司当前和过去的价格，但是我遇到了一个问题。我希望每个代理商随机选择5家公司，然后比较过去和现在的价格。然后，如果价格上涨，消费者应该购买（即增加库存）。我试着这样做

to buy 
  if (recent > past and capital > 0) [ 
    set capital  capital - recent0 
    set stock stock + 1 ] 
end 

---

但我遇到了一个问题。每个代理都应该随机选择自己的公司。然而，因为每个代理都受相同的代码约束，所以他们总是从同一家公司购买。我该如何解决这个问题？

这里有很多活动的片段，问题还不清楚。从中提取一个问题太难了。这里有一些你可能会问的问题。我怎样才能让一个客户随机查看5家公司。（回答：使用

n-of

）如何跟踪所有10家公司的价格历史？（回答：使用

表

扩展名。）如何让客户持有股票组合，而不仅仅是一个集合？（答：使用列表）等。