커뮤니티

HPI (헤릭정산 지수)

프로필 이미지
풍운
2011-01-25 21:21:45
1627
글번호 35285
답변완료
Inputs: Mult(NumericSimple), Factor(NumericSimple); Variables: IDiff(0), IMin(0), K(0), HalfRange(0); IDiff = 2 * AbsValue(OpenInt[0] - OpenInt[1]); If OpenInt[0] < OpenInt[1] Then IMin = OpenInt[0] Else IMin = OpenInt[1]; HalfRange = (High + Low) * .5; If IMin <> 0 Then Begin If HalfRange > HalfRange[1] Then K = (HalfRange - HalfRange[1]) * Mult * Volume * (1 + IDiff / IMin) Else K = (HalfRange - HalfRange[1]) * Mult * Volume * (1 - IDiff / IMin); If CurrentBar <= 1 Then HPI = K Else HPI = HPI[1] + ((K - HPI[1]) * Factor); End Else HPI = 0; 선언되지 않은 함수가 사용되었다고 에러가 뜹니다. 조언 부탁드립니다.
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2011-01-26 10:37:38

안녕하세요 예스스탁입니다. 사용자함수식이므로 HPI라는 이름으로 만들어서 사용하시면 됩니다. 내용은 수정했습니다. Inputs: Mult(NumericSimple), Factor(NumericSimple); Variables: IDiff(0), IMin(0), K(0), HalfRange(0); IDiff = 2 * AbsValue(OI[0] - OI[1]); If OI[0] < OI[1] Then IMin = OI[0]; Else IMin = OI[1]; HalfRange = (High + Low) * .5; If IMin <> 0 Then Begin If HalfRange > HalfRange[1] Then K = (HalfRange - HalfRange[1]) * Mult * Volume * (1 + IDiff / IMin); Else K = (HalfRange - HalfRange[1]) * Mult * Volume * (1 - IDiff / IMin); If CurrentBar <= 1 Then HPI = K; Else HPI = HPI[1] + ((K - HPI[1]) * Factor); End Else HPI = 0; 즐거운 하루되세요 > 풍운 님이 쓴 글입니다. > 제목 : HPI (헤릭정산 지수) > Inputs: Mult(NumericSimple), Factor(NumericSimple); Variables: IDiff(0), IMin(0), K(0), HalfRange(0); IDiff = 2 * AbsValue(OpenInt[0] - OpenInt[1]); If OpenInt[0] < OpenInt[1] Then IMin = OpenInt[0] Else IMin = OpenInt[1]; HalfRange = (High + Low) * .5; If IMin <> 0 Then Begin If HalfRange > HalfRange[1] Then K = (HalfRange - HalfRange[1]) * Mult * Volume * (1 + IDiff / IMin) Else K = (HalfRange - HalfRange[1]) * Mult * Volume * (1 - IDiff / IMin); If CurrentBar <= 1 Then HPI = K Else HPI = HPI[1] + ((K - HPI[1]) * Factor); End Else HPI = 0; 선언되지 않은 함수가 사용되었다고 에러가 뜹니다. 조언 부탁드립니다.