커뮤니티
부탁드립니다
2019-04-13 12:59:36
164
글번호 127833
수고하십니다
*아래수식은 각각의 업.다운될때의선들입니다 5일전동안에 업.다운 되는각각의선들을 오른쪽으로 길게연장선에 가격표시가 나타나도록 부탁드립니다
Input : Period1(20), Period2(60);
var : Sma1(0),Sma2(0);
Sma1 = ma(C,Period1);
Sma2 = ma(C,Period2);
If Crossup(Sma1,Sma2) Then
var1 = l;
If CrossDown(Sma1,Sma2) Then
var2 = l;
plot1(var1,"20.60업");
plot2(var2,"20.60다운");
답변 1
예스스탁 예스스탁 답변
2019-04-15 12:43:37
안녕하세요
예스스탁입니다.
plot은 우측 연장이 되지 안습니다. 추세선으로 작성해야 합니다.
또한 최근 N일로는 처리해 드리기 어렵습니다.
최근 n개 시점의 값을 우측 연장하고 값표시하게 작성해 드립니다.
Input : Period1(20), Period2(60),N(5);
var : Sma1(0),Sma2(0),cnt(0);
Array : upv[50](0),dnv[50](0);
Array : upt[50](0),dnt[50](0);
Array : upx[50](0),dnx[50](0);
Sma1 = ma(C,Period1);
Sma2 = ma(C,Period2);
If Crossup(Sma1,Sma2) Then
{
upv[0] = l;
upt[0] = TL_New(sdate[1],stime[1],upv[0],sdate,stime,upv[0]);
TL_SetExtRight(upt[0],true);
TL_SetColor(upt[0],RED);
upx[0] = Text_New(sdate,stime,upv[0],NumToStr(upv[0],2));
Text_SetColor(upx[0],RED);
for cnt = 1 to N
{
upv[cnt] = upv[cnt-1][1];
upt[cnt] = upt[cnt-1][1];
upx[cnt] = upx[cnt-1][1];
}
TL_Delete(upt[N]);
Text_Delete(upx[N]);
}
If CrossDown(Sma1,Sma2) Then
{
dnv[0] = l;
dnt[0] = TL_New(sdate[1],stime[1],dnv[0],sdate,stime,dnv[0]);
TL_SetExtRight(dnt[0],true);
TL_SetColor(dnt[0],blue);
dnx[0] = Text_New(sdate,stime,dnv[0],NumToStr(dnv[0],2));
Text_SetColor(dnx[0],blue);
for cnt = 1 to N
{
dnv[cnt] = dnv[cnt-1][1];
dnt[cnt] = dnt[cnt-1][1];
dnx[cnt] = dnx[cnt-1][1];
}
TL_Delete(dnt[N]);
Text_Delete(dnx[N]);
}
for cnt = 0 to N-1
{
Text_SetLocation(upx[cnt],sdate,stime,upv[cnt]);
Text_SetLocation(dnx[cnt],sdate,stime,dnv[cnt]);
}
즐거운 하루되세요
> 파생돌이 님이 쓴 글입니다.
> 제목 : 부탁드립니다
> 수고하십니다
*아래수식은 각각의 업.다운될때의선들입니다 5일전동안에 업.다운 되는각각의선들을 오른쪽으로 길게연장선에 가격표시가 나타나도록 부탁드립니다
Input : Period1(20), Period2(60);
var : Sma1(0),Sma2(0);
Sma1 = ma(C,Period1);
Sma2 = ma(C,Period2);
If Crossup(Sma1,Sma2) Then
var1 = l;
If CrossDown(Sma1,Sma2) Then
var2 = l;
plot1(var1,"20.60업");
plot2(var2,"20.60다운");
다음글
이전글