커뮤니티
수식문의
2019-02-21 16:01:09
126
글번호 126435
61388 답변 재문의 드립니다.
답변 주신 내용으로 확인하니 추세선뿐만 아니라 매수/매도 신호마저 나오지 않습니다.
아래와 같이 조건문에 0이 빠져 나갈수 없도록 하면 되기는 하는데..
추세선이 제대로 그어지지가 않네요..
번거로우시겠지만 다시 한번 검토 부탁드립니다.
감사합니다.
input:Period(60),Multiplier(2);
var:dAtr(0),UpperLevel(0),LowerLevel(0),Direction(0);
input : P(5),P2(60);
var : T(0),TL1(0),TL2(0);
var : HD(0),HT(0),HH(0),HD1(0),HT1(0),HH1(0);
var : LD(0),LT(0),LL(0),LD1(0),LT1(0),LL1(0);
dAtr=ATR(Period);
UpperLevel=(High+Low)/2+Multiplier*dAtr;
LowerLevel=(High+Low)/2-Multiplier*dAtr;
Direction = Direction[1];
if close >= UpperLevel[1] then Direction = 1; //수정
if close <= LowerLevel[1] then Direction = -1; //수정
#매수/매도
if Direction > 0 then
{
LowerLevel = Max(LowerLevel,LowerLevel[1]);
Buy("매수");
T = 1;
HD = sdate;
HT = stime;
HH = H;
HD1 = HD[1];
HT1 = HT[1];
HH1 = HH[1];
if LL1 > 0 then
{
TL_Delete(TL1);
TL1 = TL_New(LD1,LT1,LL1,LD,LT,LL);
TL_SetExtLeft(TL1,true);
TL_SetExtRight(TL1,true);
TL_SetColor(TL1,RED);
}
}
else
{
UpperLevel = Min(UpperLevel,UpperLevel[1]);
Sell("매도");
T = -1;
LD = sdate;
LT = stime;
LL = L;
LD1 = LD[1];
LT1 = LT[1];
LL1 = LL[1];
if HH1 > 0 then
{
TL_Delete(TL2);
TL2 = TL_New(HD1,HT1,HH1,HD,HT,HH);
TL_SetExtLeft(TL2,true);
TL_SetExtRight(TL2,true);
TL_SetColor(TL2,BLUE);
}
}
if T == 1 and H > HH Then
{
HH = H;
HD = Sdate;
HT = stime;
}
if T == -1 and L < LL Then
{
LL = L;
LD = Sdate;
LT = stime;
}
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 수식문의
>
안녕하세요
예스스탁입니다.
진입의 조건이 Direction이 0보다 크거나 작을때입니다.
Direction은 1 아니면 -1값만 가지므로 해당 부분도 크로스로 정의하시면 됩니다.
1값으로 변하는 첫봉에 매수진입, -1로 변경되는 첫봉에 매도진입입니다.
input:Period(60),Multiplier(2);
var:dAtr(0),UpperLevel(0),LowerLevel(0),Direction(0);
input : P(5),P2(60);
var : T(0),TL1(0),TL2(0);
var : HD(0),HT(0),HH(0),HD1(0),HT1(0),HH1(0);
var : LD(0),LT(0),LL(0),LD1(0),LT1(0),LL1(0);
dAtr=ATR(Period);
UpperLevel=(High+Low)/2+Multiplier*dAtr;
LowerLevel=(High+Low)/2-Multiplier*dAtr;
Direction = Direction[1];
if close > UpperLevel[1] then Direction = 1;
if close < LowerLevel[1] then Direction = -1;
#매수/매도
if crossup(direction,0) then
{
LowerLevel = Max(LowerLevel,LowerLevel[1]);
Buy("매수");
T = 1;
HD = sdate;
HT = stime;
HH = H;
HD1 = HD[1];
HT1 = HT[1];
HH1 = HH[1];
if LL1 > 0 then
{
TL_Delete(TL1);
TL1 = TL_New(LD1,LT1,LL1,LD,LT,LL);
TL_SetExtLeft(TL1,true);
TL_SetExtRight(TL1,true);
TL_SetColor(TL1,RED);
}
if T == 1 and H > HH Then
{
HH = H;
HD = Sdate;
HT = stime;
}
if T == -1 and L < LL Then
{
LL = L;
LD = Sdate;
LT = stime;
}
}
if crossdown(direction,0) then
{
UpperLevel = Min(UpperLevel,UpperLevel[1]);
Sell("매도");
T = -1;
LD = sdate;
LT = stime;
LL = L;
LD1 = LD[1];
LT1 = LT[1];
LL1 = LL[1];
if HH1 > 0 then
{
TL_Delete(TL2);
TL2 = TL_New(HD1,HT1,HH1,HD,HT,HH);
TL_SetExtLeft(TL2,true);
TL_SetExtRight(TL2,true);
TL_SetColor(TL2,BLUE);
}
if T == 1 and H > HH Then
{
HH = H;
HD = Sdate;
HT = stime;
}
if T == -1 and L < LL Then
{
LL = L;
LD = Sdate;
}
}
즐거운 하루되세요
> 프리윌 님이 쓴 글입니다.
> 제목 : 수식문의
> 61309번 답변에 대해 재문의 드립니다.
-----------------------------------------------------------------------------------
답변 주신 부분을 적용해보았습니다.
시스템 신호의 스위칭 방식이 CrossUp/Down 방식이 아니라 아래와 같을 경우 direction이 "0"인 경우가 있어서인지 제대로 추세라인이 그려지지 않습니다.
아래식과 같이 이럴경우 한번 검토 부탁드립니다.
답변 감사드립니다.
input:Period(60),Multiplier(2);
var:dAtr(0),UpperLevel(0),LowerLevel(0),Direction(0);
input : P(5),P2(60);
var : T(0),TL1(0),TL2(0);
var : HD(0),HT(0),HH(0),HD1(0),HT1(0),HH1(0);
var : LD(0),LT(0),LL(0),LD1(0),LT1(0),LL1(0);
dAtr=ATR(Period);
UpperLevel=(High+Low)/2+Multiplier*dAtr;
LowerLevel=(High+Low)/2-Multiplier*dAtr;
Direction = Direction[1];
if close > UpperLevel[1] then Direction = 1;
if close < LowerLevel[1] then Direction = -1;
#매수/매도
if Direction > 0 then
{
LowerLevel = Max(LowerLevel,LowerLevel[1]);
Buy("매수");
T = 1;
HD = sdate;
HT = stime;
HH = H;
HD1 = HD[1];
HT1 = HT[1];
HH1 = HH[1];
if LL1 > 0 then
{
TL_Delete(TL1);
TL1 = TL_New(LD1,LT1,LL1,LD,LT,LL);
TL_SetExtLeft(TL1,true);
TL_SetExtRight(TL1,true);
TL_SetColor(TL1,RED);
}
if T == 1 and H > HH Then
{
HH = H;
HD = Sdate;
HT = stime;
}
if T == -1 and L < LL Then
{
LL = L;
LD = Sdate;
LT = stime;
}
}
else
{
UpperLevel = Min(UpperLevel,UpperLevel[1]);
Sell("매도");
T = -1;
LD = sdate;
LT = stime;
LL = L;
LD1 = LD[1];
LT1 = LT[1];
LL1 = LL[1];
if HH1 > 0 then
{
TL_Delete(TL2);
TL2 = TL_New(HD1,HT1,HH1,HD,HT,HH);
TL_SetExtLeft(TL2,true);
TL_SetExtRight(TL2,true);
TL_SetColor(TL2,BLUE);
}
if T == 1 and H > HH Then
{
HH = H;
HD = Sdate;
HT = stime;
}
if T == -1 and L < LL Then
{
LL = L;
LD = Sdate;
}
}
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 지표문의
> 안녕하세요
예스스탁입니다.
고점과 저점은 자의적인 판단이므로 해당 내용에 대해 명확한 내용이 필요합니다.
올려주신 그림으로 보아 신호가 매수와 매도진입을 번갈아하는 스위칭 수식이고
고점은 매수구간에서 최고점, 저점은 매도구간에서 최저점인것 같습니다.
위 내용으로 판단하고 작성해 드립니다.
스위칭 신호는 일반 이평 골드 데드이므로 사용하시는 스위칭 수식에 맞게 변경하시면 됩니다.
input : P(5),P2(60);
var : T(0),TL1(0),TL2(0);
var : HD(0),HT(0),HH(0),HD1(0),HT1(0),HH1(0);
var : LD(0),LT(0),LL(0),LD1(0),LT1(0),LL1(0);
var1 = ma(C,5);
var2 = ma(c,20);
if crossup(var1,var2) Then
{
buy("b");
T = 1;
HD = sdate;
HT = stime;
HH = H;
HD1 = HD[1];
HT1 = HT[1];
HH1 = HH[1];
if LL1 > 0 then
{
TL_Delete(TL1);
TL1 = TL_New(LD1,LT1,LL1,LD,LT,LL);
TL_SetExtLeft(TL1,true);
TL_SetExtRight(TL1,true);
TL_SetColor(TL1,RED);
}
}
if CrossDown(var1,var2) Then
{
sell("s");
T = -1;
LD = sdate;
LT = stime;
LL = L;
LD1 = LD[1];
LT1 = LT[1];
LL1 = LL[1];
if HH1 > 0 then
{
TL_Delete(TL2);
TL2 = TL_New(HD1,HT1,HH1,HD,HT,HH);
TL_SetExtLeft(TL2,true);
TL_SetExtRight(TL2,true);
TL_SetColor(TL2,BLUE);
}
}
if T == 1 and H > HH Then
{
HH = H;
HD = Sdate;
HT = stime;
}
if T == -1 and L < LL Then
{
LL = L;
LD = Sdate;
LT = stime;
}
즐거운 하루되세요
> 프리윌 님이 쓴 글입니다.
> 제목 : 지표문의
> 첨부한 그림과 같이 가령 매도 시그날이 발생할시 현재 발생한 위치의 직전 전고와 그 이전 매도시그날이 발생한 직전 고점을 연결하는 추세라인을 만들고 싶습니다.
반대로, 매수시그날의 경우는 최근 매수시그날의 직전 저점과 그 이전 매수 시그날이 발생한 직전 저점을 연결한 추세선이 될테고요...
가장 최근의 매수/매도 추세선만 남기고 이전 추세선은 삭제되어야 합니다.
관련 지표 문의 드립니다.
답변 2
예스스탁 예스스탁 답변
2019-02-22 11:28:56
안녕하세요
예스스탁입니다.
input:Period(60),Multiplier(2);
var:dAtr(0),UpperLevel(0),LowerLevel(0),Direction(0);
input : P(5),P2(60);
var : T(0),TL1(0),TL2(0);
var : HD(0),HT(0),HH(0),HD1(0),HT1(0),HH1(0);
var : LD(0),LT(0),LL(0),LD1(0),LT1(0),LL1(0);
dAtr=ATR(Period);
UpperLevel=(High+Low)/2+Multiplier*dAtr;
LowerLevel=(High+Low)/2-Multiplier*dAtr;
Direction = Direction[1];
if close > UpperLevel[1] then Direction = 1;
if close < LowerLevel[1] then Direction = -1;
#매수/매도
if crossup(direction,0) then
{
LowerLevel = Max(LowerLevel,LowerLevel[1]);
Buy("매수");
T = 1;
HD = sdate;
HT = stime;
HH = H;
HD1 = HD[1];
HT1 = HT[1];
HH1 = HH[1];
if LL1 > 0 then
{
TL_Delete(TL1);
TL1 = TL_New(LD1,LT1,LL1,LD,LT,LL);
TL_SetExtLeft(TL1,true);
TL_SetExtRight(TL1,true);
TL_SetColor(TL1,RED);
}
}
if crossdown(direction,0) then
{
UpperLevel = Min(UpperLevel,UpperLevel[1]);
Sell("매도");
T = -1;
LD = sdate;
LT = stime;
LL = L;
LD1 = LD[1];
LT1 = LT[1];
LL1 = LL[1];
if HH1 > 0 then
{
TL_Delete(TL2);
TL2 = TL_New(HD1,HT1,HH1,HD,HT,HH);
TL_SetExtLeft(TL2,true);
TL_SetExtRight(TL2,true);
TL_SetColor(TL2,BLUE);
}
}
if T == 1 and H > HH Then
{
HH = H;
HD = Sdate;
HT = stime;
}
if T == -1 and L < LL Then
{
LL = L;
LD = Sdate;
LT = stime;
}
즐거운 하루되세요
> 프리윌 님이 쓴 글입니다.
> 제목 : 수식문의
> 61388 답변 재문의 드립니다.
답변 주신 내용으로 확인하니 추세선뿐만 아니라 매수/매도 신호마저 나오지 않습니다.
아래와 같이 조건문에 0이 빠져 나갈수 없도록 하면 되기는 하는데..
추세선이 제대로 그어지지가 않네요..
번거로우시겠지만 다시 한번 검토 부탁드립니다.
감사합니다.
input:Period(60),Multiplier(2);
var:dAtr(0),UpperLevel(0),LowerLevel(0),Direction(0);
input : P(5),P2(60);
var : T(0),TL1(0),TL2(0);
var : HD(0),HT(0),HH(0),HD1(0),HT1(0),HH1(0);
var : LD(0),LT(0),LL(0),LD1(0),LT1(0),LL1(0);
dAtr=ATR(Period);
UpperLevel=(High+Low)/2+Multiplier*dAtr;
LowerLevel=(High+Low)/2-Multiplier*dAtr;
Direction = Direction[1];
if close >= UpperLevel[1] then Direction = 1; //수정
if close <= LowerLevel[1] then Direction = -1; //수정
#매수/매도
if Direction > 0 then
{
LowerLevel = Max(LowerLevel,LowerLevel[1]);
Buy("매수");
T = 1;
HD = sdate;
HT = stime;
HH = H;
HD1 = HD[1];
HT1 = HT[1];
HH1 = HH[1];
if LL1 > 0 then
{
TL_Delete(TL1);
TL1 = TL_New(LD1,LT1,LL1,LD,LT,LL);
TL_SetExtLeft(TL1,true);
TL_SetExtRight(TL1,true);
TL_SetColor(TL1,RED);
}
}
else
{
UpperLevel = Min(UpperLevel,UpperLevel[1]);
Sell("매도");
T = -1;
LD = sdate;
LT = stime;
LL = L;
LD1 = LD[1];
LT1 = LT[1];
LL1 = LL[1];
if HH1 > 0 then
{
TL_Delete(TL2);
TL2 = TL_New(HD1,HT1,HH1,HD,HT,HH);
TL_SetExtLeft(TL2,true);
TL_SetExtRight(TL2,true);
TL_SetColor(TL2,BLUE);
}
}
if T == 1 and H > HH Then
{
HH = H;
HD = Sdate;
HT = stime;
}
if T == -1 and L < LL Then
{
LL = L;
LD = Sdate;
LT = stime;
}
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 수식문의
>
안녕하세요
예스스탁입니다.
진입의 조건이 Direction이 0보다 크거나 작을때입니다.
Direction은 1 아니면 -1값만 가지므로 해당 부분도 크로스로 정의하시면 됩니다.
1값으로 변하는 첫봉에 매수진입, -1로 변경되는 첫봉에 매도진입입니다.
input:Period(60),Multiplier(2);
var:dAtr(0),UpperLevel(0),LowerLevel(0),Direction(0);
input : P(5),P2(60);
var : T(0),TL1(0),TL2(0);
var : HD(0),HT(0),HH(0),HD1(0),HT1(0),HH1(0);
var : LD(0),LT(0),LL(0),LD1(0),LT1(0),LL1(0);
dAtr=ATR(Period);
UpperLevel=(High+Low)/2+Multiplier*dAtr;
LowerLevel=(High+Low)/2-Multiplier*dAtr;
Direction = Direction[1];
if close > UpperLevel[1] then Direction = 1;
if close < LowerLevel[1] then Direction = -1;
#매수/매도
if crossup(direction,0) then
{
LowerLevel = Max(LowerLevel,LowerLevel[1]);
Buy("매수");
T = 1;
HD = sdate;
HT = stime;
HH = H;
HD1 = HD[1];
HT1 = HT[1];
HH1 = HH[1];
if LL1 > 0 then
{
TL_Delete(TL1);
TL1 = TL_New(LD1,LT1,LL1,LD,LT,LL);
TL_SetExtLeft(TL1,true);
TL_SetExtRight(TL1,true);
TL_SetColor(TL1,RED);
}
if T == 1 and H > HH Then
{
HH = H;
HD = Sdate;
HT = stime;
}
if T == -1 and L < LL Then
{
LL = L;
LD = Sdate;
LT = stime;
}
}
if crossdown(direction,0) then
{
UpperLevel = Min(UpperLevel,UpperLevel[1]);
Sell("매도");
T = -1;
LD = sdate;
LT = stime;
LL = L;
LD1 = LD[1];
LT1 = LT[1];
LL1 = LL[1];
if HH1 > 0 then
{
TL_Delete(TL2);
TL2 = TL_New(HD1,HT1,HH1,HD,HT,HH);
TL_SetExtLeft(TL2,true);
TL_SetExtRight(TL2,true);
TL_SetColor(TL2,BLUE);
}
if T == 1 and H > HH Then
{
HH = H;
HD = Sdate;
HT = stime;
}
if T == -1 and L < LL Then
{
LL = L;
LD = Sdate;
}
}
즐거운 하루되세요
> 프리윌 님이 쓴 글입니다.
> 제목 : 수식문의
> 61309번 답변에 대해 재문의 드립니다.
-----------------------------------------------------------------------------------
답변 주신 부분을 적용해보았습니다.
시스템 신호의 스위칭 방식이 CrossUp/Down 방식이 아니라 아래와 같을 경우 direction이 "0"인 경우가 있어서인지 제대로 추세라인이 그려지지 않습니다.
아래식과 같이 이럴경우 한번 검토 부탁드립니다.
답변 감사드립니다.
input:Period(60),Multiplier(2);
var:dAtr(0),UpperLevel(0),LowerLevel(0),Direction(0);
input : P(5),P2(60);
var : T(0),TL1(0),TL2(0);
var : HD(0),HT(0),HH(0),HD1(0),HT1(0),HH1(0);
var : LD(0),LT(0),LL(0),LD1(0),LT1(0),LL1(0);
dAtr=ATR(Period);
UpperLevel=(High+Low)/2+Multiplier*dAtr;
LowerLevel=(High+Low)/2-Multiplier*dAtr;
Direction = Direction[1];
if close > UpperLevel[1] then Direction = 1;
if close < LowerLevel[1] then Direction = -1;
#매수/매도
if Direction > 0 then
{
LowerLevel = Max(LowerLevel,LowerLevel[1]);
Buy("매수");
T = 1;
HD = sdate;
HT = stime;
HH = H;
HD1 = HD[1];
HT1 = HT[1];
HH1 = HH[1];
if LL1 > 0 then
{
TL_Delete(TL1);
TL1 = TL_New(LD1,LT1,LL1,LD,LT,LL);
TL_SetExtLeft(TL1,true);
TL_SetExtRight(TL1,true);
TL_SetColor(TL1,RED);
}
if T == 1 and H > HH Then
{
HH = H;
HD = Sdate;
HT = stime;
}
if T == -1 and L < LL Then
{
LL = L;
LD = Sdate;
LT = stime;
}
}
else
{
UpperLevel = Min(UpperLevel,UpperLevel[1]);
Sell("매도");
T = -1;
LD = sdate;
LT = stime;
LL = L;
LD1 = LD[1];
LT1 = LT[1];
LL1 = LL[1];
if HH1 > 0 then
{
TL_Delete(TL2);
TL2 = TL_New(HD1,HT1,HH1,HD,HT,HH);
TL_SetExtLeft(TL2,true);
TL_SetExtRight(TL2,true);
TL_SetColor(TL2,BLUE);
}
if T == 1 and H > HH Then
{
HH = H;
HD = Sdate;
HT = stime;
}
if T == -1 and L < LL Then
{
LL = L;
LD = Sdate;
}
}
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 지표문의
> 안녕하세요
예스스탁입니다.
고점과 저점은 자의적인 판단이므로 해당 내용에 대해 명확한 내용이 필요합니다.
올려주신 그림으로 보아 신호가 매수와 매도진입을 번갈아하는 스위칭 수식이고
고점은 매수구간에서 최고점, 저점은 매도구간에서 최저점인것 같습니다.
위 내용으로 판단하고 작성해 드립니다.
스위칭 신호는 일반 이평 골드 데드이므로 사용하시는 스위칭 수식에 맞게 변경하시면 됩니다.
input : P(5),P2(60);
var : T(0),TL1(0),TL2(0);
var : HD(0),HT(0),HH(0),HD1(0),HT1(0),HH1(0);
var : LD(0),LT(0),LL(0),LD1(0),LT1(0),LL1(0);
var1 = ma(C,5);
var2 = ma(c,20);
if crossup(var1,var2) Then
{
buy("b");
T = 1;
HD = sdate;
HT = stime;
HH = H;
HD1 = HD[1];
HT1 = HT[1];
HH1 = HH[1];
if LL1 > 0 then
{
TL_Delete(TL1);
TL1 = TL_New(LD1,LT1,LL1,LD,LT,LL);
TL_SetExtLeft(TL1,true);
TL_SetExtRight(TL1,true);
TL_SetColor(TL1,RED);
}
}
if CrossDown(var1,var2) Then
{
sell("s");
T = -1;
LD = sdate;
LT = stime;
LL = L;
LD1 = LD[1];
LT1 = LT[1];
LL1 = LL[1];
if HH1 > 0 then
{
TL_Delete(TL2);
TL2 = TL_New(HD1,HT1,HH1,HD,HT,HH);
TL_SetExtLeft(TL2,true);
TL_SetExtRight(TL2,true);
TL_SetColor(TL2,BLUE);
}
}
if T == 1 and H > HH Then
{
HH = H;
HD = Sdate;
HT = stime;
}
if T == -1 and L < LL Then
{
LL = L;
LD = Sdate;
LT = stime;
}
즐거운 하루되세요
> 프리윌 님이 쓴 글입니다.
> 제목 : 지표문의
> 첨부한 그림과 같이 가령 매도 시그날이 발생할시 현재 발생한 위치의 직전 전고와 그 이전 매도시그날이 발생한 직전 고점을 연결하는 추세라인을 만들고 싶습니다.
반대로, 매수시그날의 경우는 최근 매수시그날의 직전 저점과 그 이전 매수 시그날이 발생한 직전 저점을 연결한 추세선이 될테고요...
가장 최근의 매수/매도 추세선만 남기고 이전 추세선은 삭제되어야 합니다.
관련 지표 문의 드립니다.
프리윌
2019-02-23 13:50:20
프리윌 님에 의해 삭제된 답변입니다.