커뮤니티
부탁드립니다
2021-07-11 10:55:35
1264
글번호 150661
$,안녕하세요 보조지표 DMI에서 아래조건식 추가요청드립니다.
1, D- < D+ 이고 DMI가 D+를 돌파후 다시D+를 데드크로스 할때 캔들위에 "★"(Blue)표시한다.
D- > D+ 이고 DMI가 D-를 돌파후 다시D-를 데드크로스 할때 캔들아래에 "★"(Red)표시한다.
2, D- < D+ 이고 DMI가 D-를 돌파후 D+는 돌파하지 못하고 D-를 데드크로스 할때 캔들위에
"★"(Blue)표시한다.
D- > D+ 이고 DMI가 D+를 돌파후 D-는 돌파하지 못하고 D+를 데드크로스 할때 캔들아래
에 "★"(Red)표시한다.(1,2번은 별도 수식으로 부탁드립니다)
3,#73166 답변수식에서 이격도 크기순서를 계산할때 전일값은 무시하고 당일값만으로 이격도
크기순서를 계산하는 방식으로 수정하면 좋겠습니다.
*도움 부탁드립니다.
답변 2
예스스탁 예스스탁 답변
2021-07-12 13:19:14
안녕하세요
예스스탁입니다.
1
Input : Period(14) ;
var : DMIv(0),DP(0),DM(0),tx(0),T(0);
DMIv = DMI(Period);
DP = DIPlus(Period);
DM = DIMinus(Period);
if CrossUp(DP,DM) Then
T = 1;
if CrossDown(DP,DM) Then
T = -1;
if T == 1 and CrossDown(DMIv,DP) Then
{
tx = Text_New(sDate,sTime,H,"★");
Text_SetStyle(tx,2,1);
Text_SetColor(tx,BLUE);
}
if T == -1 and CrossDown(DMIv,DM) Then
{
tx = Text_New(sDate,sTime,L,"★");
Text_SetStyle(tx,2,0);
Text_SetColor(tx,RED);
}
2
Input : Period(14) ;
var : DMIv(0),DP(0),DM(0),tx(0),T(0);
DMIv = DMI(Period);
DP = DIPlus(Period);
DM = DIMinus(Period);
if CrossUp(DP,DM) Then
T = 1;
if CrossDown(DP,DM) Then
T = -1;
if T == 1 and DMiv > DP Then
T = 0;
if T == -1 and DMiv > DM Then
T = 0;
if T == 1 and CrossDown(DMIv,DP) Then
{
tx = Text_New(sDate,sTime,H,"★");
Text_SetStyle(tx,2,1);
Text_SetColor(tx,BLUE);
}
if T == -1 and CrossDown(DMIv,DM) Then
{
tx = Text_New(sDate,sTime,L,"★");
Text_SetStyle(tx,2,0);
Text_SetColor(tx,RED);
}
3
Input : Period(14);
var : DMIv(0),DP(0),DM(0),t(0);
var : um1(0),um2(0),ud1(0),ut1(0),uv1(0),utx1(0),utx2(0);
var : dm1(0),dm2(0),dd1(0),dt1(0),dv1(0),dtx1(0),dtx2(0);
DMIv = DMI(Period);
DP = DIPlus(Period);
DM = DIMinus(Period);
if Bdate != Bdate[1] Then
{
T = 0;
dm1 = 0;
dm2 = 0;
um1 = 0;
um2 = 0;
}
if CrossUp(DP,DM) Then
{
t = 1;
dm1 = 0;
dm2 = 0;
}
if CrossDown(DP,DM) Then
{
t = -1;
um1 = 0;
um2 = 0;
}
if t == -1 Then
{
if DMiv > dm Then
{
if DMiv-dm > um1 Then
{
ud1 = sDate;
ut1 = sTime;
uv1 = l;
if um1 == 0 Then
{
utx1 = Text_New(ud1,ut1,uv1,"★");
Text_SetColor(utx1,RED);
Text_SetStyle(utx1,2,0);
}
Else
{
Text_SetLocation(utx1,ud1,ut1,uv1);
if um1 > um2 Then
{
if um2 == 0 Then
{
utx2 = Text_New(ud1[1],ut1[1],uv1[1],"★");
Text_SetColor(utx2,RED);
Text_SetStyle(utx2,2,0);
}
Else
{
Text_SetLocation(utx2,ud1[1],ut1[1],uv1[1]);
}
um2 = um1;
}
}
um1 = DMiv-dm;
}
Else
{
if DMiv-dm > um2 Then
{
if um2 == 0 Then
{
utx2 = Text_New(sDate,sTime,l,"★");
Text_SetColor(utx2,RED);
Text_SetStyle(utx2,2,0);
}
Else
{
Text_SetLocation(utx2,sDate,sTime,l);
}
um2 = DMiv-dm;
}
}
}
}
if t == 1 Then
{
if DMiv > dp Then
{
if DMiv-dp > dm1 Then
{
dd1 = sDate;
dt1 = sTime;
dv1 = h;
if dm1 == 0 Then
{
dtx1 = Text_New(dd1,dt1,dv1,"★");
Text_SetColor(dtx1,BLUE);
Text_SetStyle(dtx1,2,1);
}
Else
{
Text_SetLocation(dtx1,dd1,dt1,dv1);
if dm1 > dm2 Then
{
if dm2 == 0 Then
{
dtx2 = Text_New(dd1[1],dt1[1],dv1[1],"★");
Text_SetColor(dtx2,BLUE);
Text_SetStyle(dtx2,2,1);
}
Else
{
Text_SetLocation(dtx2,dd1[1],dt1[1],dv1[1]);
}
dm2 = dm1;
}
}
dm1 = DMiv-dp;
}
Else
{
if DMiv-dp > dm2 Then
{
if dm2 == 0 Then
{
dtx2 = Text_New(sDate,sTime,h,"★");
Text_SetColor(dtx2,BLUE);
Text_SetStyle(dtx2,2,1);
}
Else
{
Text_SetLocation(dtx2,sDate,sTime,h);
}
dm2 = DMiv-dp;
}
}
}
}
즐거운 하루되세요
> 크라켄 님이 쓴 글입니다.
> 제목 : 부탁드립니다
> $,안녕하세요 보조지표 DMI에서 아래조건식 추가요청드립니다.
1, D- < D+ 이고 DMI가 D+를 돌파후 다시D+를 데드크로스 할때 캔들위에 "★"(Blue)표시한다.
D- > D+ 이고 DMI가 D-를 돌파후 다시D-를 데드크로스 할때 캔들아래에 "★"(Red)표시한다.
2, D- < D+ 이고 DMI가 D-를 돌파후 D+는 돌파하지 못하고 D-를 데드크로스 할때 캔들위에
"★"(Blue)표시한다.
D- > D+ 이고 DMI가 D+를 돌파후 D-는 돌파하지 못하고 D+를 데드크로스 할때 캔들아래
에 "★"(Red)표시한다.(1,2번은 별도 수식으로 부탁드립니다)
3,#73166 답변수식에서 이격도 크기순서를 계산할때 전일값은 무시하고 당일값만으로 이격도
크기순서를 계산하는 방식으로 수정하면 좋겠습니다.
*도움 부탁드립니다.
크라켄
2021-07-12 21:04:52
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 부탁드립니다
>
안녕하세요
예스스탁입니다.
1
Input : Period(14) ;
var : DMIv(0),DP(0),DM(0),tx(0),T(0);
DMIv = DMI(Period);
DP = DIPlus(Period);
DM = DIMinus(Period);
if CrossUp(DP,DM) Then
T = 1;
if CrossDown(DP,DM) Then
T = -1;
if T == 1 and CrossDown(DMIv,DP) Then
{
tx = Text_New(sDate,sTime,H,"★");
Text_SetStyle(tx,2,1);
Text_SetColor(tx,BLUE);
}
if T == -1 and CrossDown(DMIv,DM) Then
{
tx = Text_New(sDate,sTime,L,"★");
Text_SetStyle(tx,2,0);
Text_SetColor(tx,RED);
}
2
Input : Period(14) ;
var : DMIv(0),DP(0),DM(0),tx(0),T(0);
DMIv = DMI(Period);
DP = DIPlus(Period);
DM = DIMinus(Period);
if CrossUp(DP,DM) Then
T = 1;
if CrossDown(DP,DM) Then
T = -1;
if T == 1 and DMiv > DP Then
T = 0;
if T == -1 and DMiv > DM Then
T = 0;
if T == 1 and CrossDown(DMIv,DP) Then
{
tx = Text_New(sDate,sTime,H,"★");
Text_SetStyle(tx,2,1);
Text_SetColor(tx,BLUE);
}
if T == -1 and CrossDown(DMIv,DM) Then
{
tx = Text_New(sDate,sTime,L,"★");
Text_SetStyle(tx,2,0);
Text_SetColor(tx,RED);
}
3
Input : Period(14);
var : DMIv(0),DP(0),DM(0),t(0);
var : um1(0),um2(0),ud1(0),ut1(0),uv1(0),utx1(0),utx2(0);
var : dm1(0),dm2(0),dd1(0),dt1(0),dv1(0),dtx1(0),dtx2(0);
DMIv = DMI(Period);
DP = DIPlus(Period);
DM = DIMinus(Period);
if Bdate != Bdate[1] Then
{
T = 0;
dm1 = 0;
dm2 = 0;
um1 = 0;
um2 = 0;
}
if CrossUp(DP,DM) Then
{
t = 1;
dm1 = 0;
dm2 = 0;
}
if CrossDown(DP,DM) Then
{
t = -1;
um1 = 0;
um2 = 0;
}
if t == -1 Then
{
if DMiv > dm Then
{
if DMiv-dm > um1 Then
{
ud1 = sDate;
ut1 = sTime;
uv1 = l;
if um1 == 0 Then
{
utx1 = Text_New(ud1,ut1,uv1,"★");
Text_SetColor(utx1,RED);
Text_SetStyle(utx1,2,0);
}
Else
{
Text_SetLocation(utx1,ud1,ut1,uv1);
if um1 > um2 Then
{
if um2 == 0 Then
{
utx2 = Text_New(ud1[1],ut1[1],uv1[1],"★");
Text_SetColor(utx2,RED);
Text_SetStyle(utx2,2,0);
}
Else
{
Text_SetLocation(utx2,ud1[1],ut1[1],uv1[1]);
}
um2 = um1;
}
}
um1 = DMiv-dm;
}
Else
{
if DMiv-dm > um2 Then
{
if um2 == 0 Then
{
utx2 = Text_New(sDate,sTime,l,"★");
Text_SetColor(utx2,RED);
Text_SetStyle(utx2,2,0);
}
Else
{
Text_SetLocation(utx2,sDate,sTime,l);
}
um2 = DMiv-dm;
}
}
}
}
if t == 1 Then
{
if DMiv > dp Then
{
if DMiv-dp > dm1 Then
{
dd1 = sDate;
dt1 = sTime;
dv1 = h;
if dm1 == 0 Then
{
dtx1 = Text_New(dd1,dt1,dv1,"★");
Text_SetColor(dtx1,BLUE);
Text_SetStyle(dtx1,2,1);
}
Else
{
Text_SetLocation(dtx1,dd1,dt1,dv1);
if dm1 > dm2 Then
{
if dm2 == 0 Then
{
dtx2 = Text_New(dd1[1],dt1[1],dv1[1],"★");
Text_SetColor(dtx2,BLUE);
Text_SetStyle(dtx2,2,1);
}
Else
{
Text_SetLocation(dtx2,dd1[1],dt1[1],dv1[1]);
}
dm2 = dm1;
}
}
dm1 = DMiv-dp;
}
Else
{
if DMiv-dp > dm2 Then
{
if dm2 == 0 Then
{
dtx2 = Text_New(sDate,sTime,h,"★");
Text_SetColor(dtx2,BLUE);
Text_SetStyle(dtx2,2,1);
}
Else
{
Text_SetLocation(dtx2,sDate,sTime,h);
}
dm2 = DMiv-dp;
}
}
}
}
즐거운 하루되세요
> 크라켄 님이 쓴 글입니다.
> 제목 : 부탁드립니다
> $,안녕하세요 보조지표 DMI에서 아래조건식 추가요청드립니다.
1, D- < D+ 이고 DMI가 D+를 돌파후 다시D+를 데드크로스 할때 캔들위에 "★"(Blue)표시한다.
D- > D+ 이고 DMI가 D-를 돌파후 다시D-를 데드크로스 할때 캔들아래에 "★"(Red)표시한다.
2, D- < D+ 이고 DMI가 D-를 돌파후 D+는 돌파하지 못하고 D-를 데드크로스 할때 캔들위에
"★"(Blue)표시한다.
D- > D+ 이고 DMI가 D+를 돌파후 D-는 돌파하지 못하고 D+를 데드크로스 할때 캔들아래
에 "★"(Red)표시한다.(1,2번은 별도 수식으로 부탁드립니다)
3,#73166 답변수식에서 이격도 크기순서를 계산할때 전일값은 무시하고 당일값만으로 이격도
크기순서를 계산하는 방식으로 수정하면 좋겠습니다.
*도움 부탁드립니다.
--------------------------------------------------------------------------------
$,보내주신수식 감사드립니다
2번답변수식에서 "별"표시가 되어야할 자리에 출력이 안되고 있습니다,
그림파일처럼 DMI가 두개의선(D+,D-)을 돌파하지 못하고 한개(D+또는D-)만 돌파하고
다시 데드크로스하는것을 참조하여 다시한번 질문내용 확인 요청드립니다.
#그림파일 녹색선 :DMI
빨간색선 : D+
파란색선 : D-
다음글
이전글