var baseOpen, baseHigh, baseLow, baseClose, quoteOpen, quoteHigh, quoteLow, quoteClose,
synOpen, synHigh, synLow, synClose, synPane, pix : integer;
var baseName, quoteName, baseCurrency, quoteCurrency : string;

baseCurrency := 'NZDUSD';   // the synthetic currency needs to be the first currency quoted
quoteCurrency := 'USDJPY';  // the synthetic currency needs to be the last currency quoted
pix := 700;                 // pane size in pixels of the synthetic currency
HideVolume;

SetPrimarySeries(baseCurrency);
  baseName := Copy(GetSymbol, 0, 3);
  baseOpen := #Open;
  baseHigh := #High;
  baseLow := #Low;
  baseClose := #Close;
RestorePrimarySeries;
SetPrimarySeries(quoteCurrency);
  quoteName := Copy(GetSymbol, 4, 3);
  quoteOpen := #Open;
  quoteHigh := #High;
  quoteLow := #Low;
  quoteClose := #Close;
RestorePrimarySeries;

synOpen := MultiplySeries(baseOpen, quoteOpen);
synHigh := MultiplySeries(baseHigh, quoteHigh);
synLow := MultiplySeries(baseLow, quoteLow);
synClose := MultiplySeries(baseClose, quoteClose);

synPane := CreatePane(pix, true, true);
DrawLabel('Synthetic Currency Chart', synPane);
DrawLabel(baseName + quoteName, synPane);
PlotSyntheticSymbol(baseName + quoteName, synOpen, synHigh, synLow, synClose, synPane, #Black, #Thin);