커뮤니티

수정 부탁드립니다

프로필 이미지
감사1
2014-07-04 15:28:36
182
글번호 76416
답변완료
감사합니다 아래 자동추세선, 지지저항 분석석 수식은 오늘 작성해주신겁니다 1, 지지저항 분석선의 마지막 수식 TL_Delete(LI 이 에러가 나옵니다 수정 부탁드립니다 2, 자동추세선, 지지저항 분석석 두수식다 지표속성창에서 선종류와 굵기 색상을 설정할수있게 부탁드립니다 3, 두수식다 지표를 삽입하면 지표칸에 표시없이 빈공간으로 나타나는데 차트상단 가격봉 있는칸에만 나타나게 부탁드립니다 4, 지표스타일과 지표속성창 스타일을 보조도구와 같이했으면 좋겠는데~ 가능할까요? 감사합니다 좋은하루 되세요~ 안녕하세요 예스스탁입니다. 1. 지지저항 분석석은 최근의 swinghigh와 swinglow지점을 모두 그린 식입니다. 추세선을 이용해 그리시면 아래와 같습니다. input : P(5); var : cnt(0); Array :LID[20](0),HID[20](0); if SwingHigh(1,H,P,P,P+P+1) != -1 Then{ var1 = H[P]; var2 = sdate[P]; var3 = stime[P]; HID[0] = TL_New(var2,var3,var1,sdate,stime,var1); for cnt = 1 to 19{ HID[cnt] = HID[cnt-1][1]; } TL_SetExtRight(HID[0],True); TL_SetColor(HID[0],RED); TL_Delete(HID[10]); } if SwingLow(1,L,P,P,P+P+1) != -1 Then{ var11 = L[P]; var12 = sdate[P]; var13 = stime[P]; LID[0] = TL_New(var12,var13,var11,sdate,stime,var11); for cnt = 1 to 19{ LID[cnt] = LID[cnt-1][1]; } TL_SetExtRight(LID[0],True); TL_SetColor(LID[0],blue); TL_Delete(LI 2. 자동추세선은 완전 똑같이는 가능하지 않고 아래가 가장 근접하게 구현한 식입니다. 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
프로필 이미지

예스스탁 예스스탁 답변

2014-07-04 15:33:05

안녕하세요 예스스탁입니다. 색상은 수식안에서 변경하셔야 됩니다. 속성에서 처리할수 없습니다. 굵기만 외부변수 처리해 드립니다. 수식은 검색식으로 작성해서 적용하시면 하단의 빈공간이 나타나지 않습니다. 혹은 지표식 작성하신 후에 f5키를 누르시면 지표속성이 나타납니다. 지표속성화면 Y축표시탭에서 가격으로 지정하시면 됩니다. 1 input : P(5),굵기(1); var : cnt(0); Array :LID[20](0),HID[20](0); if SwingHigh(1,H,P,P,P+P+1) != -1 Then{ var1 = H[P]; var2 = sdate[P]; var3 = stime[P]; HID[0] = TL_New(var2,var3,var1,sdate,stime,var1); for cnt = 1 to 19{ HID[cnt] = HID[cnt-1][1]; } TL_SetExtRight(HID[0],True); TL_SetColor(HID[0],RED);//색상 TL_setSize(HID[0],굵기); TL_Delete(HID[10]); } if SwingLow(1,L,P,P,P+P+1) != -1 Then{ var11 = L[P]; var12 = sdate[P]; var13 = stime[P]; LID[0] = TL_New(var12,var13,var11,sdate,stime,var11); for cnt = 1 to 19{ LID[cnt] = LID[cnt-1][1]; } TL_SetExtRight(LID[0],True); TL_SetColor(LID[0],blue);//색상 TL_setSize(LID[0],굵기); TL_Delete(LID[10]); } 2. input : P(3),굵기(1); 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); TL_SetSize(TL1,굵기); } } 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); TL_SetSize(TL2,굵기); } } 즐거운 하루되세요 > 감사1 님이 쓴 글입니다. > 제목 : 수정 부탁드립니다 > 감사합니다 아래 자동추세선, 지지저항 분석석 수식은 오늘 작성해주신겁니다 1, 지지저항 분석선의 마지막 수식 TL_Delete(LI 이 에러가 나옵니다 수정 부탁드립니다 2, 자동추세선, 지지저항 분석석 두수식다 지표속성창에서 선종류와 굵기 색상을 설정할수있게 부탁드립니다 3, 두수식다 지표를 삽입하면 지표칸에 표시없이 빈공간으로 나타나는데 차트상단 가격봉 있는칸에만 나타나게 부탁드립니다 4, 지표스타일과 지표속성창 스타일을 보조도구와 같이했으면 좋겠는데~ 가능할까요? 감사합니다 좋은하루 되세요~ 안녕하세요 예스스탁입니다. 1. 지지저항 분석석은 최근의 swinghigh와 swinglow지점을 모두 그린 식입니다. 추세선을 이용해 그리시면 아래와 같습니다. input : P(5); var : cnt(0); Array :LID[20](0),HID[20](0); if SwingHigh(1,H,P,P,P+P+1) != -1 Then{ var1 = H[P]; var2 = sdate[P]; var3 = stime[P]; HID[0] = TL_New(var2,var3,var1,sdate,stime,var1); for cnt = 1 to 19{ HID[cnt] = HID[cnt-1][1]; } TL_SetExtRight(HID[0],True); TL_SetColor(HID[0],RED); TL_Delete(HID[10]); } if SwingLow(1,L,P,P,P+P+1) != -1 Then{ var11 = L[P]; var12 = sdate[P]; var13 = stime[P]; LID[0] = TL_New(var12,var13,var11,sdate,stime,var11); for cnt = 1 to 19{ LID[cnt] = LID[cnt-1][1]; } TL_SetExtRight(LID[0],True); TL_SetColor(LID[0],blue); TL_Delete(LI 2. 자동추세선은 완전 똑같이는 가능하지 않고 아래가 가장 근접하게 구현한 식입니다. 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); } }