안녕하세요 예스스탁입니다. 내용상 해당 선은 추세선으로 출력되어야 하는데 추세선으로 출력되는 선은 선과 선사이에 색을 채울수가 없습니다. 박스가 다음박스 출현시까지 연장되어 그려지게 작성해 드립니다. var : box(0),TL1(0),TL2(0); Input: ADXPeriod(14), ADXThreshold(10); // 사용자 입력 변수 Condition1 = ADX(ADXPeriod) > ADXThreshold; if Condition1 == False Then { if Condition1[1] == true Then { var1 = sDate; var2 = sTime; var3 = h; var4 = l; var5 = 0; box = Box_New(sDate,sTime,var3,NextBarSdate,NextBarStime,var4); //박스색 Box_SetColor(box,Cyan); Box_SetFill(box,true); //TL_Delete(TL1); //TL_Delete(TL2); TL1 = TL_New(sDate,sTime,var3,NextBarSdate,NextBarStime,var3); TL2 = TL_New(sDate,sTime,var4,NextBarSdate,NextBarStime,var4); //수평선색 TL_SetColor(TL1,Cyan); TL_SetColor(TL2,Cyan); } Else { if var1 > 0 Then var5 = var5+1; if var3 > 0 and h > var3 Then var3 = h; if var4 > 0 and l < var4 Then var4 = l; Box_SetBegin(box,var1,var2,var3); TL_SetBegin(TL1,var1,var2,var3); TL_SetBegin(TL2,var1,var2,var4); } } Else var5 = 0; Box_SetEnd(box,sDate,sTime,var4); TL_SetEnd(TL1,sDate,sTime,var3); TL_SetEnd(TL2,sDate,sTime,var4); Plot1(var5,"봉수",Red); 즐거운 하루되세요 > 정구지 님이 쓴 글입니다. > 제목 : 가로 수평선의 연장(과거 기록도 보존) > 1-1 위 위 사진은 붉은 기둥위에 해당 캔들에 붉은색 박스만 생겼음(과거에) 이 박스안에 캔들들의 고가와 저가 선을 수평으로 다음 붉은 캔들이 있을 때까지 연장해달라는 의미임 1-2 바로 위 사진은 현재 진행형 수평선으로 가장 최신 수평선은 이렇게 나타난다(그런데 과거는 단순히 박스형태로만 나타난다) 2-1. 현재이 수평선만 표기되어 있고 과거에서는 붉은 기둥 부분의 캔들들만 박스처럼 처리 되었는데 과거도 수평선 2개가 유지 되어 새로운 붉은 기둥캔들이 생겨 대체 될 때까지 유지 되도록 부탁합니다. 2-2. 그리고 수평선의 색깔 및 굵기 그리고 두 고저 수평선 사이에 넣을 색도 고를 수 있게 변수로 처리해주시면 감사합니다. 아래는 관련 수식입니다. var : box(0),TL1(0),TL2(0); Input: ADXPeriod(14), ADXThreshold(10); // 사용자 입력 변수 Condition1 = ADX(ADXPeriod) > ADXThreshold; if Condition1 == False Then { if Condition1[1] == true Then { var1 = sDate; var2 = sTime; var3 = h; var4 = l; var5 = 0; box = Box_New(sDate,sTime,var3,NextBarSdate,NextBarStime,var4); Box_SetColor(box,Cyan); Box_SetFill(box,true); TL_Delete(TL1); TL_Delete(TL2); TL1 = TL_New(sDate,sTime,var3,NextBarSdate,NextBarStime,var3); TL2 = TL_New(sDate,sTime,var4,NextBarSdate,NextBarStime,var4); TL_SetColor(TL1,Cyan); TL_SetColor(TL2,Cyan); TL_SetExtRight(TL1,true); TL_SetExtRight(TL2,true); } Else { if var1 > 0 Then var5 = var5+1; if var3 > 0 and h > var3 Then var3 = h; if var4 > 0 and l < var4 Then var4 = l; Box_SetBegin(box,var1,var2,var3); Box_SetEnd(box,sDate,sTime,var4); TL_SetBegin(TL1,var1,var2,var3); TL_SetBegin(TL2,var1,var2,var4); TL_SetEnd(TL1,sDate,sTime,var3); TL_SetEnd(TL2,sDate,sTime,var4); } } Else var5 = 0; Plot1(var5,"봉수",Red);