cách làm thủ tục hình bông tuyết

2 câu trả lời

Bông tuyết 6 cánh :

to bongtuyet
cs
setpensize [ 3 3 ]
setpencolor 3
REPEAT 6 [ FD 50 REPEAT 6 [ FD 10 BK 10 RT 60 ] BK 50 RT 60 ]
ht
end

Bông tuyết 8 cánh :

to bongtuyet
cs
setpensize [ 3 3 ]
setpencolor 3
REPEAT 8 [ FD 100 REPEAT 6 [ FD 15 BK 15 RT 60 ] BK 100 RT 45 ]
ht
end

Bông tuyết 12 cánh :

to bongtuyet
cs
setpensize [ 3 3 ]
setpencolor 3
REPEAT 12 [ FD 100 REPEAT 6 [ FD 15 BK 15 RT 60 ] BK 100 RT 30 ]
ht
end

GỬI BN !

CHÚC BN HỌC TỐT !

XIN CTLHN NHA ^^

Thủ tục :

Vẽ 6 cánh :

REPEAT 6[FD 50 REPEAT 6[FD 10 BK 10 RT 60]BK 50 RT 60]

Vẽ 8 cánh :

CS REPEAT 8[FD 100 REPEAT 6[FD 15 BK 15 RT 60] BK 100 RT 360/8]

Vẽ 12 cánh :

CS REPEAT 12[FD 100 REPEAT 6[FD 15 BK 15 RT 60] BK 100 RT 360/8]

Xin hay nhất

Câu hỏi trong lớp Xem thêm