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

질문을 통해 받은 기준자산 3분할 매매식을 아래와 같은 기준수량 3분할 매매식으로 고쳐보았습니다. input : 기준수량(100); var : ET1(0),ET2(0),ET3(0); if Bdate != Bdate[1] Then{ if stime < 100000 Then { ET1 = 90000; ET2 = 90300; ET3 = 90600; } else { ET1 = 100000; ET2 = 100300; ET3 = 100600; } } if stime == 142700 or (stime > 142700 and stime[1] < 142700) Then{ var1 = 기준수량*(1/3); buy("b1",OnClose,def,Floor(var1)); } if stime == 143000 or (stime > 143000 and stime[1] < 143000) Then{ var1 = 기준수량*(1/3); buy("b2",OnClose,def,Floor(var1)); } if stime == 143300 or (stime > 143300 and stime[1] < 143300) Then{ var1 = 기준수량*(1/3); buy("b3",OnClose,def,Floor(var1)); } if MarketPosition == 1 and sdate > EntryDate then{ if stime == ET1 or (stime > ET1 and stime[1] < ET1) Then ExitLong("bx1",OnClose,def,"",floor(MaxContracts*(1/3)),1); if stime == ET2 or (stime > ET2 and stime[1] < ET2) Then ExitLong("bx2",OnClose,def,"",floor(MaxContracts*(1/3)),1); if stime == ET3 or (stime > ET3 and stime[1] < ET3) Then ExitLong("bx3"); } 기준수량을 100(3의 배수가 아님)으로 설정하니 33개씩 매매가 되고 1개가 남습니다. 3번째 매매(b3, bx3) 때 잔량 전부(34개)를 매매하게 하려면 식을 어떻게 수정해야 할까요? 감사합니다.

항상노고가 많으십니다. 참조식이 vr 매도신호일때 본주 매수식 부탁드립니다. 감사합니다.

안녕하세요 하기 수식 문의 드립니다. 저는 10분봉과 30분 봉을 보고 있습니다. 10분봉을 data1 , 30분 봉을 data2로 잡았을 때, 1. 볼린져 밴드의 폭이 같거나 작아질때, 가격이 볼린져 밴드 상단에 닿으면, 해당봉의 볼린져 밴드 상단 가격으로 매도 진입. 볼린져 밴드의 폭이 같거나 작아질때, 가격이 볼린져 밴드 하단에 닿으면, 해당봉의 볼린져 밴드 하단 가격으로 매수 진입. 10분봉 30분봉 두가지 모두 신호가 발생하도록 부탁드립니다. 부탁드립니다. crossover가 아닌 닿는 즉시 부탁드립니다. 2. 저는 10분봉과 30분 봉을 보고 있습니다. 10분봉을 data1 , 30분 봉을 data2로 잡았을 때, 10분봉의 가격이 볼린져 밴드 하단에 닿았고, 30분 봉의 볼린져밴드 중앙 이평에 닿으면 매수 진입하는 수식 부탁드립니다. 이때 30분봉 볼린져 밴드의 중앙이평의 가격은 전봉대비 상승하고 있어야 합니다. 반대로, 10분봉의 가격이 볼린져 밴드 상단에 닿았고, 30분 봉의 볼린져밴드 중앙이평에 닿으면 매도 진입하는 수식 부탁드립니다. 이때도 30분봉 볼린져 밴드의 중앙이평의 가격은 전봉대비 하락하고 있어야 합니다. crossover가 아니라 닿는 즉시 실행되게 부탁드립니다. 감사합니다.

빠른 답변 감사합니다. ^.^ 일봉에서 macd(12,29) 선이 시그널선 보다 위에 있고. 20일선 위에 종가가위치할때 일분봉 에서 시초가 매수진입 일봉에서 Macd 선이 시그널 선 보다 같거나 아래 있고, 20일선 아래 종가가 위치할때 일분봉에서 시초가 매도 진입 게시판 55708번 재질문 드렸는데 부탁드립니다. 감사합니다. .^^;;

수고가 많으십니다. 강조가 정확하게 무엇인지 모르지만 강조로 분류했습니다만, 파라볼릭에 따라서 배경색을 darkgray와 lightgray로 구분해서 넣고 싶습니다. 강조를 넣으면 봉의 색이 바뀌는데 그것보다 파라볼릭에 따라서 배경색을 바꾸는 수식을 부탁합니다. 그리고 한 가지 더 있습니다. 오늘의 시가와 어제의 고가 및 저가에 수평선 3개를 긋고 싶습니다. 그리고 이것들의 수치를 각 수평선 위에 나타나게 하는데, 그 위치는 차트의 왼쪽끝이든 오른쪽끝이든 선택할 수 있게 하고 싶습니다. 감사합니다.

Input:length(5); Var:j(0),lastHiVal(0),lastLoVal(0),sBar(0),eBar(0),TL1(0),TL2(0),TL3(0),Text1(0),처리구분(""), TL_Val1(0),TL_Val2(0); Var:TL11(0),TL12(0),TL13(0),TL14(0),TL15(0),TL16(0),TL17(0),TL18(0),TL19(0),TL20(0),tx(0); Var:TL21(0),TL22(0),TL23(0),TL24(0),TL25(0),TL26(0),TL27(0),TL28(0),TL29(0),TL30(0),mav(0),T(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 { 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); TL_Delete(TL11); Text_Delete(Text1); If 고점[3,1][1] < 고점[2,1][1] and 고점[2,1][1] > 고점[1,1][1] and 저점[2,1][1] < 저점[1,1][1] Then TL_Delete(TL2); } TL1 = TL_New(sDate[sBar],sTime[sBar],저점[1,1],sDate[eBar],sTime[eBar],고점[1,1]); //TL11 = TL_New(sDate[index-고점[2,2]],sTime[index-고점[2,2]],고점[2,1],sDate[1],sTime[1],고점[2,1]); //Text1 = Text_New(sDate[eBar],sTime[eBar],고점[1,1],NumToStr(고점[1,1],2)); PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); TL_SetColor(TL1,BLACK); //TL_SetColor(TL11,BLACK); TL_SetSize(TL1,2); //TL_SetSize(TL11,2); 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 { 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); TL_Delete(TL11); Text_Delete(Text1); If 저점[2,1][1] < 저점[1,1][1] and 저점[2,1][1] < 저점[3,1][1] and 고점[2,1][1] > 고점[1,1][1] Then TL_Delete(TL3); } TL1 = TL_New(sDate[sBar],sTime[sBar],고점[1,1],sDate[eBar],sTime[eBar],저점[1,1]); //TL11 = TL_New(sDate[index-저점[2,2]],sTime[index-저점[2,2]],저점[2,1],sDate[1],sTime[1],저점[2,1]); //Text1 = Text_New(sDate[eBar],sTime[eBar],저점[1,1],NumToStr(저점[1,1],2)); PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); TL_SetColor(TL1,BLACK); //TL_SetColor(TL11,BLACK); TL_SetSize(TL1,2); //TL_SetSize(TL11,2); If 저점[2,1] < 저점[1,1] and 저점[2,1] < 저점[3,1] and 고점[2,1] > 고점[1,1] Then { sBar = Index - 고점[2,2]; eBar = Index - 고점[1,2]; } } } mav = ma(C,20); TL_Delete(TL13); TL_Delete(TL14); if 고점[1,2] > 저점[1,2] then{ TL13 = TL_New(sDate[index-고점[1,2]],sTime[index-고점[1,2]],고점[1,1],sDate,sTime,고점[1,1]); TL_SetColor(TL13,BLUE); TL_SetSize(TL13,3); } if 고점[1,2] < 저점[1,2] then{ TL14 = TL_New(sDate[index-저점[1,2]],sTime[index-저점[1,2]],저점[1,1],sDate,sTime,저점[1,1]); TL_SetColor(TL14,MAGENTA); TL_SetSize(TL14,3); } plot1(index-고점 [1,2]); plot2(index-저점 [1,2]); 아래지표추세방향전환지점꼭지점에 있는캔들에가격(고가,저가,종가)을 해당캔들로부터 수평으로 나오게,다음추세전환전까지 표시하는라인을 추가로부탁드립니다~`감사드립니다

1. 20 캔들 바닥에서 10번째 양봉 저가(A)를 표시한다 20 캔들 천정에서 10번째 음봉 고가(B)를 표시한다 A와 B의 상방 대칭을 표시한다 A와 B의 하방 대칭을 표시한다 2. 20 캔들 바닥에서 10번째 양봉 저가(A)를 표시한다 20 캔들 천정에서 10번째 음봉 고가(B)를 표시한다 A붕괴 음봉 매도 B돌파 양봉 매수 감사합니다

도움주심에 감사 드립니다. 타주기 분용을 틱용으로 수정 부탁 드립니다. 예를들어 100틱차트에서 200틱 차트의 지표(변수)를 보고 싶습니다. 미리 감사 드립니다. input : Price(10000), Per(10),N(5),타주기_분용(60),color(yellow),PriceScale차이(5); var : cnt(0),cnt1(0),cnt2(0),idx(0); var : S1(0),D1(0),TM(0),TF(0),Tcond(false); Array : VV[50](0); Array : OTL[50](0),HTL[50](0),LTL[50](0),CTL[50](0); Array : OTx[50](0),HTx[50](0),LTx[50](0),CTx[50](0),TX[50](0); Array : vol[1000](0),OO[1000](0),HH[1000](0),LL[1000](0),CC[1000](0),dd[1000](0),tt[1000](0); if Bdate != Bdate[1] Then{ S1 = TimeToMinutes(stime); D1 = sdate; } if D1 > 0 then{ if sdate == D1 Then TM = TimeToMinutes(stime)-S1; Else TM = TimeToMinutes(stime)+1440-S1; TF = TM%타주기_분용; if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then{ idx = idx+1; vol[0] = 0; DD[0] = sdate; TT[0] = stime; OO[0] = O; HH[0] = H; LL[0] = L; for cnt = 1 to 999{ vol[cnt] = vol[cnt-1][1]; dd[cnt] = dd[cnt-1][1]; tt[cnt] = tt[cnt-1][1]; oo[cnt] = oo[cnt-1][1]; hh[cnt] = hh[cnt-1][1]; ll[cnt] = ll[cnt-1][1]; cc[cnt] = cc[cnt-1][1]; } for cnt = 1 to 49{ VV[cnt] = 0; } #N개값 출력 for cnt1 = 1 to N{ #차트 과거봉 전체 스캔 for cnt2 = 1 to idx{ #Price대비 +- Per%안에 종가가 형성된 if CC[cnt2] <= Price*(1+Per/100) and CC[cnt2] >= Price*(1-Per/100) and Vol[cnt2] > VV[cnt1] and (cnt1 == 1 or (cnt1 >= 2 and Vol[cnt2] < VV[cnt1-1])) Then{ VV[cnt1] = Vol[cnt2]; #거래량순 상위 cnt1번째 값추세선 출력 #종가선 TL_Delete(CTL[cnt1]); CTL[cnt1] = TL_New(DD[cnt2],TT[cnt2],CC[cnt2]+PriceScale*PriceScale차이,sdate,stime,CC[cnt2]+PriceScale*PriceScale차이); TL_SetExtLeft(CTL[cnt1],true); TL_SetExtRight(CTL[cnt1],true); TL_Setcolor(CTL[cnt1],color); #거래량순 상위 cnt1번째 값텍스트 출력 #종가선값 Text_Delete(CTx[cnt1]); // CTx[cnt1] = Text_New(sdate,stime,CC[cnt2],"상위"+NumToStr(cnt1,0)+"번째봉 종가:"+NumToStr(CC[cnt2],0)); Text_SetStyle(CTx[cnt1],0,0); #점출력 Text_Delete(Tx[cnt1]); Tx[cnt1] = Text_New(dd[cnt2],TT[cnt2],CC[cnt2],"●"+NumToStr(cnt1,0)); Text_SetStyle(Tx[cnt1],2,2); text_setcolor(Tx[cnt1], color); } } } } vol[0] = vol[0]+v; CC[0] = C; if H > HH[0] Then HH[0] = h; if L < LL[0] Then LL[0] = L; }