Você procurou por: highlightposition (Inglês - Russo)

framed[tradingchart[{"goog", {{2010, 8, 1}, {2010, 10, 29}}}, {financialindicator["bbands", "linestyle" -> table[colordata[45][i], {i, {3, 4, 1}}]], financialindicator["psar", "linestyle" -> red], financialindicator["macd", "filling" -> automatic, "linestyle" -> table[colordata[45][i], {i, {4, 1}}]]}, imagesize -> 550, performancegoal -> "speed", trendstyle -> "blueyellow", framestyle -> directive[darker@white, absolutethickness[2]], labelstyle -> directive[white, fontfamily -> "helvetica", fontsize -> 14], axesstyle -> directive[white], method -> {"highlightposition" -> {2010, 10, 5}, "highlightstyle" -> directive[absolutepointsize[5], white], "axishighlightstyle" -> directive[opacity[0.3], white]}], roundingradius -> 15, background -> rgbcolor[0.25, 0.35, 0.4], framemargins -> 10]
column[{pointfigurechart[data, 0.015, imagesize -> 500, axes -> {true, false}, frame -> {{true, true}, {false, true}}, trendstyle -> "brownyellow", chartelementfunction -> "fadingrectangle", chartbasestyle -> directive[absolutethickness[2]]], datelistplot[data, aspectratio -> 1/4, imagesize -> 500, joined -> true]}]