系统工程课内实验报告.doc

课内实验报告 课 程 名： 系统工程 任课教师： 朱 专 业： 信息管理与信息系统 学 号： 姓 名： 二○ 一四 至二○ 一五 年度 第 1 学期 南京邮电大学 管理学院 《 系统工程》课程实验报告 实验内容及基本要求： 实验项目名称：Ants 实验类型：设计 每组人数： 1 实验内容及要求： 1) 了解Netlogo编程语言的特点和基本语法。 2) 完成Netlogo基本Model的语句解析和仿真流程分析。 学号尾数为1号：Biology目录下的AIDS；2号：Ants 3号：DaisyWorld；4号：Fireflies 5号：Heatbugs；6号：Moths 7号：Virus；8号：Social Science目录下的Traffic Grid 9号：Voting；10号：Network目录下的Team Assembly 实验过程与结果： 1) 语句解析： patches-own [ chemical 蚂蚁分泌的化学物含量 food 食物堆中的食物量 nest? 蚁巢 nest-scent 接近蚁巢的情况 food-source-number 食物来源的食物量 ] 下面的是详细的程序 to setup clear-all set-default-shape turtles bug crt population [ set size 2 设置大小为2 set color red ] 蚂蚁如果没有携带食物的话就是红色的 setup-patches reset-ticks end to setup-patches ask patches [ setup-nest 设置蚁巢 setup-food 设置食物 recolor-patch ] 蚂蚁颜色的设置 end to setup-nest 设置蚁巢的具体程序 如果在蚁巢里，变量变为1，否则就是0 set nest? (distancexy 0 0) 5 ;; spread a nest-scent over the whole world – 在蚁巢旁边更加强烈 set nest-scent 200 - distancexy 0 0 end to setup-food 设置食物堆 ;; setup food source one on the right设置食物堆1号在右边的食物堆 if (distancexy (0.6 * max-pxcor) 0) 5 设置食物堆1号 ;; setup food source two on the lower-left设置食物堆2在左下角 if (distancexy (-0.6 * max-pxcor) (-0.6 * max-pycor)) 5 设置食物堆2号 ;; setup food source three on the upper-left设置食物堆3在左上方 if (distancexy (-0.8 * max-pxcor) (0.8 * max-pycor)) 5 设定食物堆3号 ;; set food at sources to either 1 or 2, randomly if food-source-number 0 [ set food one-of [1 2] ] end to recolor-patch 给蚂蚁颜色的设定函数 设置蚁巢和食物源的颜色 ifelse nest? [ set pcolor violet ] 将蚁巢设置成紫色 [ ifelse food 0 如果食物数量大于0的话 [ if food-source-number = 1 [ set pcolor cyan ] 食物堆1号，设置成青色 if food-source-number = 2 [ set pcolor sky ] 食物堆2号，设置成天空色 if food-source-number = 3 [ set