안녕하세요 예스스탁입니다. 선마마 색을 다르게 지정하려면 갯수만큼 나열해서 지정해야 합니다. input의 구간갯수가 기본 20개이면 선을 총 21개가 생성됩니다.(구간갯수+1) 구간갯수에 맞게 나열하셔야 합니다. 아래수식 하단 참고하시기 바랍니다. 굵기는 모두 2, 색은 모두 빨간색으로 지정해 드립니다. 사용자분이 직접 원하시는 색상지정하셔야 합니다. 색상은 예스랭귀지 도움말에서 색상예약어 참고하시기 바랍니다. Input:기간(500), 구간개수(20); //최대 20 Var:최대(0),최소(0),j(0),행번호(0),총거래량(0),가격대거래량(0), 시작번호(0),끝번호(0); Array:가격대[21](0),거래량[21](0),비율[21](0),Text[21](0),TL[21](0); #----------------------------------------------------------------------------------# # 가격대를 배열변수에 세팅한다. #----------------------------------------------------------------------------------# 최대 = Highest(H,기간-1); 최소 = Lowest(L,기간-1); Value1 = (최대-최소)/구간개수; 가격대[0] = 최대; For 행번호 = 0 To 구간개수-1 { 가격대[행번호+1] = 가격대[행번호] - Value1; 거래량[행번호] = 0; 비율[행번호] = 0; } 총거래량 = 0; For j = 0 To 기간-2 { 총거래량 = 총거래량 + V[j]; #----------------------------------------------------------------------------------# # 거래량을 걸쳐있는 가격대에 분배 #----------------------------------------------------------------------------------# for 행번호 = 0 To 구간개수-1 { if 가격대[행번호] >= H[j] and 가격대[행번호+1] < H[j] then 시작번호 = 행번호; if 가격대[행번호] >= L[j] and 가격대[행번호+1] < L[j] then 끝번호 = 행번호; } 가격대거래량 = V[j]/(끝번호-시작번호+1); for 행번호 = 시작번호 To 끝번호 { 거래량[행번호] = 거래량[행번호] + 가격대거래량; } } #----------------------------------------------------------------------------------# # 비율 계산 #----------------------------------------------------------------------------------# for 행번호 = 0 To 구간개수-1 { 비율[행번호] = 거래량[행번호] * 100 / 총거래량; } #----------------------------------------------------------------------------------# # 지표출력 #----------------------------------------------------------------------------------# for j = 0 to 구간개수-1 { TL_Delete(TL[j]); TL[j] = TL_New(Date[기간-2],sTime[기간-2],가격대[j],Date[0],sTime[0],가격대[j]); //Text_Delete(Text[j]); //Text[j] = Text_New(date[0], stime[0], (가격대[j]+가격대[j+1])/2,NumToStr(거래량[j],0)+" ("+NumToStr(비율[j],2)+"%)("+NumToStr(가격대[j+1],0)+" ~ "+NumToStr(가격대[j],0)+")"); //Text_SetStyle(Text[j], 1, 2); } j = 구간개수; TL_Delete(TL[j]); TL[j] = TL_New(Date[기간-2],sTime[기간-2],가격대[j],Date[0],sTime[0],가격대[j]); TL_SetSize(TL[0],2);//굵기 TL_SetColor(TL[0],RED);//굵기 TL_SetSize(TL[1],2);//굵기 TL_SetColor(TL[1],RED);//굵기 TL_SetSize(TL[2],2);//굵기 TL_SetColor(TL[2],RED);//굵기 TL_SetSize(TL[3],2);//굵기 TL_SetColor(TL[3],RED);//굵기 TL_SetSize(TL[4],2);//굵기 TL_SetColor(TL[4],RED);//굵기 TL_SetSize(TL[5],2);//굵기 TL_SetColor(TL[5],RED);//굵기 TL_SetSize(TL[6],2);//굵기 TL_SetColor(TL[6],RED);//굵기 TL_SetSize(TL[7],2);//굵기 TL_SetColor(TL[7],RED);//굵기 TL_SetSize(TL[8],2);//굵기 TL_SetColor(TL[8],RED);//굵기 TL_SetSize(TL[9],2);//굵기 TL_SetColor(TL[9],RED);//굵기 TL_SetSize(TL[10],2);//굵기 TL_SetColor(TL[10],RED);//굵기 TL_SetSize(TL[11],2);//굵기 TL_SetColor(TL[11],RED);//굵기 TL_SetSize(TL[12],2);//굵기 TL_SetColor(TL[12],RED);//굵기 TL_SetSize(TL[13],2);//굵기 TL_SetColor(TL[13],RED);//굵기 TL_SetSize(TL[14],2);//굵기 TL_SetColor(TL[14],RED);//굵기 TL_SetSize(TL[15],2);//굵기 TL_SetColor(TL[15],RED);//굵기 TL_SetSize(TL[16],2);//굵기 TL_SetColor(TL[16],RED);//굵기 TL_SetSize(TL[17],2);//굵기 TL_SetColor(TL[17],RED);//굵기 TL_SetSize(TL[18],2);//굵기 TL_SetColor(TL[18],RED);//굵기 TL_SetSize(TL[19],2);//굵기 TL_SetColor(TL[19],RED);//굵기 TL_SetSize(TL[20],2);//굵기 TL_SetColor(TL[20],RED);//굵기 TL_SetSize(TL[21],2);//굵기 TL_SetColor(TL[21],RED);//굵기 즐거운 하루되세요 > 유선 님이 쓴 글입니다. > 제목 : 문의드립니다 > Input:기간(500), 구간개수(20); //최대 20 Var:최대(0),최소(0),j(0),행번호(0),총거래량(0),가격대거래량(0), 시작번호(0),끝번호(0); Array:가격대[21](0),거래량[21](0),비율[21](0),Text[21](0),TL[21](0); #----------------------------------------------------------------------------------# # 가격대를 배열변수에 세팅한다. #----------------------------------------------------------------------------------# 최대 = Highest(H,기간-1); 최소 = Lowest(L,기간-1); Value1 = Round((최대-최소)/구간개수,0); 가격대[0] = 최대; For 행번호 = 0 To 구간개수-1 { 가격대[행번호+1] = 가격대[행번호] - Value1; 거래량[행번호] = 0; 비율[행번호] = 0; } 총거래량 = 0; For j = 0 To 기간-2 { 총거래량 = 총거래량 + V[j]; #----------------------------------------------------------------------------------# # 거래량을 걸쳐있는 가격대에 분배 #----------------------------------------------------------------------------------# for 행번호 = 0 To 구간개수-1 { if 가격대[행번호] >= H[j] and 가격대[행번호+1] < H[j] then 시작번호 = 행번호; if 가격대[행번호] >= L[j] and 가격대[행번호+1] < L[j] then 끝번호 = 행번호; } 가격대거래량 = V[j]/(끝번호-시작번호+1); for 행번호 = 시작번호 To 끝번호 { 거래량[행번호] = 거래량[행번호] + 가격대거래량; } } #----------------------------------------------------------------------------------# # 비율 계산 #----------------------------------------------------------------------------------# for 행번호 = 0 To 구간개수-1 { 비율[행번호] = 거래량[행번호] * 100 / 총거래량; } #----------------------------------------------------------------------------------# # 지표출력 #----------------------------------------------------------------------------------# for j = 0 to 구간개수-1 { TL_Delete(TL[j]); TL[j] = TL_New(Date[기간-2],sTime[기간-2],가격대[j],Date[0],sTime[0],가격대[j]); //Text_Delete(Text[j]); //Text[j] = Text_New(date[0], stime[0], (가격대[j]+가격대[j+1])/2,NumToStr(거래량[j],0)+" ("+NumToStr(비율[j],2)+"%)("+NumToStr(가격대[j+1],0)+" ~ "+NumToStr(가격대[j],0)+")"); //Text_SetStyle(Text[j], 1, 2); } j = 구간개수; TL_Delete(TL[j]); TL[j] = TL_New(Date[기간-2],sTime[기간-2],가격대[j],Date[0],sTime[0],가격대[j]); 위선들을굵게하고십습니다 그리고선들을 색상을넣고십습니다 각선마다 색상을다르게넣고십습니다부탁드립니다~`감사드립니다