안녕하세요 예스스탁입니다. 최근 연결선만 출력되게 작성해 드립니다. 3번 내용은 추가해 드리기에는 식작성에 시간이 걸립니다. input : af(0.02), maxAF(0.2); input : 텍스트출력(1),굵기1(3),색상1(RED),굵기2(3),색상2(blue); var : T(0),HH(0),LL(0),HD(0),HT(0),LD(0),LT(0),cnt(0),count(0); var : HH1(0),LL1(0),HD1(0),HT1(0),LD1(0),LT1(0),DarkGray(0); var : TL3(0),TL4(0),TL5(0),TL6(0),tl7(0),tx1(0),tx2(0),tx11(0),tx22(0); var : TL1(0),TL2(0); var1 = CSar(af,maxAF); if crossup(c,var1) Then { T = 1; HH = H; HD = sdate; HT = stime; HH1 = HH[1]; HD1 = HD[1]; HT1 = HT[1]; if LL > 0 Then { if 텍스트출력 == 1 then { Tx11 = Text_New(HD1,HT1,HH1,NumToStr((HH1-LL1)/PriceScale,0)+NewLine+NumToStr(HH1,2)); Text_SetStyle(tx11,2,1); Text_SetColor(tx11,BLACK); Text_Delete(tx1); Tx1 = Text_New(HD,HT,HH,NumToStr((HH-LL[1])/PriceScale,0)+NewLine+NumToStr(HH,2)); Text_SetStyle(tx1,2,1); Text_SetColor(tx1,BLACK); } } if HH1 > 0 Then { TL_Delete(TL1); tl1 = TL_New(HD1,HT1,HH1,HD,HT,HH); TL_SetExtRight(tl1,true); TL_SetSize(TL1,굵기1); TL_SetColor(TL1,색상1); } } if CrossDown(c,var1) Then { T = -1; LL = L; LD = sdate; LT = stime; LL1 = LL[1]; LD1 = LD[1]; LT1 = LT[1]; if HH > 0 Then { if 텍스트출력 == 1 then { Tx22 = Text_New(LD1,LT1,LL1,NumToStr((HH1-LL1)/PriceScale,0)+NewLine+NumToStr(LL1,2)); Text_SetStyle(tx22,2,0); Text_SetColor(tx22,RED); Text_Delete(tx2); Tx2 = Text_New(LD,LT,LL,NumToStr((HH[1]-LL)/PriceScale,0)+NewLine+NumToStr(LL,2)); Text_SetStyle(tx2,2,0); Text_SetColor(tx2,RED); } } if LL1 > 0 Then { TL_Delete(TL2); tl2 = TL_New(LD1,LT1,LL1,LD,LT,LL); TL_SetExtRight(tl2,true); TL_SetSize(TL2,굵기2); TL_SetColor(TL2,색상2); } } if T == 1 then { if H > HH Then { HH = H; HD = sdate; HT = stime; if 텍스트출력 == 1 then { Text_Delete(tx1); Tx1 = Text_New(HD,HT,HH,NumToStr((HH-LL[1])/PriceScale,0)+NewLine+NumToStr(HH,2)); Text_SetStyle(tx1,2,1); Text_SetColor(tx1,BLACK); } if HH1 > 0 Then { TL_Delete(TL1); tl1 = TL_New(HD1,HT1,HH1,HD,HT,HH); TL_SetExtRight(tl1,true); TL_SetSize(TL1,굵기1); TL_SetColor(TL1,색상1); } } } if T == -1 then { if L < LL Then { LL = L; LD = sdate; LT = stime; if 텍스트출력 == 1 then { Text_Delete(tx2); Tx2 = Text_New(LD,LT,LL,NumToStr((HH[1]-LL)/PriceScale,0)+NewLine+NumToStr(LL,2)); Text_SetStyle(tx2,2,0); Text_SetColor(tx2,RED); } if LL1 > 0 Then { TL_Delete(TL2); tl2 = TL_New(LD1,LT1,LL1,LD,LT,LL); TL_SetExtRight(tl2,true); TL_SetSize(TL2,굵기2); TL_SetColor(TL2,색상2); } } } 즐거운 하루되세요 > 골든키 님이 쓴 글입니다. > 제목 : 수식추가부탁드립니다 > #,안녕하세요 *,아래식은 파동 고,저점 텍스트 출력식입니다 이 식을 아래조건만족시 수식추가 요청드립니다 1,최근 고점 텍스트출력값을 A 라 칭하고,이전1개 고점 텍스트출력값을 B 라 칭할때, A > B 일때,B와A를 연결하는 상승추세선을 Y축까지 오른쪽그리기 요청합니다. (굵기,색상,변수조절 가능토록)이때 고점에서 하락파동을 완성하지 못하고 다시고점을 갱신할경우 추세선도 따라서 변경 되도록합니다. A < B 일때 B와A를 연결하는 하락추세선을 Y축까지 오른쪽그리기 요청합니다. 2,최근 저점 텍스트출력값을 C 라 칭하고,이전1개 저점 텍스트출력값을 D 라 칭할때, C < D 일때,D와C를 연결하는 하락추세선을 Y축까지 오른쪽그리기 요청합니다. (굵기,색상,변수조절가능토록)이때 저점에서 상승파동을 완성하지 못하고 다시저점을 갱신할경우 추세선도 따라서 변경 되도록합니다. C > D 일때,D와C를 연결하는 상승추세선을 Y축까지 오른쪽 그리기 요청합니다. 3,위 1번과2번의 추세선을 최근3일(변수조절)까지만 연결해서 오른쪽그리기로 나타나게 합니다. input : af(0.02), maxAF(0.2); input : 텍스트출력(1); var : T(0),HH(0),LL(0),HD(0),HT(0),LD(0),LT(0),TL1(0),TL2(0),cnt(0),count(0); var : HH1(0),LL1(0),HD1(0),HT1(0),LD1(0),LT1(0),DarkGray(0); var : TL3(0),TL4(0),TL5(0),TL6(0),tl7(0),tx1(0),tx2(0),tx11(0),tx22(0); var1 = CSar(af,maxAF); if crossup(c,var1) Then { T = 1; HH = H; HD = sdate; HT = stime; HH1 = HH[1]; HD1 = HD[1]; HT1 = HT[1]; if LL > 0 Then { if 텍스트출력 == 1 then { Tx11 = Text_New(HD1,HT1,HH1,NumToStr((HH1-LL1)/PriceScale,0)+NewLine+NumToStr(HH1,2)); Text_SetStyle(tx11,2,1); Text_SetColor(tx11,BLACK); Text_Delete(tx1); Tx1 = Text_New(HD,HT,HH,NumToStr((HH-LL[1])/PriceScale,0)+NewLine+NumToStr(HH,2)); Text_SetStyle(tx1,2,1); Text_SetColor(tx1,BLACK); } } } if CrossDown(c,var1) Then { T = -1; LL = L; LD = sdate; LT = stime; LL1 = LL[1]; LD1 = LD[1]; LT1 = LT[1]; if HH > 0 Then { if 텍스트출력 == 1 then { Tx22 = Text_New(LD1,LT1,LL1,NumToStr((HH1-LL1)/PriceScale,0)+NewLine+NumToStr(LL1,2)); Text_SetStyle(tx22,2,0); Text_SetColor(tx22,RED); Text_Delete(tx2); Tx2 = Text_New(LD,LT,LL,NumToStr((HH[1]-LL)/PriceScale,0)+NewLine+NumToStr(LL,2)); Text_SetStyle(tx2,2,0); Text_SetColor(tx2,RED); } } } if T == 1 then { if H > HH Then { HH = H; HD = sdate; HT = stime; if 텍스트출력 == 1 then { Text_Delete(tx1); Tx1 = Text_New(HD,HT,HH,NumToStr((HH-LL[1])/PriceScale,0)+NewLine+NumToStr(HH,2)); Text_SetStyle(tx1,2,1); Text_SetColor(tx1,BLACK); } } } if T == -1 then { if L < LL Then { LL = L; LD = sdate; LT = stime; if 텍스트출력 == 1 then { Text_Delete(tx2); Tx2 = Text_New(LD,LT,LL,NumToStr((HH[1]-LL)/PriceScale,0)+NewLine+NumToStr(LL,2)); Text_SetStyle(tx2,2,0); Text_SetColor(tx2,RED); } } } ##, 언제나 늘 고맙습니다