편하신 시간에 전화주시기 바랍니다. 02-3453-1060

안녕하세요 예스스탁입니다. input : P1(5),P2(20),P3(60),P4(120),P5(240); var : m1(0),m2(0),m3(0),m4(0),m5(0); var : t1(0),t2(0),t3(0),t4(0),t5(0); var : s1(Nan),s2(Nan),s3(Nan); var : r1(Nan),r2(Nan),r3(Nan); var : g1(0),d1(0),l1(Nan),h1(Nan); var : g2(0),d2(0),l2(Nan),h2(Nan); var : up1(0),up11(0),uh1(0),ul1(0),um1(Nan); var : dn1(0),dn11(0),dh1(0),dl1(0),dm1(Nan); m1 = ma(C,P1); m2 = ma(C,P2); m3 = ma(C,P3); m4 = ma(C,P4); m5 = ma(C,P5); if m1 > m1[1] Then t1 = 1; if m1 < m1[1] Then t1 = -1; if m2 > m2[1] Then t2 = 1; if m2 < m2[1] Then t2 = -1; if m3 > m3[1] Then t3 = 1; if m3 < m3[1] Then t3 = -1; if m4 > m4[1] Then t4 = 1; if m4 < m4[1] Then t4 = -1; if m5 > m5[1] Then t5 = 1; if m5 < m5[1] Then t5 = -1; if m1 > m2 and t1 == -1 and t1 != t1[1] Then s1 = m2; if m2 > m3 and t2 == -1 and t2 != t2[1] Then s2 = m3; if m3 > m5 and t3 == -1 and t3 != t3[1] Then s3 = m3; if m1 < m2 and t1 == 1 and t1 != t1[1] Then r1 = m2; if m2 < m3 and t2 == 1 and t2 != t2[1] Then r2 = m3; if m3 < m5 and t3 == 1 and t3 != t3[1] Then r3 = m3; if CrossUp(m1,m2) Then { g1 = Index; h1 = highest(H[1],g1-d1); } if CrossDown(m1,m2) Then { d1 = Index; l1 = lowest(L[1],d1-g1); } if CrossUp(m2,m3) Then { g2 = Index; h2 = highest(H[1],g2-d2); } if CrossDown(m2,m3) Then { d2 = Index; l2 = lowest(L[1],d2-g2); } if t2 == 1 then { if t2 != t2[1] Then { up1 = Index; up11 = up1[1]; } uh1 = highest(m2,Index-up11+1); ul1 = lowest(m2,Index-up11+1); um1 = (uh1+ul1)/2; } if t2 == -1 then { if t2 != t2[1] Then { dn1 = Index; dn11 = dn1[1]; } dh1 = highest(m2,Index-dn11+1); dl1 = lowest(m2,Index-dn11+1); dm1 = (dh1+dl1)/2; } Plot1(s1,"지지1"); Plot2(s1,"지지2"); Plot3(s1,"지지3"); Plot4(l1,"전저지지1"); Plot5(l2,"전저지지2"); Plot6(um1,"마디존지지"); plot7(r1,"저항1"); plot8(r2,"저항2"); plot9(r3,"저항3"); Plot10(h1,"전고저항1"); Plot11(h2,"전고저항2"); Plot12(dm1,"마디존저항"); var : diff(0),cnt(0); Array : TL[100](0); if CodeCategory <= 2 Then { if c < 10000 Then diff = 1000; else if c >= 10000 and c < 100000 Then diff = 10000; Else diff = 100000; } if CodeCategory == 4 Then diff = 10; if CodeCategory == 5 Then diff = 100; var1 = Ceiling(C/diff)*diff; Var2 = var1-diff*50; For cnt = 0 to 99 { TL_Delete(TL[cnt]); TL[cnt] = TL_New(sDate,sTime,var2+diff*cnt,NextBarSdate,NextBarStime,var2+diff*cnt); TL_SetExtLeft(TL[cnt],true); TL_SetColor(TL[cnt],Gray); } 즐거운 하루되세요

수식 감사합니다.