海龟作图，程序虽短，但功能齐全！！设置海龟类型的基本操作为：procedureStartTurtleGraphlcs；｛显示作图窗口，并在窗口内写出本人的姓名、上机号和实验题号。｝procedureStartTurtle；｛令海龟处于作图的初始状态。即显示作图窗口，并将海龟定位在窗口正中；}｛置画笔状态为落笔、龟头朝向为0度（正东方向）。｝procedurePenUp；｛改变画笔状态为抬笔。从此时起，海龟移动将不在屏幕上作图。｝procedurePenDown；｛改变画笔状态为落笔。从此时起，海龟移动将在屏幕上作图。｝functionTurtleHeadins：inteser；｛返回海龟头当前朝向的角度。｝functionTurtlePos：