커뮤니티
문의드립니다
2015-11-13 11:59:53
145
글번호 92382
input : Left(4),Right(4),Left1(4),Right2(4) ;
var : SHcount(0),SHdate(0),SHtime(0),SHvalH(0),SHcount1(0),SHdate2(0),SHtime3(0),SHvalH4(0),TL1(0);
var : PreSHdate(0),PreSHtime(0),PreSHvalH(0),Shidx(0),PreSHdate1(0),PreSHtime2(0),PreSHvalH3(0),Shidx4(0),TL2(0);
var : TL11(0),TL12(0);
var : TL21(0),TL22(0);
if Swinghigh(1,h,Left,Right,Left+Right+1) != -1 Then{
SHcount = SHcount +1;
SHdate = sdate[Right];
SHtime = stime[Right];
SHvalH = h[Right];
PreSHdate = SHdate[1];
PreSHtime = SHtime[1];
PreSHvalH = SHvalH[1];
if Shcount >= 2 Then{
{
TL1= TL_New(PreSHdate, PreSHtime, PreSHvalH, SHdate,SHtime,SHvalH);
TL_SetColor(TL1,RED);
TL_SetSize(TL1,1);
TL11 = TL_New(PreSHdate, PreSHtime, PreSHvalH, SHdate,SHtime,PreSHvalH);
TL_SetColor(TL11,RED);
TL_SetSize(TL11,1);
}
TL_Delete(TL12);
TL12 = TL_New(SHdate, SHtime, SHvalH, Sdate,Stime,SHvalH);
TL_SetColor(TL12,RED);
}
질문1 ( TL11 ) 이분분라인값과 바로이전라인값과 뺴기하여지표화하고
TL11 = TL_New(PreSHdate, PreSHtime, PreSHvalH, SHdate,SHtime,PreSHvalH);
질문2 ( TL11 )의 이동평균 20을 만들고 십습니다
부탁드립니다 감사합니다
답변 1
예스스탁 예스스탁 답변
2015-11-13 14:55:49
안녕하세요
예스스탁입니다.
직전 고점2개의 중간값을 추세선으로 추가했습니다.
고점간의 차이는 지표로 그려집니다.
아래 내용 참고하시기 바랍니다.
input : Left(4),Right(4);
var : SHcount(0),cnt(0);
var : TL1(0),TL11(0),TL12(0),TL13(0),TL14(0);
Array : SHD[50](0),SHT[50](0),SHV[50](0);
if Swinghigh(1,h,Left,Right,Left+Right+1) != -1 Then{
SHcount = SHcount +1;
SHD[0] = sdate[Right];
SHT[0] = stime[Right];
SHV[0] = h[Right];
for cnt = 1 to 20{
SHD[cnt] = SHD[cnt-1][1];
SHT[cnt] = SHT[cnt-1][1];
SHV[cnt] = SHV[cnt-1][1];
}
if Shcount >= 2 Then
{
TL1= TL_New(SHD[1], SHT[1], SHV[1], SHD[0],SHT[0],SHV[0]);
TL_SetColor(TL1,RED);
TL_SetSize(TL1,1);
TL11 = TL_New(SHD[1], SHT[1], SHV[1], SHD[0],SHT[0],SHV[1]);
TL_SetColor(TL11,RED);
TL_SetSize(TL11,1);
TL13 = TL_New(SHD[1], SHT[1], (SHV[1]+SHV[2])/2, SHD[0],SHT[0],(SHV[1]+SHV[2])/2);
TL_SetColor(TL13,RED);
TL_SetSize(TL13,1);
}
TL_Delete(TL12);
TL12 = TL_New(SHD[0], SHT[0], SHV[0], Sdate,Stime,SHV[0]);
TL_SetColor(TL12,red);
TL_SetSize(TL12,1);
TL_Delete(TL14);
TL14 = TL_New(SHD[0], SHT[0], (SHV[0]+SHV[1])/2, Sdate,Stime,(SHV[0]+SHV[1])/2);
TL_SetColor(TL14,red);
TL_SetSize(TL14,1);
}
var1 = ma(TL_GetValue(TL11,sdate,stime),20);
plot1(SHV[0]-SHV[1],"고점차");
plot2(var1,"TL11의 이평");
즐거운 하루되세요
> 파파리리 님이 쓴 글입니다.
> 제목 : 문의드립니다
> input : Left(4),Right(4),Left1(4),Right2(4) ;
var : SHcount(0),SHdate(0),SHtime(0),SHvalH(0),SHcount1(0),SHdate2(0),SHtime3(0),SHvalH4(0),TL1(0);
var : PreSHdate(0),PreSHtime(0),PreSHvalH(0),Shidx(0),PreSHdate1(0),PreSHtime2(0),PreSHvalH3(0),Shidx4(0),TL2(0);
var : TL11(0),TL12(0);
var : TL21(0),TL22(0);
if Swinghigh(1,h,Left,Right,Left+Right+1) != -1 Then{
SHcount = SHcount +1;
SHdate = sdate[Right];
SHtime = stime[Right];
SHvalH = h[Right];
PreSHdate = SHdate[1];
PreSHtime = SHtime[1];
PreSHvalH = SHvalH[1];
if Shcount >= 2 Then{
{
TL1= TL_New(PreSHdate, PreSHtime, PreSHvalH, SHdate,SHtime,SHvalH);
TL_SetColor(TL1,RED);
TL_SetSize(TL1,1);
TL11 = TL_New(PreSHdate, PreSHtime, PreSHvalH, SHdate,SHtime,PreSHvalH);
TL_SetColor(TL11,RED);
TL_SetSize(TL11,1);
}
TL_Delete(TL12);
TL12 = TL_New(SHdate, SHtime, SHvalH, Sdate,Stime,SHvalH);
TL_SetColor(TL12,RED);
}
질문1 ( TL11 ) 이분분라인값과 바로이전라인값과 뺴기하여지표화하고
TL11 = TL_New(PreSHdate, PreSHtime, PreSHvalH, SHdate,SHtime,PreSHvalH);
질문2 ( TL11 )의 이동평균 20을 만들고 십습니다
부탁드립니다 감사합니다