커뮤니티
수식
2025-04-02 12:03:56
287
글번호 189785
첨부 이미지
그림1
안녕하세요.
아래 수식은 주봉시고저가와 5일 이동평균선으로 나타낸 것인데
수정부탁드립니다.
1. 주봉 시고저의 수식이 맞는지 확인바랍니다.
2. 그림파일의 화살표처럼 전일 마감시의 지표값이 당일 차트에 동일한 가격으로
나타나도록 수정바랍니다.
if Bdate> Bdate[1]+7 Then
{
var1 = O;
Var2 = h;
Var3 = l;
}
if var1 > 0 Then
{
if h > Var2 Then
var2 = h;
if l < var3 Then
Var3 = l;
Plot1(var1,"주시");
plot2(Var2,"주고");
plot3(Var3,"주저");
plot4((Var2+Var3)/2, "주 中");
plot5(DayOpen(),"당일시가");
plot6(DayClose(1),"전일종가");
plot7((DayHigh+daylow)/2,"당일중앙선");
var : cnt(0);
input :최고가(0),최저가(0),Per1(76.4),Per2(61.8),Per3(50.0),Per4(38.2),Per5(23.6);
input : dP(5);
var : dHH(0),dHH1(0),dHH2(0),dHH3(0),dHH4(0),dHH5(0),dHH6(0),dHH7(0),dLL(0), dLL1(0),dDD(0),dTT(0);
var : dsumV1(0),dsumV2(0), dmav1(0),dmav2(0),ddiff(0),dvalue(0);
if DayClose(dP) > 0 Then
{
dsumV1 = DayOpen;
dsumV2 = DayOpen;
for cnt = 1 to dP-1
{
dsumV1 = dsumV1+DayClose(cnt);
dsumV2 = dsumV2+DayClose(cnt+1);
}
dmaV1 = dsumV1 / dP;#당일기준 일봉이평
dmaV2 = dsumV2 / dP;#전일기준 일봉이평
ddiff = dmav2-dmav1;#전일-당일
}
Plot15(dmav1, "5일");
dhh1 = dmav1;
input : dP1(10);
var : dHH10(0),dHH11(0),dHH12(0),dHH13(0),dHH14(0),dHH15(0),dHH16(0),dHH17(0),dLL10(0), dLL11(0),dDD10(0),dTT10(0);
var : dsumV11(0),dsumV12(0), dmav11(0),dmav12(0),ddiff10(0),dvalue10(0);
if DayClose(dP1) > 0 Then
{
dsumV11 = DayOpen;
dsumV12 = DayOpen;
for cnt = 1 to dP1-1
{
dsumV11 = dsumV11+DayClose(cnt);
dsumV12 = dsumV12+DayClose(cnt+1);
}
dmaV11 = dsumV11 / dP1;#당일기준 일봉이평
dmaV12 = dsumV12 / dP1;#전일기준 일봉이평
ddiff10 = dmav12-dmav11;#전일-당일
}
Plot16(dmav11, "10일");
dhh11 = dmav11;
input : dP2(20);
var : dH210(0),dHH21(0),dHH22(0),dHH23(0),dHH24(0),dLL20(0), dLL21(0),dDD20(0),dTT20(0);
var : dsumV21(0),dsumV22(0), dmav21(0),dmav22(0),ddiff20(0),dvalue20(0);
if DayClose(dP2) > 0 Then
{
dsumV21 = DayOpen;
dsumV22 = DayOpen;
for cnt = 1 to dP2-1
{
dsumV21 = dsumV21+DayClose(cnt);
dsumV22 = dsumV22+DayClose(cnt+1);
}
dmaV21 = dsumV21 / dP2;#당일기준 일봉이평
dmaV22 = dsumV22 / dP2;#전일기준 일봉이평
ddiff20 = dmav22-dmav21;#전일-당일
}
Plot17(dmav21, "20일");
dhh21 = dmav21;
var11 = Plot15+(var2-Plot15)*(Per1/100);
var12 = Plot15+(var2-Plot15)*(Per2/100);
var13 = Plot15+(var2-Plot15)*(Per3/100);
var14 = Plot15+(var2-Plot15)*(Per4/100);
var15 = Plot15+(var2-Plot15)*(Per5/100);
plot20(Var11,"5일선과 주고 76.4");
plot21(Var12,"5일선과 주고 61.8");
plot22(Var13,"5일선과 주고 50");
plot23(Var14,"5일선과 주고 38.2");
plot24(Var15,"5일선과 주고 23.6");
var16 = Plot15+(var3-Plot15)*(Per1/100);
var17 = Plot15+(var3-Plot15)*(Per2/100);
var18 = Plot15+(var3-Plot15)*(Per3/100);
var19 = Plot15+(var3-Plot15)*(Per4/100);
var20 = Plot15+(var3-Plot15)*(Per5/100);
plot27(Var16,"5일선과 주저 76.4");
plot28(Var17,"5일선과 주저 61.8");
plot29(Var18,"5일선과 주저 50");
plot30(Var19,"5일선과 주저 38.2");
plot31(Var20,"5일선과 주저 23.6");
}
- 1. 190632_차트.png (0.08 MB)
답변 1
예스스탁 예스스탁 답변
2025-04-02 15:40:30
안녕하세요
예스스탁입니다.
작성하신 내용은 주봉시고저종가가 아닙니다.
수정해 드립니다.
if Bdate != Bdate[1] and DayOfWeek(Bdate) <= DayOfWeek(Bdate[1]) Then
{
var1 = O;
Var2 = h;
Var3 = l;
}
if var1 > 0 Then
{
if h > Var2 Then
var2 = h;
if l < var3 Then
Var3 = l;
Plot1(var1,"주시");
plot2(Var2,"주고");
plot3(Var3,"주저");
plot4((Var2+Var3)/2, "주 中");
plot5(DayOpen(),"당일시가");
plot6(DayClose(1),"전일종가");
plot7((DayHigh+daylow)/2,"당일중앙선");
var : cnt(0);
input :최고가(0),최저가(0),Per1(76.4),Per2(61.8),Per3(50.0),Per4(38.2),Per5(23.6);
input : dP(5);
var : dHH(0),dHH1(0),dHH2(0),dHH3(0),dHH4(0),dHH5(0),dHH6(0),dHH7(0),dLL(0), dLL1(0),dDD(0),dTT(0);
var : dsumV1(0),dsumV2(0), dmav1(0),dmav2(0),ddiff(0),dvalue(0);
if DayClose(dP) > 0 Then
{
dsumV1 = DayOpen;
dsumV2 = DayOpen;
for cnt = 1 to dP-1
{
dsumV1 = dsumV1+DayClose(cnt);
dsumV2 = dsumV2+DayClose(cnt+1);
}
dmaV1 = dsumV1 / dP;#당일기준 일봉이평
dmaV2 = dsumV2 / dP;#전일기준 일봉이평
ddiff = dmav2-dmav1;#전일-당일
}
Plot15(dmav1, "5일");
dhh1 = dmav1;
input : dP1(10);
var : dHH10(0),dHH11(0),dHH12(0),dHH13(0),dHH14(0),dHH15(0),dHH16(0),dHH17(0),dLL10(0), dLL11(0),dDD10(0),dTT10(0);
var : dsumV11(0),dsumV12(0), dmav11(0),dmav12(0),ddiff10(0),dvalue10(0);
if DayClose(dP1) > 0 Then
{
dsumV11 = DayOpen;
dsumV12 = DayOpen;
for cnt = 1 to dP1-1
{
dsumV11 = dsumV11+DayClose(cnt);
dsumV12 = dsumV12+DayClose(cnt+1);
}
dmaV11 = dsumV11 / dP1;#당일기준 일봉이평
dmaV12 = dsumV12 / dP1;#전일기준 일봉이평
ddiff10 = dmav12-dmav11;#전일-당일
}
Plot16(dmav11, "10일");
dhh11 = dmav11;
input : dP2(20);
var : dH210(0),dHH21(0),dHH22(0),dHH23(0),dHH24(0),dLL20(0), dLL21(0),dDD20(0),dTT20(0);
var : dsumV21(0),dsumV22(0), dmav21(0),dmav22(0),ddiff20(0),dvalue20(0);
if DayClose(dP2) > 0 Then
{
dsumV21 = DayOpen;
dsumV22 = DayOpen;
for cnt = 1 to dP2-1
{
dsumV21 = dsumV21+DayClose(cnt);
dsumV22 = dsumV22+DayClose(cnt+1);
}
dmaV21 = dsumV21 / dP2;#당일기준 일봉이평
dmaV22 = dsumV22 / dP2;#전일기준 일봉이평
ddiff20 = dmav22-dmav21;#전일-당일
}
Plot17(dmav21, "20일");
dhh21 = dmav21;
var11 = Plot15+(var2-Plot15)*(Per1/100);
var12 = Plot15+(var2-Plot15)*(Per2/100);
var13 = Plot15+(var2-Plot15)*(Per3/100);
var14 = Plot15+(var2-Plot15)*(Per4/100);
var15 = Plot15+(var2-Plot15)*(Per5/100);
plot20(Var11,"5일선과 주고 76.4");
plot21(Var12,"5일선과 주고 61.8");
plot22(Var13,"5일선과 주고 50");
plot23(Var14,"5일선과 주고 38.2");
plot24(Var15,"5일선과 주고 23.6");
var16 = Plot15+(var3-Plot15)*(Per1/100);
var17 = Plot15+(var3-Plot15)*(Per2/100);
var18 = Plot15+(var3-Plot15)*(Per3/100);
var19 = Plot15+(var3-Plot15)*(Per4/100);
var20 = Plot15+(var3-Plot15)*(Per5/100);
plot27(Var16,"5일선과 주저 76.4");
plot28(Var17,"5일선과 주저 61.8");
plot29(Var18,"5일선과 주저 50");
plot30(Var19,"5일선과 주저 38.2");
plot31(Var20,"5일선과 주저 23.6");
}
즐거운 하루되세요
> 부활 님이 쓴 글입니다.
> 제목 : 수식
>
안녕하세요.
아래 수식은 주봉시고저가와 5일 이동평균선으로 나타낸 것인데
수정부탁드립니다.
1. 주봉 시고저의 수식이 맞는지 확인바랍니다.
2. 그림파일의 화살표처럼 전일 마감시의 지표값이 당일 차트에 동일한 가격으로
나타나도록 수정바랍니다.
if Bdate> Bdate[1]+7 Then
{
var1 = O;
Var2 = h;
Var3 = l;
}
if var1 > 0 Then
{
if h > Var2 Then
var2 = h;
if l < var3 Then
Var3 = l;
Plot1(var1,"주시");
plot2(Var2,"주고");
plot3(Var3,"주저");
plot4((Var2+Var3)/2, "주 中");
plot5(DayOpen(),"당일시가");
plot6(DayClose(1),"전일종가");
plot7((DayHigh+daylow)/2,"당일중앙선");
var : cnt(0);
input :최고가(0),최저가(0),Per1(76.4),Per2(61.8),Per3(50.0),Per4(38.2),Per5(23.6);
input : dP(5);
var : dHH(0),dHH1(0),dHH2(0),dHH3(0),dHH4(0),dHH5(0),dHH6(0),dHH7(0),dLL(0), dLL1(0),dDD(0),dTT(0);
var : dsumV1(0),dsumV2(0), dmav1(0),dmav2(0),ddiff(0),dvalue(0);
if DayClose(dP) > 0 Then
{
dsumV1 = DayOpen;
dsumV2 = DayOpen;
for cnt = 1 to dP-1
{
dsumV1 = dsumV1+DayClose(cnt);
dsumV2 = dsumV2+DayClose(cnt+1);
}
dmaV1 = dsumV1 / dP;#당일기준 일봉이평
dmaV2 = dsumV2 / dP;#전일기준 일봉이평
ddiff = dmav2-dmav1;#전일-당일
}
Plot15(dmav1, "5일");
dhh1 = dmav1;
input : dP1(10);
var : dHH10(0),dHH11(0),dHH12(0),dHH13(0),dHH14(0),dHH15(0),dHH16(0),dHH17(0),dLL10(0), dLL11(0),dDD10(0),dTT10(0);
var : dsumV11(0),dsumV12(0), dmav11(0),dmav12(0),ddiff10(0),dvalue10(0);
if DayClose(dP1) > 0 Then
{
dsumV11 = DayOpen;
dsumV12 = DayOpen;
for cnt = 1 to dP1-1
{
dsumV11 = dsumV11+DayClose(cnt);
dsumV12 = dsumV12+DayClose(cnt+1);
}
dmaV11 = dsumV11 / dP1;#당일기준 일봉이평
dmaV12 = dsumV12 / dP1;#전일기준 일봉이평
ddiff10 = dmav12-dmav11;#전일-당일
}
Plot16(dmav11, "10일");
dhh11 = dmav11;
input : dP2(20);
var : dH210(0),dHH21(0),dHH22(0),dHH23(0),dHH24(0),dLL20(0), dLL21(0),dDD20(0),dTT20(0);
var : dsumV21(0),dsumV22(0), dmav21(0),dmav22(0),ddiff20(0),dvalue20(0);
if DayClose(dP2) > 0 Then
{
dsumV21 = DayOpen;
dsumV22 = DayOpen;
for cnt = 1 to dP2-1
{
dsumV21 = dsumV21+DayClose(cnt);
dsumV22 = dsumV22+DayClose(cnt+1);
}
dmaV21 = dsumV21 / dP2;#당일기준 일봉이평
dmaV22 = dsumV22 / dP2;#전일기준 일봉이평
ddiff20 = dmav22-dmav21;#전일-당일
}
Plot17(dmav21, "20일");
dhh21 = dmav21;
var11 = Plot15+(var2-Plot15)*(Per1/100);
var12 = Plot15+(var2-Plot15)*(Per2/100);
var13 = Plot15+(var2-Plot15)*(Per3/100);
var14 = Plot15+(var2-Plot15)*(Per4/100);
var15 = Plot15+(var2-Plot15)*(Per5/100);
plot20(Var11,"5일선과 주고 76.4");
plot21(Var12,"5일선과 주고 61.8");
plot22(Var13,"5일선과 주고 50");
plot23(Var14,"5일선과 주고 38.2");
plot24(Var15,"5일선과 주고 23.6");
var16 = Plot15+(var3-Plot15)*(Per1/100);
var17 = Plot15+(var3-Plot15)*(Per2/100);
var18 = Plot15+(var3-Plot15)*(Per3/100);
var19 = Plot15+(var3-Plot15)*(Per4/100);
var20 = Plot15+(var3-Plot15)*(Per5/100);
plot27(Var16,"5일선과 주저 76.4");
plot28(Var17,"5일선과 주저 61.8");
plot29(Var18,"5일선과 주저 50");
plot30(Var19,"5일선과 주저 38.2");
plot31(Var20,"5일선과 주저 23.6");
}
다음글
이전글