1.아래지표 검증이 안됨
수정 좀 해주세요
그리고 밑에 막대말고 왼쪽 수평 막대선으로 표시되게 좀 수정 좀 해주세요
Vars:
priceStep(100), // 가격 구간 간격 설정 (예: 100포인트)
maxBars(100), // 분석할 봉 수
i(0), j(0),
priceMin(0), priceMax(0),
priceLevel(0),
volumeBins(1000), // 구간 개수 (최대)
volArray ; // 거래량 누적 배열
// 초기화
Array: volArray ;
// 최소, 최대 가격 계산
priceMin = Close;
priceMax = Close;
For i = 0 to maxBars - 1 Begin
If Low[i] < priceMin Then priceMin = Low[i];
If High[i] > priceMax Then priceMax = High[i];
End;
// 가격 구간 개수 계산
Vars: binCount(0);
binCount = IntPortion((priceMax - priceMin) / priceStep) + 1;
// 배열 초기화
For i = 0 to binCount - 1 Begin
volArray[i] = 0;
End;
// 가격대별 거래량 누적
For i = 0 to maxBars - 1 Begin
priceLevel = IntPortion((Close[i] - priceMin) / priceStep);
If priceLevel >= 0 and priceLevel < binCount Then
volArray[priceLevel] = volArray[priceLevel] + Volume[i];
End;
// 결과 출력 (차트에 히스토그램으로 표시)
For j = 0 to binCount - 1 Begin
Plot1[0](volArray[j], "Vol@Price");
// Plot 위치 조정 필요 시: SetPlotYPosition(Plot1, priceMin + j * priceStep);
End;
2.그럼 즐거운 하루 되세요
답변 1
예스스탁
예스스탁 답변
2025-08-07 12:44:21
안녕하세요
예스스탁입니다.
올려주신 내용은 계산식 내용은 아래와 같이 수정해 드릴수 있지만
해당값 출력은 작성해 드리기 어렵습니다.
예스랭귀지의 plot은 번호를 지정해 한봉에 한번 출력해서
for문으로 처리해 드릴 수 없어 표시까지는 작성해 드릴 수 없습니다.
Vars:
priceStep(100), // 가격 구간 간격 설정 (예: 100포인트)
maxBars(100), // 분석할 봉 수
i(0), j(0),
priceMin(0), priceMax(0),
priceLevel(0),
volumeBins(1000); // 구간 개수 (최대)
// 초기화
Array: volArray[1000](0);
// 최소, 최대 가격 계산
priceMin = Close;
priceMax = Close;
For i = 0 to maxBars - 1 Begin
If Low[i] < priceMin Then priceMin = Low[i];
If High[i] > priceMax Then priceMax = High[i];
End;
// 가격 구간 개수 계산
Vars: binCount(0);
binCount = IntPortion((priceMax - priceMin) / priceStep) + 1;
// 배열 초기화
For i = 0 to binCount - 1 Begin
volArray[i] = 0;
End;
// 가격대별 거래량 누적
For i = 0 to maxBars - 1 Begin
priceLevel = IntPortion((Close[i] - priceMin) / priceStep);
If priceLevel >= 0 and priceLevel < binCount Then
volArray[priceLevel] = volArray[priceLevel] + Volume[i];
End;
즐거운 하루되세요
> 성공예견 님이 쓴 글입니다.
> 제목 : 지표문의
> 1.아래지표 검증이 안됨
수정 좀 해주세요
그리고 밑에 막대말고 왼쪽 수평 막대선으로 표시되게 좀 수정 좀 해주세요
Vars:
priceStep(100), // 가격 구간 간격 설정 (예: 100포인트)
maxBars(100), // 분석할 봉 수
i(0), j(0),
priceMin(0), priceMax(0),
priceLevel(0),
volumeBins(1000), // 구간 개수 (최대)
volArray ; // 거래량 누적 배열
// 초기화
Array: volArray ;
// 최소, 최대 가격 계산
priceMin = Close;
priceMax = Close;
For i = 0 to maxBars - 1 Begin
If Low[i] < priceMin Then priceMin = Low[i];
If High[i] > priceMax Then priceMax = High[i];
End;
// 가격 구간 개수 계산
Vars: binCount(0);
binCount = IntPortion((priceMax - priceMin) / priceStep) + 1;
// 배열 초기화
For i = 0 to binCount - 1 Begin
volArray[i] = 0;
End;
// 가격대별 거래량 누적
For i = 0 to maxBars - 1 Begin
priceLevel = IntPortion((Close[i] - priceMin) / priceStep);
If priceLevel >= 0 and priceLevel < binCount Then
volArray[priceLevel] = volArray[priceLevel] + Volume[i];
End;
// 결과 출력 (차트에 히스토그램으로 표시)
For j = 0 to binCount - 1 Begin
Plot1[0](volArray[j], "Vol@Price");
// Plot 위치 조정 필요 시: SetPlotYPosition(Plot1, priceMin + j * priceStep);
End;
2.그럼 즐거운 하루 되세요