In[]:=
data=
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
;
In[]:=
currentPath={{6,132.1199951171875`},{9,140.49000549316406`},{10,133.5800018310547`},{12,142.1199951171875`},{13,138.35000610351562`},{16,145.38999938964844`}}tc=TradingChart[data[[1;;32]],Prolog{Thickness[0.0075],Black,Line[currentPath],PointSize[Medium],Blue,Point[currentPath]}]
Out[]=
{{6,132.12},{9,140.49},{10,133.58},{12,142.12},{13,138.35},{16,145.39}}
Out[]=