커뮤니티
안녕하세요
2017-04-14 10:22:31
280
글번호 108786
1.
첨부파일처럼 전저점에서 전고점과 저점의 중간값을 연결하는 우측연장 추세선
부탁드립니다.
만약 최근저점이 계속갱신이 되어 유동적이어도 추세선을 다시그을수 잇으면 좋고요
만약 저점이 확인이 안된다면 저점후 다시한번 고점이 나온후에(이때는 저점이 확정된상태)
추세선을 그어지게 해도 됩니다
2.
아래식에서 마지막봉위에 표시되는 연장선에
마지막봉종가 값과 의 이격율을 구하여 마지막봉에만text로 표시되게
부탁드립니다.
input : s1(0),s2(0);
var : T(0);
var1 = csar(s1,s2);
if Crossup(c,var1) then{
T = 1;
}
if CrossDown(c,var1) then{
T = -1;
var2 = H;
}
plot1(var2);
- 1. 109326_추세선.jpg (0.01 MB)
답변 2
예스스탁 예스스탁 답변
2017-04-14 11:35:31
안녕하세요
예스스탁입니다.
1.
아래식 차고하셔서 수정보완하시기 바랍니다.
input : left(3),right(3);
var : T(0),tl1(0),tl2(0);
if SwingHigh(1,H,left,right,left+right+1) != -1 Then{
T = 1;
var1 = sdate[Right];
var2 = stime[Right];
var3 = H[right];
var31 = lowest(L,right-1);
var32 = right;
if var4 > 0 Then{
TL_New(var4,var5,var6,var1,var2,var3);
}
}
if SwingLow(1,L,left,right,left+right+1) != -1 Then{
T = -1;
var4 = sdate[Right];
var5 = stime[Right];
var6 = L[right];
var61 = highest(H,right-1);
var62 = right;
if var1 > 0 Then
TL_New(var1,var2,var3,var4,var5,var6);
}
TL_Delete(tl1);
TL_Delete(tl2);
if T == 1 Then{
var32 = var32+1;
if L < var31 Then
var31 = L;
tl1 = TL_New(var1,var2,var3,sdate,stime,var31);
if var4 > 0 then{
tl2 = TL_New(var4,var5,var6,sdate[floor(var32/2)],stime[floor(var32/2)],(var3+var31)/2);
TL_SetExtRight(tl2,true);
}
}
if T == -1 Then{
var62 = var62+1;
if H > var61 Then
var61 = h;
tl1 = TL_New(var4,var5,var6,sdate,stime,var61);
if var1 > 0 then{
tl2 = TL_New(var1,var2,var3,sdate[floor(var62/2)],stime[floor(var62/2)],(var6+var61)/2);
TL_SetExtRight(tl2,true);
}
}
2
텍스트는 완성봉에서만 동작합니다.
현재 미완성인 마지막봉값은 표시할수 없습니다.
최근 완성봉 기준으로 값표시합니다.
input : s1(0),s2(0),P(20);
var : T(0),tx(0);
var1 = csar(s1,s2);
if Crossup(c,var1) then{
T = 1;
}
if CrossDown(c,var1) then{
T = -1;
var2 = H;
}
plot1(var2);
var3 = Disparity(20);
Text_Delete(tx);
tx = Text_New(sdate,stime,var2,"종가 : "+NumToStr(C,2)+"이격도"+NumToStr(var3,2));
즐거운 하루되세요
> 자라도 님이 쓴 글입니다.
> 제목 : 안녕하세요
> 1.
첨부파일처럼 전저점에서 전고점과 저점의 중간값을 연결하는 우측연장 추세선
부탁드립니다.
만약 최근저점이 계속갱신이 되어 유동적이어도 추세선을 다시그을수 잇으면 좋고요
만약 저점이 확인이 안된다면 저점후 다시한번 고점이 나온후에(이때는 저점이 확정된상태)
추세선을 그어지게 해도 됩니다
2.
아래식에서 마지막봉위에 표시되는 연장선에
마지막봉종가 값과 의 이격율을 구하여 마지막봉에만text로 표시되게
부탁드립니다.
input : s1(0),s2(0);
var : T(0);
var1 = csar(s1,s2);
if Crossup(c,var1) then{
T = 1;
}
if CrossDown(c,var1) then{
T = -1;
var2 = H;
}
plot1(var2);
자라도
2017-04-14 14:59:39
아래처럼 수정을 해보았습니다.
여기서 종가부분(sdate,stime)만 전봉말고 현재봉으로 수정해보려고 하는데 현재봉참고가 안되내요
현재봉으로 하면 종가가 계속움직이므로 이격값또한 계속 바뀝니다 이런결과를 원합니다.
input : s1(0),s2(0)/*,P(20)*/;
var : T(0),tx(0);
var1 = csar(s1,s2);
if Crossup(c,var1) then{
T = 1;
}
if CrossDown(c,var1) then{
T = -1;
var2 = H;
}
plot1(var2);
var3 = (c / var2 *100)-100;
/*var3 = Disparity(20);*/
Text_Delete(tx);
tx = Text_New(sdate,stime,var2,""+NumToStr(C,2)+"이격"+NumToStr(var3,2)+"%"); <===이부분에서 +면 빨강 -면 파랑되나요 ??
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 안녕하세요
>
안녕하세요
예스스탁입니다.
2
텍스트는 완성봉에서만 동작합니다.
현재 미완성인 마지막봉값은 표시할수 없습니다.
최근 완성봉 기준으로 값표시합니다.
input : s1(0),s2(0),P(20);
var : T(0),tx(0);
var1 = csar(s1,s2);
if Crossup(c,var1) then{
T = 1;
}
if CrossDown(c,var1) then{
T = -1;
var2 = H;
}
plot1(var2);
var3 = Disparity(20);
Text_Delete(tx);
tx = Text_New(sdate,stime,var2,"종가 : "+NumToStr(C,2)+"이격도"+NumToStr(var3,2));
즐거운 하루되세요
> 자라도 님이 쓴 글입니다.
> 제목 : 안녕하세요
2.
아래식에서 마지막봉위에 표시되는 연장선에
마지막봉종가 값과 의 이격율을 구하여 마지막봉에만text로 표시되게
부탁드립니다.
input : s1(0),s2(0);
var : T(0);
var1 = csar(s1,s2);
if Crossup(c,var1) then{
T = 1;
}
if CrossDown(c,var1) then{
T = -1;
var2 = H;
}
plot1(var2);
다음글
이전글