计算机科学与技术专业06级操作系统原理课程设计课题名称交通.doc

计算机科学与技术专业06级 《操作系统原理》课程设计 课题名称：交通灯管制模拟 姓 名：张智超 班 级：计算机科学与技术06-4班 学 号：27 课程设计起止时间：：2008.8.23—2008.8.31 指导教师： 成绩： 课程设计任务书 《操作系统原理》课程设计任务书 设计题目： 任务下达时间： 任务完成时间： 指导教师： 指导教师评语 一、所得结果： 二、存在问题： 成绩 评阅人 操作系统课程设计 ——交通灯管制模拟 一、设计说明 一个十字路口，共有四组红绿灯，每个路口的车辆都遵循“红灯停、绿灯行”的原则，假设将每一台汽车都作为一个进程，请设计良好的机制，展示出合理的“十字路口交通管理”情况。 二、工作原理 车辆数目 每个路口的车辆数目不超过5辆，程序能够提供参数来设定初始的车辆数目。 交通灯设定 初始情况一个路口为红灯、一个路口为绿灯；红灯变为绿灯的间隔为3秒，必须保持十字路口交通灯的设定正确。 车辆通行设定 路口宽度不限，对一个路口而言，只有当一辆车通过路口（越过对面路口的交通灯后）后，其后续车辆才能继续通过交通灯，车辆通过路口的时间可以固定、可以自行计算，但是不能为3秒。（即必须体现交通灯对通行的管制）。 实现要求 本道作业可以在Windows平台或Minix平台实现，在两种平台下，都必须实现动态界面展示，Windows平台可以使用GUI界面或者文本字符界面，在Minix平台下，实现文本字符界面。 三、概要设计 设计两个类，分别为TTrafficCross和TVehicle，分别为路口类和车辆类。 用TTime控件持续调用TTafficCross的Refresh函数来保持路口的实时运行。 用TTafficCross的VehicleCreate函数每秒按几率在各个方向生成车辆。 用datCrossOccupied作为路口占用的信号量，用以维护路口指挥同时被南北或东西方向占用。 用datLights储存各个路口交通灯的状态。 每个车辆TVehicle自身维护一个一维坐标系，作为自己在自己方向上的状态。 绘图是根据方向和车辆自身的坐标系坐标，转变为二维坐标绘制在datImage上。 车辆数量、交通灯时间也已经能够在界面设置。 四、详细设计 部分代码 窗体文件fromMain.pas var TrafficCross: TTrafficCross; IsCreated: bool; //判定是否已经创建对象 procedure Tfrmmain.FormCreate(Sender: TObject); //初始化Timer及窗体 procedure Tfrmmain.btnStartClick(Sender: TObject); //读入初始化数据，并创建TrafficCross对象 procedure Tfrmmain.btnFinishClick(Sender: TObject); //释放TrafficCross对象 procedure Tfrmmain.timerMainTimer(Sender: TObject); //Timer触发事件，调用TrafficCross. Refresh 路口类classCross.pas TTrafficCross= class public constructor Create(var image: TImage; time_green,time_red,time_yellow: TLightsTime; initialnum: TCrosses; timerinterval: TTime; speed: TCoordinateSD; maxnum: TUInt; createprop: TUInt); //initialnum记录初始交通状况， 车辆列队于道路外边界坐标依次 0, [1].long, [2].head+[2].long, ... //timerinterval记录外部timer的扫描周期 procedure Refresh; private conTimerInterval: TTime; conMaxVehicle: TUInt; //单向最大车辆数 conCreateProp: TUInt; //每秒车辆生成率 conTimeGreen, conTimeRed, con