커뮤니티
문의드립니다 ^^
2019-02-19 11:46:29
170
글번호 126342
안녕하세요!
아래지표는 며칠전 문의드린데대한 답변수식으로서 매우 유용하게 잘 사용하고있습니다
다시한번 감사드립니다 ^^
헌데 한가지만 더 부탁 드리겠습니다
아래수식에서 사용된 "이평선" 대신 "별첨" "일봉의 5,10,20일선 수식"을 사용하여
수정하여주시면 감사하겠습니다
즉, 옵션의 "일봉5일선등" 지표를 국선챠트에서 표시하고자함입니다
단, 1, 음성신호는 없어도될것같구요
2, 별첨수식 (1)은 "단순이평선(5,10,20일선)"수식이구요 (2)는 "가중5일선"수식인데
이 2개수식을 한개의 수식으로 통합을할수있으면 더 좋겠습니다
감사합니다!!!
-----------------------------------------------------------------------------------
input : P1(10),P2(20),P3(60);
var : mav21(0,data2),mav22(0,data2),mav23(0,data2);
var : mav31(0,data3),mav32(0,data3),mav33(0,data3);
var : mav41(0,data4),mav42(0,data4),mav43(0,data4);
mav21 = data2(ma(C,P1));
mav22 = data2(ma(C,P2));
mav23 = data2(ma(C,P3));
mav31 = data3(ma(C,P1));
mav32 = data3(ma(C,P2));
mav33 = data3(ma(C,P3));
mav41 = data4(ma(C,P1));
mav42 = data4(ma(C,P2));
mav43 = data4(ma(C,P3));
if data2(crossup(c,mav21)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var21 = c;
}
if data2(CrossDown(c,mav21)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var21 = c;
}
if data2(crossup(c,mav22)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var22 = c;
}
if data2(CrossDown(c,mav22)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var22 = c;
}
if data2(crossup(c,mav23)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var23 = c;
}
if data2(CrossDown(c,mav23)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var23 = c;
}
plot1(var21,"data2 P1이평교차");
plot2(var22,"data2 P2이평교차");
plot3(var23,"data2 P3이평교차");
if data3(crossup(c,mav31)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var31 = c;
}
if data3(CrossDown(c,mav31)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var31 = c;
}
if data3(crossup(c,mav32)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var32 = c;
}
if data3(CrossDown(c,mav32)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var32 = c;
}
if data3(crossup(c,mav33)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var33 = c;
}
if data3(CrossDown(c,mav33)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var33 = c;
}
plot4(var31,"data3 P1이평교차");
plot5(var32,"data3 P2이평교차");
plot6(var33,"data3 P3이평교차");
if data4(crossup(c,mav41)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var41 = c;
}
if data4(CrossDown(c,mav41)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var41 = c;
}
if data4(crossup(c,mav42)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var42 = c;
}
if data4(CrossDown(c,mav42)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var42 = c;
}
if data4(crossup(c,mav43)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var43 = c;
}
if data4(CrossDown(c,mav43)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var43 = c;
}
plot7(var31,"data3 P1이평교차");
plot8(var32,"data3 P2이평교차");
plot9(var33,"data3 P3이평교차");
----------------------------------------------------------------------------------
<별첨수식 1)
var1 = (dayclose(4)+dayclose(3)+dayclose(2)+dayclose(1)+dayclose())/5;
var2 = (dayclose(9)+dayclose(8)+dayclose(7)+dayclose(6)+dayclose(5)+dayclose(4)+dayclose(3)+dayclose(2)+dayclose(1)+dayclose())/10 ;
var3 = (dayclose(19)+dayclose(18)+dayclose(17)+dayclose(16)+dayclose(15)+dayclose(14)+dayclose(13)+dayclose(12)+dayclose(11)+dayclose(10)+dayclose(9)+dayclose(8)+dayclose(7)
+dayclose(6)+dayclose(5)+dayclose(4)+dayclose(3)+dayclose(2)+dayclose(1)+dayclose())/20;
plot1(var1);
plot2(var2);
plot3(var3);
<별첨수식 2>
Input : Period(5);
Var : Sum(0), Counter(0), CSum(0),DayWMA(0);
Sum = 0;
CSum = 0;
For counter = 0 To Period-1 Begin
Sum = Sum + DayClose(counter) * (Period - counter);
CSum = CSum + Period - counter;
End;
If CSum > 0 Then
DayWMA = Sum / CSum;
Else
DayWMA = 0;
plot1(DayWMA);
감사합니다
답변 1
예스스탁 예스스탁 답변
2019-02-19 14:12:26
안녕하세요
예스스탁입니다.
input : P1(5),P2(10),P3(20);
var : cnt(0);
var : sum21(0,data2),sum22(0,data2),sum23(0,data2);
var : mav21(0,data2),mav22(0,data2),mav23(0,data2);
var : sum31(0,data2),sum32(0,data2),sum33(0,data2);
var : mav31(0,data3),mav32(0,data3),mav33(0,data3);
var : sum41(0,data4),sum42(0,data4),sum43(0,data4);
var : mav41(0,data4),mav42(0,data4),mav43(0,data4);
var : cum2(0,data2),cum3(0,data3),cum4(0,data4),Scum(0,data2);
var : wma2(0,data2),wma3(0,data3),wma4(0,data4);
Array : C2[100](0,data2),C3[100](0,data3),C4[100](0,data4);
if data2(bdate != bdate[1]) Then
{
for cnt = 1 to 99
{
C2[cnt] = C2[cnt-1][1];
}
}
C2[0] = data2(c);
if data3(bdate != bdate[1]) Then
{
for cnt = 1 to 99
{
C3[cnt] = C3[cnt-1][1];
}
}
C3[0] = data3(c);
if data4(bdate != bdate[1]) Then
{
for cnt = 1 to 99
{
C4[cnt] = C4[cnt-1][1];
}
}
C4[0] = data2(c);
sum21 = 0;
sum22 = 0;
sum23 = 0;
sum31 = 0;
sum32 = 0;
sum33 = 0;
sum41 = 0;
sum42 = 0;
sum43 = 0;
cum2 = 0;
cum3 = 0;
cum4 = 0;
Scum = 0;
for cnt = 0 to P3
{
if cnt < P1 then
{
sum21 = sum21 + C2[cnt];
sum31 = sum31 + C3[cnt];
sum41 = sum41 + C4[cnt];
cum2 = cum2 + C2[cnt] * (P1 - cnt);
cum3 = cum3 + C3[cnt] * (P1 - cnt);
cum4 = cum4 + C4[cnt] * (P1 - cnt);
Scum = Scum + P1 - cnt;
}
if cnt < P2 then
{
sum22 = sum22 + C2[cnt];
sum32 = sum32 + C3[cnt];
sum42 = sum42 + C4[cnt];
}
if cnt < P3 then
{
sum23 = sum23 + C2[cnt];
sum33 = sum33 + C3[cnt];
sum43 = sum43 + C4[cnt];
}
}
mav21 = sum21/P1;
mav22 = sum22/P2;
mav23 = sum23/P3;
wma2 = cum2/Scum;
mav31 = sum31/P1;
mav32 = sum32/P2;
mav33 = sum33/P3;
wma3 = cum3/Scum;
mav41 = sum41/P1;
mav42 = sum42/P2;
mav43 = sum43/P3;
wma4 = cum4/Scum;
if data2(crossup(c,mav21)) and C2[P1] > 0 Then
{
var21 = c;
}
if data2(CrossDown(c,mav21)) and C2[P1] > 0 Then
{
var21 = c;
}
if data2(crossup(c,mav22)) and C2[P2] > 0 Then
{
var22 = c;
}
if data2(CrossDown(c,mav22)) and C2[P2] > 0 Then
{
var22 = c;
}
if data2(crossup(c,mav23)) and C2[P3] > 0 Then
{
var23 = c;
}
if data2(CrossDown(c,mav23)) and C2[P3] > 0 Then
{
var23 = c;
}
if data2(CrossDown(c,wma2)) and C2[P1] > 0 Then
{
var24 = c;
}
if var21 > 0 then
plot1(var21,"data2 P1이평교차");
if var22 > 0 then
plot2(var22,"data2 P2이평교차");
if var23 > 0 then
plot3(var23,"data2 P3이평교차");
if var24 > 0 then
plot4(var24,"data2 P1가중이평교차");
if data3(crossup(c,mav31)) and C3[P1] > 0 Then
{
var31 = c;
}
if data3(CrossDown(c,mav31)) and C3[P1] > 0 Then
{
var31 = c;
}
if data3(crossup(c,mav32)) and C3[P2] > 0 Then
{
var32 = c;
}
if data3(CrossDown(c,mav32)) and C3[P2] > 0 Then
{
var32 = c;
}
if data3(crossup(c,mav33)) and C3[P3] > 0 Then
{
var33 = c;
}
if data3(CrossDown(c,mav33)) and C3[P3] > 0 Then
{
var33 = c;
}
if data3(CrossDown(c,wma3)) and C3[P1] > 0 Then
{
var34 = c;
}
if var31 > 0 then
plot5(var31,"data3 P1이평교차");
if var32 > 0 then
plot6(var32,"data3 P2이평교차");
if var33 > 0 then
plot7(var33,"data3 P3이평교차");
if var34 > 0 then
plot8(var34,"data3 P1가중이평교차");
if data4(crossup(c,mav41)) and C4[P1] > 0 Then
{
var41 = c;
}
if data4(CrossDown(c,mav41)) and C4[P1] > 0 Then
{
var41 = c;
}
if data4(crossup(c,mav42)) and C4[P2] > 0 Then
{
var42 = c;
}
if data4(CrossDown(c,mav42)) and C4[P2] > 0 Then
{
var42 = c;
}
if data4(crossup(c,mav43)) and C4[P3] > 0 Then
{
var43 = c;
}
if data4(CrossDown(c,mav43)) and C4[P3] > 0 Then
{
var43 = c;
}
if data4(CrossDown(c,wma4)) and C4[P1] > 0 Then
{
var44 = c;
}
if var41 > 0 then
plot9(var41,"data4 P1이평교차");
if var42 > 0 then
plot10(var42,"data4 P2이평교차");
if var43 > 0 then
plot11(var43,"data4 P3이평교차");
if var44 > 0 then
plot12(var44,"data4 P1가중이평교차");
즐거운 하루되세요
> 유로파54 님이 쓴 글입니다.
> 제목 : 문의드립니다 ^^
> 안녕하세요!
아래지표는 며칠전 문의드린데대한 답변수식으로서 매우 유용하게 잘 사용하고있습니다
다시한번 감사드립니다 ^^
헌데 한가지만 더 부탁 드리겠습니다
아래수식에서 사용된 "이평선" 대신 "별첨" "일봉의 5,10,20일선 수식"을 사용하여
수정하여주시면 감사하겠습니다
즉, 옵션의 "일봉5일선등" 지표를 국선챠트에서 표시하고자함입니다
단, 1, 음성신호는 없어도될것같구요
2, 별첨수식 (1)은 "단순이평선(5,10,20일선)"수식이구요 (2)는 "가중5일선"수식인데
이 2개수식을 한개의 수식으로 통합을할수있으면 더 좋겠습니다
감사합니다!!!
-----------------------------------------------------------------------------------
input : P1(10),P2(20),P3(60);
var : mav21(0,data2),mav22(0,data2),mav23(0,data2);
var : mav31(0,data3),mav32(0,data3),mav33(0,data3);
var : mav41(0,data4),mav42(0,data4),mav43(0,data4);
mav21 = data2(ma(C,P1));
mav22 = data2(ma(C,P2));
mav23 = data2(ma(C,P3));
mav31 = data3(ma(C,P1));
mav32 = data3(ma(C,P2));
mav33 = data3(ma(C,P3));
mav41 = data4(ma(C,P1));
mav42 = data4(ma(C,P2));
mav43 = data4(ma(C,P3));
if data2(crossup(c,mav21)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var21 = c;
}
if data2(CrossDown(c,mav21)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var21 = c;
}
if data2(crossup(c,mav22)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var22 = c;
}
if data2(CrossDown(c,mav22)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var22 = c;
}
if data2(crossup(c,mav23)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var23 = c;
}
if data2(CrossDown(c,mav23)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var23 = c;
}
plot1(var21,"data2 P1이평교차");
plot2(var22,"data2 P2이평교차");
plot3(var23,"data2 P3이평교차");
if data3(crossup(c,mav31)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var31 = c;
}
if data3(CrossDown(c,mav31)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var31 = c;
}
if data3(crossup(c,mav32)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var32 = c;
}
if data3(CrossDown(c,mav32)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var32 = c;
}
if data3(crossup(c,mav33)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var33 = c;
}
if data3(CrossDown(c,mav33)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var33 = c;
}
plot4(var31,"data3 P1이평교차");
plot5(var32,"data3 P2이평교차");
plot6(var33,"data3 P3이평교차");
if data4(crossup(c,mav41)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var41 = c;
}
if data4(CrossDown(c,mav41)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var41 = c;
}
if data4(crossup(c,mav42)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var42 = c;
}
if data4(CrossDown(c,mav42)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var42 = c;
}
if data4(crossup(c,mav43)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var43 = c;
}
if data4(CrossDown(c,mav43)) Then
{
PlaySound("C:￦예스트레이더￦data￦Sound￦1point.wav");
var43 = c;
}
plot7(var31,"data3 P1이평교차");
plot8(var32,"data3 P2이평교차");
plot9(var33,"data3 P3이평교차");
----------------------------------------------------------------------------------
<별첨수식 1)
var1 = (dayclose(4)+dayclose(3)+dayclose(2)+dayclose(1)+dayclose())/5;
var2 = (dayclose(9)+dayclose(8)+dayclose(7)+dayclose(6)+dayclose(5)+dayclose(4)+dayclose(3)+dayclose(2)+dayclose(1)+dayclose())/10 ;
var3 = (dayclose(19)+dayclose(18)+dayclose(17)+dayclose(16)+dayclose(15)+dayclose(14)+dayclose(13)+dayclose(12)+dayclose(11)+dayclose(10)+dayclose(9)+dayclose(8)+dayclose(7)
+dayclose(6)+dayclose(5)+dayclose(4)+dayclose(3)+dayclose(2)+dayclose(1)+dayclose())/20;
plot1(var1);
plot2(var2);
plot3(var3);
<별첨수식 2>
Input : Period(5);
Var : Sum(0), Counter(0), CSum(0),DayWMA(0);
Sum = 0;
CSum = 0;
For counter = 0 To Period-1 Begin
Sum = Sum + DayClose(counter) * (Period - counter);
CSum = CSum + Period - counter;
End;
If CSum > 0 Then
DayWMA = Sum / CSum;
Else
DayWMA = 0;
plot1(DayWMA);
감사합니다