dfi = (DisplayFunction -> Identity); 
    dfdf = (DisplayFunction -> $DisplayFunction);

<< QuantLib`

Bates p. 80

m = 
      SVJDModel[40, 0.08, 0.06, Sqrt[0.0125], 0.2, Sqrt[0.0125], 2, 0, 2, 0, 
        0.07]

?MonteCarloPath

p = 
        MonteCarloPath[m, 0.25, 1000, 
          AntitheticPaths -> True];

p1 = MapIndexed[{#2[[1]] 0.25/1000, #1} &, p[[1]]]; 
    p2 = MapIndexed[{#2[[1]] 0.25/1000, #1} &, 
        p[[2]]];

<< Graphics`

gr = 
      Show[{ListPlot[p1, PlotJoined -> True, dfi], 
          ListPlot[p2, PlotJoined -> True, 
            PlotStyle -> GrayLevel[0.5], dfi]}, dfdf]

Export["c:\\cand\\SVJD-antithetic.eps", gr]

Export["c:\\cand\\SVJD-antithetic.wmf", gr]