예스스탁
예스스탁 답변
2020-02-14 15:31:58
안녕하세요
예스스탁입니다.
추세선은 마지막에 그려진것만 보이게 됩니다.
수식안에 TL_Delete(TL1);과 TL_Delete(TL2); 지우시면
모두 그려지게 됩니다.
input : P1(20),P2(120),Left(3),right(3);
var : SH(0),hv1(0),hv2(0),hd1(0),hd2(0),ht1(0),ht2(0);
var : SL(0),lv1(0),lv2(0),ld1(0),ld2(0),lt1(0),lt2(0);
var : T(0),TL1(0),TL2(0);
var1 = ma(C,P1);
var2 = ma(C,P2);
if var1 > var2 Then
{
if var2 > var2[1] Then
T = 2;
if var2 < var2[1] Then
T = 1;
}
if var1 < var2 Then
{
if var2 > var2[1] Then
T = -1;
if var2 < var2[1] Then
T = -2;
}
if T == 2 and T[1] != 2 Then
SH = 0;
if T == -2 and T[1] != -2 Then
SL = 0;
if T == 2 then
{
if SwingHigh(1,h,left,right,left+right+1) != -1 Then
{
SH = SH+1;
hv1 = H[right];
hv2 = Hv1[1];
hd1 = sdate[right];
hd2 = Hd1[1];
ht1 = sTime[right];
ht2 = Ht1[1];
if SH >= 2 Then
{
TL_Delete(TL1);
TL1 = TL_New(hd2,ht2,hv2,hd1,ht1,hv1);
TL_SetExtRight(TL1,true);
}
}
if SH >= 2 and L > TL_GetValue(TL1,sdate,stime) Then
{
buy("b",AtStop,TL_GetValue(TL1,sdate,stime));
}
}
if T == -2 then
{
if SwingLow(1,l,left,right,left+right+1) != -1 and hv1 < hv2 Then
{
SL = SL+1;
lv1 = L[right];
lv2 = lv1[1];
ld1 = sdate[right];
ld2 = ld1[1];
lt1 = sTime[right];
lt2 = lt1[1];
if SL >= 2 Then
{
TL_Delete(TL1);
TL2 = TL_New(ld2,lt2,lv2,ld1,lt1,lv1);
TL_SetExtRight(TL2,true);
}
}
if SL >= 2 and L > TL_GetValue(TL2,sdate,stime) and lv1 > lv2 Then
{
sell("s",AtStop,TL_GetValue(TL2,sdate,stime));
}
}
즐거운 하루되세요
> 선물대장 님이 쓴 글입니다.
> 제목 : 문의 드립니다
> 이평선 20 120 정배열에서 상승 중 조정 할 때
두번의 저점 형성 후 두 고점을 연결한 추세선을 돌파 시 매수 진입
익절과 손절은 각각 50틱으로 한다.
ex) 51.20(조정 중 고점 하나) 51.00(조정 중 고점 둘) 추세선 설정
이평선 20 120 역배열에서 하락 중
두번의 고점 형성 후 두 저점을 연결한 추세선을 돌파 시 매도 진입
익절과 손절은 각각 50틱으로 한다.
ex) 51.00(조정 중 저점 하나) 51.20(조정 중 저점 둘) 추세선 설정
부탁드립니다.