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

손절 청산식 하나만 더 추가 부탁드립니다. input: 손절틱(100) 매수 개수가 5개 이상이고 진입된 전체 손익이 손절틱 이상이면 매수 전체 손절 매도 개수가 5개 이상이고 진입된 전체 손익이 손절틱 이상이면 매도 전체 손절 var : ll(0),hh(0); if index == 0 Then buy(); if index == 100 Then buy(); if index == 200 Then buy(); if index == 300 Then buy(); if index == 400 Then buy(); if MarketPosition == -1 then { if CurrentContracts > CurrentContracts[1] Then { hh = h; ll = L; } if h > hh Then hh = h; if l < ll Then ll = l; if ll <= AvgEntryPrice-(PriceScale*500)/CurrentContracts Then ExitShort("sp2",AtStop,LL+(AvgEntryPrice-LL)*0.01); //매도 진입 수가 5개 이상이고 전체 수익이 +100틱 이상이었다가 다시 0이 되면 청산 if CurrentContracts >= 5 and MaxPositionProfit >= PriceScale*100 Then ExitShort("sl2",AtStop,AvgEntryPrice); } if MarketPosition == 1 then { if CurrentContracts > CurrentContracts[1] Then { hh = h; ll = l; } if h > hh Then hh = h; if l < ll Then ll = l; #if hh >= AvgEntryPrice+(PriceScale*500)/CurrentContracts Then # ExitLong("bp2",AtStop,hh-(hh-AvgEntryPrice)*0.01); //매수 진입 수가 5개 이상이고 전체 수익이 +100틱 이상이었다가 다시 0이 되면 청산 if CurrentContracts >= 5 and MaxPositionProfit >= PriceScale*100 Then ExitLong("bl2",AtStop,AvgEntryPrice); }

Easy Language입니다.예스함수와 지표식 부탁드립니다. // Function inputs: Price (NumericSeries), Length (NumericSimple); vars: TR(0), DI_Diff(0), DI_Sum(0), ma(0), pdm(0), mdm(0), pdi(0), mdi(0), DI_Factor(0), VI(0), diff(0), HHV(0), LLV(0), WeightDM(Length), WeightDI(Length), WeightDX(Length), ChandeEMA(Length), output(0); once ma=Price; if(Price>Price[1]) then begin pdm=Price-Price[1]; mdm=0; end else begin mdm=Price[1]-Price; pdm=0; end; pdm=((WeightDM-1)*pdm[1] + pdm)/WeightDM;//ema. mdm=((WeightDM-1)*mdm[1] + mdm)/WeightDM;//ema. TR=pdm+mdm; if (TR>0) then begin pdi=pdm/TR; mdi=mdm/TR; end else begin pdi=0; mdi=0; end; pdi=((WeightDI-1)*pdi[1] + pdi)/WeightDI;//ema. mdi=((WeightDI-1)*mdi[1] + mdi)/WeightDI;//ema. DI_Diff=pdi-mdi; if (DI_Diff<0) then DI_Diff= -DI_Diff;//Only positive momentum signals are used. DI_Sum=pdi+mdi; DI_Factor=0;//Zero case, DI_Diff will also be zero when DI_Sum is zero. if (DI_Sum>0) then output=DI_Diff/DI_Sum else output=0; output=((WeightDX-1)*output[1] + output)/WeightDX; HHV = HighestFC(output,Length+1); LLV = LowestFC(output,Length+1); diff = HHV - LLV; VI=0; if (diff>0) then VI=(output-LLV)/diff; ma=((ChandeEMA-VI)*ma[1]+VI*Price)/ChandeEMA;//Chande VMA formula with ema built in. ADXVMA = ma; 끝부분의 ChandeEMA 확인가능하시면 그대로 해주시고 아니라면, var : ADXVMAPeriod(Length); ma=((ADXVMAPeriod-VI)*ma[1]+VI*Price)/ADXVMAPeriod; ADXVMA = ma; 로 대체해 주십시요.

1. 고점을 돌파할 때 매수한다는 조건 수식이 H <= DayHigh(0) 이게 맞는지 궁금합니다. 이 수식은 당일고가가 같거나(돌파를하진않았음) 뛰어넘었다는 의미같아서요.. 당일 고가를 뛰어넘었을때 사고싶으면 H < DayHigh(0) 이렇게 바꾸면 되나요? 2. buy("b",AtStop,DayHigh(0)+PriceScale*1); 여기서 조건에 부합할 때 현재가가 아닌 한틱 위 호가에 주문을 내려면 어떻게 변경하면 될까요? 3. 현금이 아닌 신용으로 매수가능금액의 99%로 매수하려면 수식을 어떻게 바꾸면 될까요? 4. 일봉상 3일전 고점과 저점폭보다 1일전 고저폭이 같거나 적을때 그리고, 2일전 고저폭보다 1일전 고저폭이 같거나 적을 때 당일 기준으로 전일고가 돌파시 매수한다. 라는 수식 부탁드리겠습니다.(쉽게말해서 1일전 일봉상 고저폭이 2일전,3일전 캔들보다 같거나 최저치인날을 조건으로 만들고 싶습니다.) --> 인사이드 데이처럼 전일 캔들의 고점과 저점 안에 있어야하는건 아닙니다. 5. 하루에 한번만 매수한다는 조건을 추가하려면 어떤 수식을 추가해야하는지 부탁드리겠습니다. (매수 후 스탑로스로 매도체결 뒤 다시 매수되는것 방지) 무더운 여름인데 더위조심하시고 감사합니다.

1)input : per1(23.6),per2(38.2),per3(50.0),per4(61.8),per5(76.4); var : hh(0),ll(0),h1(0),l1(0),dd(0),tt(0),d1(0),t1(0); var : tl1(0),tl2(0),tl3(0),tl4(0),tl5(0),tl6(0),tl7(0); if bdate > bdate[1]-1 then { hh = h; ll = l; h1 = hh[1]; l1 = ll[1]; dd = sdate[1]; tt = stime[1]; d1 = dd[1]; t1 = tt[1]; TL_Delete(tl1); TL_Delete(tl2); TL_Delete(tl3); TL_Delete(tl4); TL_Delete(tl5); TL_Delete(tl6); TL_Delete(tl7); tl1 = TL_New(dd,tt,hh,sdate,stime,hh); tl2 = TL_New(dd,tt,hh-(hh-ll)*(per1/100),sdate,stime,hh-(hh-ll)*(per1/100)); tl3 = TL_New(dd,tt,hh-(hh-ll)*(per2/100),sdate,stime,hh-(hh-ll)*(per2/100)); tl4 = TL_New(dd,tt,hh-(hh-ll)*(per3/100),sdate,stime,hh-(hh-ll)*(per3/100)); tl5 = TL_New(dd,tt,hh-(hh-ll)*(per4/100),sdate,stime,hh-(hh-ll)*(per4/100)); tl6 = TL_New(dd,tt,hh-(hh-ll)*(per5/100),sdate,stime,hh-(hh-ll)*(per5/100)); tl7 = TL_New(dd,tt,ll,sdate,stime,ll); } if h > hh Then { hh = h; TL_Delete(tl1); TL_Delete(tl2); TL_Delete(tl3); TL_Delete(tl4); TL_Delete(tl5); TL_Delete(tl6); TL_Delete(tl7); tl1 = TL_New(dd,tt,hh,sdate,stime,hh); tl2 = TL_New(dd,tt,hh-(hh-ll)*(per1/100),sdate,stime,hh-(hh-ll)*(per1/100)); tl3 = TL_New(dd,tt,hh-(hh-ll)*(per2/100),sdate,stime,hh-(hh-ll)*(per2/100)); tl4 = TL_New(dd,tt,hh-(hh-ll)*(per3/100),sdate,stime,hh-(hh-ll)*(per3/100)); tl5 = TL_New(dd,tt,hh-(hh-ll)*(per4/100),sdate,stime,hh-(hh-ll)*(per4/100)); tl6 = TL_New(dd,tt,hh-(hh-ll)*(per5/100),sdate,stime,hh-(hh-ll)*(per5/100)); tl7 = TL_New(dd,tt,ll,sdate,stime,ll); } if l < ll Then { ll = l; TL_Delete(tl1); TL_Delete(tl2); TL_Delete(tl3); TL_Delete(tl4); TL_Delete(tl5); TL_Delete(tl6); TL_Delete(tl7); tl1 = TL_New(dd,tt,hh,sdate,stime,hh); tl2 = TL_New(dd,tt,hh-(hh-ll)*(per1/100),sdate,stime,hh-(hh-ll)*(per1/100)); tl3 = TL_New(dd,tt,hh-(hh-ll)*(per2/100),sdate,stime,hh-(hh-ll)*(per2/100)); tl4 = TL_New(dd,tt,hh-(hh-ll)*(per3/100),sdate,stime,hh-(hh-ll)*(per3/100)); tl5 = TL_New(dd,tt,hh-(hh-ll)*(per4/100),sdate,stime,hh-(hh-ll)*(per4/100)); tl6 = TL_New(dd,tt,hh-(hh-ll)*(per5/100),sdate,stime,hh-(hh-ll)*(per5/100)); tl7 = TL_New(dd,tt,ll,sdate,stime,ll); } TL_SetColor(TL2,RED); TL_SetSize(TL2,2); TL_SetExtRight(TL2,true); TL_SetColor(TL6,CYAN); TL_SetSize(TL6,2); TL_SetExtRight(TL6,true); 위수식으로 당일 시가부터 23.6,50,76.4,선이3개나오게 피보나치 부탁드립니다 가격이변하면 피보나치선도변하게~~미리감사드립니다 2) input : per1(23.6),per2(38.2),per3(50.0),per4(61.8),per5(76.4); var : hh(0),ll(0),h1(0),l1(0),dd(0),tt(0),d1(0),t1(0); var : tl1(0),tl2(0),tl3(0),tl4(0),tl5(0),tl6(0),tl7(0); if bdate > bdate[1]-1 then { hh = h; ll = l; h1 = hh[1]; l1 = ll[1]; dd = sdate[1]; tt = stime[1]; d1 = dd[1]; t1 = tt[1]; TL_Delete(tl1); TL_Delete(tl2); TL_Delete(tl3); TL_Delete(tl4); TL_Delete(tl5); TL_Delete(tl6); TL_Delete(tl7); tl1 = TL_New(dd,tt,hh,sdate,stime,hh); tl2 = TL_New(dd,tt,hh-(hh-ll)*(per1/100),sdate,stime,hh-(hh-ll)*(per1/100)); tl3 = TL_New(dd,tt,hh-(hh-ll)*(per2/100),sdate,stime,hh-(hh-ll)*(per2/100)); tl4 = TL_New(dd,tt,hh-(hh-ll)*(per3/100),sdate,stime,hh-(hh-ll)*(per3/100)); tl5 = TL_New(dd,tt,hh-(hh-ll)*(per4/100),sdate,stime,hh-(hh-ll)*(per4/100)); tl6 = TL_New(dd,tt,hh-(hh-ll)*(per5/100),sdate,stime,hh-(hh-ll)*(per5/100)); tl7 = TL_New(dd,tt,ll,sdate,stime,ll); } if h > hh Then { hh = h; TL_Delete(tl1); TL_Delete(tl2); TL_Delete(tl3); TL_Delete(tl4); TL_Delete(tl5); TL_Delete(tl6); TL_Delete(tl7); tl1 = TL_New(dd,tt,hh,sdate,stime,hh); tl2 = TL_New(dd,tt,hh-(hh-ll)*(per1/100),sdate,stime,hh-(hh-ll)*(per1/100)); tl3 = TL_New(dd,tt,hh-(hh-ll)*(per2/100),sdate,stime,hh-(hh-ll)*(per2/100)); tl4 = TL_New(dd,tt,hh-(hh-ll)*(per3/100),sdate,stime,hh-(hh-ll)*(per3/100)); tl5 = TL_New(dd,tt,hh-(hh-ll)*(per4/100),sdate,stime,hh-(hh-ll)*(per4/100)); tl6 = TL_New(dd,tt,hh-(hh-ll)*(per5/100),sdate,stime,hh-(hh-ll)*(per5/100)); tl7 = TL_New(dd,tt,ll,sdate,stime,ll); } if l < ll Then { ll = l; TL_Delete(tl1); TL_Delete(tl2); TL_Delete(tl3); TL_Delete(tl4); TL_Delete(tl5); TL_Delete(tl6); TL_Delete(tl7); tl1 = TL_New(dd,tt,hh,sdate,stime,hh); tl2 = TL_New(dd,tt,hh-(hh-ll)*(per1/100),sdate,stime,hh-(hh-ll)*(per1/100)); tl3 = TL_New(dd,tt,hh-(hh-ll)*(per2/100),sdate,stime,hh-(hh-ll)*(per2/100)); tl4 = TL_New(dd,tt,hh-(hh-ll)*(per3/100),sdate,stime,hh-(hh-ll)*(per3/100)); tl5 = TL_New(dd,tt,hh-(hh-ll)*(per4/100),sdate,stime,hh-(hh-ll)*(per4/100)); tl6 = TL_New(dd,tt,hh-(hh-ll)*(per5/100),sdate,stime,hh-(hh-ll)*(per5/100)); tl7 = TL_New(dd,tt,ll,sdate,stime,ll); } 현재.전봉에 피보나치가 나오는데 전,전봉부터 나오게 수정부탁드립니다

1. 오일에서, 현재가를 중심으로, 현재가 위의 50틱 단위 Round Numbers 수평선들 5개, 현재가 아래 50틱 단위 Round Numbers 수평선들 5개를 그어 주는 지표식 간단하게 부탁드립니다. ( = TL을 이용하면 컴퓨터에 계산 부담을 많이 주는 것 같아서, 단순하게, 가령 지금 오일 가격이 56.16이라고 하면, 가장 가까운 50틱 단위 Round Number는 56.00이므로, 이 56이라는 숫자를 찾아 내는 식을 세우고, 그 숫자 위로 다섯 번 각각 +PriceScale*50*n ((n은 1에서 5까지)) 해서 다섯 수평선을 긋고, 그 아래로도 역시 다섯 번 -PriceScale*50*n 해서 다섯 수평선을 긋는, 총 11개의 수평선들을 그어 주는[Plot으로. TL 말고요] 지표식 부탁 드립니다.) 예컨대 지금 현재가가 56.16이라면, 56.00을 중심으로 총 11개의 수평선들, 즉 58.50 58.00 57.50, 57.00, 56.50, 56.00, 55.50, 55.00, 54.50, 54.00, 53.50. 이렇게 총 11개의 수평선들이, 현재가 변화에 맞춰 그어 지는 지표식 부탁 드립니다. ((위에서 매 100틱 선들, 즉 54.00, 55.00, 56.00 등은 녹색, 매 50틱 선들, 즉 53.50, 54.50, 55.50 등은 보라색 이런 식으로, 100틱선들과 50틱선들의 색깔을 달리할 수 있으면 그 것도 부탁 드리겠습니다)) 감사합니다. 2. 그리고, 같은 방법으로, Gold에서도 현재가에서 가장 가까운 50틱 단위 숫자, 가령 현재가가 1418.5라면, 가장 가까운 50틱 단위 Round Number는 1420.0이 되겠는데, 이 1420.0을 찾아 내는 수식 부탁 드립니다. 그 걸 바탕으로 역시 그 위로 50틱씩 더해서 5개의 수평선들을 긋고, 그 아래에도 역시 5개의 수평선들, 총 11개의 수평선들을 그을 수 있는 수식 부탁 드립니다. 예: 현재가 1418.5일 때 1445 1440 1435 1430 1425 1420 1415 1410 1405 1400 1395 3. 같은 논리로, 나스닥의 40틱=10포인트 수평선들 부탁드립니다. 현재 가격이 8015.25라면, 여기에 가장 가까운 40틱=10포인트 Round Number는 8020이므로, 8070 8060 8050 8040 8030 8020 8010 8000 7990 7980 7970 4. 같은 논리로, 항셍의 50틱 수평선들 부탁드립니다. 현재 가격이 28367라면, 여기에 가장 가까운 50틱 Round Number는 28350이므로, 위로 28400, 28450, 28500, 28550, 28600, 아래로 28300, 28250, 28200, 28150, 28100 과 같은 수평선들 총 11개가 현재가에 맞춰서 그려 질 수 있는 수식 부탁 드립니다. 감사합니다!

스토캐스틱 함수 파다가 궁금해서 질문 드립니다. 스토캐스틱의 %K선을 보면 StoK = StochasticsK(Period,Period1); 라고나옵니다 여기서 다시 StochasticsK 함수를 보면 StochasticsK = SlowK(Period, Period1); 라고나옵니다. 다시 SlowK 함수를 보면 SlowK = FastD(Period, Period1); 라고 나오고 FastD는 FastD = ema(FastK(Period), Period1); 라고 나옵니다. 여기서 이해가 안가는게 왜 FastD에서 SlowK->StochasticsK->Stok로 의미없이 변환을 하는건가요? 결국 다 똑같은 값인데요? 도움말에 봐돠 같은값이라고 쓰여져 있는데.. 왜 이렇게 하는건지 이유가 궁금합니다.

안녕하세요. 이제 분할청산 식은 조금 감이 잡히는데, '다른 진입신호 허용 피라미딩' 으로 들어간 각각의 신호에 대하여 각각의 청산을 적용할 수 있는 방법도 있을까요? 역시 예를 들어 주시면 좀 더 쉽게 이해 가능할 것 같습니다.. ------------------------------------------------------ input : 진입금액1(1000000),진입금액2(500000) ; var : 손절가(0); var1 = ma(C,5); var2 = ma(C,20); var3 = ma(C,60); var4 = ma(C,120); var5 = ma(C,240); var6 = ma(C,480); if crossup(c,var2) Then { buy("진입1",OnClose,def,floor(진입금액1/c)) ; } if crossup(c,var3) Then { buy("진입2",OnClose,def,floor(진입금액2/c)) ; } ------------------------------------------------------ 위와 같이 진입1, 진입2 진입명으로 진입한 후 1) 진입 1에 대한 청산은 1-1) 진입1 진입가 - 1틱에서 진입1 진입 전체 물량 전부 청산 1-2) CrossDown(c,var3) 에서 진입1 진입 전체 물량의 반 청산 1-3) CrossDown(c,var4) 에서 진입1 진입 전체 물량의 반 청산 2) 진입 2에 대한 청산은 2-1) 진입2 진입가 - 1틱에서 진입2 진입 전체 물량 전부 청산 2-2) CrossDown(c,var5) 에서 진입2 진입 전체 물량의 반 청산 2-3) CrossDown(c,var6) 에서 진입2 진입 전체 물량의 반 청산 저런 식으로 청산을 하려면 식을 어떻게 짜야 하는 건가요? -----------------------------------------------------------------