El codigo al primer fotograma, y listo.

ventas2005 = new Array ();
ventas2005 = [40,30,70,30,70,100,50,100,190,30,255,400];

this.createEmptyMovieClip ("fondoGrafica",1);
fondoGrafica._x = 50;
fondoGrafica._y = 300;

fondoGrafica.lineStyle (1,0x6A859A,75);
separaCols = 30;
altoGrafica = 200;

//Dibujamos un rectángulo
fondoGrafica.moveTo (0,0);
fondoGrafica.lineTo (0,-altoGrafica);
fondoGrafica.lineTo (ventas2005.length*separaCols,-altoGrafica);
fondoGrafica.lineTo (ventas2005.length*separaCols,0);
fondoGrafica.lineTo (0,0);

//Creamos un estilo para nuestros textos
var my_fmt:TextFormat = new TextFormat();
my_fmt.color = 0x767676;
my_fmt.font  = "Verdana";
my_fmt.size  = 9;
my_fmt.align  = "right";

//Calculamos los valores máximos y mínimos de la gráfica
maximo = 1;
for (i=0;i<ventas2005.length;i++) {
 if ( Number(ventas2005[i]) > maximo) {
  maximo = ventas2005[i];
 }
}

// calcula el escalado de la gráfica
escala = altoGrafica/maximo;

//Dibujamos las líneas separadoras
separaciones = 4;

for (i=1;i<=separaciones;i++) {
  fondoGrafica.moveTo (0,-i*altoGrafica/separaciones);
  fondoGrafica.lineStyle (1,0x6A859A,50);
  fondoGrafica.lineTo (ventas2005.length*separaCols,-i*altoGrafica/separaciones);
 
  //Creamos campos de texto para cada linea
  fondoGrafica.createTextField("my_txt"+i,i,-100,(-i*altoGrafica/separaciones), 100, 30);
 
  //Asignamos el valor correspondiente al campo de texto
  eval("fondoGrafica.my_txt"+i).text = i*maximo/separaciones;
 
  //Aplicamos el estilo
  eval("fondoGrafica.my_txt"+i).setTextFormat(my_fmt);
}

//Dibujamos las barras de la gráfica aplicando el escalado
this.createEmptyMovieClip ("grafica2005",3);
grafica2005._x = 50;
grafica2005._y = 300;

anchoCols = 20;
separaCols = 10;
grafica2005.lineStyle (1,0x73819E,100);
for (i=0;i<ventas2005.length;i++) {
 inicio = (i*separaCols)+(i*anchoCols);
 grafica2005.beginFill (0x25529C,50);
 grafica2005.moveTo (inicio,0);
 grafica2005.lineTo (inicio,-ventas2005[i]*escala);
 grafica2005.lineTo (inicio+anchoCols,-ventas2005[i]*escala);
 grafica2005.lineTo (inicio+anchoCols,0);
 grafica2005.lineTo (inicio,0);
}