커뮤니티
검토부탁드립니다
2021-08-11 18:26:08
1135
글번호 151465
안녕하세요
작성해주신 수식 감사합니다.
아래수식이 20 일간의 고점평균, 저점평균의 4 등분선을 작성한 수식인데
혹시 고점평균,저점평균이 아닌 20일간의 고점,저점의 4 등분선 수식이 아닌가해서요..
고점의 20 일간의 합계를 나눈 수식이 안보여서서요
확인좀 부탁드립니다.
input : N(20);
var : HH(0),LL(0),cnt(0);
var : tx1(0),tx2(0),tx3(0),tx4(0),tx5(0);
hh = 0;
ll = 0;
For cnt = 0 to N-1
{
if hh == 0 or (hh > 0 and DayHigh(cnt) > hh) Then
hh = DayHigh(cnt);
if ll == 0 or (ll > 0 and DayLow(cnt) < ll) Then
ll = DayLow(cnt);
}
if hh > 0 and ll > 0 Then
{
var1 = hh;
var2 = ll+(hh-ll)*0.75;
var3 = ll+(hh-ll)*0.50;
var4 = ll+(hh-ll)*0.25;
var5 = ll;
}
Plot1(Var1,"최고",RGB(252,102,2));
Plot2(Var2,"75%",RGB(232,251,251));
Plot3(Var3,"50%",RGB(183,221,33));
Plot4(Var4,"25%",RGB(32,215,222));
Plot5(Var5,"최저",RGB(7,86,247));
Text_Delete(tx1);
Text_Delete(tx2);
Text_Delete(tx3);
Text_Delete(tx4);
Text_Delete(tx5);
tx1 = Text_New(NextBarSdate,NextBarStime,var1,"N일 "+NumToStr(var1,2));
tx2 = Text_New(NextBarSdate,NextBarStime,var2,"N일 "+NumToStr(var2,2));
tx3 = Text_New(NextBarSdate,NextBarStime,var3,"N일 "+NumToStr(var3,2));
tx4 = Text_New(NextBarSdate,NextBarStime,var4,"N일 "+NumToStr(var4,2));
tx5 = Text_New(NextBarSdate,NextBarStime,var5,"N일 "+NumToStr(var5,2));
Text_SetStyle(tx1,0,1);
Text_SetStyle(tx2,0,1);
Text_SetStyle(tx3,0,1);
Text_SetStyle(tx4,0,1);
Text_SetStyle(tx5,0,1);
답변 1
예스스탁 예스스탁 답변
2021-08-12 10:42:10
안녕하세요
예스스탁입니다.
예 해당식이 N일간의 최고점과 최저점 기준입니다.
N일간의 고점평균, 저점평균으로 수정해 드립니다.
input : N(20);
var : hsum(0),lsum(0),hma(0),Lma(0),cnt(0);
var : tx1(0),tx2(0),tx3(0),tx4(0),tx5(0);
hsum = 0;
lsum = 0;
For cnt = 0 to N-1
{
hsum = hsum + DayHigh(cnt);
lsum = lsum + DayLow(cnt);
}
hma = hsum/N;
lma = lsum/N;
if hma > 0 and lma > 0 Then
{
var1 = hma;
var2 = lma+(hma-lma)*0.75;
var3 = lma+(hma-lma)*0.50;
var4 = lma+(hma-lma)*0.25;
var5 = lma;
}
Plot1(Var1,"최고",RGB(252,102,2));
Plot2(Var2,"75%",RGB(232,251,251));
Plot3(Var3,"50%",RGB(183,221,33));
Plot4(Var4,"25%",RGB(32,215,222));
Plot5(Var5,"최저",RGB(7,86,247));
Text_Delete(tx1);
Text_Delete(tx2);
Text_Delete(tx3);
Text_Delete(tx4);
Text_Delete(tx5);
tx1 = Text_New(NextBarSdate,NextBarStime,var1,"N일 "+NumToStr(var1,2));
tx2 = Text_New(NextBarSdate,NextBarStime,var2,"N일 "+NumToStr(var2,2));
tx3 = Text_New(NextBarSdate,NextBarStime,var3,"N일 "+NumToStr(var3,2));
tx4 = Text_New(NextBarSdate,NextBarStime,var4,"N일 "+NumToStr(var4,2));
tx5 = Text_New(NextBarSdate,NextBarStime,var5,"N일 "+NumToStr(var5,2));
Text_SetStyle(tx1,0,1);
Text_SetStyle(tx2,0,1);
Text_SetStyle(tx3,0,1);
Text_SetStyle(tx4,0,1);
Text_SetStyle(tx5,0,1);
즐거운 하루되세요
> 라몬 님이 쓴 글입니다.
> 제목 : 검토부탁드립니다
> 안녕하세요
작성해주신 수식 감사합니다.
아래수식이 20 일간의 고점평균, 저점평균의 4 등분선을 작성한 수식인데
혹시 고점평균,저점평균이 아닌 20일간의 고점,저점의 4 등분선 수식이 아닌가해서요..
고점의 20 일간의 합계를 나눈 수식이 안보여서서요
확인좀 부탁드립니다.
input : N(20);
var : HH(0),LL(0),cnt(0);
var : tx1(0),tx2(0),tx3(0),tx4(0),tx5(0);
hh = 0;
ll = 0;
For cnt = 0 to N-1
{
if hh == 0 or (hh > 0 and DayHigh(cnt) > hh) Then
hh = DayHigh(cnt);
if ll == 0 or (ll > 0 and DayLow(cnt) < ll) Then
ll = DayLow(cnt);
}
if hh > 0 and ll > 0 Then
{
var1 = hh;
var2 = ll+(hh-ll)*0.75;
var3 = ll+(hh-ll)*0.50;
var4 = ll+(hh-ll)*0.25;
var5 = ll;
}
Plot1(Var1,"최고",RGB(252,102,2));
Plot2(Var2,"75%",RGB(232,251,251));
Plot3(Var3,"50%",RGB(183,221,33));
Plot4(Var4,"25%",RGB(32,215,222));
Plot5(Var5,"최저",RGB(7,86,247));
Text_Delete(tx1);
Text_Delete(tx2);
Text_Delete(tx3);
Text_Delete(tx4);
Text_Delete(tx5);
tx1 = Text_New(NextBarSdate,NextBarStime,var1,"N일 "+NumToStr(var1,2));
tx2 = Text_New(NextBarSdate,NextBarStime,var2,"N일 "+NumToStr(var2,2));
tx3 = Text_New(NextBarSdate,NextBarStime,var3,"N일 "+NumToStr(var3,2));
tx4 = Text_New(NextBarSdate,NextBarStime,var4,"N일 "+NumToStr(var4,2));
tx5 = Text_New(NextBarSdate,NextBarStime,var5,"N일 "+NumToStr(var5,2));
Text_SetStyle(tx1,0,1);
Text_SetStyle(tx2,0,1);
Text_SetStyle(tx3,0,1);
Text_SetStyle(tx4,0,1);
Text_SetStyle(tx5,0,1);