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

input:length(6); Var:j(0),jj(0),HH(0),LL(0),최종고가(0),최종저가(0),최종꼭지점(""),처리구분(""), TL1(0),Text1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL12(0),TL13(0),TL14(0),TL15(0),T(0),고점변곡(""),저점변곡(""); var : clr1(0),clr2(0),BE(0),SE(0),cnt(0),upcond(False),dncond(False),text2(0); Array:고[10,4](0),저[10,4](0); // 1:가격,2:Index,3:sDate,4:sTime #==========================================# HH = IFF(0==1,C,H); LL = IFF(0==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 { T = 1; 최종고가 = 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 == 1 Then { Text1 = Text_New(고[1,3],고[1,4],고[1,1],NumToStr(고[1,1],2)); Text_SetStyle(Text1, 0, 1); Text_SetColor(Text1,Red); } TL_SetSize(TL1,1); TL_SetColor(TL1,Gray); } 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 == 1 Then { Text_SetLocation(Text1,고[1,3],고[1,4],고[1,1]); Text_SetString(Text1,NumToStr(고[1,1],2)); } } 최종꼭지점 = "고점"; } #==========================================# If 처리구분 == "저점처리" Then { T = -1; 최종저가 = 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 == 1 Then { Text1 = Text_New(저[1,3],저[1,4],저[1,1],NumToStr(저[1,1],2)); Text_SetStyle(Text1, 0, -1); Text_SetColor(Text1,Blue); } TL_SetSize(TL1,1); TL_SetColor(TL1,Gray); } 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 == 1 Then { Text_SetLocation(Text1,저[1,3],저[1,4],저[1,1]); Text_SetString(Text1,NumToStr(저[1,1],2)); } } 최종꼭지점 = "저점"; } if T == -1 and T[1] != -1 Then { TL12 = TL_New(고[2,3],고[2,4],고[2,1],sdate,stime,고[2,1]); TL_Delete(TL13); TL13 = TL_New(고[1,3],고[1,4],고[1,1],Sdate,Stime,고[1,1]); TL_SetExtRight(TL13,true); TL_SetSize(TL13,2); TL_SetColor(TL12,clr1); TL_SetSize(TL12,2); clr1 = Pink; TL_SetColor(TL13,clr1); upcond = False; } if T == 1 and T[1] != 1 Then { TL14= TL_New(저[2,3],저[2,4],저[2,1],sdate,stime,저[2,1]); TL_Delete(TL15); TL15= TL_New(저[1,3],저[1,4],저[1,1],sdate,stime,저[1,1]); TL_SetExtRight(TL15,true); TL_SetColor(TL14,clr2); TL_SetSize(TL14,2); clr2 = LightBlue; TL_SetColor(TL15,clr2); TL_SetSize(TL15,2); dncond = False; } 1. t==1 구간에서 condition1 과 condition2 가 중복이 돼서 둘다 표시가 됩니다 한쪽을 선택하고 싶습니다 감사합니다.

안녕하세요? 코딩부탁드립니다. 코스피 선물입니다 1.현재가가 특정가격(입력예정)보다 크고, 예를들면 코스피 선물 300(입력할것이니 변하지만 300으로 해주세요) 당일 시가보다 크고,당일 10시가 지나서 스토케스틱 슬로우 (5,3,3)이 골드크로스면 매수진입 2.현재가가 특정가격(예를 들면 300)보다 작고, 당일 시가보다 작고,당일 10시가 지나서 스토케스틱 슬로우(5,3,3)이 데드크로스면 매도진입 3.청산은 트레일링스탑으로 청산 감사합니다.

거래일 날자 변경에 따라 모든 수식이 셋팅되게 쨔놓았는데 거래도 못하고 있습니다. var1=IFf(Bdate[1]<Bdate,1,var1+1); plot1(var1,"dn"); 어제 날자에서 안바뀝니다..ㅠㅠㅠ 전날이 조기 마감할경우에 이러는 겅우가 있었던거 같은데???ㅠㅠ 점검해보시고.. 답변 빠른 답변 부탁드립니다...... ps. plot2(bDayIndex(),"bDayIndex()"); 이것도 안먹히고 오늘 날자변경이 않되네요..ㅠㅠ

도움에 늘 감사 드립니다. 예를 들어 월봉차트에서 10년 이평선을 긋고 십습니다. 미리 감사 드립니다.

input : Period(17),선두께(1); Var:상승색(Red), 하락색(Blue); Var:j(0),T(0); Var: date11(0),date12(0),time11(0),time12(0),TL1(0),TL(0),tl9(0), date21(0),date22(0),time21(0),time22(0),txx(0), vTL(0), vTL9(0),txxx(0), date31(0),date32(0),time31(0),time32(0),tx(0),tx1(0),tl4(0); Array:HiVal[20](0),LoVal[20](0),HiBar[20](0),LoBar[20](0); Array:r[7](0),fr[7](0),TL2[7](0),TL3[7](0),TX2[7](0),TX3[7](0); Plot1(0); For j = 0 To 19 { HiBar[j] = HiBar[j] + 1; LoBar[j] = LoBar[j] + 1; } if crossup(c,highest(H,Period)[1]) Then T = 1; if CrossDown(c,Lowest(L,Period)[1]) Then T = -1; If T == -1 Then { If T[1] != -1 Then { For j = 18 DownTo 0 { LoVal[j+1] = LoVal[j]; LoBar[j+1] = LoBar[j]; } LoVal[0] = L; LoBar[0] = 0; date11 = date[HiBar[0]]; time11 = stime[HiBar[0]]; Value11 = HiVal[0]; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(TL1,하락색); date21 = date[HiBar[0]]; time21 = stime[HiBar[0]]; date22 = date[0]; time22 = stime[0]; for j = 0 to 6 { fr[j] = LoVal[1] + ((HiVal[0] - LoVal[1]) * r[j]); } Text_Delete(txx-5); Condition1 = False; } Else { If LoVal[0] > L Then { LoVal[0] = L; LoBar[0] = 0; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date22 = date[0]; time22 = stime[0]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); Text_Delete(tx); Condition1 = False; } Else { if Condition1 == False and Value12 < value11-0.45 Then if Condition1 == False and C >= value12+PriceScale*3 Then { Condition1 = true; Text_Delete(txx-5); txx = Text_New(sdate,sTime,H+PriceScale*5,"●"); Text_SetStyle(txx,2,2); Text_SetColor(txx,Cyan); Text_SetSize(txx,20); TL_Delete(vtl9-1); vTL9 = TL_New(sDate,sTime,0,sDate,sTime,9999); TL_SetColor(vTL9,Red); TL_SetSize(vTL9,0.5); } } } } If T == 1 Then { If T[1] != 1 Then { text_Delete(txx-5); For j = 18 DownTo 0 { HiVal[j+1] = HiVal[j]; HiBar[j+1] = HiBar[j]; } HiVal[0] = H; HiBar[0] = 0; date11 = date[LoBar[0]]; time11 = stime[LoBar[0]]; Value11 = LoVal[0]; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(TL1,상승색); date31 = date[LoBar[0]]; time31 = stime[LoBar[0]]; date32 = date[0]; time32 = stime[0]; for j = 0 to 5 { fr[j] = LoVal[0] + ((HiVal[1] - LoVal[0]) * r[j]); } } If HiVal[0] < H Then { HiVal[0] = H; HiBar[0] = 0; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date32 = date[0]; time32 = stime[0]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); } } TL_SetSize(TL1,선두께); 0.5p 보다 큰 하락 추세선 하나에, 0.5p 아래에서 3틱 반등이 두번 또는 그 이상 생길 때 동그라미 표시(한 추세선 안에 처진 쌍바닥,쓰리바닥). 0.5p 보다 작은 추세선은 무표시. 감사합니다.

1. 당일 옵션에서 시가, 고가, 저가와 1.20., 2.50, 3.50, 4.85 가격 위치를 수평선으로 구현해 주세요 2. 당일 콜옵션 동일행사가격에서 종가가 시가를 올라서면 빨강색으로, 아래로 내려가면 파란색으로 구현해주세요 3. 당일 콜옵션 종가와 동일행사가격 풋옵션 종가가 같은 경우에 콜옵션 종가에 노랑색으로 구현해 주세요 고맙습니다.

수고 많으십니다. 이전 질문에 문의 드렸는데 전달이 잘 되지 않는 것 같아 다시 올립니다. 분, 틱챠트에서 챠트범위 밖의 이전 날자(특정일)부터 현제봉까지의 시장이 열린 날짜를 계산하는 수식을 좀 알려 주십시요.. 아무리 생각해도 떠오르지 않네요 부탁드립니다.

한국의 금융산업 발전을 위해 불철주야 애쓰시는 귀하의 노고를 높이 평가합니다 시스템식 관련입니다 //=========================================================== <아래 1>과 같은 조건으로 <아래 2>와 같이 시스템식을 작성 하였습니다 - 2023년에 조건에 맞는 날자가 5일간 입니다 (1월5일, 1월6일, 1월9일, 1월10일, 1월 11일) - 하지만, 성과보고서에는 3번의 거래만 표시됩니다 (1월5일 매수 후 1월6일 매수청산, 1월9일 매수 후 1월10일 매수청산, 1월11일 매수 후 1월12일 매수청산) 질문1) 이를 5번의 거래가 표시되도록 할 수 없는지요? (1월5일 매수 후 1월6일 매수청산, 1월6일 매수 후 1월9일 매수청산, 1월9일 매수 후 1월10일 매수청산, 1월10일 매수 후 1월11일 매수청산, 1월11일 매수 후 1월12일 매수청산) 질문2) 또는 종가에 매수청산 후 다시 종가에 매수하는 것이 불가능하면 그냥 보유하는 것으로 하여 1번의 거래로 할 수 없는지요? (1월5일 매수 후 1월 12일 매수청산) 수식 작성 바랍니다^^ --------------------<아래 1 시작>----------------------------- 종목; SK하이닉스 주식선물 연결선물(매수진입, 매도진입 가능) 주기; 일봉 MACD 변수; MACD(12, 26, 9) <매수진입 조건; Buy> - 조건1; 거래량 20일 이평선 * 2 <= 거래량 5일 이평선 - 조건2; MACD_OSC >= 0 - 조건3; 100 계약을 종가에(OnClose) 매수진입 <매수청산 조건; ExitLong> - 조건1; 매수진입한 날 다음날 종가에(OnClose) 전량 매수청산 <매도진입 조건; Sell> - 조건1; 거래량 20일 이평선 * 2 <= 거래량 5일 이평선 - 조건2; MACD_OSC < 0 - 조건3; 100 계약을 종가에(OnClose) 매도진입 <매도청산 조건; ExitShort> - 조건1; 매도진입한 날 다음날 종가에(OnClose) 전량 매도청산 --------------------<아래 1 끝>----------------------------- --------------------<아래 2 시작>----------------------------- input : short(12),long(26),sig(9),P1(5),P2(20); var : macdv(0),macds(0),macdo(0),mav1(0),mav2(0); macdv = macd(short,long); macds = ema(macdv,sig); macdo = macdv-macds; mav1 = ma(v,P1); mav2 = ma(v,P2); if MarketPosition <= 0 and mav1 >= mav2*2 and macdo >= 0 Then buy("b",OnClose,Def,100); if MarketPosition == 1 and BarsSinceEntry == 1 Then ExitLong("bx"); if MarketPosition >= 0 and mav1 >= mav2*2 and macdo < 0 Then Sell("s",OnClose,Def,100); if MarketPosition == -1 and BarsSinceEntry == 1 Then ExitShort("sx"); --------------------<아래 2 끝>-----------------------------