资源描述
单击此处编辑母版标题样式,单击此处编辑母版文本样式,第二级,第三级,第四级,第五级,*,一、知识要点,三、动画图形,二、色彩图案,四、习题练习,退出,颜色设置与图形动画,一、知识要点,返回,1、通过设置画笔颜色命令，能画出各种色彩缤纷的图案。,2、利用人们的视觉暂留的特性快速播放一系列的静态影像，使视觉产生动态的效果。而让海龟反复执行“画图擦图确定新位置”这样的递归步骤即可实现。,3、根据图形变换的不同方式，,Logo,图形动画分为旋转、平移和伸缩三种运动的基本类型。 可使用相应的笔擦（,PE）、,清屏（,CLEAN）,命令或改变颜色方式加上延时控制来实现。,二、色彩图案,返回,通过设置画笔与背景颜色、图形填色等方式和命令实现各种色彩缤纷的图案。,基本命令,命 令,全 称,简 写,说 明,笔色,SETPC n,设置画笔的颜色(015),背景颜色,SETBG n,改变背景颜色(015),背景花纹,SETBGPATTERN n,设定屏幕背景为,n,号花纹,笔宽,SETWIDTH n,SETW n,设定笔宽为,n(199)。,笔纹,SETPATTERN n,指定海龟用规定的笔纹画线,笔刷,PENPAINT,PP,与笔纹命令配合使用,涂色,FILL,用当前笔色对封闭图形填色,色码、笔纹说明,代码,颜色,代码,颜色,代码,颜色,代码,颜色,0,黑,4,红,8,深灰,12,浅红,1,蓝,5,紫,9,浅蓝,13,浅紫,2,绿,6,棕,10,浅绿,14,浅棕,3,青,7,浅灰,11,浅青,15,白,代码,花纹名称,代码,花纹名称,代码,花纹名称,1,无花纹,5,粗斜条,9,密小点,2,横线条,6,淡粗斜条,10,稀小点,3,细斜条/,7,直网格,11,细小点,4,中斜条/,8,斜网格,指导说明,、刚进入,LOGO,系统时, 画笔颜色是白色（色码为1）；背景颜色是黑色（色码为0）；海龟笔宽的初始状态为1。,、笔纹命令必须与笔刷命令配合使用。如果多次使用笔纹命令(,SETPATTERN),在第一次使用之后,就要使用笔刷命令(,PP),一次, 以后再用笔纹命令时,就不需要再使用,PP,命令了。,、涂色命令只能对已经被海龟线条封闭起来的图形填色；图形封闭线条的颜色必须和所填的颜色相同；开始填色时,必须使海龟抬笔进入封闭图形内,再落笔。,例1：背景变幻,TO BJ :C,IF :C15 STOP,SETBG :C,WAIT 100,BJ :C+1,END,方法二：,TO CQ2 :C,IF :C15 STOP,SETPC :C,(STAMPOVAL 100 100 TRUE),WAIT 50,CQ2 :C+1,END,例2：彩球变幻,方法一：,TO CQ1 :C,IF :C15 STOP,SETPC :C,PU LT 90 FD 100 RT 90 PD,REPEAT 360FD 100*PI/180 RT 1,PU RT 90 FD 50 PD,FILL,FD 50 LT 90,WAIT 50,CQ1 :C+1,END,例3-1：多彩七巧板,TO QQB :B,DRAW,SETPC 9,RT 45 FD :B RT 135 FD :B*1.4142 RT 135 FD :B,PU RT 135 FD :B/4 PD FILL,PU BK:B/4 RT 45 PD,SETPC 2,FD :B RT 135 FD :B*1.4142 RT 135 FD :B,PU RT 135 FD :B/4 PD FILL,PU BK :B/4 RT 135 PD,SETPC 14,FD :B/2 RT 135 FD :B/2*1.4142 RT 135 FD :B/2,PU RT 135 FD :B/8 PD FILL,PU BK :B/8 LT 45 PD,SETPC 3,REPEAT 4FD :B/2 LT 90,PU LT 45 FD :B/8 PD FILL,PU BK :B/8 LT 45 FD :B/2 PD,SETPC 11,FD :B/2 RT 135 FD :B/2*1.4142 RT 135 FD :B/2,PU RT 135 FD :B/8 PD FILL,PU BK :B/8 RT 45 FD :B/2 RT 45 PD,例3-2：多彩七巧板,SETPC 13,REPEAT 2FD :B/2*1.4142 RT 90 RT 45 FD :B,PU BK :B RT 22 FD :B/8 PD FILL,PU BK :B/8 LT 22 PD,SETPC 12,REPEAT 2FD :B/2 LT 135 FD :B/2*1.4142 LT 45,PU LT 45 FD :B/8 PD FILL,PU BK :B/8 RT 90 FD :B/2*1.4142 LT 90 PD,SETPC 0,REPEAT 4FD :B*1.4142 LT 90,PU HOME PD,END,例3-3：多彩七巧板,三、动画图形,返回,利用人们的视觉暂留的特性快速播放一系列的静态影像，使视觉产生动态的效果。要让海龟作图时，实现动画效果，可以在编写尾部递归的过程中，反复执行“画图擦图确定新位置”这样的步骤来实现。,实例分析,从神奇的“一”笔入手学画图形动画。根据图形变换的不同方式图形动画可分为旋转运动、平移运动和伸缩运动的三种基本类型。,线段平移运动,TO XPY1,HT SETW 3,SETPC 1,FD 100,WAIT 20,PE,BK 100,RT 90 FD 1 LT 90 PD,XPY1,END,、平移运动是指图形从屏幕上的一处移到另一处而产生动画。图形平移可以是竖直方向、水平方向或者是任意方向。,、这里是用笔擦,PE,命令实现动画效果。,向右平移动,线段平移运动,TO XPY2,HT SETW 3,SETPC 1,FD 100,BK 100,WAIT 20,CLEAN,PU RT 90 FD 1 LT 90 PD,XPY2,END,这里是用清屏,CLEAN,命令实现动画效果。,线段旋转运动,旋转运动是指图形绕一定点转动而产生的动画。一样可用,PE,或,CLEAN,命令来实现效果。,TO XXD1,HT SETW 3,SETPC 12,FD 100,WAIT 100,PE,BK 100 PD,RT 360/60,XXD1,END,TO XXD2,HT SETW 3,SETPC 12,FD 100,BK 100,WAIT 100,CLEAN,RT 360/60,XXD2,END,向右转动,深入探讨：,秒表,如果图形中并有静动两种画面，必须只用笔擦,PE,命令来实现动画效果。,TO BIAOM,(,钟面),SETPC 9,STAMPOVAL 120 120,STAMPOVAL 117 117,SETW 2 REPEAT 12PU FD 105 PD ,FD 10 PU BK 115 PD RT 30,SETW 1 REPEAT 60PU FD 110 PD ,FD 5 PU BK 115 PD RT 6,END,TO MIAOB,DRAW HT,BIAOM,XXD1,END,秒表,线段伸缩运动,伸缩运动是指图形按同一比例放大或缩小而不改变其形状的动画。,TO XUS :Q :S,IF :Q100 MAKE Q 0 MAKE S 0,SETW 2,MAKE Q :Q+:S,HT FD :Q,WAIT 10,PE BK :Q PD,XUS :Q :S+5,END,TO BXUS,DRAW,TELLALL 0 14,EACH RT WHO*(360/15) ,SETPC 1*WHO,XUS 0 0,END,八,条,彩,色,射,线,应用举例：,有光芒四射的太阳,TO XXXUS,DRAW FS,ASK 15 SETPC 12 (STAMPOVAL 50 50 TRUE),TELLALL 0 14,EACH RT WHO*(360/15) PU FD 55 PD SETPC 1*WHO,XUS 0 0,END,深入探究,除了用笔擦命令(,PE),或清屏命令(,CLEAN),实现动画效果之外，色块的不断叠加或覆盖，也能产生图形“动”起来的感觉。,实例,分析1:,交通,“红,绿,灯,”,TO HLD :N,IF :N63 STOP,QI 15 50 30,PU FD 2 PD,HQ,HQD :N+1,END,TO HQ,HT,QI 12 50 30,PU FD 20 RT 90 FD 10 LT 90 PD,HWJX 4,PU RT 90 FD 10 LT 90 PD,HWJX 1.5,PU FD 5 LT 90 FD 2 RT 90 PD,HWJX 1.5,PU BK 10 PD,HWJX 1.5,PU BK 4 LT 90 FD 5 RT 90 PD,HWJX 1.5,PU BK 11 LT 90 FD 13 RT 90 PD,END,升国旗,实例,分析3:,球的摆动,TO SXTY :X :Y,(STAMPOVAL :X :Y TRUE),END,TO BQ1,BK 160,SXTY 20 20,PU FD 160 PD,END,TO BQ2,BK 160 SXTY 20 20,WAIT 20,PE SXTY 20 20,SETW 3 FD 160 PD,SETW 1,END,TO BQ3 :N,IF :N15 MAKE S 0,SETPC :S,PU FD 105 PD,SXTY 15 15,PU BK 105 PD,RT 360/14,WAIT 5,CSD2 :S+1,END,TO CSD3 :N,TELLALL 1 13,EACH RT WHO*(360/14) ,SETPC 1*WHO,CSD4 :N*14,END,TO CSD4 :N,REPEAT :NPU FD 105 PD SXTY 15 15 ,WAIT 10 PU BK 105 PD RT 360/14,END,旋动彩带(2),执行1只海龟的动画效果,TO CSDA,DRAW HT,CSD1,CSD2 0,END,执行,14,只海龟的动画效果,TO CSDB :N,DRAW HT,CSD1,CSD3 :N,END,四、习题练习,返回,习题练习,返回,
展开阅读全文