1 / 14

# 火眼金睛 说说过程实现的功能 - PowerPoint PPT Presentation

I am the owner, or an agent authorized to act on behalf of the owner, of the copyrighted work described.

## PowerPoint Slideshow about ' 火眼金睛 说说过程实现的功能' - andres

Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author.While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server.

- - - - - - - - - - - - - - - - - - - - - - - - - - E N D - - - - - - - - - - - - - - - - - - - - - - - - - -
Presentation Transcript

TO SBX :B

REPEAT4[ FD:BRT 360/4 ]

END

• 步长为30的正四边形

TO YUAN :R

REPEAT 36[FD:R*3.14/18 RT 360/36 ]

END

• 半径为30的圆
• 步长为40的正7角星

TO QJX :J

REPEAT J[ FD40RT 180-180/:J ]

END

——螺旋线

TO SBX:B

FD :B RT 360/4

SBX :B

END

TO SBX :B

REPEAT4[ FD:BRT 360/4 ]

END

TOSBLX :B

FD :BRT 360/4

SBLX :B+10

END

SBLX :B+10

FD 30 RT 90

FD 30 RT90

FD 30 RT90

FD 30 RT 90

FD 30RT90

……

FD 30RT 90

FD 30 RT 90

FD 30 RT90

FD 30 RT90

FD 30 RT90

FD 40 RT 90

FD 50 RT 90

FD60 RT90

FD70 RT90

……

TOSBLX :B

FD :BRT 360/4

SBLX :B+10

END

IF :B>100 THEN STOP

100

30

SBLX :B+10

100

30

100

10

30

2、过程分别在不同编辑窗口中编辑，过程名必须不同

3、所有图形在一个图形窗口中显示但不重叠；

tosblx :b

if :b>180then stop

fd : brt360/4

sblx :b+10

end

todblx :b :n

if :b>180thenstop

fd :b rt 360/:n

dblx :b+10 :n

end

towblx:b

if :b>180then stop

fd : brt360/5

wblx :b+10

end

tolblx :b

if :b>180then stop

fd : brt360/6

lblx :b+10

end

( b代表步长 n代表边数)

……

ylx 10

ylx 30

ylx 60

todblx :b :n

if :b>180thenstop

fd :brt 360/:n

dblx :b+10 :n

end

b=3.14*:r/18

toylx :r

if :r>100thenstop

fd3.14*:r/18 rt 360/36

ylx :r+0.5

end

ylx 60

ylx 10

ylx30

TOSBLX :B

IF :B>100 THEN STOP

FD :BRT 360/4

SBLX :B+10

END

TOSBLX :B

IF :B<30 THEN STOP

FD :BRT 360/4

SBLX :B-10

END

todjxlx :b :j

if :b>180then stop

fd :b rt180-180/:j

djxlx :b+10 :j

end