信奥赛 Logo程序设计-10 多龟操作.pptVIP

* Logo程序设计 (授课讲稿) 吴剑辉 第十讲 多龟操作 到现在为止，我们一直是只使用一只海龟作图。实际上，Logo系统预定义了16只海龟，依次编号为0~15。Logo启动时,直接听从指挥的海龟只是0号，我们把它称为当前活动的海龟。其他海龟（1~15号）不能直接接受命令，叫做非活动的海龟。 如何使多只海龟参与操作？一种是指名方法，使非活动的海龟也能执行命令；另一种是激活方法，就是将非活动的海龟变成当前活动的海龟。 一、指名海龟执行命令 二、激活海龟参与活动 三、多龟操作应用选编 一、指名海龟执行命令 指名执行是通过ASK命令指使非活动海龟执行操作。 指名海龟执行命令（ASK） 【格式1】：ASK 龟号 [命令组] 【格式2】：ASK [龟号列表] [命令组] 【功 能】：使指定代号的海龟执行“命令组”中的命令。 1 2 3 例题1：指名执行。 （如图1所示） TO DHGZT1 DRAW ASK 1[ST PU SETX -200 PD REPEAT 3[FD 80 RT 120]] ASK 2[ST PU SETX 0 PD REPEAT 4[FD 80 RT 90]] ASK 3[ST PU SETX 200 PD REPEAT 5[FD 80 RT 144]] END 图1-？DHGZT1↙ 例题2：指名执行。（如图2所示） TO DHGZT2 ASK 5[ST SETPC 1 PU SETXY[-30 30]] ASK 10[ST SETPC 2 PU SETXY[-30 -30]] ASK 15[ST SETPC 13 PU SETXY[30 -30]] ASK [5 10 15][PD SXJX 40 40] SETPC 12 PU SETXY[30 30] PD SXJX 40 40 END 0 5 10 15 TO SXJX :X :Y (STAMPRECT :X :Y TRUE) END 【指导说明】： 海龟代号可以是0~15。在指定多只海龟时，海龟代号要用方括号括起来；如果只有一只海龟代号，就可不用；没有指定海龟代号的话，在过程中或执行时视为 0 号海龟。命令组中可以是一条命令，或一组命令，还可以调用其他过程。 图2-？DHGZT2↙ 笔色为蓝的5号海龟定位 笔色为绿的10号海龟定位 笔色为浅紫的15号海龟定位 5、10 、15 号海龟画正方形 笔色为浅红的0号海龟画正方形 二、激活海龟参与活动 一只或多只海龟一旦被激活，即为当前活动的海龟。这样其后的命令都是针对激活的还龟而言，直到再次激活其他海龟为止。 和WHO命令合在一起使用。可以使已经被激活的海龟分别执行命令组 EACH [命令组] 分别执行 查询正在活动的海龟的代号。WHO经常作为过程中的参数使用，使各只海龟能拥有自己的颜色、位置。 WHO 查 询 激活这两个代号之间所有的海龟。 TELLALL 代号1 代号2 激 活 激活指定的海龟成为活动的海龟。 TELL [海龟代号] 激 活 说 明 格 式 命 令 例题3：激活执行。（如图3所示） TO JHHG1 DRAW HT ASK 1[SETPC 2 PU SETX -50] ASK 3[SETPC 14 PU SETX 0] ASK 5[SETPC 12 PU SETX 50] TELL [1 3 5] PD (STAMPRECT 40 80 TRUE) END 图3-？JHHG1↙ 例题4：激活执行。（如图4所示） TO JHHG2 DRAW ASK 8[SETPC 7] ASK 9[SETPC 8 RT 45] ASK 10[SETPC 9 RT 90] ASK 11[SETPC 10 RT 135] ASK 12[SETPC 11 RT 180] ASK 13[SETPC 12 RT 225] ASK 14[SETPC 13 RT 270] ASK 15[SETPC 14 RT 315] TELLALL 8 15 SETW 2 FD 80 REPEAT 4[FD 40 RT 90] END 图4-？JHHG2↙ 例题5：测试激活的海龟。 ? DRAW ? WHO 结果： 0 ? ASK 1[ST FD 100] ? WHO 结果： 0 ? TELL [2 4 6] ? WHO 结果： [2 4 6] ? 【指导说明】： ⑴、执行DRAW命令，系统自动激活0号海龟,即0号海龟是当前活动海龟。 ⑵、ASK命令只是使非活动的海龟执行命令,它