g20 g90
s1000m3
g43h1
g0w0

o100 sub
g90 g0 b0
g91 g0 y.1
g3 x0 y-.2 i0 j-.1 z-.05
g3 x0 y.2 i0 j.1 z-.05
g3 x0 y-.2 i0 j-.1 z-.05
g3 x0 y.2 i0 j.1 z-.05
g3 x0 y-.2 i0 j-.1 z-.05
g3 x0 y.2 i0 j.1 z-.05
g3 x0 y-.2 i0 j-.1 z-.05
g3 x0 y.2 i0 j.1 z-.05
g3 x0 y-.2 i0 j-.1 z-.05
g3 x0 y.2 i0 j.1 z-.05
g3 x0 y-.2 i0 j-.1
g3 x0 y.2 i0 j.1
g1 y-.1
g0 z.5
g90
o100 endsub

o101 sub
g0b45
g1z-.1f8
g1c360f1200
g0z.1
g0b0
o101 endsub

o102 sub
g0b45
g1z-.1f8
g1c0f1200
g0z.1
g0b0
o102 endsub

g0 z.1
g0 b0
g0 c0

g0x-.4y-.4
g1 z0 f15
o100 call
o101 call
g0 z.1

g0x.4y.4
g1 z0 f15
o100 call
o102 call
g0 z.1

m2