커뮤니티
지표식 부탁 드립니다
2016-08-16 15:59:07
148
글번호 101036
안녕하세요
감사합니다
아래수식은 지난번에 만들어주신 고점/저점 지그제그수식입니다
보조도구에있는 지지저항분석선 처럼
고점/저점을 수평성으로 연장하여 나타내는수식 부탁드립니다
감사합니다
좋은하루되세요
input : P(3);
var : TL1(0),TL2(0),tx1(0),tx2(0);
if SwingHigh(1,h,P,P,P*2+1) != -1 Then{
var1 = sdate[P];
var2 = sTime[P];
var3 = H[P];
var4 = var1[1];
var5 = var2[1];
var6 = var3[1];
if var6 > 0 Then{
#고점에 동그라미 그리기
Tx1 = Text_New(var1,var2,var3,"●");
#동그라미 색상, 빨강
Text_SetColor(Tx1,RED);
Text_SetStyle(Tx1,2,2);
#기존그려진 TL2추세선의 오측연장을 없앰
TL_SetExtRight(TL1,False);
#새로운 고점과 이전고점을 연결해 추세선 생성
TL1 = TL_New(var4,var5,var6,var1,var2,var3);
#추세선 우측 연장
TL_SetExtRight(TL1,true);
#추세선 색지정
TL_SetColor(TL1,CYAN);
}
}
if SwingLow(1,L,P,P,P*2+1) != -1 Then{
var11 = sdate[P];
var12 = sTime[P];
var13 = L[P];
var14 = var11[1];
var15 = var12[1];
var16 = var13[1];
if var16 > 0 Then{
#저점에 동그라미 그리기
Tx2 = Text_New(var11,var12,var13,"●");
#동그라미 색상, 파랑
Text_SetColor(Tx2,BLUE);
Text_SetStyle(Tx2,2,2);
#기존그려진 TL2추세선의 오측연장을 없앰
TL_SetExtRight(TL2,False);
#새로운 저점과 이전저점을 연결해 추세선 생성
TL2 = TL_New(var14,var15,var16,var11,var12,var13);
#추세선 우측 연장
TL_SetExtRight(TL2,true);
#추세선 색지정
TL_SetColor(TL2,MAGENTA);
}
}
답변 1
예스스탁 예스스탁 답변
2016-08-17 10:16:43
안녕하세요? 예스스탁입니다.
문의하신 내용 답변드립니다.
input : P(3);
var : TL1(0),TL2(0),tx1(0),tx2(0);
if SwingHigh(1,h,P,P,P*2+1) != -1 Then{
var1 = sdate[P];
var2 = sTime[P];
var3 = H[P];
var4 = var1[1];
var5 = var2[1];
var6 = var3[1];
if var6 > 0 Then{
#고점에 동그라미 그리기
Tx1 = Text_New(var1,var2,var3,"●");
#동그라미 색상, 빨강
Text_SetColor(Tx1,RED);
Text_SetStyle(Tx1,2,2);
#기존그려진 TL2추세선의 오측연장을 없앰
}
}
TL1 = TL_New(var1, var2, var3, sdate, stime, var3);
#추세선 색지정
TL_SetColor(TL1,CYAN);
if SwingLow(1,L,P,P,P*2+1) != -1 Then{
var11 = sdate[P];
var12 = sTime[P];
var13 = L[P];
var14 = var11[1];
var15 = var12[1];
var16 = var13[1];
if var16 > 0 Then{
#저점에 동그라미 그리기
Tx2 = Text_New(var11,var12,var13,"●");
#동그라미 색상, 파랑
Text_SetColor(Tx2,BLUE);
Text_SetStyle(Tx2,2,2);
}
}
#새로운 저점과 이전저점을 연결해 추세선 생성
TL2 = TL_New(var11,var12,var13,sdate, stime, var13);
#추세선 색지정
TL_SetColor(TL2,MAGENTA);
즐거운 날 되세요.
> 감사1 님이 쓴 글입니다.
> 제목 : 지표식 부탁 드립니다
> 안녕하세요
감사합니다
아래수식은 지난번에 만들어주신 고점/저점 지그제그수식입니다
보조도구에있는 지지저항분석선 처럼
고점/저점을 수평성으로 연장하여 나타내는수식 부탁드립니다
감사합니다
좋은하루되세요
input : P(3);
var : TL1(0),TL2(0),tx1(0),tx2(0);
if SwingHigh(1,h,P,P,P*2+1) != -1 Then{
var1 = sdate[P];
var2 = sTime[P];
var3 = H[P];
var4 = var1[1];
var5 = var2[1];
var6 = var3[1];
if var6 > 0 Then{
#고점에 동그라미 그리기
Tx1 = Text_New(var1,var2,var3,"●");
#동그라미 색상, 빨강
Text_SetColor(Tx1,RED);
Text_SetStyle(Tx1,2,2);
#기존그려진 TL2추세선의 오측연장을 없앰
TL_SetExtRight(TL1,False);
#새로운 고점과 이전고점을 연결해 추세선 생성
TL1 = TL_New(var4,var5,var6,var1,var2,var3);
#추세선 우측 연장
TL_SetExtRight(TL1,true);
#추세선 색지정
TL_SetColor(TL1,CYAN);
}
}
if SwingLow(1,L,P,P,P*2+1) != -1 Then{
var11 = sdate[P];
var12 = sTime[P];
var13 = L[P];
var14 = var11[1];
var15 = var12[1];
var16 = var13[1];
if var16 > 0 Then{
#저점에 동그라미 그리기
Tx2 = Text_New(var11,var12,var13,"●");
#동그라미 색상, 파랑
Text_SetColor(Tx2,BLUE);
Text_SetStyle(Tx2,2,2);
#기존그려진 TL2추세선의 오측연장을 없앰
TL_SetExtRight(TL2,False);
#새로운 저점과 이전저점을 연결해 추세선 생성
TL2 = TL_New(var14,var15,var16,var11,var12,var13);
#추세선 우측 연장
TL_SetExtRight(TL2,true);
#추세선 색지정
TL_SetColor(TL2,MAGENTA);
}
}
다음글
이전글