65 lines
641 B
Plaintext
65 lines
641 B
Plaintext
goto -60, 9
|
|
pendown
|
|
goto x+13, y+13
|
|
penup
|
|
|
|
goto -60, 6
|
|
pendown
|
|
goto x+13, y+8
|
|
penup
|
|
|
|
goto -60, 3
|
|
pendown
|
|
goto x+13, y+5
|
|
penup
|
|
|
|
goto -60, 0
|
|
pendown
|
|
goto x+13, y
|
|
penup
|
|
|
|
goto -47, -8
|
|
pendown
|
|
goto x-13, y+5
|
|
penup
|
|
|
|
goto -47, -14
|
|
pendown
|
|
goto x-13, y+8
|
|
penup
|
|
|
|
goto -47, -22
|
|
pendown
|
|
goto x-13, y+13
|
|
penup
|
|
|
|
setvar 0, A
|
|
|
|
repeat 6
|
|
goto -35,16-7A
|
|
pendown
|
|
goto x+3A+3,y+5
|
|
penup
|
|
goto x+A+3,y
|
|
pendown
|
|
goto x-3A-3,y-5
|
|
penup
|
|
setvar A+1, A
|
|
repeat_end
|
|
|
|
setvar 0, B
|
|
|
|
repeat 5
|
|
setvar 0, A
|
|
|
|
repeat 4
|
|
goto 3A, 24-30B
|
|
goto x+B,y+B
|
|
pendown
|
|
goto x+A,y+A
|
|
penup
|
|
setvar A+1, A
|
|
repeat_end
|
|
setvar B+0.2,B
|
|
repeat_end
|