커뮤니티

부탁드립니다.

프로필 이미지
yes
2024-10-03 18:05:30
826
글번호 183950
답변완료

첨부 이미지

도움에 감사 드립니다. 그림과 같이 부탁 드립니다. input:기간(30); input:계산개수(30); input:sig(15); Var:j(0),k(0),구간최고가(0),구간최저가(0),가격단위(0), 총거래량(0),최대거래량(0),최대계산(0),비중(0),TL1(0); Array:계산[15,3](0); // 열번호 1:가격이상,2:가격미만,3:수량 구간최고가 = Highest(H,기간); 구간최저가 = Lowest(L,기간); 가격단위 = (구간최고가 - 구간최저가)/계산개수; 계산[1,1] = 구간최저가; 계산[1,2] = 계산[1,1] + 가격단위; 계산[1,3] = 0; For j = 2 To 계산개수 { 계산[j,1] = 계산[j-1,1] + 가격단위; 계산[j,2] = 계산[j-1,2] + 가격단위; 계산[j,3] = 0; } 총거래량 = 0; For k = 0 To 기간 - 1 { 총거래량 = 총거래량 + V[k]; For j = 1 To 계산개수 { If 계산[j,1] <= C[k] and C[k] < 계산[j,2] Then { 계산[j,3] = 계산[j,3] + V[k]; j = 계산개수; } } } 최대거래량 = 0; 최대계산 = 0; For j = 1 To 계산개수 { If 최대거래량 < 계산[j,3] Then { 최대거래량 = 계산[j,3]; 최대계산 = j; } } var1=c-계산[최대계산,1]; var11=ma(var1,sig); Plot1(var11); PlotBaseLine1(0);
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2024-10-07 10:24:44

안녕하세요 예스스탁입니다. 식상 조건이 충족되지 않은 봉이 있으면 최대계산 변수가 0이 되고 이때는 var1이 종가가 됩니다. 해당 변수가 0이상일때만 var1에 값저장이 되게 변경해 드립니다. input:기간(30); input:계산개수(30); input:sig(15); Var:j(0),k(0),구간최고가(0),구간최저가(0),가격단위(0), 총거래량(0),최대거래량(0),최대계산(0),비중(0),TL1(0); Array:계산[15,3](0); // 열번호 1:가격이상,2:가격미만,3:수량 구간최고가 = Highest(H,기간); 구간최저가 = Lowest(L,기간); 가격단위 = (구간최고가 - 구간최저가)/계산개수; 계산[1,1] = 구간최저가; 계산[1,2] = 계산[1,1] + 가격단위; 계산[1,3] = 0; For j = 2 To 계산개수 { 계산[j,1] = 계산[j-1,1] + 가격단위; 계산[j,2] = 계산[j-1,2] + 가격단위; 계산[j,3] = 0; } 총거래량 = 0; For k = 0 To 기간 - 1 { 총거래량 = 총거래량 + V[k]; For j = 1 To 계산개수 { If 계산[j,1] <= C[k] and C[k] < 계산[j,2] Then { 계산[j,3] = 계산[j,3] + V[k]; j = 계산개수; } } } 최대거래량 = 0; 최대계산 = 0; For j = 1 To 계산개수 { If 최대거래량 < 계산[j,3] Then { 최대거래량 = 계산[j,3]; 최대계산 = j; } } if 최대계산 > 0 Then var1=c-계산[최대계산,1]; var11=ma(var1,sig); Plot1(var11); PlotBaseLine1(0); 즐거운 하루되세요 > yes 님이 쓴 글입니다. > 제목 : 부탁드립니다. > 도움에 감사 드립니다. 그림과 같이 부탁 드립니다. input:기간(30); input:계산개수(30); input:sig(15); Var:j(0),k(0),구간최고가(0),구간최저가(0),가격단위(0), 총거래량(0),최대거래량(0),최대계산(0),비중(0),TL1(0); Array:계산[15,3](0); // 열번호 1:가격이상,2:가격미만,3:수량 구간최고가 = Highest(H,기간); 구간최저가 = Lowest(L,기간); 가격단위 = (구간최고가 - 구간최저가)/계산개수; 계산[1,1] = 구간최저가; 계산[1,2] = 계산[1,1] + 가격단위; 계산[1,3] = 0; For j = 2 To 계산개수 { 계산[j,1] = 계산[j-1,1] + 가격단위; 계산[j,2] = 계산[j-1,2] + 가격단위; 계산[j,3] = 0; } 총거래량 = 0; For k = 0 To 기간 - 1 { 총거래량 = 총거래량 + V[k]; For j = 1 To 계산개수 { If 계산[j,1] <= C[k] and C[k] < 계산[j,2] Then { 계산[j,3] = 계산[j,3] + V[k]; j = 계산개수; } } } 최대거래량 = 0; 최대계산 = 0; For j = 1 To 계산개수 { If 최대거래량 < 계산[j,3] Then { 최대거래량 = 계산[j,3]; 최대계산 = j; } } var1=c-계산[최대계산,1]; var11=ma(var1,sig); Plot1(var11); PlotBaseLine1(0);