예스스탁 | 전략 설계부터 자동매매까지

커뮤니티

항상 좋은 일만 있으시기 바랍니다

Raff-Regression-Channel지표 x축을

psar현재구간 +직전구간 +전전구간 +전전전구간

4구간을 기준으로 적용 되어 나오게

요청 합니다

아래수식은 음의구간만 나오는데

양의구간도 나오게 수정 요청합니다

Input : af(0.02), maxAF(0.2);

var : t(0),tl(0),tl1(0),tl2(0),tl3(0),tl4(0),tl5(0),tl6(0),tl7(0),tl8(0),tl9(0)

,tx1(0),tx2(0),color(0);

var : hh(0),hd(0),ht(0),hh1(0),tl11(0);

var : ll(0),ld(0),lt(0),ll1(0),tl22(0);

var1 = SAR(af,maxAF);

if CrossUp(C,var1) Then

{

T = 1;

hh = h;

hh1 = hh[1];

hd = sDate;

ht = sTime;

if ll > 0 Then

{

tl1 = TL_New(hd,ht,hh,NextBarSdate,NextBarStime,hh);

tl2 = TL_New(hd,ht,hh/1.01,NextBarSdate,NextBarStime,hh/1.01);

tl3 = TL_New(hd,ht,hh/1.02,NextBarSdate,NextBarStime,hh/1.02);

tl11 = tl1[1];

TL_SetEnd(tl11,Sdate[1],Stime[1],hh1);

Text_SetStyle(tx1,2,1);

if hh1 == 0 or (hh1 > 0 and hh > hh1) Then

color = Red;

}

else if CrossDown(C,var1) Then

{

T = -1;

ll = l;

ll1 = ll[1];

ld = sDate;

lt = sTime;

if hh > 0 Then

{

}

Else

{

if t == 1 then

{

if h > hh Then

{

hh = h;

hd = sDate;

ht = sTime;

TL_SetEnd(tl,hd,ht,hh);

TL_SetBegin(tl1,hd,ht,hh);

TL_SetBegin(tl2,hd,ht,hh/1.01);

TL_SetBegin(tl3,hd,ht,hh/1.02);

Text_SetLocation(tx1,sDate,sTime,hh);

if (hh1 > 0 and hh > hh1) Then

color = Red;

}

if t == -1 then

{

if l < ll Then

{

ll = l;

ld = sDate;

lt = sTime;

}

TL_SetEnd(tl1,NextBarSdate,NextBarStime,hh);

TL_SetEnd(tl2,NextBarSdate,NextBarStime,hh/1.01);

TL_SetEnd(tl3,NextBarSdate,NextBarStime,hh/1.02);

지표

답변 1

예스스탁 예스스탁 답변

2026-01-12 17:05:37

안녕하세요
예스스탁입니다.


Input : af(0.02), maxAF(0.2),N(4);
var : t(0),i(0);
var : hh(0),hd(0),ht(0);
var : ll(0),ld(0),lt(0);
Array : tl1[10](0),tl2[10](0),tl3[10](0);

var1 = SAR(af,maxAF);

if CrossUp(C,var1) Then
{
	T = 1;
	hh = h;
	hd = sDate;
	ht = sTime;
	if ll > 0 Then
	{
		For i = 9 DownTo 1
		{
			tl1[i] = tl1[i-1];
			tl2[i] = tl2[i-1];
			tl3[i] = tl3[i-1];
		}
		value1 = hh;
		Value2 = hh/1.01;
		Value3 = hh/1.02;
		tl1[0] = TL_New(hd,ht,value1,NextBarSdate,NextBarStime,value1);
		tl2[0] = TL_New(hd,ht,Value2,NextBarSdate,NextBarStime,Value2);
		tl3[0] = TL_New(hd,ht,Value3,NextBarSdate,NextBarStime,Value3);

		value4 = value1[1];
		Value5 = Value2[1];
		Value6 = Value3[1];
		TL_SetEnd(tl1[1],sDate,sTime,value1[1]);
		TL_SetEnd(tl2[1],sDate,sTime,value2[1]);
		TL_SetEnd(tl3[1],sDate,sTime,value3[1]);

		TL_Delete(tl1[n]);
		TL_Delete(tl2[n]);
		TL_Delete(tl3[n]);
	}
}
else if CrossDown(C,var1) Then
{
	T = -1;
	ll = l;
	ld = sDate;
	lt = sTime;
	if hh > 0 Then
	{
		For i = 9 DownTo 1
		{
			tl1[i] = tl1[i-1];
			tl2[i] = tl2[i-1];
			tl3[i] = tl3[i-1];
		}
		value1 = ll;
		Value2 = ll/0.99;
		Value3 = ll/0.98;

		tl1[0] = TL_New(ld,lt,value1,NextBarSdate,NextBarStime,value1);
		tl2[0] = TL_New(ld,lt,Value2,NextBarSdate,NextBarStime,Value2);
		tl3[0] = TL_New(ld,lt,Value3,NextBarSdate,NextBarStime,Value3);

		value4 = value1[1];
		Value5 = Value2[1];
		Value6 = Value3[1];
		TL_SetEnd(tl1[1],sDate,sTime,value1[1]);
		TL_SetEnd(tl2[1],sDate,sTime,value2[1]);
		TL_SetEnd(tl3[1],sDate,sTime,value3[1]);

		TL_Delete(tl1[n]);
		TL_Delete(tl2[n]);
		TL_Delete(tl3[n]);	
	}
}
Else
{
	if t == 1 then
	{
		if h > hh Then
		{      
			hh = h;
			hd = sDate;
			ht = sTime;
			value1 = hh;
			Value2 = hh/1.01;
			Value3 = hh/1.02;

			TL_SetBegin(tl1[0],hd,ht,value1);
			TL_SetBegin(tl2[0],hd,ht,Value2);
			TL_SetBegin(tl3[0],hd,ht,Value3);

			TL_SetEnd(tl1[1],sDate,sTime,value4);
			TL_SetEnd(tl2[1],sDate,sTime,Value5);
			TL_SetEnd(tl3[1],sDate,sTime,Value6);

		}      
	}
	
	if t == -1 then
	{
	    if l < ll Then
	    {
			ll = l;
			ld = sDate;
			lt = sTime;
			
			value1 = ll;
			Value2 = ll/0.99;
			Value3 = ll/0.98;
			
			TL_SetBegin(tl1[0],ld,lt,value1);
			TL_SetBegin(tl2[0],ld,lt,Value2);
			TL_SetBegin(tl3[0],ld,lt,Value3);

			TL_SetEnd(tl1[1],sDate,sTime,value4);
			TL_SetEnd(tl2[1],sDate,sTime,Value5);
			TL_SetEnd(tl3[1],sDate,sTime,Value6);
	    }
	}
}

TL_SetEnd(tl1[0],NextBarSdate,NextBarStime,value1);
TL_SetEnd(tl2[0],NextBarSdate,NextBarStime,Value2);
TL_SetEnd(tl3[0],NextBarSdate,NextBarStime,Value3);

즐거운 하루 되세요

안녕하세요 예스스탁입니다. Input : af(0.02), maxAF(0.2),N(4); var : t(0),i(0); var : hh(0),hd(0),ht(0); var : ll(0),ld(0),lt(0); Array : tl1[10](0),tl2[10](0),tl3[10](0); var1 = SAR(af,maxAF); if CrossUp(C,var1) Then { T = 1; hh = h; hd = sDate; ht = sTime; if ll > 0 Then { For i = 9 DownTo 1 { tl1[i] = tl1[i-1]; tl2[i] = tl2[i-1]; tl3[i] = tl3[i-1]; } value1 = hh; Value2 = hh/1.01; Value3 = hh/1.02; tl1[0] = TL_New(hd,ht,value1,NextBarSdate,NextBarStime,value1); tl2[0] = TL_New(hd,ht,Value2,NextBarSdate,NextBarStime,Value2); tl3[0] = TL_New(hd,ht,Value3,NextBarSdate,NextBarStime,Value3); value4 = value1[1]; Value5 = Value2[1]; Value6 = Value3[1]; TL_SetEnd(tl1[1],sDate,sTime,value1[1]); TL_SetEnd(tl2[1],sDate,sTime,value2[1]); TL_SetEnd(tl3[1],sDate,sTime,value3[1]); TL_Delete(tl1[n]); TL_Delete(tl2[n]); TL_Delete(tl3[n]); } } else if CrossDown(C,var1) Then { T = -1; ll = l; ld = sDate; lt = sTime; if hh > 0 Then { For i = 9 DownTo 1 { tl1[i] = tl1[i-1]; tl2[i] = tl2[i-1]; tl3[i] = tl3[i-1]; } value1 = ll; Value2 = ll/0.99; Value3 = ll/0.98; tl1[0] = TL_New(ld,lt,value1,NextBarSdate,NextBarStime,value1); tl2[0] = TL_New(ld,lt,Value2,NextBarSdate,NextBarStime,Value2); tl3[0] = TL_New(ld,lt,Value3,NextBarSdate,NextBarStime,Value3); value4 = value1[1]; Value5 = Value2[1]; Value6 = Value3[1]; TL_SetEnd(tl1[1],sDate,sTime,value1[1]); TL_SetEnd(tl2[1],sDate,sTime,value2[1]); TL_SetEnd(tl3[1],sDate,sTime,value3[1]); TL_Delete(tl1[n]); TL_Delete(tl2[n]); TL_Delete(tl3[n]); } } Else { if t == 1 then { if h > hh Then { hh = h; hd = sDate; ht = sTime; value1 = hh; Value2 = hh/1.01; Value3 = hh/1.02; TL_SetBegin(tl1[0],hd,ht,value1); TL_SetBegin(tl2[0],hd,ht,Value2); TL_SetBegin(tl3[0],hd,ht,Value3); TL_SetEnd(tl1[1],sDate,sTime,value4); TL_SetEnd(tl2[1],sDate,sTime,Value5); TL_SetEnd(tl3[1],sDate,sTime,Value6); } } if t == -1 then { if l < ll Then { ll = l; ld = sDate; lt = sTime; value1 = ll; Value2 = ll/0.99; Value3 = ll/0.98; TL_SetBegin(tl1[0],ld,lt,value1); TL_SetBegin(tl2[0],ld,lt,Value2); TL_SetBegin(tl3[0],ld,lt,Value3); TL_SetEnd(tl1[1],sDate,sTime,value4); TL_SetEnd(tl2[1],sDate,sTime,Value5); TL_SetEnd(tl3[1],sDate,sTime,Value6); } } } TL_SetEnd(tl1[0],NextBarSdate,NextBarStime,value1); TL_SetEnd(tl2[0],NextBarSdate,NextBarStime,Value2); TL_SetEnd(tl3[0],NextBarSdate,NextBarStime,Value3); 즐거운 하루 되세요

종목검색 기능 문의

문의 드립니다

대학생 시스템 트레이딩 챌린지

대학생 시스템 트레이딩 챌린지

대학생 시스템 트레이딩 챌린지

대학생 시스템 트레이딩 챌린지

대학생 시스템 트레이딩 챌린지

커뮤니티

수고하십니다

답변 1

예스스탁 예스스탁 답변

커뮤니티

수고하십니다

답변 1

예스스탁 예스스탁 답변

개인정보 취급방침