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

안녕하세요 일전에 60262번 질문에서 당일 특정이벤트가 발생한 적이 있을때에만 진입 조건에 진입시키는 식을 질문드렸습니다. 답변 감사히 잘 보았습니다. 이번에는 그 특정이벤트의 발생 횟수를 지정하는 방법을 질문드리고자 합니다. Ex) 당일 5이평, 20이평 골든크로스가 2번 발생한 적이 있을때에만 진입조건 A에 매수진입시킨다 항상 감사합니다

이전에 답변주신 시스템에서 청산만 저항선 -2틱에 청산하는 시스템을 만들고 싶습니다. -2틱포인트는 +- 변동가능하도록 변수값을 별도로 만들고 싶습니다. 항상 감사드립니다.

분할 매수, 분할 매도에 관해 시스템 공부차원에서 문의드립니다. 조건은 다음과 같습니다. 1분봉 챠트에서 1번조건 : 현재가가 60 이평 돌파시 계좌금액의 40% 매수후 당일 종가에 40% 매도 (장 마감후 캔들완성되어 신호 발생만 되게 해주시면 됩니다. ) 다음날 시가에 나머지 60% 매도 2번조건: 현재가가 120이평 돌파시 계좌금액의 나머지(60%) 매수후 당일 종가에 50% 매도 (장 마감후 캔들완성되어 신호 발생만 되게 해주시면 됩니다. ) 다음날 시가에 나머지 50% 매도 피라미딩으로 전략으로 만들어 볼려고하는데 도움 부탁드립니다.

당일 고점과 저점을 생성하는 피보나치 수식입니다. 수열값과 가격이 자동 표시되도록 보충해 주시길 바랍니다. Input:inDate(20130415); Var:j(0),date11(0),date12(0),time11(0),time12(0),TL1(0), date21(0),date22(0),time21(0),time22(0), hiVal(0),loVal(0),hiBar(0),loBar(0); Array:r[7](0),fr[7](0),TL2[7](0); r[0] = 0; r[1] = 0.236; r[2] = 0.382; r[3] = 0.50; r[4] = 0.618; r[5] = 0.764; r[6] = 1; if DayClose(1) > DayHigh(0) then { hiVal = DayClose(1); hiBar = DayIndex + 1; } else { hiVal = DayHigh(0); hiBar = _DayHighBar(0); //사용자함수 코너에서 다운받으세요 http://yahoosir.blog.me/150166245148 } if DayClose(1) < DayLow(0) then { loVal = DayClose(1); loBar = DayIndex + 1; } else { loVal = DayLow(0); loBar = _DayLowBar(0); //사용자함수 코너에서 다운받으세요 http://yahoosir.blog.me/150166245230 } if (Date == CurrentDate and inDate == 0) || Date == inDate then { if hiBar > loBar then { date11 = date[hiBar]; time11 = stime[hiBar]; date12 = date[loBar]; time12 = stime[loBar]; TL_Delete(TL1); TL1 = TL_New(date11,time11,hiVal,date12,time12,loVal); date21 = date[hiBar]; time21 = stime[hiBar]; date22 = date[0]; time22 = stime[0]; for j = 0 to 6 { fr[j] = hiVal - ((hiVal - loVal) * r[j]); TL_Delete(TL2[j]); TL2[j] = TL_New(date21,time21,fr[j],date22,time22,fr[j]); } } else { date11 = date[loBar]; time11 = stime[loBar]; date12 = date[hiBar]; time12 = stime[hiBar]; TL_Delete(TL1); TL1 = TL_New(date11,time11,loVal,date12,time12,hiVal); date21 = date[loBar]; time21 = stime[loBar]; date22 = date[0]; time22 = stime[0]; for j = 0 to 6 { fr[j] = loVal + ((hiVal - loVal) * r[j]); TL_Delete(TL2[j]); TL2[j] = TL_New(date21,time21,fr[j],date22,time22,fr[j]); } } } TL_SetSize(TL1,1); ---------------------------------------------------------------------------- 아래 수식은 파동에 따른 피보나치 입니다. 파동선을 노랑색으로 바꿔주시고 파동이 끝나고 시작되는 선에 가격이 표시되도록 하고싶습니다. 또 피보나치 선에 수식과 가격이 나타나도록 부탁드립니다. Input:chRate(1), inDate(20130415); Var:j(0),upTr(100),dnTr(-100),upRate(0),dnRate(0),trnd(0),trnd1(0), date11(0),date12(0),time11(0),time12(0),TL1(0), date21(0),date22(0),time21(0),time22(0); Array:hiVal[10](0),loVal[10](0),hiBar[10](0),loBar[10](0); Array:r[7](0),fr[7](0),TL2[7](0); r[0] = 0; r[1] = 0.236; r[2] = 0.382; r[3] = 0.50; r[4] = 0.618; r[5] = 0.764; r[6] = 1; upRate = 1 + (chRate/100); dnRate = 1 - (chRate/100); for j = 1 to 9 { loBar[j] = loBar[j] + 1; hiBar[j] = hiBar[j] + 1; } if hiVal[0] <= H or hiVal[0] == 0 then { hiVal[0] = H; hiBar[0] = 0; } else { hiBar[0] = hiBar[0] + 1; } if loVal[0] >= L or loVal[0] == 0 then { loVal[0] = L; loBar[0] = 0; } else { loBar[0] = loBar[0] + 1; } if trnd != dnTr && hiVal[0] > H && hiVal[0] * dnRate > L then trnd = dnTr; else if trnd != upTr && loVal[0] < L && loVal[0] * upRate < H then trnd = upTr; if trnd[1] == upTr and trnd == dnTr then { for j = 8 downto 1 { hiVal[j+1] = hiVal[j]; hiBar[j+1] = hiBar[j]; } hiVal[1] = hiVal[0]; hiBar[1] = hiBar[0]; hiVal[0] = H; hiBar[0] = 0; loVal[0] = L; loBar[0] = 0; date11 = date[loBar[1]]; time11 = stime[loBar[1]]; Value11 = loVal[1]; date12 = date[hiBar[1]]; time12 = stime[hiBar[1]]; Value12 = hiVal[1]; TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); } if trnd[1] == dnTr and trnd == dnTr and hiVal[1] < hiVal[0] and hiVal[0] * dnRate > L then { hiVal[1] = hiVal[0]; hiBar[1] = hiBar[0]; hiVal[0] = H; hiBar[0] = 0; loVal[0] = L; loBar[0] = 0; date12 = date[hiBar[1]]; time12 = stime[hiBar[1]]; Value12 = hiVal[1]; TL_SetEnd(TL1, date12,time12,Value12); } if trnd[1] == dnTr and trnd == upTr then { for j = 8 downto 1 { loVal[j+1] = loVal[j]; loBar[j+1] = loBar[j]; } loVal[1] = loVal[0]; loBar[1] = loBar[0]; loVal[0] = L; loBar[0] = 0; hiVal[0] = H; hiBar[0] = 0; date11 = date[hiBar[1]]; time11 = stime[hiBar[1]]; Value11 = hiVal[1]; date12 = date[loBar[1]]; time12 = stime[loBar[1]]; Value12 = loVal[1]; TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); } if trnd[1] == upTr and trnd == upTr and loVal[1] > loVal[0] and loVal[0] * upRate < H then { loVal[1] = loVal[0]; loBar[1] = loBar[0]; loVal[0] = L; loBar[0] = 0; hiVal[0] = H; hiBar[0] = 0; date12 = date[loBar[1]]; time12 = stime[loBar[1]]; Value12 = loVal[1]; TL_SetEnd(TL1, date12,time12,Value12); } if (Date == CurrentDate and inDate == 0) || Date == inDate then { trnd1 = trnd; if trnd1 == upTr then { date21 = date[hiBar[1]]; time21 = stime[hiBar[1]]; date22 = date[0]; time22 = stime[0]; for j = 0 to 6 { fr[j] = hiVal[1] - ((hiVal[1] - loVal[1]) * r[j]); TL_Delete(TL2[j]); TL2[j] = TL_New(date21,time21,fr[j],date22,time22,fr[j]); } } else { date21 = date[loBar[1]]; time21 = stime[loBar[1]]; date22 = date[0]; time22 = stime[0]; for j = 0 to 6 { fr[j] = loVal[1] + ((hiVal[1] - loVal[1]) * r[j]); TL_Delete(TL2[j]); TL2[j] = TL_New(date21,time21,fr[j],date22,time22,fr[j]); } } } TL_SetSize(TL1,1); ----------------------------------------------------------------------------- 시스템수식 의뢰드립니다 국선 데이, 추세추종형> 1. 5분차트에서 bids (매수잔량) 의 13분 이평선과 asks(매도잔량) 의 13분 이평선의 차이가 d 보다 클때, 매수 (d: 국선 1000) 2. bids 13분 이평선과 asks 13분 이평선 차이가 -d 보다 작을때 매도 (d: 국선 1000) 3. 매수한 것이 2번의 조건이 되면, 손절 / 매도한 것이 1번의 조건이 되면, 손절 4. 손절되지 않으면 장 마감 10분전 청산 5. 하루 1회 이하 진입

안녕하세요 아래의 수식에서 Highest(고점의 첫음봉 에서 매도 신호)와 Lowest 저점의 첫 양봉에서 매수 신호가 나오게 부탁드립니다. 그리고 매도 매수 신호발생 후 20틱에 청산신호 나오도록 부탁드립니다. input : 기간(30),k(0.0002); var1 = Highest(H,기간)*(1+k); var2 = Highest(H,기간); var3 = Lowest(L,기간)*(1+k); var4 = Lowest(L,기간); plot1(var1); plot2(var2); plot3(var3); plot4(var4);

안녕 하세요. 아래 지표식에서 중간 추세선은(( // )) 으로 인식 못하게 했는데요. 아레지표식에서 고점과 고점을 연결한 선 저점과저점을 쭈욱그은 선에 색상을 넣을수 있는지 궁금 합니다. 가능 하다면 고점과 고점선을 이은선은 파랑색으로 굵기 1 저점과 저점을 이은 선은 노랑색 굵기 1 로 나오도록 부탁을 드립니다. 그리고 차트에 수치를 나오게 하는 수식부분에 주석을 좀 부탁드립니다.^^ 매번 도움 주셔서 감사드립니다. input:barCnt(5); Var:j(0),turnPntBit(""),TL1(0),TL33(0),TL44(0),HD(0),HT(0),LD(0),LT(0),HH(0),LL(0); var : TL121(0),TL122(0),tx121(0),tx122(0); Array:valArr[10](0),barArr[10](0),turnPntArr[10](""); // 봉이 새로 생겼으므로 봉개수 관리하는 변수들의 봉개수 값 1씩 증가 For j = 0 To 9 { barArr[j] = barArr[j] + 1; } // 고점조건 = 5-1-5에서 가운데 고가가 좌측 5봉과 우측 5봉 고가보다 높다 // 저점조건 = 5-1-5에서 가운데 저가가 좌측 5봉과 우측 5봉 저가보다 낮다 Condition1 = Highest(H,barCnt)[barCnt+1] <= H[barCnt] and H[barCnt] > Highest(H,barCnt); Condition2 = Lowest(L,barCnt)[barCnt+1] >= L[barCnt] and L[barCnt] < Lowest(L,barCnt); // 전환점구분 null값으로 초기화; // if 고점조건, 저점조건 동시 만족시 then // if 이전 고점,저점 범위를 모두 벗어났을 때 // 전환점구분 = 고저점; // else if 이전 고점을 갱신했다면 전환점구분 = 고점; // else if 이전 저점을 갱신했다면 전환점구분 = 저점; // else if 전환점배열의 현재(배열상 1번째)값이 고점이면 전환점구분 = 저점; // else if 전환점배열의 현재 값이 저점이면 전환점구분 = 고점; // else if 고점조건 만족하면 전환점구분 = 고점; // else if 저점조건 만족하면 전환전구분 = 저점; turnPntBit = ""; If Condition1 and Condition2 Then { If Max(valArr[1],valArr[2]) < H[barCnt] and Min(valArr[1],valArr[2]) > L[barCnt] Then turnPntBit = "HiLo"; Else If Max(valArr[1],valArr[2]) < H[barCnt] Then turnPntBit = "Hi"; Else If Min(valArr[1],valArr[2]) > L[barCnt] Then turnPntBit = "Lo"; Else If turnPntArr[1] == "Hi" Then turnPntBit = "Lo"; Else If turnPntArr[1] == "Lo" Then turnPntBit = "Hi"; } Else If Condition1 Then turnPntBit = "Hi"; Else If Condition2 Then turnPntBit = "Lo"; // if 전환점구분에 값이 있을 때만 아래 실행, 없으면 통과 If turnPntBit <> "" Then { // if 전환점구분이 고저점이면 then // 이전 파동은 연장시키고 아래에서 새로이 파동선을 추가토록 한다. If turnPntBit == "HiLo" Then { valArr[1] = IFF(turnPntArr[1] == "Hi",H[barCnt],L[barCnt]); barArr[1] = barCnt; TL_SetEnd(TL1,sDate[barArr[1]],sTime[barArr[1]],valArr[1]); If turnPntArr[1] == "Hi" Then turnPntBit = "Lo"; Else turnPntBit = "Hi"; } // if 신규 전환점구분이 현재(전환점배열 1번째)와 다르면 then // 배열값들을 이전값으로 Move; If turnPntBit <> turnPntArr[1] Then { for j = 8 downto 1 { valArr[j+1] = valArr[j]; barArr[j+1] = barArr[j]; turnPntArr[j+1] = turnPntArr[j]; } } // if 전환점구분이 바뀌었거나 또는 // (전환점구분은 안바뀌었는데 // (이전 고점보다 높은 고점이 발생했거나 또는 // 이전 저점보다 낮은 저점이 발생했으면)) then If turnPntBit <> turnPntArr[1] or (turnPntBit == turnPntArr[1] and ((turnPntBit == "Hi" and valArr[1] < H[barCnt]) or (turnPntBit == "Lo" and valArr[1] > L[barCnt]))) Then { // 값 배열에는 고점 또는 저점을 대입; // 봉개수 배열에는 입력변수의 봉개수 대입; // 전환점 배열에 전환점구분값을 대입; valArr[1] = IFF(turnPntBit == "Hi",H[barCnt],L[barCnt]); barArr[1] = barCnt; turnPntArr[1] = turnPntBit; // if 이전봉대비 전환점구분이 바뀌었다면 추세선 새로 그리고; // else 전환점구분이 안바뀌었으면 값만 바뀐거므로 추세선 연장; // If turnPntArr[1][1] <> turnPntArr[1][0] Then // TL1 = TL_New(sDate[barArr[2]],sTime[barArr[2]],valArr[2], // sDate[barArr[1]],sTime[barArr[1]],valArr[1]); // Else // TL_SetEnd(TL1,sDate[barArr[1]],sTime[barArr[1]],valArr[1]); } } // TL_SetSize(TL1,0); // TL_SetColor(TL1,GREEN); var : TL11(0),TL12(0); if turnPntArr[1][0] == "Hi" Then { TL_delete(TL12); TL_Delete(TL11); TL11 = TL_New(sDate[barArr[2]],sTime[barArr[2]],valArr[1],sDate[barArr[1]],sTime[barArr[1]],valArr[1]); TL_SetExtRight(TL11,true); TL_SetColor(TL11,BLUE); TL_SetSize(TL11,3); TL_Delete(TL121); var1 = valArr[1]-abs(valArr[1]-valArr[2])*0.382; var2 = valArr[1]-abs(valArr[1]-valArr[2])*0.618; TL_SetExtRight(TL121,true); TL_SetColor(TL121,GREEN); TL_SetSize(TL121,1); TL_Delete(TL122); TL_SetExtRight(TL122,true); TL_SetColor(TL122,GREEN); TL_SetSize(TL122,1); Text_Delete(tx121); Text_Delete(tx122); tx121 = Text_New(sdate,stime,var1,NumToStr(var1,2)); tx122 = Text_New(sdate,stime,var2,NumToStr(var2,2)); } if turnPntArr[1][0] == "Lo" Then { TL_delete(TL11); TL_Delete(TL12); TL12 = TL_New(sDate[barArr[2]],sTime[barArr[2]],valArr[1],sDate[barArr[1]],sTime[barArr[1]],valArr[1]); TL_SetExtRight(TL12,true); TL_SetColor(TL12,RED); TL_SetSize(TL12,3); TL_Delete(TL121); var1 = valArr[1]+abs(valArr[1]-valArr[2])*0.382; var2 = valArr[1]+abs(valArr[1]-valArr[2])*0.618; TL_SetExtRight(TL121,true); TL_SetColor(TL121,GREEN); TL_SetSize(TL121,1); TL_Delete(TL122); TL_SetExtRight(TL122,true); TL_SetColor(TL122,GREEN); TL_SetSize(TL122,1); Text_Delete(tx121); Text_Delete(tx122); tx121 = Text_New(sdate,stime,var1,NumToStr(var1,2)); tx122 = Text_New(sdate,stime,var2,NumToStr(var2,2)); } if bdate != BDate[1] Then{ HD = sdate; HT = stime; LD = sdate; LT = stime; HH = H; LL = L; } if H > HH Then{ HH = H; HD = sdate; HT = stime; } TL_Delete(TL33); if turnPntArr[1][0] == "Hi" Then{ TL33 = TL_New(sDate[barArr[1]],sTime[barArr[1]],valArr[1],HD,HT,dayhigh); } if turnPntArr[1][0] == "Lo" Then{ TL33 = TL_New(sDate[barArr[2]],sTime[barArr[2]],valArr[2],HD,HT,dayhigh); } TL_SetExtRight(TL33,true); if L < LL Then{ LL = L; LD = sdate; LT = stime; } TL_Delete(TL44); if turnPntArr[1][0] == "Hi" Then{ TL44 = TL_New(sDate[barArr[2]],sTime[barArr[2]],valArr[2],LD,LT,daylow); } if turnPntArr[1][0] == "Lo" Then{ TL44 = TL_New(sDate[barArr[1]],sTime[barArr[1]],valArr[1],LD,LT,daylow); } TL_SetExtRight(TL44,true); Text_SetLocation(Tx121,sdate,stime,Text_GetValue(Tx121)); Text_SetLocation(Tx122,sdate,stime,Text_GetValue(Tx122)); Text_SetStyle(tx121,0,1); Text_SetStyle(tx122,0,1);

현재가와 5일평균 가격의 가격 차이를 백분율로 그래프로 만들고 싶습니다. 부탁 드립니다