Netlogo基础知识讲解PPT学习教案

1、会计学1 Netlogo基础知识讲解基础知识讲解 第1页/共44页 第2页/共44页 第3页/共44页 第4页/共44页 第5页/共44页 第6页/共44页 第7页/共44页 第8页/共44页 第9页/共44页 第10页/共44页 第11页/共44页 第12页/共44页 第13页/共44页 初始化to setup 每一个仿真周期to go 是否结束？ 结束 对所有Turtle循环 ask turtles 每个Turtle做出决策forward 1 是 否 第14页/共44页 第15页/共44页 第16页/共44页 第17页/共44页 to setup ;定义例程setup clear-all

2、;设置整个世界为初始状态 ;创建100个turtles，创建后各turtle默认坐标是（0，0） create-turtles 100 ;命令所有turtle执行语句setxy random-xcor random-ycor ;各turtle 坐标随机产生，实现turtles在空间中的随机分布 ask turtles setxy random-xcor random-ycor end 第18页/共44页 第19页/共44页 to go ;定义仿真执行例程go move-turtles ;调用例程move-turtles end to move-turtles ;定义例程move-turtles

3、 ;所有turtle执行 中的命令序列 ask turtles right random 360 ;右转一个角度，度数随机产生 forward 1 ;前进距离1 end 第20页/共44页 第21页/共44页 to setup clear-all setup-patches ;调用例程setup-patches setup-turtles ;调用例程setup-turtles end to setup-patches ;命令所有patches执行指令set pcolor green ;该指令将patch颜色设置为绿色 ask patchesset pcolor green end to set

4、up-turtles create-turtles 100 ask turtlessetxy random-xcor random-ycor end 第22页/共44页 第23页/共44页 turtles-ownenergy ;声明turtle变量energy to go move-turtles ;turtle随机移动，消耗能量 eat-grass ;吃草获取能量 end 第24页/共44页 to eat-grass ;如果turtle所在patch颜色为绿色，表示有草，则吃草， ;令该patch颜色变为黑色，表示已无草，然后自身能量增加10 ask turtles if pcolor =

5、green set pcolor black set energy (energy+10) end 第25页/共44页 to move-turtles ask turtles right random 360 forward 1 set energy energy - 1 ;移动后能量减少1 end 第26页/共44页 to go move-turtles ;移动 eat-grass ;吃草 reproduce ;繁殖 check-death ;死亡 regrow-grass ;青草再生 end 第27页/共44页 to reproduce ask turtles if energy 50 ;

6、如果能量大于50则繁殖 set energy energy-50 ;母体能量减少50 hatch 1 set energy 50 ;产生一个后代，初始能量50 end to check-death ask turtles if energy=0 die ;如果能量小于等于0则死亡 end to regrow-grass ask patches ;青草以0.03的概率再生 if random 100= terminate-time stop ;判断是否应停止 move-turtles eat-grass reproduce check-death regrow-grass do-plots set ticks ticks+1 ;时钟推进