#!/usr/pkg/bin/ruby23

require'ming/ming'
include Ming

set_scale(20.000000)
use_SWF_version(9)


@m= SWFMovie.new
@m.set_dimension(200, 150)
@m.set_background(0x33, 0x43, 0x66)
@m.set_rate(12)


@stream= SWFVideoStream.new
@stream.set_dimension(100, 75)
@i = @m.add(@stream)
@i.set_name("video")
@i.move_to(20, 20)

@action = SWFAction.new("
		nc = new NetConnection ();
		nc.connect (null);
		ns = new NetStream (nc);
		video.attachVideo (ns);
		ns.play (\"video01.flv\");
		")
@m.add(@action)

@m.save("video3.swf")
