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

잘부탁드립니다 사진으로 부탁드립니다 J 번 5봉전 변수처리 부탁드립니다

안녕하세요^^ 시스템 식 부탁드립니다. 매매 기준점을 찾기 위하여 YesGlobalNEX HTS로 해외선물 거래중인데 거래를 잘해서인지 몇일전 NH에서 모바일 상품권(신세계)을 보내와 잘 쓰고 있습니다. 수작업으로 매매하면서 $를 잘벌던 중 손절과 이익실현을 제때 실행 하지 못해 벌어 놓았던 $ 도로아미타불 을 반복하고 있네요.ㅋㅋ 챠트에 계속 집중하기가 불가능하기 때문입니다. 현재 주식은 예스트레이더 HTS로 거래중인데 실현이익이 2020년도 약3억 2021년도 약6억 2022년도는 약3억원 중에 미실현 평가손익이 -1.5억원 중에 있습니다. 혹시 식주문 설명이 부족하더라도 잘 살피시어 부탁드립니다. 시스템 기본틀과 수식어만 작성해 주시면 나머지는 독자적 응용이 가능 한니다. * 매매실행시 몇번조건으로 진입과 청산 되었는지 차트에 표시하려 합니다. * 한시스템에서 매수진입 후 청산, 매도진입 후 청산이 가능한지 모르겠습니다. * YesGlobalNEX 시스템 함수가 코인매매에서도 적용되는지 궁금합니다. 1. 매수 진입조건 [전전 5평선이 전5평선 작고 and 5평선이 전5평선 보다 크고 and ((시가가 5평선 보다 작고 종가가 5평선 보다 크다) 또는 (시가와 종가가 5평선보다 크고 저가가 5평선보다 작다)) and StochasticsK가 StochasticsD 보다 크거나 같고 and 전전 StochasticsK가 전전 StochasticsD 작고 and 전 StochasticsK가 전 StochasticsK 기준선 50보다 작고 and Bollinger Bands 전 이평이 현이평보다 2.5 보다 작다 and 고가가 Bollinger Bands 상단밴드 보다 작다] 2. 매수 진입조건 [전종가가 5평선 보다 작고 and 종가가 시가보다 크고 and 전 cci가 전cci signal 보다 작고 and cci가 cci signal 보다 크다 and 전 cci가 -100 보다 작다 and 전 StochasticsD 전전 StochasticsD 작고 and StochasticsD가 전 StochasticsD 보다 크다] 3. 매수진입 위 1~2 공통 조건 1) 진입시간 07시 1분부터~ 다음날 05 30분까지. 2) 위 1 또는 2 조건 부합 시 매수진입 하려 합니다. 매수진입 후 청산조건 1) 시간이 05시 50분에 강제 청산 2) 전 StochasticsK가 전 StochasticsD 보다 크고 and StochasticsK가 StochasticsD보다 같거나 작다. 3) 전 StochasticsK가 Stochastics 기준선 80보다 크고 and StochasticsK가 전 StochasticsK 보다 작거나 같다. 4) 시간이 23시30분보다 크고 23시50분보다 작고 Bollinger Bands 상단밴드 보다 현재가가 100이상 크면 강제 청산. 5) 시간이 23시 30분보다 작고 Bollinger Bands 상단밴드 보다 현재가가 8이상 크면 강제 청산. 6) 종가가 5평선보자 작고 진입 봉 저가보다 작다. 7) 전,현 5개봉이 Bollinger Bands 이평 보다 크고 Bollinger Bands 이평 Bollinger Bands 전 이평 작다. 매도진입 1조건 [고가가 5평선, 20평선, Bollinger Bands 이평 보다 크고 and 종가가 5평선, 20평선, Bollinger Bands 이평 보다 작다 and 시가가 Bollinger Bands 이평 보다 크다 and 5평선이 전 5평선보다 작다 and cci signal 과 StochasticsD이 전 cci signal 과 StochasticsD작다 and Bollinger Bands 상단밴드가 전 Bollinger Bands 상단이 작다] 매도진입 2조건 매도진입 위 1~2 공통조건 1) 진입시간 07시 01분부터 다음날 05시 30까지 설정하려 합니다. 매도진입 후 청산조건 1) 종가가 cci signal 보다 크다 2) 종가와 전종가가 5평선보다 크고 and (전 종가와 종가가 양봉) 또는 (전 종가는 양봉 종가는 보합) 3) cci와 Stochasticsk가 cci signal 과 StochasticsD 크다 4) 저가가 Bollinger Bands 하단밴드보다 작거나 같고 and Bollinger Bands 하단밴드가 전 Bollinger Bands 하단밴드선이 크다. 5) (Bollinger Bands 이평 - 5평선)가 51보다 크고 종가가 시가보다 크거나 같다. 6) 시간이 05시50분에 강제 청산.

간단하게 수정부탁드리니다. 메모리부족현상 나타남 Input:af(0.06),maxAF(0.25); Var:오늘(0),극대(0),극저(0),가속(0),내일(0),추세(0),상승(1),하락(-1); //--------------------------------------------------------------------------------- Var1 = Ema(C,1); if Var1 > 0 and 극대 == 0 and 극저 == 0 then { 극대 = Var1; 극저 = Var1; } if Var1 > 0 and 오늘[1] == 0 then { if 추세[1] == 0 then { if Var1[1] < Var1 then 추세 = 상승; if Var1[1] > Var1 then 추세 = 하락; } if 추세[1] == 상승 and Var1[1] > Var1 then { 추세 = 하락; 오늘 = 극대[1]; 가속 = af; } if 추세[1] == 하락 and Var1[1] < Var1 then { 추세 = 상승; 오늘 = 극저[1]; 가속 = af; } 극저 = min(Var1,극저); 극대 = max(Var1,극대); } if 오늘[1] > 0 then { if 추세[1] == 상승 then { if Var1 > 내일[1] then { 오늘 = 내일[1]; 극저 = 0; if Var1 > 극대[1] then { 극대 = Var1; 가속 = min(maxAF,가속+af); } } else { 추세 = 하락; 오늘 = 극대[1]; 극대 = 0; 극저 = Var1; 가속 = af; } } if 추세[1] == 하락 then { if Var1 < 내일[1] then { 오늘 = 내일[1]; 극대 = 0; if Var1 < 극저[1] then { 극저 = Var1; 가속 = min(maxAF,가속+af); } } else { 추세 = 상승; 오늘 = 극저[1]; 극저 = 0; 극대 = Var1; 가속 = af; } } } 내일 = (max(극대,극저) - 오늘) * 가속 + 오늘; //Plot1(오늘); if var1 >= C Then Plot1(var1, "오늘",cyan); if var1 <= C Then Plot1(var1, "오늘",tomato); //--------------------------------------------------------------------------------- var2 = Ema(C,2); if var2 > 0 and 극대 == 0 and 극저 == 0 then { 극대 = var2; 극저 = var2; } if var2 > 0 and 오늘[1] == 0 then { if 추세[1] == 0 then { if var2[1] < var2 then 추세 = 상승; if var2[1] > var2 then 추세 = 하락; } if 추세[1] == 상승 and var2[1] > var2 then { 추세 = 하락; 오늘 = 극대[1]; 가속 = af; } if 추세[1] == 하락 and var2[1] < var2 then { 추세 = 상승; 오늘 = 극저[1]; 가속 = af; } 극저 = min(var2,극저); 극대 = max(var2,극대); } if 오늘[1] > 0 then { if 추세[1] == 상승 then { if var2 > 내일[1] then { 오늘 = 내일[1]; 극저 = 0; if var2 > 극대[1] then { 극대 = var2; 가속 = min(maxAF,가속+af); } } else { 추세 = 하락; 오늘 = 극대[1]; 극대 = 0; 극저 = var2; 가속 = af; } } if 추세[1] == 하락 then { if var2 < 내일[1] then { 오늘 = 내일[1]; 극대 = 0; if var2 < 극저[1] then { 극저 = var2; 가속 = min(maxAF,가속+af); } } else { 추세 = 상승; 오늘 = 극저[1]; 극저 = 0; 극대 = var2; 가속 = af; } } } 내일 = (max(극대,극저) - 오늘) * 가속 + 오늘; //Plot1(오늘); if var2 >= C Then Plot2(var2, "오늘",cyan); if var2 <= C Then Plot2(var2, "오늘",tomato); //--------------------------------------------------------------------------------- var3 = Ema(C,4); if var3 > 0 and 극대 == 0 and 극저 == 0 then { 극대 = var3; 극저 = var3; } if var3 > 0 and 오늘[1] == 0 then { if 추세[1] == 0 then { if var3[1] < var3 then 추세 = 상승; if var3[1] > var3 then 추세 = 하락; } if 추세[1] == 상승 and var3[1] > var3 then { 추세 = 하락; 오늘 = 극대[1]; 가속 = af; } if 추세[1] == 하락 and var3[1] < var3 then { 추세 = 상승; 오늘 = 극저[1]; 가속 = af; } 극저 = min(var3,극저); 극대 = max(var3,극대); } if 오늘[1] > 0 then { if 추세[1] == 상승 then { if var3 > 내일[1] then { 오늘 = 내일[1]; 극저 = 0; if var3 > 극대[1] then { 극대 = var3; 가속 = min(maxAF,가속+af); } } else { 추세 = 하락; 오늘 = 극대[1]; 극대 = 0; 극저 = var3; 가속 = af; } } if 추세[1] == 하락 then { if var3 < 내일[1] then { 오늘 = 내일[1]; 극대 = 0; if var3 < 극저[1] then { 극저 = var3; 가속 = min(maxAF,가속+af); } } else { 추세 = 상승; 오늘 = 극저[1]; 극저 = 0; 극대 = var3; 가속 = af; } } } 내일 = (max(극대,극저) - 오늘) * 가속 + 오늘; //Plot1(오늘); if var3 >= C Then Plot3(var3, "오늘",cyan); if var3 <= C Then Plot3(var3, "오늘",tomato); //--------------------------------------------------------------------------------- var4 = Ema(C,6); if var4 > 0 and 극대 == 0 and 극저 == 0 then { 극대 = var4; 극저 = var4; } if var4 > 0 and 오늘[1] == 0 then { if 추세[1] == 0 then { if var4[1] < var4 then 추세 = 상승; if var4[1] > var4 then 추세 = 하락; } if 추세[1] == 상승 and var4[1] > var4 then { 추세 = 하락; 오늘 = 극대[1]; 가속 = af; } if 추세[1] == 하락 and var4[1] < var4 then { 추세 = 상승; 오늘 = 극저[1]; 가속 = af; } 극저 = min(var4,극저); 극대 = max(var4,극대); } if 오늘[1] > 0 then { if 추세[1] == 상승 then { if var4 > 내일[1] then { 오늘 = 내일[1]; 극저 = 0; if var4 > 극대[1] then { 극대 = var4; 가속 = min(maxAF,가속+af); } } else { 추세 = 하락; 오늘 = 극대[1]; 극대 = 0; 극저 = var4; 가속 = af; } } if 추세[1] == 하락 then { if var4 < 내일[1] then { 오늘 = 내일[1]; 극대 = 0; if var4 < 극저[1] then { 극저 = var4; 가속 = min(maxAF,가속+af); } } else { 추세 = 상승; 오늘 = 극저[1]; 극저 = 0; 극대 = var4; 가속 = af; } } } 내일 = (max(극대,극저) - 오늘) * 가속 + 오늘; //Plot1(오늘); if var4 >= C Then Plot4(var4, "오늘",cyan); if var4 <= C Then Plot4(var4, "오늘",tomato); //--------------------------------------------------------------------------------- var5 = Ema(C,8); if var5 > 0 and 극대 == 0 and 극저 == 0 then { 극대 = var5; 극저 = var5; } if var5 > 0 and 오늘[1] == 0 then { if 추세[1] == 0 then { if var5[1] < var5 then 추세 = 상승; if var5[1] > var5 then 추세 = 하락; } if 추세[1] == 상승 and var5[1] > var5 then { 추세 = 하락; 오늘 = 극대[1]; 가속 = af; } if 추세[1] == 하락 and var5[1] < var5 then { 추세 = 상승; 오늘 = 극저[1]; 가속 = af; } 극저 = min(var5,극저); 극대 = max(var5,극대); } if 오늘[1] > 0 then { if 추세[1] == 상승 then { if var5 > 내일[1] then { 오늘 = 내일[1]; 극저 = 0; if var5 > 극대[1] then { 극대 = var5; 가속 = min(maxAF,가속+af); } } else { 추세 = 하락; 오늘 = 극대[1]; 극대 = 0; 극저 = var5; 가속 = af; } } if 추세[1] == 하락 then { if var5 < 내일[1] then { 오늘 = 내일[1]; 극대 = 0; if var5 < 극저[1] then { 극저 = var5; 가속 = min(maxAF,가속+af); } } else { 추세 = 상승; 오늘 = 극저[1]; 극저 = 0; 극대 = var5; 가속 = af; } } } 내일 = (max(극대,극저) - 오늘) * 가속 + 오늘; //Plot1(오늘); if var5 >= C Then Plot5(var5, "오늘",cyan); if var5 <= C Then Plot5(var5, "오늘",tomato); //--------------------------------------------------------------------------------- var6 = Ema(C,10); if var6 > 0 and 극대 == 0 and 극저 == 0 then { 극대 = var6; 극저 = var6; } if var6 > 0 and 오늘[1] == 0 then { if 추세[1] == 0 then { if var6[1] < var6 then 추세 = 상승; if var6[1] > var6 then 추세 = 하락; } if 추세[1] == 상승 and var6[1] > var6 then { 추세 = 하락; 오늘 = 극대[1]; 가속 = af; } if 추세[1] == 하락 and var6[1] < var6 then { 추세 = 상승; 오늘 = 극저[1]; 가속 = af; } 극저 = min(var6,극저); 극대 = max(var6,극대); } if 오늘[1] > 0 then { if 추세[1] == 상승 then { if var6 > 내일[1] then { 오늘 = 내일[1]; 극저 = 0; if var6 > 극대[1] then { 극대 = var6; 가속 = min(maxAF,가속+af); } } else { 추세 = 하락; 오늘 = 극대[1]; 극대 = 0; 극저 = var6; 가속 = af; } } if 추세[1] == 하락 then { if var6 < 내일[1] then { 오늘 = 내일[1]; 극대 = 0; if var6 < 극저[1] then { 극저 = var6; 가속 = min(maxAF,가속+af); } } else { 추세 = 상승; 오늘 = 극저[1]; 극저 = 0; 극대 = var6; 가속 = af; } } } 내일 = (max(극대,극저) - 오늘) * 가속 + 오늘; //Plot1(오늘); if var6 >= C Then Plot6(var6, "오늘",cyan); if var6 <= C Then Plot6(var6, "오늘",tomato); 시스템식부탁드립니다. input :Peod(10),색상두께(50); Var:하락색a(Red), 상승색a(Blue); Var:jr(0),gT(0); Var: 고11(0),고12(0),시간11(0),시간12(0),선TL1(0),선TL(0), 고21(0),고22(0),시간21(0),시간22(0),Vlue11(0),Vlue12(0), 고31(0),고32(0),시간31(0),시간32(0); Array:고Val[20](0),저val[20](0),고Bar[20](0),저Bar[20](0); Array:dr[7](0),dfr[7](0); var : dbox(0),dbox1(0); dr[0] = 0; dr[1] = 2; dr[2] = 3.; dr[3] = -1; dr[4] = -2.; dr[5] = 1; dr[6] = 0.5; For jr = 0 To 19 { 고Bar[jr] = 고Bar[jr] + 1; 저Bar[jr] = 저Bar[jr] + 1; } if crossup(c,highest(H,Peod)[1]) Then gT = 1; if CrossDown(c,Lowest(L,Peod)[1]) Then gT = -1; If gT == -1 Then { If gT[1] != -1 Then { For jr = 18 DownTo 0 { 저val[jr+1] = 저val[jr]; 저Bar[jr+1] = 저Bar[jr]; //ZZ[j+1] = ZZ[j]; } 저val[0] = L; 저Bar[0] = 0; //ZZ[0] = L; 고11 = Date[고Bar[0]]; 시간11 = stime[고Bar[0]]; Vlue11 = 고Val[0]; 고12 = Date[저Bar[0]]; 시간12 = stime[저Bar[0]]; Vlue12 = 저val[0]; 고21 = Date[고Bar[0]]; 시간21 = stime[고Bar[0]]; 고22 = Date[0]; 시간22 = stime[0]; for jr = 0 to 6 { dfr[jr] = 저val[1] + ((고Val[0] - 저val[1]) * dr[jr]); } Box_SetEnd(dbox,고11,시간11,Vlue11); dbox = box_new(고11,시간11,Vlue11,고12,시간12,Vlue12); Box_SetColor(dbox,상승색a); Box_SetFill(dbox,true,색상두께); } If 저val[0] > L Then { 저val[0] = L; 저Bar[0] = 0; //ZZ[0] = L; 고12 = Date[저Bar[0]]; 시간12 = stime[저Bar[0]]; Vlue12 = 저val[0]; 고22 = Date[0]; 시간22 = stime[0]; } Box_SetEnd(dbox,NextBarSdate,NextBarStime,Vlue12); } If gT == 1 Then { If gT[1] != 1 Then { For jr = 18 DownTo 0 { 고Val[jr+1] = 고Val[jr]; 고Bar[jr+1] = 고Bar[jr]; //ZZ[j+1] = ZZ[j]; } 고Val[0] = H; 고Bar[0] = 0; //ZZ[0] = H; 고11 = Date[저Bar[0]]; 시간11 = stime[저Bar[0]]; Vlue11 = 저val[0]; 고12 = Date[고Bar[0]]; 시간12 = stime[고Bar[0]]; Vlue12 = 고Val[0]; 고31 = Date[저Bar[0]]; 시간31 = stime[저Bar[0]]; 고32 = Date[0]; 시간32 = stime[0]; for jr = 0 to 5 { dfr[jr] = 저val[0] + ((고Val[1] - 저val[0]) * dr[jr]); } Box_SetEnd(dbox,고11,시간11,Vlue11); dbox = box_new(고11,시간11,Vlue11,고12,시간12,Vlue12); Box_SetColor(dbox,하락색a); Box_SetFill(dbox,true,색상두께); } If 고Val[0] < H Then { 고Val[0] = H; 고Bar[0] = 0; //ZZ[0] = H; 고12 = Date[고Bar[0]]; 시간12 = stime[고Bar[0]]; Vlue12 = 고Val[0]; 고32 = Date[0]; 시간32 = stime[0]; } Box_SetEnd(dbox,NextBarSdate,NextBarStime,Vlue12); }

첫번째 전체종가상승률이 25%가 넘는 3캔들(AA) 출현시 첫캔들의 시가를 OA로 하고 두번째 전체종가상승률이 25%가 넘는 3캔들(BB) 출현시 첫캔들의 시가를 OB로 했을 때 AA캔들이후 저가로 OA를 데드크로스한 이후에 BB캔들이 발생하고 이후 저가로 OB를 데드크로스한 이후 20%이상의 장대양봉이 나온 종목검색식을 부탁드립니다. AA의 인덱스와 BB의 인덱스 사이에 데드크로스가 일어나고 BB인덱스 뒤에 데드크로스가 또 일어나야 하는데 순서대로 발생해야 해서 수식작성이 어려웠습니다. 주석도 부탁드립니다. 추가를 많이 해야 해서. 항상 친절한 답변을 해 주셔서 감사드립니다.

수식변환 요청드립니다. 아래수식은 트레이딩뷰 지표식인데 이미지파일 그림처럼 캔들로 구현하지 못하더라도 HARSI 바디 시가 종가 고가 저가 를 선으로 출력되어도 됩니다 ##=======// //@version=5 //@author=JayRogers indicator('Heikin Ashi RSI Oscillator', 'HARSI &#8226;', false, format.price, 2) string TT_HARSI = 'Period for the RSI calculations used to generate the' + 'candles. This seperate from the RSI plot/histogram length.' string TT_PBIAS = 'Smoothing feature for the OPEN of the HARSI candles.' + ' Increases bias toward the prior open value which can' + ' help provide better visualisation of trend strength.' + ' ** By changing the Open values, High and Low can also' + ' be distorted - however Close will remain unchanged.' string TT_SMRSI = 'This option smoothes the RSI in a manner similar to HA' + ' open, but uses the realtime rsi rather than the prior' + ' close value.' /////////////////////////////////////////////////////////////////////// // // // ====== INPUTS ====== // // // //////////////////////////////////////////////////////////////////////////////// // -- Candle config string GROUP_CAND = 'Config&#8195;&#187;&#8195;HARSI Candles' i_lenHARSI = input.int(14, 'Length', group=GROUP_CAND, minval=1, tooltip=TT_HARSI) i_smoothing = input.int(7, 'Open Smoothing', group=GROUP_CAND, minval=1, maxval=100, tooltip=TT_PBIAS) string INLINE_COL = 'Colour Pallette' i_colUp = input.color(color.red, 'Colour Pallette&#8195;&#8195;', group=GROUP_CAND, inline=INLINE_COL) i_colDown = input.color(color.teal, ' ', group=GROUP_CAND, inline=INLINE_COL) i_colWick = input.color(color.gray, ' ', group=GROUP_CAND, inline=INLINE_COL) // -- RSI plot config string GROUP_PLOT = 'Config&#8195;&#187;&#8195;RSI Plot' i_source = input.source(ohlc4, 'Source', group=GROUP_PLOT) i_lenRSI = input.int(7, 'Length', group=GROUP_PLOT, minval=1) i_mode = input.bool(true, 'Smoothed Mode RSI?', group=GROUP_PLOT, tooltip=TT_SMRSI) //////////////////////////////////////////////////////////////////////////////// // // // ====== FUNCTIONS ====== // // // //////////////////////////////////////////////////////////////////////////////// // zero median rsi helper function, just subtracts 50. f_zrsi(_source, _length) => ta.rsi(_source, _length) - 50 // mode 셀렉타블 rsi function for standard, or smoothed output f_rsi(_source, _length, _mode) => // get base rsi float _zrsi = f_zrsi(_source, _length) // smoothing in a manner similar to HA open, but rather using the realtime // rsi in place of the prior close value. var float _smoothed = na _smoothed := na(_smoothed[1]) ? _zrsi : (_smoothed[1] + _zrsi) / 2 // return the requested mode _mode ? _smoothed : _zrsi // RSI Heikin-Ashi generation function f_rsiHeikinAshi(_length) => // get close rsi float _closeRSI = f_zrsi(close, _length) // emulate "open" simply by taking the previous close rsi value float _openRSI = nz(_closeRSI[1], _closeRSI) // the high and low are tricky, because unlike "high" and "low" by // themselves, the RSI results can overlap each other. So first we just go // ahead and get the raw results for high and low, and then.. float _highRSI_raw = f_zrsi(high, _length) float _lowRSI_raw = f_zrsi(low, _length) // ..make sure we use the highest for high, and lowest for low float _highRSI = math.max(_highRSI_raw, _lowRSI_raw) float _lowRSI = math.min(_highRSI_raw, _lowRSI_raw) // ha calculation for close float _close = (_openRSI + _highRSI + _lowRSI + _closeRSI) / 4 // ha calculation for open, standard, and smoothed/lagged var float _open = na _open := na(_open[i_smoothing]) ? (_openRSI + _closeRSI) / 2 : (_open[1] * i_smoothing + _close[1]) / (i_smoothing + 1) // ha high and low min-max 섹렉션 float _high = math.max(_highRSI, math.max(_open, _close)) float _low = math.min(_lowRSI, math.min(_open, _close)) // return the OHLC values [_open, _high, _low, _close] //////////////////////////////////////////////////////////////////////////////// // // // ====== SERIES, LINES and LABELS ====== // // // //////////////////////////////////////////////////////////////////////////////// // standard, or ha smoothed rsi for the line plot and/or histogram float RSI = f_rsi(i_source, i_lenRSI, i_mode) // get OHLC values to use in the plotcandle() [O, H, L, C] = f_rsiHeikinAshi(i_lenHARSI) // candle body colouring color bodyColour = C > O ? i_colUp : i_colDown color wickColour = i_colWick // make our HA rsi candles plotcandle(O, H, L, C, 'HARSI', bodyColour, wickColour, bordercolor=bodyColour)

아래 키움수식을 예스수식으로 변환부탁드려요,, 라인 색이랑 두께도 지정 가능하게 부탁드려요,, 미리 감사드립니다. (__) 지표1 선행중심선(상단지표) 수식1 a=Highest(H,period1); b=LowEst(L,period1); N=(A+B)/2; shift(N,26) 수식2 a=Highest(H,period2); b=LowEst(L,period2); N=(A+B)/2; shift(N,26) 수식3 a=Highest(H,period3); b=LowEst(L,period3); N=(A+B)/2; shift(N,26) 수식4 a=Highest(H,period4); b=LowEst(L,period4); N=(A+B)/2; shift(N,26) 수식5 a=Highest(H,period5); b=LowEst(L,period5); N=(A+B)/2; shift(N,26) 지표조건 period1 333 period2 555 period3 777 period4 888 period5 999 지표2 볼벤중심선(하단지표) 수식1 BBandsUp(Period1,D1) 수식2 BBandsUp(Period2,D1) 수식3 BBandsUp(Period3,D1) 수식4 a=Highest(H,period4); b=LowEst(L,period4); N=(A+B)/2; shift(N,26) 수식5 MA(c, 기간6, 이평종류) 지표조건 period1 999 period2 777 period3 555 period4 333 D1 2 기간6 1 이평종류 지수

input : signal(10); var1 = OBV; Var2 = Ema(var1,signal); Plot1(Var1); plot2(Var2); 수고 많으십니다 여전에 만들어주신 지표입니다 부탁드릴 수식은 1) Plot1이 Plot2보다 위면 빨간색 아래면 파란색 으로 표시돼게 나오도록 부탁드립니다 색깔 변경 가능하도록 부탁드리겠습니다 2) 위 지표를 시스템으로 부탁드리겠습니다

색상을 실시간 으로 표시부탁드립니다. input : vPeriod(120),선두께(2),N(0),rtt(20),상승색a(magenta),하락색a(lime),색상두께(20),글씨대(20); Var:상승색(Magenta), 하락색(Cyan); input : 틱1(0),틱2(1); Var:vj(0),vT(0),txx(0),txxx(0); Var: date11(0),date12(0),time11(0),time12(0),sTL1(0),sTL(0), date21(0),date22(0),time21(0),time22(0), date31(0),date32(0),time31(0),time32(0),stx(0),stx1(0),stl4(0),sTL9(0),dboxx(0); Array:HiVal[20](0),LoVal[20](0),HiBar[20](0),LoBar[20](0); Array:r[7](0),fr[7](0); var : xClose(0),xOpen(0),xHigh(0),xLow(0); #Heiken Ashi 시고저종 if index == 0 then { xOpen = open; xClose = (O+H+L+C)/4; xHigh = MaxList( high, xOpen, xClose); xLow = MinList( low, xOpen,xClose); } else { xClose = (O+H+L+C)/4; xOpen = (xOpen [1] + xClose [1])/2 ; xHigh = MaxList(High, xOpen, xClose) ; xLow = MinList(Low, xOpen, xClose) ; } if XClose > Xopen Then PlotPaintBar(h,l,"강조",Red); else if XClose < Xopen Then PlotPaintBar(h,l,"강조",Blue); else PlotPaintBar(h,l,"강조",GREEN); r[0] = 0; r[1] = 2; r[2] = 3.; r[3] = -1; r[4] = -2.; r[5] = 1; r[6] = 0.5; For vj = 0 To 19 { HiBar[vj] = HiBar[vj] + 1; LoBar[vj] = LoBar[vj] + 1; } if crossup(xClose,highest(xHigh,vPeriod)[1]) Then vT = 1; if CrossDown(xClose,Lowest(xLow,vPeriod)[1]) Then vT = -1; If vT == -1 Then { If vT[1] != -1 Then { For vj = 18 DownTo 0 { LoVal[vj+1] = LoVal[vj]; LoBar[vj+1] = LoBar[vj]; } LoVal[0] = xLow; LoBar[0] = 0; date11 = date[HiBar[0]+N]; time11 = stime[HiBar[0]+N]; Value11 = HiVal[0]; date12 = date[LoBar[0]+N]; time12 = stime[LoBar[0]+N]; Value12 = LoVal[0]; Text_Delete(txx); TL_Delete(stl); sTL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); sTL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(sTL1,하락색); date21 = date[HiBar[0]+N]; time21 = stime[HiBar[0]+N]; date22 = date[0]; time22 = stime[0]; for vj = 0 to 6 { fr[vj] = LoVal[1] + ((HiVal[0] - LoVal[1]) * r[vj]); } // Condition99 = True; Txx = Text_New(date11,time11,Value11+PriceScale*7,"●"+NewLine+NewLine+NewLine); Text_SetColor(Txx,Blue); Text_SetStyle(Txx,2,2); Text_SetSize(txx,rtt); dboxx = box_new(Date11,Time11,xHigh,NextBarSdate,NextBarStime,xLow); Box_SetColor(dboxx,하락색a); Box_SetFill(dboxx,true,색상두께); Box_SetExtFill(dboxx,true); if Condition99 == true and Loval[0] <= loval[1]-PriceScale*틱2 Then { Condition99 = False; Text_Delete(txx); } if abs(value11[1]-value12[1]) < 1 Then Text_Delete(txxx); Else { Text_SetColor(Txxx,magenta); Text_SetSize(txxx,글씨대); } txxx = Text_New(date11,time11,Value11,NumToStr(abs(value11-value12),2)); Text_SetStyle(txxx,2,1); Text_SetBold(txxx,1); } If LoVal[0] > xLow Then { LoVal[0] = xLow; LoBar[0] = 0; date12 = date[LoBar[0]+N]; time12 = stime[LoBar[0]+N]; Value12 = LoVal[0]; TL_SetEnd(sTL1, date12,time12,Value12); date22 = date[0+N]; time22 = stime[0+N]; if Condition99 == true and Loval[0] <= loval[1]-PriceScale*틱2 Then // PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); { Condition99 = False; Text_Delete(txx); } Text_SetString(txxx,NumToStr(abs(value11-value12),2)); if abs(value11-value12) < 1 Then { Text_SetColor(Txxx,Blue); Text_SetSize(txxx,글씨대); } Else { Text_SetColor(Txxx,Blue); Text_SetSize(txxx,15); } Box_SetEnd(dboxx,NextBarSdate,NextBarStime,L); } } If vT == 1 Then { If vT[1] != 1 Then { For vj = 18 DownTo 0 { HiVal[vj+1] = HiVal[vj]; HiBar[vj+1] = HiBar[vj]; } HiVal[0] = xHigh; HiBar[0] = 0; date11 = date[LoBar[0]+N]; time11 = stime[LoBar[0]+N]; Value11 = LoVal[0]; date12 = date[HiBar[0]+N]; time12 = stime[HiBar[0]+N]; Value12 = HiVal[0]; Text_Delete(txx); TL_Delete(stl); sTL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); sTL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(sTL1,상승색); date31 = date[LoBar[0]+N]; time31 = stime[LoBar[0]+N]; date32 = date[0]; time32 = stime[0]; for vj = 0 to 5 { fr[vj] = LoVal[0] + ((HiVal[1] - LoVal[0]) * r[vj]); } //Condition1 = False; Txx = Text_New(date11,time11,Value11+PriceScale*7,NewLine+NewLine+NewLine+"●"); // Condition99 = True; Text_SetColor(Txx,magenta); Text_SetStyle(Txx,2,2); Text_SetSize(txx,rtt); dboxx = box_new(Date11,Time11,xHigh,NextBarSdate,NextBarStime,xLow); Box_SetColor(dboxx,상승색a); Box_SetFill(dboxx,true,색상두께); Box_SetExtFill(dboxx,true); if Condition99 == true and Loval[0] >= Loval[1]-PriceScale*틱1 Then { Condition99 = False; Text_Delete(txx); } if abs(value11[1]-value12[1]) < 1 Then Text_Delete(txxx); Else { Text_SetColor(Txxx,Blue); Text_SetSize(txxx,글씨대); } txxx = Text_New(date11,time11,Value11,NumToStr(abs(value11-value12),2)); Text_SetStyle(txxx,2,3); Text_SetBold(txxx,1); } If HiVal[0] < xhigh Then { HiVal[0] = xHigh; HiBar[0] = 0; date12 = date[HiBar[0]+N]; time12 = stime[HiBar[0]+N]; Value12 = HiVal[0]; TL_SetEnd(sTL1, date12,time12,Value12); date32 = date[0+N]; time32 = stime[0+N]; if Condition99 == true and HiVal[0] <= HiVal[1]-PriceScale*틱2 Then // PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav"); { Condition99 = False; Text_Delete(txx); } Text_SetString(txxx,NumToStr(abs(value11-value12),2)); if abs(value11-value12) < 1 Then { Text_SetColor(Txxx,magenta); Text_SetSize(txxx,글씨대); } Else { Text_SetColor(Txxx,magenta); Text_SetSize(txxx,15); } Box_SetEnd(dboxx,NextBarSdate,NextBarStime,xlow); } } TL_SetSize(sTL1,선두께); 사각박스지표 선행지표 부탁드립니다. 선행지표 Input:a(9),b(26),d(52); var : 전환선(0),기준선(0),후행스팬(0),선행스팬1(0),선행스팬2(0),선행스팬3(0),선행스팬4(0); 전환선 = (highest(H,1)+lowest(L,1))/2; 기준선 = (highest(H,b)+lowest(L,b))/2; 후행스팬 = C; 선행스팬1 = (전환선+기준선)/2; 선행스팬2 = (highest(H,d)+lowest(L,d))/2; if 전환선 >= C then Plot1(전환선, "전환선",blue); Else Plot1(전환선, "전환선",RED); if 기준선 >= C then Plot2(기준선, "기준선",BLUE); Else Plot2(기준선, "기준선",red); Plot3(후행스팬, "후행스팬"); if 선행스팬1 >= C then Plot4(선행스팬1, "선행스팬1",BLUE); Else Plot4(선행스팬1, "선행스팬1",RED); if 선행스팬2 >= C then Plot5(선행스팬2, "선행스팬2",BLUE); Else Plot5(선행스팬2, "선행스팬2",RED);