갭보정 stochstics

분봉차트에서 일간갭을 보정하여 작성한 stochastics 지표


input : Period(12), Period1(5), Period2(5);
var : sumGap(0), gap(0), GO(0), GH(0), GL(0), GC(0);
var : stoLval(0), stoHval(0), fstK(0), stoK(0), stoD(0);

if date!=date[1] then {       // 날짜가 변경되는 봉에서(분봉에서 첫번째 봉)
         gap = Open-Close[1]; // 일간갭
         sumGap = sumGap+gap; // 일간갭 누적
}
             
GO = O - sumGap;// 갭보정 시가
GH = H - sumGap;// 갭보정 고가
GL = L - sumGap;// 갭보정 저가
GC = C - sumGap; // 갭보정 종가

stoLval = lowest(GL,Period);
stoHval = highest(GH,Period);
fstK = (GC-stoLval)/(stoHval-stoLval)*100;
stoK = ema(fstK, Period1);
stoD = ema(StoK, Period2);

plot1(stoK,"갭보정 %K");
plot2(stoD,"갭보정 %D");
plotBaseline1(20, "기준선1");
plotBaseline2(80, "기준선2");