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

Input:length(3),선굵기(1); Var:j(0),lastHiVal(0),lastLoVal(0),sBar(0),eBar(0),TL1(0),처리구분(""), TL_Val1(0),TL_Val2(0); var : T(0),LTL1(0); var : HTL1(0); Array:고점[10,2](0),저점[10,2](0); 처리구분 = ""; If Highest(H,length) == H and lastHiVal <> H and Lowest(L,length) == L and lastLoVal <> L Then { If 저점[1,1] > L Then 처리구분 = "저점처리"; If 고점[1,1] < H Then 처리구분 = "고점처리"; } Else If Highest(H,length) == H and lastHiVal <> H Then 처리구분 = "고점처리"; Else If Lowest(L,length) == L and lastLoVal <> L Then 처리구분 = "저점처리"; If 처리구분 == "고점처리" Then { T = 1; lastHiVal = H; If 고점[1,2] < 저점[1,2] Then { For j = 10 DownTo 2 { 고점[j,1] = 고점[j-1,1]; 고점[j,2] = 고점[j-1,2]; } } If 고점[1,2] < 저점[1,2] or 고점[1,1] < H Then { 고점[1,1] = H; 고점[1,2] = Index; sBar = Index - 저점[1,2]; eBar = 0; If TL_GetBeginDate(TL1) == sDate[sBar] and TL_GetBeginTime(TL1) == sTime[sBar] Then { TL_Delete(TL1); } if T[1] != 1 Then{ TL_SetExtRight(LTL1,False); TL_Delete(LTL1); LTL1 = TL_New(sDate[index-저점[2,2]],sTime[index-저점[2,2]],저점[2,1],sDate[index-저점[1,2]],sTime[index-저점[1,2]],저점[1,1]); // TL_SetExtRight(LTL1,true); } If 고점[3,1] < 고점[2,1] and 고점[2,1] > 고점[1,1] and 저점[2,1] < 저점[1,1] Then { sBar = Index - 저점[2,2]; eBar = Index - 저점[1,2]; } } } If 처리구분 == "저점처리" Then { T = -1; lastLoVal = L; If 저점[1,2] < 고점[1,2] Then { For j = 10 DownTo 2 { 저점[j,1] = 저점[j-1,1]; 저점[j,2] = 저점[j-1,2]; } } If 저점[1,2] < 고점[1,2] or 저점[1,1] > L Then { 저점[1,1] = L; 저점[1,2] = Index; sBar = Index - 고점[1,2]; eBar = 0; If TL_GetBeginDate(TL1) == sDate[sBar] and TL_GetBeginTime(TL1) == sTime[sBar] Then { TL_Delete(TL1); } if T[1] != -1 then{ TL_SetExtRight(HTL1,false); TL_Delete(HTL1); HTL1 = TL_New(sDate[index-고점[2,2]],sTime[index-고점[2,2]],고점[2,1],sDate[index-고점[1,2]],sTime[index-고점[1,2]],고점[1,1]); TL_SetExtRight(HTL1,true); } If 저점[2,1] < 저점[1,1] and 저점[2,1] < 저점[3,1] and 고점[2,1] > 고점[1,1] Then { sBar = Index - 고점[2,2]; eBar = Index - 고점[1,2]; } } } TL_SetSize(TL1,선굵기); TL_SetColor(TL1,BLACK); TL_SetColor(LTL1,green); TL_SetColor(HTL1,red); TL_SetSize(LTL1,선굵기); TL_SetSize(HTL1,선굵기); Input:blength(20); Var:bj(0),blastHiVal(0),blasbTLoVal(0),sbBar(0),ebBar(0),bTL1(0),b처리구분(""), bTL_Val1(0),bTL_Val2(0); var : bT(0),LbTL1(0); var : HbTL1(0); Array:b고점[10,2](0),b저점[10,2](0); b처리구분 = ""; If Highest(H,blength) == H and blastHiVal <> H and Lowest(L,blength) == L and blasbTLoVal <> L Then { If b저점[1,1] > L Then b처리구분 = "b저점처리"; If b고점[1,1] < H Then b처리구분 = "b고점처리"; } Else If Highest(H,blength) == H and blastHiVal <> H Then b처리구분 = "b고점처리"; Else If Lowest(L,blength) == L and blasbTLoVal <> L Then b처리구분 = "b저점처리"; If b처리구분 == "b고점처리" Then { bT = 1; blastHiVal = H; If b고점[1,2] < b저점[1,2] Then { For bj = 10 DownTo 2 { b고점[bj,1] = b고점[bj-1,1]; b고점[bj,2] = b고점[bj-1,2]; } } If b고점[1,2] < b저점[1,2] or b고점[1,1] < H Then { b고점[1,1] = H; b고점[1,2] = Index; sbBar = Index - b저점[1,2]; ebBar = 0; If TL_GetBeginDate(bTL1) == sDate[sbBar] and TL_GetBeginTime(bTL1) == sTime[sbBar] Then { TL_Delete(bTL1); } if bT[1] != 1 Then{ TL_SetExtRight(LbTL1,False); TL_Delete(LbTL1); LbTL1 = TL_New(sDate[index-b저점[2,2]],sTime[index-b저점[2,2]],b저점[2,1],sDate[index-b저점[1,2]],sTime[index-b저점[1,2]],b저점[1,1]); // TL_SetExtRight(LbTL1,true); } If b고점[3,1] < b고점[2,1] and b고점[2,1] > b고점[1,1] and b저점[2,1] < b저점[1,1] Then { sbBar = Index - b저점[2,2]; ebBar = Index - b저점[1,2]; } } } If b처리구분 == "b저점처리" Then { bT = -1; blasbTLoVal = L; If b저점[1,2] < b고점[1,2] Then { For bj = 10 DownTo 2 { b저점[bj,1] = b저점[bj-1,1]; b저점[bj,2] = b저점[bj-1,2]; } } If b저점[1,2] < b고점[1,2] or b저점[1,1] > L Then { b저점[1,1] = L; b저점[1,2] = Index; sbBar = Index - b고점[1,2]; ebBar = 0; If TL_GetBeginDate(bTL1) == sDate[sbBar] and TL_GetBeginTime(bTL1) == sTime[sbBar] Then { TL_Delete(bTL1); } if bT[1] != -1 then{ TL_SetExtRight(HbTL1,false); TL_Delete(HbTL1); HbTL1 = TL_New(sDate[index-b고점[2,2]],sTime[index-b고점[2,2]],b고점[2,1],sDate[index-b고점[1,2]],sTime[index-b고점[1,2]],b고점[1,1]); TL_SetExtRight(HbTL1,true); } If b저점[2,1] < b저점[1,1] and b저점[2,1] < b저점[3,1] and b고점[2,1] > b고점[1,1] Then { sbBar = Index - b고점[2,2]; ebBar = Index - b고점[1,2]; } } } TL_SetSize(bTL1,선굵기); TL_SetColor(bTL1,BLACK); TL_SetColor(LbTL1,darkgreen); TL_SetColor(HbTL1,darkred); TL_SetSize(LbTL1,선굵기); TL_SetSize(HbTL1,선굵기);

안녕하세요~ mp = MarketPosition; f mp[1] == 0 && mp == 1 Then enP=100; 포지션 진입 기간동안 상기 변수 100 값을 유지하려면 아래 수식이 필요한가요? If mp[1] == 1 && mp == 1 Then enP=enP[1];

안녕하세요~! 오늘도 질문을 드리고자 왔습니다! 아래 작성한 수식을 통해, ma(c,60)선보다 TSF(Period:40)선이 "위"에 위치하며 2일전보다 현제 tsf선이 상승 상태의 검색식을 만들었습니다만, 실제로 검색을 해 보니, TSF가 60이평선 위던 아래던, TSF가 상승중이던 하락중이던, 막우잡이로 검색이 되더라구요.. 3201 3202 두 화면에서 모두 막우잡이로 나왔고, 기준봉0봉 & 일봉차트로 검색하였습니다. 제가 무엇인가 잘못한것이 있는지 싶어 질문을 남깁니다! 아래는 제가 사용한 수식입니다. -------------------------------------- Input : TsF기간(40),중심기간(60); var : TsF1(0),이평(0); TsF1 = LRL(C,TsF기간)+LRS(C,TsF기간); 이평 = ma(c,적용기간); if TsF1 > 이평 and TsF1 > TsF1[2] Then Find(1); --------------------------------------

1. input : 익절틱수(150),손절틱수(30); var : DD(0),Year(0),V1(0),V2(0),V3(0),V4(0),summer(False); var : ST(0),ET(0),entry(0); if NextBarSdate != sDate Then { DD = DayOfWeek(NextBarSdate); Year = Floor(NextBarSdate/10000); V1 = (10000 * Year) + (100 * 3) + 1; V2 = 15 - dayofweek(v1); v3 = (10000 * Year) + (100 * 11) + 1; v4 = 8 - dayofweek(v3); Summer = NextBarSdate > (10000 * Year) + (100 * 3) + v2 And NextBarSdate < (10000 * Year) + (100 * 11) + v4; if summer == true Then { ST = 70000; ET = 55000; } Else { ST = 80000; ET = 65000; } } if Year > 0 Then { IF ET > ST Then SetStopEndofday(ET); Else { if sDate != sDate[1] Then SetStopEndofday(ET); } if Bdate != Bdate[1] Then { entry = 0; } if (MarketPosition != 0 and MarketPosition != MarketPosition[1]) or (MarketPosition == MarketPosition[1] and TotalTrades > TotalTrades[1]) Then entry = entry+1; if ((NextBarSdate != sDate and NextBarStime >= ST) or (NextBarSdate == sDate and NextBarStime >= ST and sTime < ST)) Then { IF ET <= ST Then { SetStopEndofday(0); } if NextBarOpen > C Then { Buy("b1",AtStop,NextBarOpen+PriceScale*1); Sell("s1",AtStop,NextBarOpen-PriceScale*1); } if NextBarOpen < C Then { ExitLong("bx1",AtStop,NextBarOpen-PriceScale*1); ExitShort("sx1",AtStop,NextBarOpen+PriceScale*1); } } Else { if DayHigh < DayOpen+PriceScale*1 and DayOpen > DayClose(1) and entry < 1 Then Buy("b2",AtStop,DayOpen+PriceScale*1); if DayLow > DayOpen-PriceScale*1 and DayOpen > DayClose(1) and entry < 1 Then Sell("s2",AtStop,DayOpen-PriceScale*1); if DayOpen < DayClose(1) Then { if DayLow > DayOpen-PriceScale*1 Then ExitLong("bx2",AtStop,DayOpen-PriceScale*1); if DayHigh < DayOpen+PriceScale*1 Then ExitShort("sx2",AtStop,DayOpen+PriceScale*1); } } } SetStopProfittarget(PriceScale*익절틱수,PointStop); SetStopLoss(PriceScale*손절틱수,PointStop); 2. input : 익절틱수(160),손절틱수(30); if NextBarSdate != sDate Then { if NextBarOpen < C Then { Buy("b",AtStop,NextBarOpen+PriceScale*1); Sell("s",AtStop,NextBarOpen-PriceScale*1); } if NextBarOpen > C Then { ExitLong("bx",AtStop,NextBarOpen-PriceScale*1); ExitShort("sx",AtStop,NextBarOpen+PriceScale*1); } } SetStopProfittarget(PriceScale*익절틱수,PointStop); SetStopLoss(PriceScale*손절틱수,PointStop); if MarketPosition == 1 Then Sell("s1",AtStop,EntryPrice-2); if MarketPosition == -1 Then Buy("b1",AtStop,EntryPrice+2); if MarketPosition == 1 Then Sell("s2",AtStop,EntryPrice-4); if MarketPosition == -1 Then Buy("b2",AtStop,EntryPrice+4); 3. input : 익절틱수(160),손절틱수(30); if NextBarSdate != sDate Then { if NextBarOpen > C Then { Buy("b",AtStop,NextBarOpen+PriceScale*1); ExitLong("bx",AtLimit, NextBarOpen+PriceScale*1+(H-L)*0.7); } if NextBarOpen < C Then { Sell("s",AtStop,NextBarOpen-PriceScale*1); ExitShort("sx",AtLimit,NextBarOpen-PriceScale*1-(H-L)*0.7); } } SetStopProfittarget(PriceScale*익절틱수,PointStop); SetStopLoss(PriceScale*손절틱수,PointStop); 위 3가지 수식은 일봉매매 수식어입니다. 당일 익절이 장종료 5분전까지 없을때 그 5분의 싯점에 자동청산되는 수식어를 추가하고자 합니다.

안녕하세요? 2개의 이벤트가 동시에 발생했을 때 서로 다른 소리를 내는 2개의 playsound()가 동시에 실행되었으면 합니다. 현재는 하나만 소리가 나더군요. 원래 2개의 playsound()가 동시에 작동할 수는 없는 건가요? 아니면 저의 코드에 문제가 있는 걸까요? 예를 들면, 아래 연속된 2개 if 문의 조건이 모두 True 일때, 소리는 두번째 "이벤트B발생알람.wav" 소리만 나서요. if 이벤트A발생 == True Then playsound("C"￦이벤트A발생알람.wav"); if 이벤트B발생 == True Then playsound("C"￦이벤트B발생알람.wav"); 감사합니다.

안녕하세요. 일봉차트에서 매월 마지막날임을 확인하는 수식을 좀 알려주시면 좋겠습니다~