커뮤니티
감사합니다 진심 어린 감사드려요
2018-03-16 18:29:13
183
글번호 117475
1,st002340 님이 수식 입니다----- 수정부탁드려봅니다
2, period (20) (60) (120) 추가하여 수정 부탁드려요
3, 아래수식에대한 설명도 부탁드립니다
input :Period(120), Type(1);
Vars : sHH(0), sLL(0), lHH(0), lLL(0),Price(0),v0(0);
Price = C;
If Type == 1 Then
V0 = ma(Price, Period);
Else
V0 = ema(Price, Period);
If Price > V0 Then
Begin
sHH = H;
sLL = L;
End
Else
Begin
sHH = sHH;
sLL = sLL;
End;
If Price < V0 Then
Begin
lHH = H;
lLL = L;
End
Else
Begin
lHH = lHH;
lLL = lLL;
End;
If CurrentBar > 1 And lHH[1] > 0 And lLL[1] > 0 And sHH[1] > 0 And sLL[1] > 0 Then
Begin
Plot1(sHH, "사용X");
Plot2(sLL, "하락추세용");
Plot3(lHH, "상승추세용");
Plot4(lLL, "사용X");
End;
답변 1
예스스탁 예스스탁 답변
2018-03-19 08:58:54
안녕하세요
예스스탁입니다.
input :Period1(20), Type1(1);
input :Period2(60), Type2(1);
input :Period3(120), Type3(1);
Vars : sHH1(0), sLL1(0), lHH1(0), lLL1(0);
Vars : sHH2(0), sLL2(0), lHH2(0), lLL2(0);
Vars : sHH3(0), sLL3(0), lHH3(0), lLL3(0);
If Type1 == 1 Then
var1 = ma(c, Period1);
Else
var1 = ema(c, Period1);
If c > var1 Then {
sHH1 = H;
sLL1 = L;
}
Else
{
sHH1 = sHH1;
sLL1 = sLL1;
}
If c < var1 Then
{
lHH1 = H;
lLL1 = L;
}
Else
{
lHH1 = lHH1;
lLL1 = lLL1;
}
If Type2 == 1 Then
var2 = ma(c, Period2);
Else
var2 = ema(c, Period2);
If c > var2 Then {
sHH2 = H;
sLL2 = L;
}
Else
{
sHH2 = sHH2;
sLL2 = sLL2;
}
If c < var2 Then
{
lHH2 = H;
lLL2 = L;
}
Else
{
lHH2 = lHH2;
lLL2 = lLL2;
}
If Type3 == 1 Then
var3 = ma(c, Period3);
Else
var3 = ema(c, Period3);
If c > var3 Then {
sHH3 = H;
sLL3 = L;
}
Else
{
sHH3 = sHH3;
sLL3 = sLL3;
}
If c < var3 Then
{
lHH3 = H;
lLL3 = L;
}
Else
{
lHH3 = lHH3;
lLL3 = lLL3;
}
If CurrentBar > 1 then {
if lHH1[1] > 0 And lLL1[1] > 0 And sHH1[1] > 0 And sLL1[1] > 0 Then
{
Plot1(sHH1, "1사용X");
Plot2(sLL1, "1하락추세용");
Plot3(lHH1, "1상승추세용");
Plot4(lLL1, "1사용X");
}
If lHH2[1] > 0 And lLL2[1] > 0 And sHH2[1] > 0 And sLL2[1] > 0 Then
{
Plot5(sHH2, "2사용X");
Plot6(sLL2, "2하락추세용");
Plot7(lHH2, "2상승추세용");
Plot8(lLL2, "2사용X");
}
If lHH3[1] > 0 And lLL3[1] > 0 And sHH3[1] > 0 And sLL3[1] > 0 Then
{
Plot9(sHH3, "3사용X");
Plot10(sLL3, "3하락추세용");
Plot11(lHH3, "3상승추세용");
Plot12(lLL3, "3사용X");
}
}
즐거운 하루되세요
> 매치다는 님이 쓴 글입니다.
> 제목 : 감사합니다 진심 어린 감사드려요
> 1,st002340 님이 수식 입니다----- 수정부탁드려봅니다
2, period (20) (60) (120) 추가하여 수정 부탁드려요
3, 아래수식에대한 설명도 부탁드립니다
input :Period(120), Type(1);
Vars : sHH(0), sLL(0), lHH(0), lLL(0),Price(0),v0(0);
Price = C;
If Type == 1 Then
V0 = ma(Price, Period);
Else
V0 = ema(Price, Period);
If Price > V0 Then
Begin
sHH = H;
sLL = L;
End
Else
Begin
sHH = sHH;
sLL = sLL;
End;
If Price < V0 Then
Begin
lHH = H;
lLL = L;
End
Else
Begin
lHH = lHH;
lLL = lLL;
End;
If CurrentBar > 1 And lHH[1] > 0 And lLL[1] > 0 And sHH[1] > 0 And sLL[1] > 0 Then
Begin
Plot1(sHH, "사용X");
Plot2(sLL, "하락추세용");
Plot3(lHH, "상승추세용");
Plot4(lLL, "사용X");
End;