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

안녕하세요. 아래지표는 도움 주신 캔들강조식입니다. 퇴근후 차트에 강조식을 적용해보니 ((매●수 매●도 확정되는 시점)) 진행중인캔들에 강조식이 적용 되도록 되어 있내요.^^ 확인좀 부탁드리구요.^^ 현재 진행중인 캔들이 아닌 종가기준 과거봉 고점 또는 저점 수직사이드선이 그려지는 캔들에 강조식을 널어 주시면 감사하겟습니다. 예=> 매●수 +매●도 글자가 표시되는 캔들에 강조식을 넣어 주시면 감사하겟습니다. 차트 속성 설정에서 기간또는 변동률을 수정할경우 캔들 강조식도 같이 따라 움직이도록 해주시면 감사하겟습니다. 매번 도움 주셔서 감사 드립니다. Input:chRate(0.5); //전환율 또는 변동률 input:추세선굵기(2),사이드선굵기(1); Var:j(0),upTr(100),dnTr(-100),upRate(0),dnRate(0),trnd(0),TL(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); //hiVal[1]은 전고점, hiVal[2]는 전전고점, hiVal[3]은 전전전고점 //hiVal[0]은 변곡점 이후 현재봉까지의 고점. 현재 고점은 진행중이므로 계속 바뀐다. //loVal[0]은 반대 개념 var : TL13(0),TL14(0),color(0),tx1(0),tx2(0),tx(0); upRate = 1 + (chRate/100); //상승률 dnRate = 1 - (chRate/100); //하락률 for j = 1 to 9 { //전고,전저점을 9개까지 보관 loBar[j] = loBar[j] + 1; //전저점의 위치. 현재 봉으로부터 떨어져 있는 거리 hiBar[j] = hiBar[j] + 1; //전고점의 위치 } if hiVal[0] <= H or hiVal[0] == 0 then { //전고,전저점 이후 현재까지의 고점 hiVal[0] = H; //0을 체크한 이유는 초기에 값이 없는 구간이 생기기 때문 hiBar[0] = 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; //저가가 고가 대비 변동률보다 밑으로 떨어지면 하락추세로 설정 //단, 현재봉의 고가가 변곡점 이후 최고가이면 상승 추세가 진행중이라고 본다. //그래서 현재봉의 고가가 hiVal[0]보다 작다는 조건이 추가되었다. 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); //TL_New는 신규 추세선을 그려주는 함수 } 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); //TL_SetEnd는 기존추세선의 종료지점을 변경해주는 추세선 함수이다. //TL_Delete 함수를 써서 직전의 추세선을 지우고 다시 TL_New로 추세선을 추가해도 된다. } 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 trnd == upTr and loVal[2] > loVal[1] then{ TL_SetColor(TL1,BLUE); color = blue; } else if trnd == dnTr and hiVal[2] < hiVal[1] then{ TL_SetColor(TL1,RED); color = RED; } else{ TL_SetColor(TL1,BLACK); color = BLACK; } TL_SetSize(TL1,추세선굵기); TL_SetColor(TL2,RED); TL_SetColor(TL3,BLUE); if var1 <= 0 and Trnd == uptr and Trnd != Trnd[1] Then { var1 = 1; value1 = loval[1]; Tx1 = Text_New(sdate[lobar[1]],stime[lobar[1]],value1,"매●수 "+NumToStr((Loval[1]-Hival[1])/PriceScale,0)+"틱"+NewLine+NumToStr(Loval[1],2)); Text_SetStyle(Tx1,2,0); Text_SetColor(Tx1,RED);#텍스트 색상 Tx= Text_New(sdate[lobar[1]],stime[lobar[1]],L,"상승"); Text_SetColor(Tx,RED);#텍스트 색상 TL13 = TL_New(date11,time11,Value11,date12,time12,Value11); TL14 = TL_New(date12,time12,Value11,date12,time12,Value12); TL_SetColor(TL13,color); TL_SetColor(TL14,color); TL_SetSize(TL13,사이드선굵기); TL_SetSize(TL14,사이드선굵기); PlotPaintBar(H,L,"강조",RED); PlaySound(""); } if var1 >= 0 and Trnd == dntr and Trnd != Trnd[1] then{ var1 = -1; value1 = hival[1]; Tx2 = Text_New(sdate[hibar[1]],stime[hibar[1]],value1,NumToStr(Hival[1],2)+NewLine+"매●도"+NumToStr((Hival[1]-Loval[1])/PriceScale,0)+"틱"); Text_SetStyle(Tx2,2,1);#텍스트 좌우 상하 정렬 Text_SetColor(Tx2,BLUE);#텍스트 색상 Tx= Text_New(sdate[hibar[1]],stime[hibar[1]],H,"하락"); Text_SetColor(Tx,BLUE);#텍스트 색상 TL13 = TL_New(date11,time11,Value11,date12,time12,Value11); TL14 = TL_New(date12,time12,Value11,date12,time12,Value12); TL_SetColor(TL13,color); TL_SetColor(TL14,color); TL_SetSize(TL13,사이드선굵기); TL_SetSize(TL14,사이드선굵기); PlotPaintBar(H,L,"강조",blue); PlaySound(""); }

1.안녕하세요^ 아래는 DATA2의 고가와 저가를 내장함수와 별도로 나타내 보기 위해 수식을 만들어 보았습니다.그런데 값이 다르게 나타나네요...수정부탁드립니다. 2.DATA2의고가와 저가를 나타내는 함수 HIGHD,LOWD 사용시 컴퓨터램 용량이 쉽게 초과되어 DATA2의 일간고가(당일~직전6일까지), DATA2의 일간저가(당일~직전6일까지) DATA2의 일간종가(당일~직전6일까지), DATA2의 일간시가(당일~직전6일까지)를 나타내는 수식 부탁드립니다.(DATA1과 DATA2의 주기를 다르게 사용하고 있습니다.) ================= input : IN(NUMERIC),N(NUMERIC); var : cnt(0); array : Hval[7](0); var1=IN; if date[1]!= date then{ Hval[0] = var1; for cnt = 1 to 6{ Hval[cnt] = Hval[cnt-1][1]; } } if var1 > Hval[0] then Hval[0] = var1; DPHN = Hval[N]; ====================================== input : IN(NUMERIC),N(NUMERIC); var : cnt(0); array : Lval[7](0); var1=IN; if date[1]!= date then{ Lval[0] = var1; for cnt = 1 to 6{ Lval[cnt] = Lval[cnt-1]; } } if var1 < Lval[0] then Lval[0] = var1; DPLN = Lval[N]; ====================================== var1=DPHN(DATA2(H),1); #DATA2 1일전고가 var2=DPLN(DATA2(L),1); #DATA2 1일전저가 PLOT1(var2,"1",RED); PLOT2(LOWD(1),"2",BLUE);

해외선물 입니다. a종목 차트에서 신호 발생시 b종목 진입 청산 주문 가능한가요?

input : Period(10); var : Counter(0), Lowval(0), Highval(0), DownVel(0),UpVel(0), DnAroon(0),UpAroon(0) ; Lowval= Lowest(Low, Period+1); Highval = Highest(High, Period+1); For counter= 0 To Period { If Low[counter] == Lowval Then DownVel = counter; If High[counter] == highval Then UpVel = counter; } UpAroon = 100*(Period-UpVel)/Period; DnAroon = 100*(Period-DownVel)/Period; if crossup(UpAroon,DnAroon) Then buy("Aroon_LE"); if CrossDown(UpAroon,DnAroon) Then sell("Aroon_SE"); 위의 수식을 바탕으로 볼린저밴드 접목 시키고 싶습니다. 1. 주가가 볼밴 하단선 이탈 시 상기의 매도 신호 유효 2. 주가가 볼밴 상단선 이탈 시 상기의 매수 신호 유효 3. 청산은 위 수식 그대로 입니다. 4. 볼밴 수치와 아룬 수치 변경할 수 있겠끔 부탁 드립니다. 항상 감사드립니다. 수고하십시오!!! 꼭 부탁드립니다.

이평선에서 일정한 수치를 더한값 을 표시하고 싶습니다 Var=ma(c,5); 에서 상으로 1프로 아래로 1프로 볼밴처럼 선을 표시할수 있나요? 또한 일정한 딕수 위아래로 표현 가능한가요? 즉 이동평균선이 1220.6딕 이면 거기에 5딕을더하여 1221.1딕 과 1220.1딕에 선으로 표시가능 한가요?

아래 2가지 수식에서 매매시간을 10시15분~17시 까지만 되게 수정 부탁드립니다 1. Inputs: ConsecutiveOBV(3), Length(15), Pval(0.05); Variables: OBVcalc(0); OBVcalc = OBV() * 0.0001; If CountIF(OBVcalc > Highest(OBVcalc, Length)[1], ConsecutiveOBV) == ConsecutiveOBV Then Buy ("매수", AtStop, Close + Pval); If CountIF(OBVcalc < Lowest(OBVcalc, Length)[1], ConsecutiveOBV) == ConsecutiveOBV Then Sell ("매도", AtStop, Close - Pval); var : RR(0),tx(0); if MarketPosition == 1 Then{ rr = Floor((highest(H,BarsSinceEntry)-EntryPrice)/(PriceScale*10)); if rr > rr[1] Then{ tx = Text_New(sdate,stime,H+PriceScale*1,NumToStr(RR*10,0)+"틱"); Text_SetStyle(tx,2,2); Text_SetColor(tx,YELLOW); } } if MarketPosition == -1 Then{ rr = Floor((EntryPrice-lowest(L,BarsSinceEntry))/(PriceScale*10)); if rr > rr[1] Then{ tx = Text_New(sdate,stime,L-PriceScale*1,NumToStr(RR*10,0)+"틱"); Text_SetStyle(tx,2,2); Text_SetColor(tx,YELLOW); } } 2. Input : af(0.02), maxAF(0.2); Var : value(0); value = sar(af,maxAF); If crossup(c,value) Then { Buy("매수"); } If CrossDown(c,value) Then { sell("매도"); } var : RR(0),tx(0); if MarketPosition == 1 Then{ rr = Floor((highest(H,BarsSinceEntry)-EntryPrice)/(PriceScale*10)); if rr > rr[1] Then{ tx = Text_New(sdate,stime,H+PriceScale*1,NumToStr(RR*10,0)+"틱"); Text_SetStyle(tx,2,2); Text_SetColor(tx,YELLOW); } } if MarketPosition == -1 Then{ rr = Floor((EntryPrice-lowest(L,BarsSinceEntry))/(PriceScale*10)); if rr > rr[1] Then{ tx = Text_New(sdate,stime,L-PriceScale*1,NumToStr(RR*10,0)+"틱"); Text_SetStyle(tx,2,2); Text_SetColor(tx,YELLOW); } }

수고하십니다. 이평선 20,120 정배열에서는 매수포지션만 유지하고, 이상태에서 이평선5,20 이 골든크로스에서 시장가 매수, 데드크로스에서 시장가 매수청산. 이평선 20,120 역배열에서는 매도포지션만 유지하고, 이상태에서 이평선5,20 이 데드크로스에서 시장가 매도, 골든크로스에서 시장가 매도청산 하고, 매매시간은 오전 10시부터 3시 30분까지로 정해서 식을 만들어주세요. 수고하세요.

안녕하세요 ^^ 아래수식은 얼마전에 어느 회원분의 질문에 관리자님께서 답해주신 수식인데요 이수식에서보면 고점과 고점, 저점과 저점을 잇는 선이 발생되는데... 이선의 두께와 색상을 조정할수있게 할수있을까요? 특히 선의 두께는 필히 조정이 가능하게되었으면 좋겠습니다 현재는 제일 가는선으로 되어있어서 챠트상 여러개의 지표중에서 신속히 발견하기가 좀 어렵네요 부탁드립니다 input : af(0.02), maxAF(0.2); input : 텍스트출력(1); var : T(0),cnt(0),count(0); var : HH1(0),LL1(0),HD1(0),HT1(0),LD1(0),LT1(0),day1(0),day0(0),TL3(0); var : TL1(0),TL2(0),tx1(0),tx2(0),tx11(0),tx22(0); Array : HD[20](0),HT[20](0),HH[20](0),LD[20](0),LT[20](0),LL[20](0); var1 = CSar(af,maxAF); if bdate != bdate[1] Then { day0 = sdate; day1 = day0[1]; } if crossup(c,var1) Then { T = 1; HH[0] = H; HD[0] = sdate; HT[0] = stime; for cnt = 1 to 19 { HD[cnt] = HD[cnt-1][1]; HT[cnt] = HT[cnt-1][1]; HH[cnt] = HH[cnt-1][1]; } if LL[0] > 0 Then { if 텍스트출력 == 1 then { Tx11 = Text_New(HD[1],HT[1],HH[1],NumToStr((HH[1]-LL[1])/PriceScale,0)+NewLine+NumToStr(HH[1],2)); Text_SetStyle(tx11,2,1); Text_SetColor(tx11,BLACK); Text_Delete(tx1); Tx1 = Text_New(HD[0],HT[0],HH[0],NumToStr((HH[0]-LL[0])/PriceScale,0)+NewLine+NumToStr(HH[0],2)); Text_SetStyle(tx1,2,1); Text_SetColor(tx1,GRAY); Condition1 = false; for cnt = 1 to 19 { if Condition1 == false and abs(LL[0]-LL[cnt]) <= PriceScale*1 and LD[cnt] >= day1 Then { Condition1 = true; TL1 = TL_New(LD[cnt],LT[cnt],LL[cnt],LD[0],LT[0],LL[0]); } } } } } if CrossDown(c,var1) Then { T = -1; LL[0] = L; LD[0] = sdate; LT[0] = stime; for cnt = 1 to 19 { LD[cnt] = LD[cnt-1][1]; LT[cnt] = LT[cnt-1][1]; LL[cnt] = LL[cnt-1][1]; } if HH[0] > 0 Then { if 텍스트출력 == 1 then { Tx22 = Text_New(LD[1],LT[1],LL[1],NumToStr((HH[1]-LL[1])/PriceScale,0)+NewLine+NumToStr(LL[1],2)); Text_SetStyle(tx22,2,0); Text_SetColor(tx22,RED); Text_Delete(tx2); Tx2 = Text_New(LD[0],LT[0],LL[0],NumToStr((HH[0]-LL[0])/PriceScale,0)+NewLine+NumToStr(LL[0],2)); Text_SetStyle(tx2,2,0); Text_SetColor(tx2,MAGENTA); Condition2 = false; for cnt = 1 to 19 { if Condition2 == false and abs(HH[0]-HH[cnt]) <= PriceScale*1 and HD[cnt] >= day1 Then { Condition2 = true; TL2 = TL_New(HD[cnt],HT[cnt],HH[cnt],HD[0],HT[0],HH[0]); } } } } } if T == 1 then { if H > HH[0] Then { HH[0] = H; HD[0] = sdate; HT[0] = stime; if 텍스트출력 == 1 then { Text_Delete(tx1); Tx1 = Text_New(HD[0],HT[0],HH[0],NumToStr((HH[0]-LL[0])/PriceScale,0)+NewLine+NumToStr(HH[0],2)); Text_SetStyle(tx1,2,1); Text_SetColor(tx1,BLACK); TL_Delete(TL3); Condition3 = false; for cnt = 1 to 19 { if Condition3 == false and abs(HH[0]-HH[cnt]) <= PriceScale*1 and HD[cnt] >= day1 Then { Condition3 = true; TL3 = TL_New(HD[cnt],HT[cnt],HH[cnt],HD[0],HT[0],HH[0]); } } } } } if T == -1 then { if L < LL[0] Then { LL[0] = L; LD[0] = sdate; LT[0] = stime; if 텍스트출력 == 1 then { Text_Delete(tx2); Tx2 = Text_New(LD[0],LT[0],LL[0],NumToStr((HH[0]-LL[0])/PriceScale,0)+NewLine+NumToStr(LL[0],2)); Text_SetStyle(tx2,2,0); Text_SetColor(tx2,RED); TL_Delete(TL3); Condition3 = false; for cnt = 1 to 19 { if Condition3 == false and abs(LL[0]-LL[cnt]) <= PriceScale*1 and LD[cnt] >= day1 Then { Condition3 = true; TL3 = TL_New(LD[cnt],LT[cnt],LL[cnt],LD[0],LT[0],LL[0]); } } } } }