require 'ming/ming' require 'uconv' include Ming $KCODE = 'e' use_SWF_version(6) set_scale(30.0) @movie = SWFMovie.new @movie.set_dimension(50, 50) @font = SWFBrowserFont.new('_明朝') @text = SWFTextField.new @message = Uconv.sjistou8('こんにちは世界') @text.set_font(@font) @text.add_UTF8_string(@message) @info = @movie.add(@text) 9.times { |j| @info.move_to(0, j * 5) @movie.next_frame } @movie.add(SWFAction.new('stop();')) @movie.save('helloj.swf')