Clipper/FiveWin - ¿Como insertar varias SERIES en un grafico?

Estimados compañeros.... tengo un gráfico donde tengo que insertar varias series (en un mismo gráfico deben aparecer las columnas en rojo indicando el año 2004 y las columnas en azul indicando el 2005).......... para ello muestro el siguiente ejemplo:

LOCAL oWndChild, oGraph, oBar, oCbx
LOCAL cItem, oPop
cFile:="New"
DEFINE WINDOW oWndChild MDIChild TITLE "Gráfico de Ventas"
oGraph:=TGraph():New(0,0,oWndChild,oWndChild:nWidth(),oWndChild:nHeight())
aPers:={"Uno","Dos","Tres"}
oGraph:cTitle := "Gráfico de ventas"
oGraph:cSubTit:= ""
oGraph:cTitX := "Meses"
oGraph:cTitY := "Total Ventas"
oGraph:lPopUp := .T.
oGraph:lViewVal:=.T.
oGraph:AddSerie({1,2,3}, "", RGB(128,128,255))
oGraph:SetYVals(aPers)
oWndChild:SetControl(oGraph)
ACTIVATE WINDOW oWndChild

Con este código solo aparece una serie con columnas de color azul... pero no soy capaz de insertar otra serie de color rojo.... ¿como se inserta otra?

Mil gracias a todos

Lorenzo:

Debes agregar una línea por cada serie que desees ejemplo:

oGraph:AddSerie({nPre},"Presupuesto",RGB(255,000,000))
oGraph:AddSerie({nVts},"Ventas",RGB(000,000,255))

Saludos, Armando