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

고생이 많으십니다. 아주 쉬운식인데 기 작성된 글을 보고 넣어 보아도 잘 이해가 되지않아 다시 질문 드립니다. 아래식에서 수익이 20틱 손실이 20틱 나면 조건 만족시 청산되도록 하고 싶습니다. 청산된 후 다음 신호시 까지는 진입이 되지 않아야 합니다. 감사합니다. Input : Period(20); var : value1(0); value1 = ma(C, Period); If sTime > 090000 and sTime <= 150000 Then { If C > Value1 Then Buy(); If C < Value1 Then Sell(); } If sTime == 150300 Then { ExitLong(); ExitShort(); }

아래수식에서 PLOT1,PLOT2 가 서로교차하지않고, 고가는 고가되로 저가는 저가되로 나타나게 2개의 식이 나타 날수있도록 수정 부탁 좀 올립니다. 아무리 해봐도 되질않아 부탁 드립니다. nput:atrLength(14),multi(1); Var:j(0),dayATR(0),sum(0),upTr(100),dnTr(-100),trnd(0), date11(0),date12(0),time11(0),time12(0),TL1(0), date21(0),date22(0),time21(0),time22(0),TL2(0), date31(0),date32(0),time31(0),time32(0),TL3(0); Array:hiVal[10](0),loVal[10](0),hiBar[10](0),loBar[10](0); sum = 0; for j = 1 to atrLength { sum = sum + Max(DayClose(j+1),DayHigh(j)) - Min(DayClose(j+1),DayLow(j)); } dayATR = sum/atrLength; 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] - (dayATR * multi) > L then trnd = dnTr; else if trnd != upTr && loVal[0] < L && loVal[0] + (dayATR * multi) < 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]; } if trnd[1] == dnTr and trnd == dnTr and hiVal[1] < hiVal[0] then { if loVal[1] <= loVal[0] 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]; } else { for j = 8 downto 1 { hiVal[j+1] = hiVal[j]; hiBar[j+1] = hiBar[j]; loVal[j+1] = loVal[j]; loBar[j+1] = loBar[j]; } hiVal[1] = hiVal[0]; hiBar[1] = hiBar[0]; loVal[1] = loVal[0]; loBar[1] = loBar[0]; hiVal[0] = H; hiBar[0] = 0; loVal[0] = L; loBar[0] = 0; } } 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]; } if trnd[1] == upTr and trnd == upTr and loVal[1] > loVal[0] then { if hiVal[1] >= hiVal[0] 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]; } else { for j = 8 downto 1 { hiVal[j+1] = hiVal[j]; hiBar[j+1] = hiBar[j]; loVal[j+1] = loVal[j]; loBar[j+1] = loBar[j]; } hiVal[1] = hiVal[0]; hiBar[1] = hiBar[0]; loVal[1] = loVal[0]; loBar[1] = loBar[0]; loVal[0] = L; loBar[0] = 0; hiVal[0] = H; hiBar[0] = 0; date11 = date[loBar[2]]; time11 = stime[loBar[2]]; Value11 = loVal[2]; date12 = date[hiBar[1]]; time12 = stime[hiBar[1]]; Value12 = hiVal[1]; date11 = date[hiBar[1]]; time11 = stime[hiBar[1]]; Value11 = hiVal[1]; date12 = date[loBar[1]]; time12 = stime[loBar[1]]; Value12 = loVal[1]; } } PLOT1(VALUE11); PLOT2(VALUE12); 감사합니다 == 꾸 뻑 ==

항상 고생이 많읍니다 1)고점과 전고점을 저장,저점과 전저점을저장 하는방법 2)당일청산하는방법 위두가지를 식에 대입하는 법을 가르쳐 주십시요 선물 틱이나 분봉에 사용할 것입니다 감사합니다

먼저 항상 친절한 답변에 감사드립니다. - 5분봉의 추세선이 상향인 경우만 매수주문이 가능한 수식은 어떻게 구현되는지요? - 매수 주문시 최근 선행한 일정 갯수의 봉의 평균가격으로 주문이 가능한지요? 예를 들어 최근 8개봉의 저가 평균으로 매수주문식은 어떻게 구현되는지요? 감사합니다.

1. 5분봉 기준으로 M1선을 크로스다운한뒤 M1아래에서 10봉 기준으로 고점이 5음봉 낮아지면서 음봉이 5음봉 이상이면 매수청산 (10봉은 고점과 저점의 사이즈가 5틱 이내의 단봉이어야 함) 2. 오늘같이 수능일이나 1월 개장하는 특별한 날에 10시부터 장이 시작되는데 자동으로 인식하여 장시작 시간과 끝시간을 연장하는 방법은 없을까요? 가령 10시부터 장이 시작된다면 동시호가도 1시간 늦게 시작되는데 동시호가로 인식하여 장시작시간을 결정한다든지.. 가능하다면 시스템식으로 부탁드립니다. 감사합니다.

1. 하루에 거래횟수를 2번으로 제한하고 싶습니다. 즉 매수진입이후 반대신호가 나와서 반대진입이 되었으면 종가청산하도록하고싶습니다. 2. 참조데이타 외국인순매수데이터를 보고 있다면 그 참조데이타에 지표를 적용하는건 불가능한가요? 즉 외인순매수데이타에 macd를 적용을 시켜서 보고싶다면요.

안녕하세요~~ 다시 문의 합니다 첨부 올려놨으니 보시고 확인부탁합니다 하루에 2번들어가는 식이 몇개 나오는데요 ㅜㅜ 하루에 한번들어가는 식 문의했는데요 매수하는 방법이 35개정도 되는데요 이식 모두 하루에 한번 일어나게 해주세요 예를들어) a1식이 매수가들어가면 a2,a3,b1,b2.... 등등식은 오늘하루 진입안되게해주세요 그다음날은 다시 진입되게 해주세요 분봉으로 적용합니다 수고하십시오~~~ input : 투자금액(100000); Var : Body(0),HighBody(0),LowBody(0),Height(0),UpTail(0),DnTail(0),Long(False); var : Vol(0),cnt(0),count(0); count = 0; for cnt = 0 to 10{ if sdate == EntryDate(cnt) Then count = count+1; } if CodeCategoryEx == 11 and BasePrice < 50000 Then vol = int(int((투자금액)/C)/10)*10; Else vol = int((투자금액)/C); Body = Abs(C-O); HighBody = Max(C,O); LowBody = Min(C,O); Height = H-L; UpTail = H-Max(C,O); DnTail = Min(C,O)-L; if count < 1 Then{ If (C[3] > Ma(C,10)[3] and C[3] > O[3] and C[2] > O[2] and C[1] > O[1]) and (O[3] < O[2] and O[2] < O[1]) and (C[3] < C[2] and C[2] < C[1]) and (H[3] < H[2] and H[2] < H[1]) and (C[3] > O[2] and O[2] > O[3]) and (C[2] > O[1] and O[1] > O[2]) and (Body > ma(Body,10)*2 and C < O) and (O > H[1] and C < L[3]) Then buy("b1",OnClose,def,vol); If (C[4] >= Ma(C,10)[4] and C[4] > O[4] and Body[4] > Ma(Body,10)[4]*2) and (LowBody[3] > Highbody[4]) and (HighBody[3] >= HighBody[2] and HighBody[2] >= HighBody[1]) and (C > O and Body > Ma(Body,10)*2 and Close == Highest(C,5)) Then buy("b2",OnClose,def,vol); If (C[2] >= Ma(C,10)[2] and C[2] > O[2] and C[1] > O[1] and C > O) and (O[1] > LowBody[2] and Open[1]<=HighBody[2]) and (O > LowBody[1] and O <= HighBody[1]) and (C[2] < C[1] and C[1] < C[0]) and (Body[2]>Body[1] and Body[1]>Body[0]) Then buy("b3",OnClose,def,vol); If (C[1] >= Ma(C,10)[1] and C[1] < O[1] and Body[1] > Ma(Body,10)[1]*2 and C > O) and (Abs(Open-Open[1]) < Ma(Height,10)*0.1) Then buy("b4",OnClose,def,vol); If C[2] >= ma(C,10)[2] and C[2] > O[2] and Body[2] > Ma(Body,10)[2]*2 and C[1] > O[1] and Body[1] > Ma(Body,10)[1]*2 and Open[1] > Max(O,C)[2] and C < O and C < C[2] Then buy("b5",OnClose,def,vol); If C[2] >= Ma(C,10)[2] and C[2] > O[2] and Body[2] > Ma(Body,10)[2]*2 and C[1] > O[1] and C > O and O[1] > C[2] and Abs(Body-Body[1]) < Body*0.1 and Abs(O-O[1]) < Ma(Height,10)*0.1 Then buy("b6",OnClose,def,vol); If C[4] >= Ma(C,10)[4] and C[4] > O[4] and Body[4] > Ma(Body,10)[4]*2 and HighBody[3] < H[4] and LowBody[3] >= L[4] and HighBody[2] < H[4] and LowBody[2] >= L[4] and HighBody[1] < H[4] and LowBody[1] >= L[4] and HighBody[3] >= HighBody[2] and HighBody[2]>=HighBody[1] and C > O and Body > Ma(Body,10)*2 and Close == Highest(C,5) Then buy("b7",OnClose,def,vol); If C[2] > Ma(C,10)[2] and C[2] > O[2] and C[1] > O[1] and O[1] > Max(O,C)[2] and C < O and O >= LowBody[1] and O <= HighBody[1] and C > C[2] Then buy("b8",OnClose,def,vol); If C > Ma(C,10) and Body > Ma(Body,10)*2 and C > O and UpTail < Height*0.1 and DnTail < Height*0.1 Then buy("b9",OnClose,def,vol); If C[2] > Ma(C,10)[2] and C[2] > O[2] and C[1] > O[1] and C > O and O[1] >= LowBody[2] and O[1] <= HighBody[2] and O >= LowBody[1] and O <= HighBody[1] and C[2] < C[1] and C[1] < C and Body < Ma(Body,10)*0.5 and O > Max(C,O)[1] Then buy("b10",OnClose,def,vol); } DnTail = Min(O,C) - L; Uptail = H - Max(O,C); Height = H - L; body= Abs(O-C); highbody = Max(O,C); LowBody = Min(O,C); If Abs(Open-Close) > ma(Abs(Open-Close),10)*2 Then Long = True; Else Long = False; If UpTail == 0 and DnTail == 0 Then Condition1 = True; Else Condition1 = False; if count < 1 Then{ If C < Ma(C,10) and DnTail < Height*0.1 and C == O and Height > Ma(Height,10) Then buy("a1",OnClose,def,vol); Else If C < Ma(C,10) and (Uptail < Height * 0.1) and C == O and (Height > Ma(Height,10)) Then buy("a2",OnClose,def,vol); Else If C[1] < Ma(C,10)[1] and C[1] < O[1] and Long[1] == True and C > O and Long and O < L[1] and C >= (O[1]+C[1])/2 and C < O[1] Then buy("a3",OnClose,def,vol); Else If (C[2] >= Ma(C,10)[2] and C[2] < O[2] and C[1] < O[1] and C < O) and (O[1] > Min(O,C)[2] and O[1] < Max(O,C)[2]) and (O > Min(O,C)[1] and O < Max(O,C)[1]) and (C[2] > C[1] and C[1] > C[0]) and (L[2] < L[1] and L[1]< L[0]) Then buy("a4",OnClose,def,vol); Else If C[2] < Ma(C,10)[2] and C[2] < O[2] and C[1] > O[1] and C < O and O[1] > C[2] and O[1] == L[1] and O > Max(H[1],H[2]) and C[2] == C[0] Then buy("a6",OnClose,def,vol); Else If (C[4] < Ma(C,10)[4] and C[4] < O[4] and C[3] < O[3] and C[2] < O[2]) and (O[4] > O[3] and O[3] > O[2]) and (C[4] > C[3] and C[3] > C[2]) and (C[1] < O[1] and H[1] - MaxList(O,C)[1] > 0) and (H[1] < O[3] and C[2] > C[1]) and Close > Open and (O > O[1] and C > MaxList(H[1],H[2])) Then buy("a7",OnClose,def,vol); Else If (C[2] < Ma(C,10)[2] and Long[2] == True and C[2] < O[2]) and (C[1] == O[1] and Max(O,C)[1] < Min(O,C)[2])and (C > O and Min(O,C) > Max(O,C)[1])and (C > C[2]) Then buy("a8",OnClose,def,vol); Else If (C[1] < O[1] and Long[1] == True and Condition1[1] == True ) and (Long == True and C > O and Condition1 == True ) and (L > H[1]) Then buy("a9",OnClose,def,vol); Else If C[1] < Ma(C,10)[1] and C[1] < O[1] and body[1] > Ma(body[1],10)*2 and C > O and Abs(C-C[1]) < Ma(Height,10)*0.1 Then buy("a10",OnClose,def,vol); Else If C < Ma(C,10) and body > Ma(body,10)*2 and C > O and O == L and Uptail > 0 and Uptail < Height*0.1 Then buy("a11",OnClose,def,vol); Else If C[2] < Ma(C,10)[2] and C[2] == O[2] and C[1] == O[1] and C == O and HighBody[1]< LowBody[2] and HighBody[1] < LowBody[0] Then buy("a12",OnClose,def,vol); Else If C[1] < Ma(C,10)[1] and C[1] < O[1] and body[1] > Ma(body[1],10)*2 and C == O and Highbody < Highbody[1] and Lowbody > Lowbody[1] Then buy("a13",OnClose,def,vol); Else If C[1] < Ma(C,10)[1] and C[1] < O[1] and body[1] > Ma(body[1],10)*2 and C > O and Highbody < Highbody[1] and Lowbody > Lowbody[1] Then buy("a14",OnClose,def,vol); Else If C[2] < Ma(C,10)[2] and C[2] < O[2] and body[2] > Ma(body[2],10)*2 and C[1] > O[1] and Highbody[1] < Highbody[2] and Lowbody[1] > Lowbody[2] and C > O and C > C[1] Then buy("a15",OnClose,def,vol); Else If C[1] < Ma(c,10)[1] and C[1] < O[1] and C > O and Body > Ma(Body,10)*2 and Highbody > Highbody[1] and Lowbody < Lowbody[1] Then buy("a16",OnClose,def,vol); Else If C[2] < Ma(C,10)[2] and C[2] < O[2] and C[1] > O[1] and Body[1] > Ma(Body[1],10)*2 and Highbody[1] > Highbody[2] and Lowbody[1] < Lowbody[2] and C > O and C > C[1] Then buy("a17",OnClose,def,vol); Else If (C[4] < Ma(c,10)[4] and Body[4] > Ma(Body,10)[4]*2 and C[4] < O[4]) and (C[3] < O[3] and C[1] < O[1]) and (Body > Ma(Body,10)*2 and C > O) and (O[3] > HighBody[2] and HighBody[2] > O[1]) and (C[3] > LowBody[2] and LowBody[2] > C[1]) and (C >= O[1] and C > O[3] and C < C[4]) Then buy("a18",OnClose,def,vol); Else If C[2] < Ma(C,10)[2] and Body[2] > Ma(Body,10)[2]*2 and C[2] < O[2] and C[1] == O[1] and HighBody[1]<LowBody[2] and C > O and C > C[2] Then buy("a19",OnClose,def,vol); Else If C[2] < Ma(C,10)[2] and Body[2] > Ma(Body,10)[2]*2 and C[2] < O[2] and Body[1] < Ma(Body,10)[1]*0.5 and HighBody[1] < LowBody[2] and C > O and C > C[2] Then buy("a20",OnClose,def,vol); Else If C[3] < Ma(C,10)[3] and Body[3] > Ma(Body,10)[3]*2 and C[3] < O[3] and Body[2] > Ma(Body,10)[2]*2 and C[2] < O[2] and O[3] == H[3] and C[3] == L[3] and O[2] == H[2] and C[2] == L[2] and O[1] < Min(O,C)[2] and H[1] > C[2] and UpTail[1] > Height*0.5 and O > H[1] and C < L[1] Then buy("a21",OnClose,def,vol); Else If C < Ma(C,10) and DnTail < Height*0.1 and UpTail > Body*2 and Height > Ma(Height,10) and C != O Then buy("a22",OnClose,def,vol); Else If C[2] < Ma(C,10)[2] and C[2] > O[2] and C[1] > O[1] and C > O and O[1] >= LowBody[2] and O[1]<= HighBody[2] and O <= HighBody[1] and C[2] <= C[1] and C[1] <= C Then buy("a23",OnClose,def,vol); Else If C[1] < Ma(C,10)[1] and C[1] < O[1] and Body[1] > Ma(Body,10)[1]*2 and C < O and Highbody < Highbody[1] and Lowbody > Lowbody[1] Then buy("a24",OnClose,def,vol); Else If C < Ma(C,10) and UpTail < Height*0.1 and DnTail > Body*2 and Height > Ma(Height,10) and C != O Then buy("a26",OnClose,def,vol); Else If (C[2] < Ma(C,10)[2] and Body[2] > Ma(Body,10)[2]*2 and C[2] < O[2]) and (C[1] < O[1] and C > O and Highbody[1] < Highbody[2] and Lowbody[1] > Lowbody[2]) and (L[1] < L[2] or L[1] < Min(L[2],L[3],L[4])) and (L[1] < O and C[1] > C) Then buy("a27",OnClose,def,vol); } SetStopProfittarget(3,PercentStop); if CurrentEntries >= 2 Then exitlong("매도2",atlimit,AvgEntryPrice*1.02);

var : slowK(0), slowD(0), macdV(0), macdS(0), ma1(0), ma2(0); var : Cond1(False), Cond2(False), Cond3(False), Cond4(False), Cond5(False), Cond6(False), buyCond(0), bPosition(0); slowK = stochasticsK(20,12); //stochastics slowK선 slowD = stochasticsD(20,12,12); //stochastics slowD선 macdV = macd(12,26); //macd선 macdS = ema(macdV,9); //macd signal선 ma1 = ma(C,5); //단기이동평균 ma2 = ma(C,20); //장기이동평균 Cond1 = CrossUp(slowK, slowD); //매수조건1 Cond2 = CrossUp(macdV, macdS); //매수조건2 Cond3 = CrossUp(ma1, ma2); //매수조건3 Cond4 = CrossDown(slowK, slowD); //매수청산조건1 Cond5 = CrossDown(macdV, macdS); //매수청산조건2 Cond6 = CrossDown(ma1, ma2); //매수청산조건3 //매수식 if bposition != 1 then Begin if Cond1 then { buy(); buyCond = 1; bposition = 1; } if Cond2 then { buy(); buyCond = 2; bposition = 1; } if Cond3 then { buy(); buyCond = 3; bposition = 1; } End; //매수청산식 if buyCond == 1 and Cond4 then { exitlong(); bPosition = 0; } if buyCond == 2 and Cond5 then { exitlong(); bPosition = 0; } if buyCond == 3 and Cond6 then { exitlong(); bPosition = 0; }