커뮤니티

부탁 드립니다.

프로필 이미지
yes
2018-10-20 07:28:07
238
글번호 122870
답변완료
도움주심에 감사 드립니다. 다음의 타주기 분용 수식을 일봉 주봉 월봉 차트의 지표를 분용 차트에 나타 나도록 부탁 드립니다. 미리 감사 드립니다. /* var1=LOWEST(L,P1); var2=HIGHEST(H,P1); */ //타주기 분용 수식 input : 타주기분(60),P1(10); var : S1(0),D1(0),TM(0),TF(0),cnt(0),Hv(0),Lv(0); Array : HH[100](0),LL[100](0); if Bdate != Bdate[1] Then { S1 = TimeToMinutes(stime); D1 = sdate; } if D1 > 0 then { if sdate == D1 Then TM = TimeToMinutes(stime)-S1; Else TM = TimeToMinutes(stime)+1440-S1; TF = TM%타주기분; if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then { HH[0] = H; LL[0] = L; for cnt = 1 to 99 { HH[cnt] = HH[cnt-1][1]; LL[cnt] = LL[cnt-1][1]; } } if H > HH[0] Then HH[0] = H; if L < LL[0] Then LL[0] = L; if HH[P1-1] > 0 and LL[P1-1] > 0 then { Hv = HH[0]; Lv = LL[0]; for cnt = 0 to P1-1 { if HH[cnt] > Hv Then Hv = HH[cnt]; if LL[cnt] < Lv Then Lv = LL[cnt]; } plot1(Hv); plot2(Lv); } }
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2018-10-22 14:14:13

안녕하세요 예스스탁입니다. 1 Input : P1(10); var : cnt(0),hh(0),ll(0); hh = DayHigh(0); ll = DayLow(0); for cnt = 0 to P1-1 { if DayHigh(cnt) > hh Then hh = DayHigh(cnt); if DayLow(cnt) < ll Then ll = DayLow(cnt); } plot1(hh); plot2(ll); 2 Input : P1(10); var : cnt(0),hv(0),lv(0); Array : hh[50](0),ll[50](0); if DayOfWeek(bdate) < DayOfWeek(bdate[1]) Then { hh[0] = h; ll[0] = l; for cnt = 1 to 49 { hh[cnt] = hh[cnt-1][1]; ll[cnt] = ll[cnt-1][1]; } } if h > hh[0] Then hh[0] = h; if l < ll[0] Then ll[0] = l; if hh[P1-1] > 0 and ll[P1-1] > 0 then { hv = hh[0]; lv = ll[0]; for cnt = 0 to P1-1 { if hh[cnt] > hv Then hv = hh[cnt]; if ll[cnt] < lv Then lv = ll[cnt]; } plot1(hv); plot2(lv); } 3 Input : P1(10); var : cnt(0),hv(0),lv(0); Array : hh[50](0),ll[50](0); if bdate > bdate[1]+30 Then { hh[0] = h; ll[0] = l; for cnt = 1 to 49 { hh[cnt] = hh[cnt-1][1]; ll[cnt] = ll[cnt-1][1]; } } if h > hh[0] Then hh[0] = h; if l < ll[0] Then ll[0] = l; if hh[P1-1] > 0 and ll[P1-1] > 0 then { hv = hh[0]; lv = ll[0]; for cnt = 0 to P1-1 { if hh[cnt] > hv Then hv = hh[cnt]; if ll[cnt] < lv Then lv = ll[cnt]; } plot1(hv); plot2(lv); } 즐거운 하루되세요 > yes 님이 쓴 글입니다. > 제목 : 부탁 드립니다. > 도움주심에 감사 드립니다. 다음의 타주기 분용 수식을 일봉 주봉 월봉 차트의 지표를 분용 차트에 나타 나도록 부탁 드립니다. 미리 감사 드립니다. /* var1=LOWEST(L,P1); var2=HIGHEST(H,P1); */ //타주기 분용 수식 input : 타주기분(60),P1(10); var : S1(0),D1(0),TM(0),TF(0),cnt(0),Hv(0),Lv(0); Array : HH[100](0),LL[100](0); if Bdate != Bdate[1] Then { S1 = TimeToMinutes(stime); D1 = sdate; } if D1 > 0 then { if sdate == D1 Then TM = TimeToMinutes(stime)-S1; Else TM = TimeToMinutes(stime)+1440-S1; TF = TM%타주기분; if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then { HH[0] = H; LL[0] = L; for cnt = 1 to 99 { HH[cnt] = HH[cnt-1][1]; LL[cnt] = LL[cnt-1][1]; } } if H > HH[0] Then HH[0] = H; if L < LL[0] Then LL[0] = L; if HH[P1-1] > 0 and LL[P1-1] > 0 then { Hv = HH[0]; Lv = LL[0]; for cnt = 0 to P1-1 { if HH[cnt] > Hv Then Hv = HH[cnt]; if LL[cnt] < Lv Then Lv = LL[cnt]; } plot1(Hv); plot2(Lv); } }