1require 'ming'
2
3s = SWFShape.new
4s.moveTo(200, 200)
5s.setLine(40, 0x7f, 0, 0, 0xff)
6s.setRightFill(s.addSolidFill(0xff, 0, 0, 0xff))
7s.lineTo(6200, 200)
8s.lineTo(6200, 4600)
9s.curveTo(200, 4600, 200, 200)
10
11m = SWFMovie.new
12m.setDimension(6400, 4800)
13m.setRate(12.0)
14m.add(s)
15m.nextFrame
16
17m.save('shape.swf')
18