一、画圆

 

格式：REPEAT 36[RT 5 FD R*0.174 RT 5]　　(小海龟在圆周上)

或者：REPEAT 360[FD R*PI/180 RT 1]

 

１.R=100的圆

? Repeat 36[rt 5 fd 0.174*100 rt 5]

http://s10/mw690/001Txu1Vgy6DPp5UqSZ69&690LOGO 画图" TITLE="PC LOGO 画图" />

 

２.画图

? RT 90 FD 100 LT 90 FD 160 HOME　　　画直角三角形
? REPEAT 18[RT 5 FD 50*0.174 RT 5]　　画下面的半圆
? RT 90
? REPEAT 18[RT 5 FD 80*0.174 RT 5]　　画上面的半圆

http://s4/mw690/001Txu1Vgy6DQXBrgRlc3&690LOGO 画图" TITLE="PC LOGO 画图" />
 

二、椭圆

 

格式1：stampoval　长半轴　短半轴　　　　　 　空心椭圆

格式2：(stampoval　长半轴　短半轴　"true)　　实心椭圆

 

长半轴和短半轴相等时画出来的就是一个圆，这也是画圆的第二种方法(小海龟在圆心)

 

三、三个相切的圆

? Rt　30

? Repeat 3[pd stampoval 30 30 pu fd 60 rt 120]

 

http://s4/mw690/001Txu1Vgy6DPpxhWRZa3&690LOGO 画图" TITLE="PC LOGO 画图" />
 

四、写出如下图形的命令

１.

http://s8/mw690/001Txu1Vgy6DQWUqe6ba7&690LOGO 画图" TITLE="PC LOGO 画图" />

? REPEAT 4[FD 97 RT 135 FD 40 RT 45 FD 40 RT 45 FD 40 RT 135 RT 90]

 

２.

http://s16/mw690/001Txu1Vgy6FB4yDBX90f&690LOGO 画图" TITLE="PC LOGO 画图" />

REPEAT 4[FD 1.414*40*2 RT 135 FD 40 RT 45 FD 1.414*40 RT 45 FD 40 RT 135+90]

 

３.

http://s10/mw690/001Txu1Vgy6DQWUsub709&690LOGO 画图" TITLE="PC LOGO 画图" />
REPEAT 12[REPEAT 3[FD 30 LT 120] FD 30 RT 360/12]

 

五、画伞

? REPEAT 18[RT 5 FD 120*PI/18 RT 5] RT 180
? REPEAT 3[REPEAT 18[LT 5 FD 40*PI/18 LT 5]RT 180]
? PU SETX 120 SETY 40 PD
? BK 160 RT 180 REPEAT 18[RT 5 FD 20*PI/18 RT 5]

http://s15/mw690/001Txu1Vgy6EeWmeaKi8e&690LOGO 画图" TITLE="PC LOGO 画图" />

 

六、画长方体

? REPEAT 2[FD 80 RT 90 FD 160 RT 90]
? RT 60 REPEAT 4[PU FD 5 PD FD 5]RT 30 REPEAT 16[PU FD 5 PD FD 5]
? RT 90+60 FD 40 BK 40 RT 30+90 FD 80 LT 90+30 FD 40 BK 40 RT 30 FD 160 LT 30 FD 40 BK 40
? LT 60 REPEAT 8[PU FD 5 PD FD 5]
http://s3/mw690/001Txu1Vgy6ElfLOqTo92&690LOGO 画图" TITLE="PC LOGO 画图" />

七、彩色房子

? setbg 2

? pu bk 50 lt 90 fd 60

? pd setpc 7(stamprect 120 120 "true)

? pu bk 80

? pd setpc 6(stamprect 20 40 "true)

? pu fd 80 rt 90 fd 60 rt 90 fd 20

? pd setpc 9(stamprect 40 40 "true)

? pu fd 20 lt 90 fd 20

? pd setpc 15

? repeat 4[repeat 4[fd 20 rt 90]rt 90]

? pu lt 90 fd 40 rt 90 fd 40

? lt 90 fd 10 rt 120

? pd setpc 4 repeat 3[fd 140 rt 120]

? pu rt 30 fd 10 pd fill

http://s4/mw690/001Txu1Vgy6DPpybGzF33&690LOGO 画图" TITLE="PC LOGO 画图" />

 

八、立体五角星

TO LTWJX :S
     SETH 18
     REPEAT 5 [FD :S RT 144 FD :S RT 54 FD :S * 1.9 BK :S * 1.9 LT 126]
END

或者：

TO LTWJX :S
     SETH 18
     REPEAT 5 [FD :S RT 144 + 18 FD :S * 1.9 BK :S * 1.9 LT 18 FD :S LT 90 - 18]
END

LTWJX defined.

Ltwjx 100

http://s8/mw690/001Txu1Vgy6DPpzWV3927&690LOGO 画图" TITLE="PC LOGO 画图" />