커뮤니티

수식 부탁드립니다

프로필 이미지
회원
2015-10-29 10:23:31
285
글번호 91855
답변완료
(1)당일 저가에서 상승시 40틱 단위로 적색선 그리기 ...선 우측에 +40,+80,+120,+160,+200,+240,+280,+320+360 글 쓰기 ...해당 캔들 위에 +40,+80,+120+160,+200,+240,+280,+320,+360 글 쓰기 (2)당일 고가에서 하락시 40틱 단위로 청색선 그리기 ...선 우측에 -40,-80,-120,-160,-200,-240,-280,-320-360 글 쓰기 ...해당 캔들 아래에 -40,-80,-120-160,-200,-240,-280,-320,360 글 쓰기 감사합니다
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2015-10-29 14:40:33

안녕하세요 예스스탁입니다. 해당 내용 추세선과 텍스트 함수로 구현해야 합니다. 따로 plot명령어로 출력되는 부분이 없으므로 검색식으로 작성해 차트에 적용하시면 됩니다. input : N(40); var : HH(0),LL(0),T(0),HD(0),HT(0),LD(0),LT(0),HL(0),LH(0); var : Tx1(0),tx2(0),tx3(0),tx4(0),tx5(0),tx6(0),tx7(0),tx8(0),tx9(0); var : Tx11(0); var : TL1(0),tl2(0),tl3(0),tl4(0),tl5(0),tl6(0),tl7(0),tl8(0),tl9(0); if bdate != bdate[1] then{ HH = H; HD = sdate; HT = stime; HL = HH; LL = L; LD = sdate; LT = stime; T = 0; LH = H; } if H > HH Then{ T = 1; HH = H; HD = sdate; HT = stime; HL = HH; } if L < LL Then{ T = -1; LL = L; LD = sdate; LT = stime; LH = LL; } if T == 1 and T[1] == 1 Then{ if L < HL Then HL = L; TL_Delete(TL1); TL_Delete(TL2); TL_Delete(TL3); TL_Delete(TL4); TL_Delete(TL5); TL_Delete(TL6); TL_Delete(TL7); TL_Delete(TL8); TL_Delete(TL9); TL1 = TL_New(HT,HT,dayhigh-PriceScale*(N*1),sdate,stime,dayhigh-PriceScale*(N*1)); TL2 = TL_New(HT,HT,dayhigh-PriceScale*(N*2),sdate,stime,dayhigh-PriceScale*(N*2)); TL3 = TL_New(HT,HT,dayhigh-PriceScale*(N*3),sdate,stime,dayhigh-PriceScale*(N*3)); TL4 = TL_New(HT,HT,dayhigh-PriceScale*(N*4),sdate,stime,dayhigh-PriceScale*(N*4)); TL5 = TL_New(HT,HT,dayhigh-PriceScale*(N*5),sdate,stime,dayhigh-PriceScale*(N*5)); TL6 = TL_New(HT,HT,dayhigh-PriceScale*(N*6),sdate,stime,dayhigh-PriceScale*(N*6)); TL7 = TL_New(HT,HT,dayhigh-PriceScale*(N*7),sdate,stime,dayhigh-PriceScale*(N*7)); TL8 = TL_New(HT,HT,dayhigh-PriceScale*(N*8),sdate,stime,dayhigh-PriceScale*(N*8)); TL9 = TL_New(HT,HT,dayhigh-PriceScale*(N*9),sdate,stime,dayhigh-PriceScale*(N*9)); TL_SetColor(TL1,blue); TL_SetColor(TL2,blue); TL_SetColor(TL3,blue); TL_SetColor(TL4,blue); TL_SetColor(TL5,blue); TL_SetColor(TL6,blue); TL_SetColor(TL7,blue); TL_SetColor(TL8,blue); TL_SetColor(TL9,blue); Text_Delete(tx1); Text_Delete(tx2); Text_Delete(tx3); Text_Delete(tx4); Text_Delete(tx5); Text_Delete(tx6); Text_Delete(tx7); Text_Delete(tx8); Text_Delete(tx9); tx1 = Text_New(sdate,stime,dayhigh-PriceScale*(N*1),"-"+NumToStr(N*1,0)); tx2 = Text_New(sdate,stime,dayhigh-PriceScale*(N*2),"-"+NumToStr(N*2,0)); tx3 = Text_New(sdate,stime,dayhigh-PriceScale*(N*3),"-"+NumToStr(N*3,0)); tx4 = Text_New(sdate,stime,dayhigh-PriceScale*(N*4),"-"+NumToStr(N*4,0)); tx5 = Text_New(sdate,stime,dayhigh-PriceScale*(N*5),"-"+NumToStr(N*5,0)); tx6 = Text_New(sdate,stime,dayhigh-PriceScale*(N*6),"-"+NumToStr(N*6,0)); tx7 = Text_New(sdate,stime,dayhigh-PriceScale*(N*7),"-"+NumToStr(N*7,0)); tx8 = Text_New(sdate,stime,dayhigh-PriceScale*(N*8),"-"+NumToStr(N*8,0)); tx9 = Text_New(sdate,stime,dayhigh-PriceScale*(N*9),"-"+NumToStr(N*9,0)); if HL <= dayhigh-PriceScale*(N*1) and HL[1] > dayhigh-PriceScale*(N*1) Then Tx11 = Text_New(sdate,stime,L,"-"+NumToStr(N*1,0)); if HL <= dayhigh-PriceScale*(N*2) and HL[1] > dayhigh-PriceScale*(N*2) Then Tx11 = Text_New(sdate,stime,L,"-"+NumToStr(N*2,0)); if HL <= dayhigh-PriceScale*(N*3) and HL[1] > dayhigh-PriceScale*(N*3) Then Tx11 = Text_New(sdate,stime,L,"-"+NumToStr(N*3,0)); if HL <= dayhigh-PriceScale*(N*4) and HL[1] > dayhigh-PriceScale*(N*4) Then Tx11 = Text_New(sdate,stime,L,"-"+NumToStr(N*4,0)); if HL <= dayhigh-PriceScale*(N*5) and HL[1] > dayhigh-PriceScale*(N*5) Then Tx11 = Text_New(sdate,stime,L,"-"+NumToStr(N*5,0)); if HL <= dayhigh-PriceScale*(N*6) and HL[1] > dayhigh-PriceScale*(N*6) Then Tx11 = Text_New(sdate,stime,L,"-"+NumToStr(N*6,0)); if HL <= dayhigh-PriceScale*(N*7) and HL[1] > dayhigh-PriceScale*(N*7) Then Tx11 = Text_New(sdate,stime,L,"-"+NumToStr(N*7,0)); if HL <= dayhigh-PriceScale*(N*8) and HL[1] > dayhigh-PriceScale*(N*8) Then Tx11 = Text_New(sdate,stime,L,"-"+NumToStr(N*8,0)); if HL <= dayhigh-PriceScale*(N*9) and HL[1] > dayhigh-PriceScale*(N*9) Then Tx11 = Text_New(sdate,stime,L,"-"+NumToStr(N*9,0)); Text_SetStyle(tx11,2,2); } if T == -1 and T[1] == -1 Then{ if H > LH Then LH = H; TL_Delete(TL1); TL_Delete(TL2); TL_Delete(TL3); TL_Delete(TL4); TL_Delete(TL5); TL_Delete(TL6); TL_Delete(TL7); TL_Delete(TL8); TL_Delete(TL9); TL1 = TL_New(LD,LT,daylow+PriceScale*(N*1),sdate,stime,daylow+PriceScale*(N*1)); TL2 = TL_New(LD,LT,daylow+PriceScale*(N*2),sdate,stime,daylow+PriceScale*(N*2)); TL3 = TL_New(LD,LT,daylow+PriceScale*(N*3),sdate,stime,daylow+PriceScale*(N*3)); TL4 = TL_New(LD,LT,daylow+PriceScale*(N*4),sdate,stime,daylow+PriceScale*(N*4)); TL5 = TL_New(LD,LT,daylow+PriceScale*(N*5),sdate,stime,daylow+PriceScale*(N*5)); TL6 = TL_New(LD,LT,daylow+PriceScale*(N*6),sdate,stime,daylow+PriceScale*(N*6)); TL7 = TL_New(LD,LT,daylow+PriceScale*(N*7),sdate,stime,daylow+PriceScale*(N*7)); TL8 = TL_New(LD,LT,daylow+PriceScale*(N*8),sdate,stime,daylow+PriceScale*(N*8)); TL9 = TL_New(LD,LT,daylow+PriceScale*(N*9),sdate,stime,daylow+PriceScale*(N*9)); TL_SetColor(TL1,red); TL_SetColor(TL2,red); TL_SetColor(TL3,red); TL_SetColor(TL4,red); TL_SetColor(TL5,red); TL_SetColor(TL6,red); TL_SetColor(TL7,red); TL_SetColor(TL8,red); TL_SetColor(TL9,red); Text_Delete(tx1); Text_Delete(tx2); Text_Delete(tx3); Text_Delete(tx4); Text_Delete(tx5); Text_Delete(tx6); Text_Delete(tx7); Text_Delete(tx8); Text_Delete(tx9); tx1 = Text_New(sdate,stime,daylow+PriceScale*(N*1),"+"+NumToStr(N*1,0)); tx2 = Text_New(sdate,stime,daylow+PriceScale*(N*2),"+"+NumToStr(N*2,0)); tx3 = Text_New(sdate,stime,daylow+PriceScale*(N*3),"+"+NumToStr(N*3,0)); tx4 = Text_New(sdate,stime,daylow+PriceScale*(N*4),"+"+NumToStr(N*4,0)); tx5 = Text_New(sdate,stime,daylow+PriceScale*(N*5),"+"+NumToStr(N*5,0)); tx6 = Text_New(sdate,stime,daylow+PriceScale*(N*6),"+"+NumToStr(N*6,0)); tx7 = Text_New(sdate,stime,daylow+PriceScale*(N*7),"+"+NumToStr(N*7,0)); tx8 = Text_New(sdate,stime,daylow+PriceScale*(N*8),"+"+NumToStr(N*8,0)); tx9 = Text_New(sdate,stime,daylow+PriceScale*(N*9),"+"+NumToStr(N*9,0)); if LH >= daylow+PriceScale*(N*1) and LH[1] < daylow+PriceScale*(N*1) Then Tx11 = Text_New(sdate,stime,H,"+"+NumToStr(N*1,0)); if LH >= daylow+PriceScale*(N*2) and LH[1] < daylow+PriceScale*(N*2) Then Tx11 = Text_New(sdate,stime,H,"+"+NumToStr(N*2,0)); if LH >= daylow+PriceScale*(N*3) and LH[1] < daylow+PriceScale*(N*3) Then Tx11 = Text_New(sdate,stime,H,"+"+NumToStr(N*3,0)); if LH >= daylow+PriceScale*(N*4) and LH[1] < daylow+PriceScale*(N*4) Then Tx11 = Text_New(sdate,stime,H,"+"+NumToStr(N*4,0)); if LH >= daylow+PriceScale*(N*5) and LH[1] < daylow+PriceScale*(N*5) Then Tx11 = Text_New(sdate,stime,H,"+"+NumToStr(N*5,0)); if LH >= daylow+PriceScale*(N*6) and LH[1] < daylow+PriceScale*(N*6) Then Tx11 = Text_New(sdate,stime,H,"+"+NumToStr(N*6,0)); if LH >= daylow+PriceScale*(N*7) and LH[1] < daylow+PriceScale*(N*7) Then Tx11 = Text_New(sdate,stime,H,"+"+NumToStr(N*7,0)); if LH >= daylow+PriceScale*(N*8) and LH[1] < daylow+PriceScale*(N*8) Then Tx11 = Text_New(sdate,stime,H,"+"+NumToStr(N*8,0)); if LH >= daylow+PriceScale*(N*9) and LH[1] < daylow+PriceScale*(N*9) Then Tx11 = Text_New(sdate,stime,H,"+"+NumToStr(N*9,0)); Text_SetStyle(tx11,2,2); } 즐거운 하루되세요 > 타이쿤 님이 쓴 글입니다. > 제목 : 수식 부탁드립니다 > (1)당일 저가에서 상승시 40틱 단위로 적색선 그리기 ...선 우측에 +40,+80,+120,+160,+200,+240,+280,+320+360 글 쓰기 ...해당 캔들 위에 +40,+80,+120+160,+200,+240,+280,+320,+360 글 쓰기 (2)당일 고가에서 하락시 40틱 단위로 청색선 그리기 ...선 우측에 -40,-80,-120,-160,-200,-240,-280,-320-360 글 쓰기 ...해당 캔들 아래에 -40,-80,-120-160,-200,-240,-280,-320,360 글 쓰기 감사합니다