fd 100 rt 90 bk 100 lt 90
fd 100
rt 90
bk 100
lt 90
cs
cs fd 100 rt 360 bk 100 lt 180
pu fd 100
pd fd 100
ht (st)
setpencolor “red fd 100
setpensize 20 fd 100
cs pu setpencolor "blue setpensize 50 bk 100 ht st
Arc 360 100
Arc 180 50
Label “Shalom 123
Setlabelheight 30 label “Shalom 123
cs repeat 10 [arc 360 100 pu fd 10 pd]
for [i 1 10] [label : i fd 30] Label 1 fd 30 Label 2 fd 30 Label 3 fd 30 Label 4 fd 30 Label 5 fd 30 Label 6 fd 30 Label 7 fd 30 Label 8 fd 30 Label 9 fd 30 Label 10 fd 30
for [k 0 15] [setcolor : k arc 360 : k*10] setcolor 0 arc 360 0 setcolor 1 arc 360 10 setcolor 2 arc 360 20. . . Setcolor 15 arc 360 150
! ית על / ת תותח / מי שפותר , שאלה קשה בטירוף cs fd 50 pu rt 90 for [i 1 10] [for [j 1 10] [label : i*: j fd 30] bk 300 rt 90 fd 30 lt 90]
cs repeat 1000 [setpencolor random 16 fd random 100 rt random 360]
pu setxy -150
pu setxy 400 -200
? איפה הצב pos, xcor, ycor
filled “blue [repeat 4 [fd 100 rt 90]]
to square repeat 4 [fd 100 rt 90] end
Repeat 180 [square rt 2]
קשת בענן CTRL-ENTER
- Slides: 53