안녕하세요 예스스탁입니다. input : R(0),G(0),B(0); input : P1(5),P2(10),P3(20); var : SC(0),SCV(0),sum(0),hh(0),ll(0),SCV1(0),ii(0); SC = (C-O)/(H-L); SCV = SC*v; if Bdate != Bdate[1] Then { sum = SCV; HH = sum; LL = sum; SCV1 = SCV; ii = 0; } else { ii = ii+1; sum = sum + SCV; if hh > sum Then hh = sum; if ll < sum Then ll = sum; } if ii < P1 Then var1 = sum/ii; Else var1 = ma(SCV,ii); if ii < P2 Then var2 = sum/ii; Else var2 = ma(SCV,P2); if ii < P3 Then var3 = sum/ii; Else var3 = ma(SCV,P3); if CurrentDate == sDate Then { plot1(sum,"vs"); Plot2(HH,"최고"); Plot3(HH-(HH-LL)*0.25,"25%"); Plot4(HH-(HH-LL)*0.618,"61.8%"); Plot5(HH-(HH-LL)*0.5,"50.0%"); Plot6(HH-(HH-LL)*0.382,"38.2%"); Plot7(HH-(HH-LL)*0.75,"75%"); Plot8(LL,"최저"); Plot10(sum+150,"sum+250"); Plot11(sum-150,"sum-250"); Plot12(HH-(HH-LL)*0.125,"12.5%"); Plot13(HH-(HH-LL)*0.875,"87.5%"); plot14(SCV1+100,"첫봉종가+100"); plot15(sum+05,"vs2",Rgb(R,G,B)); Plot16(HH-(HH-LL)*0.253,"26%"); Plot17(HH-(HH-LL)*0.753,"76%"); plot9(SCV1,"첫봉종가"); plot18(SCV1+100,"첫봉종가+100"); plot19(SCV1-100,"첫봉종가-100"); Plot20(HH-(HH-LL)*0.48,"49.5%"); Plot21(HH-(HH-LL)*0.51,"50.5%"); Plot22(HH-(HH-LL)*0.503,"50.3%"); Plot23(HH-(HH-LL)*0.497,"49.7%"); Plot24(HH+80,"최고+50"); Plot25(LL-80,"최저-50"); plot26(sum+200,"vs+200"); plot27(sum-200,"vs-200"); plot31(var1,"P1이평"); plot32(var2,"P2이평"); plot33(var3,"P이평"); PlotBaseLine2(40,"기준라인+40"); PlotBaseLine3(-40,"기준라인-40"); } PlotBaseLine1(0,"기준라인 0"); PlotBaseLine4(500,"기준라인+500"); PlotBaseLine5(-500,"기준라인-500"); 즐거운 하루되세요