안녕하세요.
수식문의 드립니다.
1.당일 최고가 에서 80% 로 계산한 가격 + 당일가 포함한 10일 ATR 1.2 배 가격 표시
당일 최저가 에서 80% 로 계산한 가격 - 당일가 포함한 10일
ATR 1.2 배 가격 표시
당일가 포함된 1.2배 ATR 가격을 "은하수" 라 쓰고 가격을 표시해 주세요, "은하수" 바로 옆에 붙여서 당일최고가를 더헌 가격을 빨간색 글씨로 표시, 아래칸 같은 라인에 당일 최저가 에 1.2배 ATR을 뺀 가격을 파란색 글씨로 표시 부탁 드립니다.
당일 최고가나, 최저가를 를 갱신 하면 가격이 변동 돱니다.
가격을 종목 호가에 맞춰서 끝자리 단위가 50% 이상이면 절상
50% 이허면 절사로 부탁 드립니다.
초보라서 매수, 매도 추가는 다음에 요청드리겠습니다.
답변 1
예스스탁
예스스탁 답변
2023-03-21 10:03:25
안녕하세요
예스스탁입니다.
input : Period(10);
var : sumTR(0),TH(0),TL(0),cnt(0),ATRV(0);
var : tx1(0),tx2(0);
sumTR = 0;
for cnt = 0 to Period-1
{
If DayClose(cnt+1) > DayHigh(cnt) then
TH = DayClose(cnt+1);
else
TH = DayHigh(cnt);
If DayClose(cnt+1) < daylow(cnt) then
TL = DayClose(cnt+1);
else
TL = daylow(cnt);
sumTR = sumTR + (TH-TL);
}
ATRV = sumTR/Period;
var1 = (DayHigh*0.8)+ATRV*1.2;
Var2 = (DayLow*0.8)-ATRV*1.2;
Value1 = (var1/PriceScale)*PriceScale;
Value2 = (var2/PriceScale)*PriceScale;
if var1-value1 >= PriceScale/2 Then
value1 = value1+PriceScale;
if var2-value2 >= PriceScale/2 Then
value2 = value2+PriceScale;
plot1(value1);
plot2(value2);
Text_Delete(tx1);
tx1 = Text_New(NextBarSdate,NextBarStime,value1,NumToStr(value1,2)+" 은하수:"+NumToStr(ATRV*1.2,2));
Text_SetStyle(tx1,2,1);
Text_SetColor(tx1,Red);
Text_Delete(tx2);
tx2 = Text_New(NextBarSdate,NextBarStime,value2,NumToStr(value2,2));
Text_SetStyle(tx2,2,0);
Text_SetColor(tx2,Blue);
즐거운 하루되세요
> 월드맨 님이 쓴 글입니다.
> 제목 : 수식문의 드립니다.
> 안녕하세요.
수식문의 드립니다.
1.당일 최고가 에서 80% 로 계산한 가격 + 당일가 포함한 10일 ATR 1.2 배 가격 표시
당일 최저가 에서 80% 로 계산한 가격 - 당일가 포함한 10일
ATR 1.2 배 가격 표시
당일가 포함된 1.2배 ATR 가격을 "은하수" 라 쓰고 가격을 표시해 주세요, "은하수" 바로 옆에 붙여서 당일최고가를 더헌 가격을 빨간색 글씨로 표시, 아래칸 같은 라인에 당일 최저가 에 1.2배 ATR을 뺀 가격을 파란색 글씨로 표시 부탁 드립니다.
당일 최고가나, 최저가를 를 갱신 하면 가격이 변동 돱니다.
가격을 종목 호가에 맞춰서 끝자리 단위가 50% 이상이면 절상
50% 이허면 절사로 부탁 드립니다.
초보라서 매수, 매도 추가는 다음에 요청드리겠습니다.