안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.

항상 신속하고 적극적인 지원을 베풀어 주셔서 깊이 감사드립니다. 아래는 게시물 29656에 대한 답변 식인데 타주기 시스템식 부탁드리겠습니다. 감사합니다. ==== 이하 답변 식 ========== 안녕하세요 예스스탁입니다. input : g(17),s(8),r(8),p(4); var : smiv(0),SMIS(0); Inputs: Length(14),signal(9); Variables: Trixval(0), TrixSlope(0), TrixSignal(0); INPUTS: P1(9),P2(26),P3(9); var : MACDV(0),MACDS(0),MACDO(0); SMIv = ema(ema(c-(highest(H,g) + lowest(L,g))*0.5, r),s) * 100 / (0.5 * ema(ema(highest(H,g)-lowest(L,g),r),s)); SMIs = ema(smiv,P); Trixval = Trix(Length); TrixSlope = Trixval - Trixval[1]; TrixSignal = ema(TrixSlope,signal); var1 = (3 * Ema(c,P1)) - (3 * Ema(Ema(c,P1),P1)) + (Ema(Ema(Ema(c,P1),P1),P1)); var2 = (3 * Ema(c,P2)) - (3 * Ema(Ema(c,P2),P2)) + (Ema(Ema(Ema(c,P2),P2),P2)); MACDV = var1-var2; MACDS = ema(MACDV,P3); MACDO = MACDV-MACDS; value1 = SMIs+TrixSignal+MACDS; if value1 > value1[1] Then plot1(value1,"통합",red); Else plot1(value1,"통합",blue);

안녕하세요, 수식 작성 문의 드립니다. Input : T1(5), T2(30); Var1 = Data1(C) - Data2(C); Var2 = Var1[T1] + Var1[T1-1] + Var1[T1-2] + Var1[T1-3] + Var1[T1-4] + Var1 / T1+1; 제가 구하고자 하는 데이터는 Var2 입니다. 기간 입력값인 T1(5) 와 T2(30) 은 제가 원하는 기간의 데이터를 설정해서 보고자 Input 으로 놓았습니다. 예를 들어 T1(5) 를 구하고자 할 때 풀어 쓴 수식은 위 Var2 와 같습니다. 위 수식처럼 노가다로 작성을 했는데 저렇게 작성을 늘려서 하면 기간값을 Input으로 설정하는 의미가 없어집니다. 매번 저렇게 풀어서 작성해야 하겠지요. 다시 말해 예를 들어 제가 과거 15봉 값을 구하고 싶을 때 T1(15)로 설정할텐데 그 때의 수식은 Var2 = Var1[T1] + Var1[T1-1] + Var1[T1-2] + ... + Var1[T1-13] + Var1[T1-14] + Var1 / T1+1; 이런 식으로 되어야 하는데 수식을 작성하는 방법을 모르겠습니다. ========================= 1. 제가 Array 를 작성할 줄 몰라서 그러는데 혹시 Array 로 루프문 작성이 가능한가요? 가능한 다른 방법도 있다면 수식 부탁 드리겠습니다. 2. 예를 들어 T1(5) 로 설정했을 때 Var2 의 값이 전일 봉 4개 + 9시 시초가 1개봉 이렇게 계산이 되는 것 같습니다. 시초가에 당일 봉으로만 시작해서 계산되도록 하는 수식을 추가해 주실 수 있나요? ===================== 항상 감사드립니다.

수고하십니다. 초보라 아래의 내용을 차트에 구현하는 수식 부탁드리겠습니다. 1. 매수신호 발생: 틱차트에서 5 이평선이 수평에서 상방으로 돌아선 후 양봉이 연속해서 2개 발생했을때 2번째 양봉에서 매수신호 발생 2. 매도신호 발생: 틱차트에서 5 이평선이 수평에서 하방으로 돌아선 후 음봉이 연속해서 2개 발생했을때 2번째 음봉에서 매도신호 발생 3. 1번, 2번의 경우 신호발생 후부터 수익 발생시 10틱 단위로 10틱, 20틱, 30틱 표시 감사합니다.

안녕하세요..글번호54850 라인추가부탁드립니다, (참조데이타 4) 현재가라인 만들어주세요. 1.시가 2.고가 3.저가 4.중심가 5.현재가 수고하세요..꾸벅

매월 주기적으로 날짜를 지정해서 매매를 하고 싶습니다. 예를들면 매월 1일에 매매가 시작되고, 매월 20일에 매매가 중단되는 형식입니다. 12월 기준으로 sdate >= 20171201 and sdate < 20171220 으로 표시되는데... 년도와 월을 직접 수정하지 않고, 함수로 매월 1일~20일로 sdate를 표시하고 싶습니다. 가능한지 문의드립니다. 감사합니다^^

안녕하세요. 아래와 같이 답변을 받아 큰 도움이 되었습니다. 시스템 적용결과 잘 작동했지만 수식을 추가하는 과정에서 아래의 함수가 추가되면 전일 손실을 인식하지 못합니다. if data3(C>O) Then S = S+1; if data3(C<O) Then S = S-1; 하지만 이상하게도 if data2(C>O) Then S = S+1; if data2(C<O) Then S = S-1; 까지 입력하면 원하는 대로 작동이 잘됩니다. 아무리 봐도 간섭이 없어 보이는데 원인이 무엇인지 아래의 전체 식 확인 부탁드립니다. var : cnt(0),T1(0),entry(false); Array : DayPL[10](0); if bdate != bdate[1] Then{ T1 = NetProfit; for cnt = 1 to 9{ DayPL[cnt] = DayPL[cnt-1][1]; } entry = true; if dayPL[1] <= -0.2 Then entry = false; } dayPL[0] = NetProfit-T1; var : S(0,data1); S = 0; if data2(C>O) Then S = S+1; if data2(C<O) Then S = S-1; if data3(C>O) Then S = S+1; if data3(C<O) Then S = S-1; if entry == true then{ if c>0 Then buy(); } if MarketPosition == 1 and S == -2 Then exitlong(); ==================================================================================== 안녕하세요 예스스탁입니다. 1. var : cnt(0),T1(0),entry(false); Array : DayPL[10](0); if bdate != bdate[1] Then{ T1 = NetProfit; for cnt = 1 to 9{ DayPL[cnt] = DayPL[cnt-1][1]; } entry = true; if dayPL[1] <= -0.5 Then entry = false; } dayPL[0] = NetProfit-T1; if entry == true then{ 진입수식 } 2 var : cnt(0),T1(0),entry(false); Array : DayPL[10](0); if bdate != bdate[1] Then{ T1 = NetProfit; for cnt = 1 to 9{ DayPL[cnt] = DayPL[cnt-1][1]; } entry = true; if dayPL[1]+dayPl[2] <= -0.8 Then entry = false; } dayPL[0] = NetProfit-T1; if entry == true then{ 진입수식 } 3 Case 3 내용은 신호를 전반적인 수식 내용을 알고 가상으로 체크하는 내용을 추가해야 하는 부분입니다. 전략 내용에 따라 다르고 작성에 시간이 많이 걸리는 부분이라 저희가 작성해 드리지 않습니다. 업무상 시간이 많이 걸리는 부분은 작성해 드리기 어렵습니다. 즐거운 하루되세요 > ysl 님이 쓴 글입니다. > 제목 : 수식 문의 드립니다. > 안녕하세요. 추세추종에 따른 연속손실 방지를 위하여 아래와 같이 손실에 따른 진입제한 함수 예제를 부탁드립니다. Case 1. 전영업일(T-1) -0.5pt 손실시 당일(T) 진입제한 (당연히 그 다음날인 T+1일부터는 T일 거래가 없었으므로 손익이 "0"이므로 조건 만족시 매매 진행) Case 2. 전전영업일(T-2)과 전영업일(T-1) 합산하여 -0.8pt 손실시 당일(T) 진입제한 Case 3. 전 거래가 -0.5pt이하 손실로 청산시 다음 진입신호는 무시하고 그 다음 진입신호에 진입 간단히 예제로 부탁드립니다. 감사합니다.

Input:length(3); Var:최종고가(0),최종저가(0),최종변곡점(""),처리구분(""), sBar(0),TL1(0),TL2(0),TL3(0), 고추세기울기(0),고추세봉개수(0),고추세시작(0),고추세시작IDX(0),고추세최종(0), 저추세기울기(0),저추세봉개수(0),저추세시작(0),저추세시작IDX(0),저추세최종(0); Var:고1(0),고2(0),고3(0),고4(0),고5(0),고6(0),고7(0),고8(0),고9(0),고10(0), 저1(0),저2(0),저3(0),저4(0),저5(0),저6(0),저7(0),저8(0),저9(0),저10(0), 고1IDX(0),고2IDX(0),고3IDX(0),고4IDX(0),고5IDX(0), 고6IDX(0),고7IDX(0),고8IDX(0),고9IDX(0),고10IDX(0), 저1IDX(0),저2IDX(0),저3IDX(0),저4IDX(0),저5IDX(0), 저6IDX(0),저7IDX(0),저8IDX(0),저9IDX(0),저10IDX(0); var : tl21(0),tl22(0),TL31(0),tl32(0),Tl33(0),tl34(0),t(0); #==========================================# Condition1 = Highest(C,length) == C and 최종고가 <> C; Condition2 = Lowest (C,length) == C and 최종저가 <> C; 처리구분 = ""; If Condition1 and Condition2 Then // 기간고점과 기간저점 동시 발생 { If 최종변곡점 == "저점" Then 처리구분 = "고점처리"; // 저 - 고 순으로 처리 Else 처리구분 = "저점처리"; // 고 - 저 순으로 처리 } Else If Condition1 Then 처리구분 = "고점처리"; Else If Condition2 Then 처리구분 = "저점처리"; #==========================================# If 처리구분 == "고점처리" Then { 최종고가 = C; // 신규고점을 체크하기 위해 저장 If 최종변곡점 == "저점" Then { 고9 = 고8; 고9IDX = 고8IDX; 고8 = 고7; 고8IDX = 고7IDX; 고7 = 고6; 고7IDX = 고6IDX; 고6 = 고5; 고6IDX = 고5IDX; 고5 = 고4; 고5IDX = 고4IDX; 고4 = 고3; 고4IDX = 고3IDX; 고3 = 고2; 고3IDX = 고2IDX; 고2 = 고1; 고2IDX = 고1IDX; 고1 = C; 고1IDX = Index; sBar = Index - 저1IDX; // 추세선 시작점의 위치, n봉전으로 표시 T = -1; TL1 = TL_New(sDate[sBar],sTime[sBar],저1,sDate[0],sTime[0],고1); TL_SetSize(TL1,2); TL_SetColor(TL1,GREEN); TL21 = TL_New(sDate[index-저2IDX],sTime[index-저2IDX],L[index-저2IDX],sDate[index-저1IDX],sTime[index-저1IDX],L[index-저2IDX]); TL_SetColor(TL21,CYAN); if C[index-저2IDX] != L[index-저2IDX] then{ TL22 = TL_New(sDate[index-저2IDX],sTime[index-저2IDX],C[index-저2IDX],sDate[index-저1IDX],sTime[index-저1IDX],C[index-저2IDX]); TL_SetColor(TL22,CYAN); } if T[1] != -1 Then{ plot21(L[index-저2IDX],"검색21",CYAN); plot22(C[index-저2IDX],"검색22",CYAN); } } Else If 고1 < C Then // 1번 고점보다 높은 고가 출현 { 고1 = C; 고1IDX = Index; TL_SetEnd(TL1,sDate[0],sTime[0],고1); // 시작점은 변동없고 끝점의 위치가 현재 봉으로 연장된 것임 } /* 고점추세선 */ If 고2IDX[1] <> 고2IDX Then // 고2의 Index값이 변동 없음 즉, 새로운 고점이 생기지 않았음 { 고추세최종 = 0; 고추세기울기 = 0; 고추세시작 = 0; 고추세봉개수 = 0; If 고2 < 고3 Then { 고추세기울기 = (고2 - 고3)/(고2IDX - 고3IDX); 고추세시작 = 고3; 고추세시작IDX = 고3IDX; } Else If 고2 < 고4 Then { 고추세기울기 = (고2 - 고4)/(고2IDX - 고4IDX); 고추세시작 = 고4; 고추세시작IDX = 고4IDX; } Else If 고2 < 고5 Then { 고추세기울기 = (고2 - 고5)/(고2IDX - 고5IDX); 고추세시작 = 고5; 고추세시작IDX = 고5IDX; } Else If 고2 < 고6 Then { 고추세기울기 = (고2 - 고6)/(고2IDX - 고6IDX); 고추세시작 = 고6; 고추세시작IDX = 고6IDX; } Else If 고2 < 고7 Then { 고추세기울기 = (고2 - 고7)/(고2IDX - 고7IDX); 고추세시작 = 고7; 고추세시작IDX = 고7IDX; } Else If 고2 < 고8 Then { 고추세기울기 = (고2 - 고8)/(고2IDX - 고8IDX); 고추세시작 = 고8; 고추세시작IDX = 고8IDX; } Else If 고2 < 고9 Then { 고추세기울기 = (고2 - 고9)/(고2IDX - 고9IDX); 고추세시작 = 고9; 고추세시작IDX = 고9IDX; } 고추세봉개수 = Index - 고추세시작IDX; 고추세최종 = 고추세기울기 * 고추세봉개수 + 고추세시작; If 고추세최종 > 0 Then { TL2 = TL_New(sDate[고추세봉개수],sTime[고추세봉개수],고추세시작,sDate[0],sTime[0],고추세최종); TL_SetSize(TL2,1); TL_SetColor(TL2,RED); } } Else If 고추세최종[1] > 0 Then { 고추세최종 = 고추세기울기 * (Index - 고추세시작IDX) + 고추세시작; TL_SetEnd(TL2,sDate[0],sTime[0],고추세최종); } If 저추세최종[1] > 0 Then { 저추세최종 = 저추세기울기 * (Index - 저추세시작IDX) + 저추세시작; TL_SetEnd(TL3,sDate[0],sTime[0],저추세최종); } 최종변곡점 = "고점"; } #==========================================# If 처리구분 == "저점처리" Then { 최종저가 = C; If 최종변곡점 == "고점" then { 저9 = 저8; 저9IDX = 저8IDX; 저8 = 저7; 저8IDX = 저7IDX; 저7 = 저6; 저7IDX = 저6IDX; 저6 = 저5; 저6IDX = 저5IDX; 저5 = 저4; 저5IDX = 저4IDX; 저4 = 저3; 저4IDX = 저3IDX; 저3 = 저2; 저3IDX = 저2IDX; 저2 = 저1; 저2IDX = 저1IDX; 저1 = C; 저1IDX = Index; sBar = Index - 고1IDX; TL1 = TL_New(sDate[sBar],sTime[sBar],고1,sDate[0],sTime[0],저1); TL_SetSize(TL1,2); TL_SetColor(TL1,GREEN); T = 1; TL21 = TL_New(sDate[index-고2IDX],sTime[index-고2IDX],H[index-고2IDX],sDate[index-고1IDX],sTime[index-고1IDX],H[index-고2IDX]); TL_SetColor(TL21,MAGENTA); if C[index-고2IDX]!= H[index-고2IDX] then{ TL22 = TL_New(sDate[index-고2IDX],sTime[index-고2IDX],C[index-고2IDX],sDate[index-고1IDX],sTime[index-고1IDX],C[index-고2IDX]); TL_SetColor(TL22,MAGENTA); } if T[1] != 1 Then{ plot21(H[index-고2IDX],"검색21",MAGENTA); plot22(c[index-고2IDX],"검색22",MAGENTA); } } Else If 저1 > C then { 저1 = C; 저1IDX = Index; TL_SetEnd(TL1,sDate[0],sTime[0],저1); } /* 저점추세선 */ If 저2IDX[1] <> 저2IDX Then { 저추세최종 = 0; 저추세기울기 = 0; 저추세시작 = 0; 저추세봉개수 = 0; If 저2 > 저3 and 저3 > 0 Then { 저추세기울기 = (저2 - 저3)/(저2IDX - 저3IDX); 저추세시작 = 저3; 저추세시작IDX = 저3IDX; } Else If 저2 > 저4 and 저4 > 0 Then { 저추세기울기 = (저2 - 저4)/(저2IDX - 저4IDX); 저추세시작 = 저4; 저추세시작IDX = 저4IDX; } Else If 저2 > 저5 and 저5 > 0 Then { 저추세기울기 = (저2 - 저5)/(저2IDX - 저5IDX); 저추세시작 = 저5; 저추세시작IDX = 저5IDX; } Else If 저2 > 저6 and 저6 > 0 Then { 저추세기울기 = (저2 - 저6)/(저2IDX - 저6IDX); 저추세시작 = 저6; 저추세시작IDX = 저6IDX; } Else If 저2 > 저7 and 저7 > 0 Then { 저추세기울기 = (저2 - 저7)/(저2IDX - 저7IDX); 저추세시작 = 저7; 저추세시작IDX = 저7IDX; } Else If 저2 > 저8 and 저8 > 0 Then { 저추세기울기 = (저2 - 저8)/(저2IDX - 저8IDX); 저추세시작 = 저8; 저추세시작IDX = 저8IDX; } Else If 저2 > 저9 and 저9 > 0 Then { 저추세기울기 = (저2 - 저9)/(저2IDX - 저9IDX); 저추세시작 = 저9; 저추세시작IDX = 저9IDX; } 저추세봉개수 = Index - 저추세시작IDX; 저추세최종 = 저추세기울기 * 저추세봉개수 + 저추세시작; If 저추세최종 > 0 Then { TL3 = TL_New(sDate[저추세봉개수],sTime[저추세봉개수],저추세시작,sDate[0],sTime[0],저추세최종); TL_SetSize(TL3,1); TL_SetColor(TL3,BLUE); } } Else If 저추세최종[1] > 0 Then { 저추세최종 = 저추세기울기 * (Index - 저추세시작IDX) + 저추세시작; TL_SetEnd(TL3,sDate[0],sTime[0],저추세최종); } If 고추세최종[1] > 0 Then { 고추세최종 = 고추세기울기 * (Index - 고추세시작IDX) + 고추세시작; TL_SetEnd(TL2,sDate[0],sTime[0],고추세최종); } 최종변곡점 = "저점"; } TL_Delete(TL31); TL_Delete(TL32); TL_Delete(TL33); TL_Delete(TL34); If T == 1 Then{ TL31 = TL_New(sDate[index-고1IDX],sTime[index-고1IDX],H[index-고1IDX],sDate,sTime,H[index-고1IDX]); TL_SetColor(TL31,MAGENTA); if C[index-고1IDX]!= H[index-고1IDX] then{ TL32 = TL_New(sDate[index-고1IDX],sTime[index-고1IDX],C[index-고1IDX],sDate,sTime,C[index-고1IDX]); TL_SetColor(TL32,MAGENTA); } TL33 = TL_New(sDate[index-저2IDX],sTime[index-저2IDX],L[index-저2IDX],sDate,sTime,L[index-저2IDX]); TL_SetColor(TL33,cyan); if C[index-저2IDX]!= L[index-저2IDX] then{ TL34 = TL_New(sDate[index-저2IDX],sTime[index-저2IDX],C[index-저2IDX],sDate,sTime,C[index-저2IDX]); TL_SetColor(TL34,cyan); } if T[1] != 1 then{ Plot31(H[index-고1IDX],"검색31",MAGENTA); Plot32(C[index-고1IDX],"검색32",MAGENTA); Plot33(L[index-저2IDX],"검색33",cyan); Plot34(C[index-저2IDX],"검색34",cyan); } } If T == -1 Then{ TL31 = TL_New(sDate[index-고2IDX],sTime[index-고2IDX],H[index-고2IDX],sDate,sTime,H[index-고2IDX]); TL_SetColor(TL31,MAGENTA); if C[index-고2IDX]!= H[index-고2IDX] then{ TL32 = TL_New(sDate[index-고2IDX],sTime[index-고2IDX],C[index-고2IDX],sDate,sTime,C[index-고2IDX]); TL_SetColor(TL32,MAGENTA); } TL33 = TL_New(sDate[index-저1IDX],sTime[index-저1IDX],L[index-저1IDX],sDate,sTime,L[index-저1IDX]); TL_SetColor(TL33,cyan); if C[index-저1IDX]!= L[index-저1IDX] then{ TL34 = TL_New(sDate[index-저1IDX],sTime[index-저1IDX],C[index-저1IDX],sDate,sTime,C[index-저1IDX]); TL_SetColor(TL34,cyan); } if T[1] != -1 then{ Plot31(H[index-고2IDX],"검색31",MAGENTA); Plot32(C[index-고2IDX],"검색32",MAGENTA); Plot33(L[index-저1IDX],"검색33",cyan); Plot34(c[index-저1IDX],"검색34",cyan); } } **************************************************************************** 윗식에서 plot 21, plot 22, plot 31, plot 32, plot 33, plot 34의 검색점이 발생한 싯점을 시스템 신호로 바꾸어 보고 싶습니다. 즉 검색점 대신에 시스템 신호를 넣고 싶습니다 고점에서는 매도신호 저점에서는 매수신호로 넣어 주세요 부탁드립니다. 감사합니다.

안녕하세요 아래수식은 고점저점파동수식입니다 아래수식에서 보충해야할 요청내용은 일종의 추세선과 같이 고점과 전고점을, 저점과 전저점을 연결하는 직선이 새로운 고점 저점이 생길때마다 발생되도록 부탁드립니다 감사합니다 Input:length(5),종가사용여부(0),파동선두께(5),수치표시(1); Var:j(0),jj(0),HH(0),LL(0),최종고가(0),최종저가(0),최종꼭지점(""),처리구분(""), TL1(0),Text1(0); Array:고[10,4](0),저[10,4](0); // 1:가격,2:Index,3:sDate,4:sTime #==========================================# HH = IFF(종가사용여부==1,C,H); LL = IFF(종가사용여부==1,C,L); If Index == 0 Then { 고[1,1] = HH; 저[1,1] = LL; } Condition1 = Highest(HH,length) == HH and 최종고가 <> HH; Condition2 = Lowest (LL,length) == LL and 최종저가 <> LL; 처리구분 = ""; If Condition1 and Condition2 Then // 기간고점과 기간저점 동시 발생 { If 최종꼭지점 == "저점" Then { If 저[1,1] > LL Then 처리구분 = "저점처리"; Else 처리구분 = "고점처리"; } Else If 최종꼭지점 == "고점" Then { If 고[1,1] < HH Then 처리구분 = "고점처리"; Else 처리구분 = "저점처리"; } } Else If Condition1 Then 처리구분 = "고점처리"; Else If Condition2 Then 처리구분 = "저점처리"; #==========================================# If 처리구분 == "고점처리" Then { 최종고가 = HH; // 신규고점을 체크하기 위해 저장 If 최종꼭지점 == "저점" Then { For j = 10 DownTo 2 { For jj = 1 To 4 { 고[j,jj] = 고[j-1,jj]; } } 고[1,1] = HH; 고[1,2] = Index; 고[1,3] = sDate; 고[1,4] = sTime; TL1 = TL_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]); If 수치표시 == 1 Then { Text1 = Text_New(고[1,3],고[1,4],고[1,1],NumToStr(고[1,1],2)); PlaySound("F:￦예스트레이더소리￦띠웅.wav"); Text_SetStyle(Text1, 2, 1); Text_SetColor(Text1,BLACK); } TL_SetSize(TL1,파동선두께); TL_SetColor(TL1,red); } Else If 고[1,1] < HH Then // 1번 고점보다 높은 고가 출현 { 고[1,1] = HH; 고[1,2] = Index; 고[1,3] = sDate; 고[1,4] = sTime; TL_SetEnd(TL1,고[1,3],고[1,4],고[1,1]); // 시작점은 변동없고 끝점의 위치가 현재 봉으로 연장된 것임 If 수치표시 == 1 Then { Text_SetLocation(Text1,고[1,3],고[1,4],고[1,1]); Text_SetString(Text1,NumToStr(고[1,1],2)); } } 최종꼭지점 = "고점"; } #==========================================# If 처리구분 == "저점처리" Then { 최종저가 = LL; If 최종꼭지점 == "고점" then { For j = 10 DownTo 2 { For jj = 1 To 4 { 저[j,jj] = 저[j-1,jj]; } } 저[1,1] = LL; 저[1,2] = Index; 저[1,3] = sDate; 저[1,4] = sTime; TL1 = TL_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]); If 수치표시 == 1 Then { Text1 = Text_New(저[1,3],저[1,4],저[1,1],NumToStr(저[1,1],2)); PlaySound("F:￦예스트레이더소리￦띠웅.wav"); Text_SetStyle(Text1, 2, 0); Text_SetColor(Text1,BLACK); } TL_SetSize(TL1,파동선두께); TL_SetColor(TL1,red); } Else If 저[1,1] > LL then { 저[1,1] = LL; 저[1,2] = Index; 저[1,3] = sDate; 저[1,4] = sTime; TL_SetEnd(TL1,저[1,3],저[1,4],저[1,1]); If 수치표시 == 1 Then { Text_SetLocation(Text1,저[1,3],저[1,4],저[1,1]); Text_SetString(Text1,NumToStr(저[1,1],2)); } } 최종꼭지점 = "저점"; }