ListLinePlot[]. Plot style axis direction change

I have a plot using ListLinePlot. I need the vertically axis crossing at 12000 and the axis direction reverse . That is going descending order from left to right.

Is this what you seek?Reverse x-axis

In Mathematica 10 try

Plot[x^2, {x, 1, 5}, PlotTheme -> "Business", 
 ScalingFunctions -> {"Reverse", "Log"}, PlotRange -> All]

ListPlot[Table[{x, x^2}, {x, 1, 5, 0.1}], PlotTheme -> "Business", 
 ScalingFunctions -> {"Reverse", "Log"}, PlotRange -> All]