*역배열 종목 검색식 부탁 드려요 첫번째배열 밑에서 60 120 240 (지수) 두번째배열 밑에서 120 60 240 (지수) 세번째배열 밑에서 120 240 480 (지수) 위의 세가지 배열을 같이 합쳐서 "1개의 검색식"으로 구현 할수 있도록 부탁드려요

안녕하세요 질문 2가지 부탁드립니다 질문1) text_new 관련해서 질문드립니다 현재 메인차트 하단에 거래대금 지표를 따로 표시를 했는데요 text 함수로 봉 마다 거래대금 값 (var33 의 값) 을 나타내려고 합니다 텍스트 위치는 막대 (막대차트로 표현) 상단보다 조금 높은 위치로 해주세요 메인차트가 아니라 분리된 하단 차트에 나타내고 싶습니다 질문2) 수식에서 cc 배열 값을 연결하는 추세선 ttl2 배열을 만들어 주셨으면 합니다 cc 의 전값이 (cc[1]) 이 다음값 cc[0] 을 연결하는 추세선을 최근 "10개 까지만 보이게" 부탁합니다 수식은 질문1, 질문2 용으로 각각 올렸습니다 질문1 수식 = var : cnt(0), sum1(0), sumi1(0),summ(0),tt(0),hh(0),ll(0),tl(0),tl1(0),tx1(0); var: sum2(0),sumi2(0),sumaa(0); var : t(0),StartBarIndex(0),dd(0),d1(0),d2(0),ee(0),e1(0),e2(0); Array : ii[50](0),aa[50](0),bb[50](0),cc[50](0),vv[150](0),ttl[30](0); Var33=(floor(Money/100000000/10)*10); if Bdate != Bdate[1] Then DD = DD+1; #H>vi(1)*0.95 h>l*1.07 if h>min(l,l[1])*1.08 Then { d1 = dd; d2 = d1[1]; #if d1 >= d2+1 Then #if d2 == 0 or (d2 > 0 and d1 >= d2+3) Then if d2 == 0 or (d2 > 0 and d1 >= d2+5) Then { var1 = Index; Var2 = var1[1]; Var3= Var2[1]; sum1=0; sumi1=0; summ=0; For cnt = 1 to (var1-Var2) { sum1=sum1+h[cnt]; sumi1=sumi1+1; summ=summ+Var33[cnt]; } value1=sum1/sumi1; For cnt = 0 to 150 { vv[cnt]=0; } For cnt = 1 to (var1-Var2) { vv[cnt-1]=h[cnt]; } Plot12(summ,"Money",Orange,Def,1); tx1=text_new(sDate,sTime,l,""); } } 질문2 수식= var : cnt(0), sum1(0), sumi1(0),summ(0),tt(0),hh(0),ll(0),tl(0),tl1(0); var: sum2(0),sumi2(0),sumaa(0); var : t(0),StartBarIndex(0),dd(0),d1(0),d2(0),ee(0),e1(0),e2(0); Array : ii[50](0),aa[50](0),bb[50](0),cc[50](0),vv[150](0),ttl[30](0); if Bdate != Bdate[1] Then DD = DD+1; if h>min(l,l[1])*1.08 Then { d1 = dd; d2 = d1[1]; #if d1 >= d2+1 Then #if d2 == 0 or (d2 > 0 and d1 >= d2+3) Then if d2 == 0 or (d2 > 0 and d1 >= d2+5) Then { var1 = Index; Var2 = var1[1]; Var3= Var2[1]; sum1=0; sumi1=0; tl=TL_NEW(sDatE,sTimE,100,sDatE,sTimE,999999); TL_SetSize(tl,0); TL_SetColor(tl,Gray); For cnt = 1 to (var1-Var2) { sum1=sum1+h[cnt]; sumi1=sumi1+1; } value1=sum1/sumi1; For cnt = 0 to 150 { vv[cnt]=0; } For cnt = 1 to (var1-Var2) { vv[cnt-1]=h[cnt]; } Var20=Money/100000000; if Var20>30 Then { For cnt = 49 DownTo 1 { cc[cnt]= cc[cnt-1]; } cc[0]=value1*0.666; # Plot11(cc[0],"hma",Red,Def,1); } For cnt = 30 DownTo 1 { ttl[cnt] =ttl[cnt-1]; } TL_SetExtRight(ttl[10],False); ttl[0]=tl_new(sDate,sTime,cc[0],NextBarSdate,NextBarStime,CC[0]); TL_SetSize(ttl[0],1); TL_SetExtRight(ttl[0],true); } } Else { if CC[0] > 0 Then TL_SetEnd(ttl[0],sDate,sTime,CC[0]); }

안녕하세요 ~ 아래의 매수선을 돌파하는 검색식 부탁 드립니다. A=highest(h,3); B=Lowest(L,3); D=(A+B)/2+(A-B)*0.382; d1=crossup(c,D)&& c>o*1.02; d2=crossdown(c,D); E=valuewhen(1, d1 or d2, o); e1=crossup(c,E); e2=crossdown(c,E); R=valuewhen(1, e1 or e2, o); r1=crossup(c,R); r2=crossdown(c,R); S=valuewhen(1, r1 or r2, o); T=wavg(S,2)*1.0062; wavg(T,2) 감사합니다.

input : MaPeriod(2),MaPeriod2(1); var : maOpen(0),maClose(0),maLow(0),maHigh(0); var : haOpen(0),haClose(0),haLow(0),haHigh(0); var : ExtMapBuffer1(0),ExtMapBuffer2(0),ExtMapBuffer3(0),ExtMapBuffer4(0); Array : ExtMapBuffer5[100](0),ExtMapBuffer6[100](0),ExtMapBuffer7[100](0),ExtMapBuffer8[100](0); var : r(0),g(0),b(0), TL(0),t(0),tx(0); var : ii(0),cnt(0); var : sum1(0),sum2(0),sum3(0),sum4(0),csum(0); var : maOpen1(0),maClose1(0),maLow1(0),maHigh1(0); var : WMA1(0),WMA2(0),WMA3(0),WMA4(0); if Bdate != Bdate[1] Then { For cnt = 99 DownTo 1 { ExtMapBuffer5[cnt] = ExtMapBuffer5[cnt-1]; ExtMapBuffer6[cnt] = ExtMapBuffer6[cnt-1]; ExtMapBuffer7[cnt] = ExtMapBuffer7[cnt-1]; ExtMapBuffer8[cnt] = ExtMapBuffer8[cnt-1]; } ii = ii +1; maOpen1 = maOpen[1]; maClose1 = maClose[1]; maLow1 = maLow[1]; maHigh1 = maHigh[1]; } if ii == 0 Then { maOpen=dayOpen; maClose=dayClose; maLow=dayLow; maHigh=dayHigh; } Else { maOpen=(maOpen1*(MAperiod-1)+dayOpen)/MAPeriod; maClose=(maClose1*(MAperiod-1)+dayClose)/MAPeriod; maLow=(maLow1*(MAperiod-1)+dayLow)/MAPeriod; maHigh=(maHigh1*(MAperiod-1)+dayHigh)/MAPeriod; haOpen=(ExtMapBuffer5[1]+ExtMapBuffer6[1])/2; haClose=(maOpen+maHigh+maLow+maClose)/4; haHigh=Max(maHigh, Max(haOpen, haClose)); haLow=Min(maLow, Min(haOpen, haClose)); if (haOpen<haClose) then { r=255; g=10; b=0; ExtMapBuffer7[0]=haLow; ExtMapBuffer8[0]=haHigh; t = 1; } else { r=0; g=191; b=255; ExtMapBuffer7[0]=haHigh; ExtMapBuffer8[0]=haLow; t = -1; } ExtMapBuffer5[0]=haOpen; ExtMapBuffer6[0]=haClose; if ExtMapBuffer5[maPeriod2-1] > 0 Then { Sum1 = 0; Sum2 = 0; Sum3 = 0; Sum4 = 0; CSum = 0; For cnt = 0 To maPeriod2 - 1 { Sum1 = Sum1 + ExtMapBuffer7[cnt] * (maPeriod2 - cnt); Sum2 = Sum2 + ExtMapBuffer8[cnt] * (maPeriod2 - cnt); Sum3 = Sum3 + ExtMapBuffer5[cnt] * (maPeriod2 - cnt); Sum4 = Sum4 + ExtMapBuffer6[cnt] * (maPeriod2 - cnt); CSum = CSum + maPeriod2 - cnt; } ExtMapBuffer1 = Sum1/CSum; ExtMapBuffer2 = Sum2/CSum; ExtMapBuffer3 = Sum3/CSum; ExtMapBuffer4 = Sum4/CSum; plot1(ExtMapBuffer1); plot2(ExtMapBuffer2); plot3(ExtMapBuffer3); plot4(ExtMapBuffer4); } } 지난번 일봉을 분봉 답변해 주신건데요.타주기 60분봉를 5분봉에 그리고 싶어서 해봤는데 다른 값이 나와 문의 합니다.

감사합니다. 추가적으로 질문을 드리고 싶습니다. 제가 서적을 참조해서 작성해놓은 예스스팟식으로 자동 매수 매도 주문을 해놓으니까 캡쳐된 사진처럼 주문가격이 '0원'인데 혹시 이게 왜 이럴까요?ㅠㅠ 아래 코드 보시고 검토가 가능하실지 문의 드립니다. 시험 매매 돌려놓은 것입니다. 저는 일단 1주씩 '매수조건'으로 검색이 되는 즉시 시장가 매수 이후 '매도조건'일 경우 자동 매도가 되게 구현을 하고 싶습니다. 초보적인 질문을 계속 드려서 죄송합니다. var timer5 = 2; // 2초 var 매수금 = 100000; var OrderList = []; var MKList = []; var req; var 종목제한수 = 10; var Search; function Main_OnStart() { Main.SetTimer(1, timer5 * 1000); MKList = []; Search = 1; } function Main_OnTimer(nEventID) { var d = new Date(); YYYYMMDD = d.getFullYear() * 10000 + (d.getMonth() + 1) * 100 + d.getDate(); HHMMSS = d.getHours() * 10000 + d.getMinutes() * 100 + d.getSeconds(); if (nEventID == 1 && HHMMSS > 090000 && HHMMSS < 151800) { Main.MessageList(Search); if (Search == 1) { Main.ReqPowerSearch("매수조건"); } else { Main.ReqPowerSearch("매도조건"); } Main.KillTimer(1); } if (nEventID == 2) { Main.ReqMarketData(OrderList[req]); Main.KillTimer(2); } } function Main_OnRcvItemList(aItemList, nCount) { Main.MessageList(nCount); OrderList = []; if (Search == 1) { if (nCount >= 1) { if (MKList.length == 0) { OrderList = aItemList.slice(0, 종목제한수); } else { for (var a = 0; a < nCount; a++) { var Add = true; for (var b = 0; b < MKList.length; b++) { if (aItemList[a] == MKList[b].code) { Add = false; } } if (Add == true && !IsStockInAccount(aItemList[a])) { OrderList.push(aItemList[a]); if (OrderList.length >= 종목제한수) { break; } } } } if (OrderList.length == 0) { Main.SetTimer(1, timer5 * 1000); } else { req = 0; Main.ReqMarketData(OrderList[req]); } } Search = -1; } else { if (nCount >= 1) { for (var a = 0; a < aItemList.Length; a++) { for (var b = 0; b < MKList.length; b++) { if (aItemList[a] == MKList[b].code) { Account1.SetBalance(aItemList[a], 0); if (Account1.Balance.count > 0) { Account1.OrderSell(Account1.Balance.code,Account1.Balance.countc,0,1); } } } } } Main.SetTimer(1, timer5 * 1000); Search = 1; } } function Main_OnRcvMarketData(MarketData) { if (MarketData.code == OrderList[req]) { MKList.push(MarketData); if (!IsStockInAccount(MarketData.code)) { Account1.OrderBuy(MarketData.code, 1, 0, 1); Main.MessageList(MarketData.code + " 주식을 매수합니다."); } else { Main.MessageList(MarketData.code + " 주식은 이미 계좌에 있으므로 매수하지 않습니다."); } req = req + 1; if (req < OrderList.length) { var aa = Main.ReqMarketData(OrderList[req]); if (aa == -1) { Main.SetTimer(2, 15000); } } else { Main.SetTimer(1, timer5 * 1000); } } } function IsStockInAccount(stockCode) { var numberOfBalances = Account1.GetTheNumberOfBalances(); for (var i = 0; i < numberOfBalances; i++) { Account1.SetBalance(i); if (stockCode == Account1.Balance.code) { return true; } } return false; }

매번 잘 알려주셔서 너무 감사합니다. 다름 아니라 아래 2가지 건 질문을 추가로 드릴려고 하는데 확인 한번 부탁드립니다. 1. 코인 시스템 구성을 하고 있는데 혹시 손절로 인한 매도(exitlong)이 실행되었을 경우 그 이후 10봉 까지는 매수 금지 뭐 그런 게 식으로 구현이 될지 문의를 드립니다. 2. 주식 예스트레이더(x64) 예스스팟으로 제가 매수/매도 조건식해놓고 있는데 매수 조건식으로 검색되는 종목이라도 매수가 안되는 경우가 많던데 이것도 혹시 예스트레이더 코인 처럼 계속 프로그램을 켜놔야 하나요? 3. 예스트레이더켜놓고 있어보니까(가상서버로) 자꾸 다음날 아침에는 접속이 끊어지고 그러던데 접속이 안끊어지게(코인처럼) 계속 켜놓을 수 있는 방법이 없는지(접속 끊김이 발생하지 않도록 할수 있는지) 문의 드립니다. 4. 마지막으로 제가 작성해놓은 예스스팟식으로 자동주문을 해놓으니까 캡쳐된 사진처럼 주문가격이 '0원'인데 혹시 이게 왜 이럴까요?ㅠㅠ 아래 코드 보시고 검토가 가능하실지 문의 드립니다. 초보적인 질문을 계속 드려서 죄송합니다. var timer5 = 2; // 2초 var 매수금 = 100000; var OrderList = []; var MKList = []; var req; var 종목제한수 = 10; var Search; function Main_OnStart() { Main.SetTimer(1, timer5 * 1000); MKList = []; Search = 1; } function Main_OnTimer(nEventID) { var d = new Date(); YYYYMMDD = d.getFullYear() * 10000 + (d.getMonth() + 1) * 100 + d.getDate(); HHMMSS = d.getHours() * 10000 + d.getMinutes() * 100 + d.getSeconds(); if (nEventID == 1 && HHMMSS > 090000 && HHMMSS < 151800) { Main.MessageList(Search); if (Search == 1) { Main.ReqPowerSearch("매수조건"); } else { Main.ReqPowerSearch("매도조건"); } Main.KillTimer(1); } if (nEventID == 2) { Main.ReqMarketData(OrderList[req]); Main.KillTimer(2); } } function Main_OnRcvItemList(aItemList, nCount) { Main.MessageList(nCount); OrderList = []; if (Search == 1) { if (nCount >= 1) { if (MKList.length == 0) { OrderList = aItemList.slice(0, 종목제한수); } else { for (var a = 0; a < nCount; a++) { var Add = true; for (var b = 0; b < MKList.length; b++) { if (aItemList[a] == MKList[b].code) { Add = false; } } if (Add == true && !IsStockInAccount(aItemList[a])) { OrderList.push(aItemList[a]); if (OrderList.length >= 종목제한수) { break; } } } } if (OrderList.length == 0) { Main.SetTimer(1, timer5 * 1000); } else { req = 0; Main.ReqMarketData(OrderList[req]); } } Search = -1; } else { if (nCount >= 1) { for (var a = 0; a < aItemList.Length; a++) { for (var b = 0; b < MKList.length; b++) { if (aItemList[a] == MKList[b].code) { Account1.SetBalance(aItemList[a], 0); if (Account1.Balance.count > 0) { Account1.OrderSell(Account1.Balance.code,Account1.Balance.countc,0,1); } } } } } Main.SetTimer(1, timer5 * 1000); Search = 1; } } function Main_OnRcvMarketData(MarketData) { if (MarketData.code == OrderList[req]) { MKList.push(MarketData); if (!IsStockInAccount(MarketData.code)) { Account1.OrderBuy(MarketData.code, 1, 0, 1); Main.MessageList(MarketData.code + " 주식을 매수합니다."); } else { Main.MessageList(MarketData.code + " 주식은 이미 계좌에 있으므로 매수하지 않습니다."); } req = req + 1; if (req < OrderList.length) { var aa = Main.ReqMarketData(OrderList[req]); if (aa == -1) { Main.SetTimer(2, 15000); } } else { Main.SetTimer(1, timer5 * 1000); } } } function IsStockInAccount(stockCode) { var numberOfBalances = Account1.GetTheNumberOfBalances(); for (var i = 0; i < numberOfBalances; i++) { Account1.SetBalance(i); if (stockCode == Account1.Balance.code) { return true; } } return false; }

input : n(5); var1= ma(c,n); if crossup (c, var1) then buy(); if crossdown (c, var1) then exitlong(); ----------------------------------- 차트속성에서 일간갭보정한 차트를 사용하는경우 위식을 적용하면 신호가 제대로 안나옵니다 갭보정한 차트에서 저 시스템을 식을 적용할수 있는 방법이 있을까요?

그림처럼 매도 진입 후 주가가 상승하여 손절하였으나 다시 하락하여 시가로 오면 시가에 재진입한다. 는 식을 만들 수 있는 가요?

데이트레이딩 k200선물 5분봉 금일 발생봉 기준(어제봉 제외) 아래 수식에 갭하락 발생시 진입시간을 변경하는 조건을 추가하고 싶습니다 dayclose(1)-dayopen>=7.5 갭하락이 발생한 경우 아래 수식의 진입시간을 084500에서 091500 으로 변경하는 내용을 수식에 추가해 주십시요. 갭하락에 따라 거래를 할지 말지를 판단하는 것이 아니라 갭하락에 따라 진입시간을 구분하여 적용하는 것입니다. ex) 금일 하락갭이 7.5포인트 미만이면 진입시간은 084500 금일 하락갭이 7.5포인트 이상이면 진입시간은 091500 항상 고맙습니다. *************************************************************************************** input : b1(60),진입눌림1(0),진입돌파1(0); input : 진입시간(084500),진입제한시간(120000); var : T1(0),entry(0),HH(0),LL(0),EH(0),EL(0),E1(0),H1(0),i1(0),S1(0),L1(0),V1(0); var : Tcond(false); if (sdate != sdate[1] and stime >= 진입시간) or (sdate == sdate[1] and stime >= 진입시간 and stime[1] < 진입시간) Then Tcond = true; if (sdate != sdate[1] and stime >= 진입제한시간) or (sdate == sdate[1] and stime >= 진입제한시간 and stime[1] < 진입제한시간) Then Tcond = false; if (sdate != sdate[1] and stime >= 진입시간) or (sdate == sdate[1] and stime >= 진입시간 and stime[1] < 진입시간) Then{ T1 = TotalTrades; E1 = 0; HH = H; } if stime >= 진입시간 then{ if H > HH Then HH = H; if MarketPosition == 0 Then entry = TotalTrades-T1; Else entry = (TotalTrades-T1)+1; if MarketPosition == 0 and entry == 0 Then{ if E1 == 0 and C <= HH-PriceScale*B1 Then{ E1 = 1; L1 = L; i1 = index; V1 = HH; //시작점 종가 } if E1 == 1 and index > i1 then{ if L < L1 Then L1 = L; #고가가 시작봉종가보다 작을 때만 눌림체크 if H <= V1 and H >= L1+PriceScale*진입눌림1 Then{ E1 = 2; i1 = index; S1 = L1; } } //시작점 종가보다 높은 가격이 발생하면 초기화 if E1 >= 1 and H > V1 Then{ E1 = 0; HH = H; } if E1 == 2 and index > i1 and C <= S1-PriceScale*진입돌파1 and Tcond == true Then{ sell("s"); } } }