커뮤니티

예스랭귀지 Q&A

글쓰기
답변완료

서식 부탁드립니다.

본 서식에서 추가 서식 부탁드립니다. # KOSPI 선물 10분봉 input: tt(150000); var: chkP(3), reChkP(20), stopChk(10); var: HH(0), LL(0), BS(0), SS(0); var: dayChk(0); if BarIndex == 0 then ClearDebug(); if dayindex == chkP then { HH = Highest(Max(C,O), chkP+1); LL = Lowest(Min(C,O), chkP+1); #if date == 20240612 then messageLog("--HH %.2f, LL: %.2f", HH, LL); } #if High >= HH and MarketPosition == 0 and ExitDate(1) < Date and time > 93000 then messageLog("HH %.2f, High: %.2f", HH, High); if DayIndex >= chkP # and Time < 95000 and sDate == NextBarSdate and EntryDate(0) < Date and EntryDate(1) < Date Then { Buy("B1", AtStop, HH); Sell("S1", AtStop, LL); } //if dayChk == 0 and High >= HH and MarketPosition == 0 and ExitDate(1) < Date and time > 93000 then { // messageLog("HH %.2f, High: %.2f", HH, High); // dayChk = 1; //} if ExitDate(1) == Date and Time < 150000 // and LatestEntryName(1) != "B2" // and LatestEntryName(1) != "S2" // and LatestEntryName(0) != "B2" // and LatestEntryName(0) != "S2" Then { if DayIndex < reChkP Then { HH = Highest(Max(C,O), DayIndex+1); LL = Lowest(Min(C,O), DayIndex+1); } Else { HH = Highest(Max(C,O), reChkP); LL = Lowest(Min(C,O), reChkP); } Buy("B2", AtStop, HH); Sell("S2", AtStop, LL); } if (MarketPosition == 1) Then { if DayIndex < stopChk Then { BS = Lowest(Min(C,O), DayIndex+1); } Else { BS = Lowest(Min(C,O), stopChk); } ExitLong("EL", AtStop, BS); } if (MarketPosition == -1) Then { if DayIndex < stopChk Then { SS = Highest(Max(C,O), DayIndex+1); } Else { SS = Highest(Max(C,O), stopChk); } #messageLog(" SS %.2f", SS); ExitShort("ES", AtStop, SS); } SetStopEndofday(1530); 1. 하루에 한번만 진입 2. 오전 12시까지만 진입 3. 전날 종가대비 3pt 이상 갭 상승(하락)시 진입 금지 *각 공히 당일 청산입니다. 위의 3가지 경우의 서식을 각각 부탁드립니다. 바쁘시더라도 부탁드리겠습니다. 감사합니다.
프로필 이미지
가자아이
2024-09-19
640
글번호 183538
시스템
답변완료

한가지 여쭤보겠습니다

안녕하세요 명절 잘 보내셨는지요 한 가지 여쭤보고 싶습니다 수식에서 For cnt = Index-var1 to Index-var2 { if Var5 == 0 or (Var5 > 0 and h[cnt] > Var5) Then Var5 = h[cnt]; } 이렇게 작성한 부분과 뒤에서 마지막 문단에 If VAR5 > 0 Then { PLOT35(VAR5,"INTER TL HH",Tomato); plot35 로 연결이 되는데요 만약에 cnt = index-var1 to index-var2 가 3개 미만인 구간은 무시하고 var5 를 plot 하고 싶습니다 그리고 다른 경우로 cnt 가 3개 미만일때는 magenta 로 표현하는 방법도 알고 싶습니다 아래는 수식 전체입니다 input : n(20); var : cnt(0),hh(0),hb(0),ll(0),lb(0),TL(0),TXn(0),txper(0),TXpaa(0),nline(0),tl2(0); var : txx(0),TXper1(0); var : hd(0),ht(0),hd1(0),ht1(0),hv(0),hv1(0), LD(0), LT(0), LV (0), LD1(0), LT1(0),LV1(0); var: TLH(0),TLH1(0),TLH2(0),TLH3(0),TLH4(0),TLH5(0), TLL(0),TLL1(0),TLL2(0),TLL3(0),TLL4(0),TLL5(0); if CountIf(H >= L*1.08,n) >= 2 Then { hh = 0; hb = 0; ll = 0; lb = 0; For cnt = 0 to n-1 { if hh == 0 or (hh > 0 and h[cnt] > hh) Then { hh = h[cnt]; hb = cnt; } if ll == 0 or (ll > 0 and l[cnt] < ll) Then { ll = l[cnt]; lb = cnt; } } if (hB < lB AND ll *1.13 <H and (hh != Var3 and ll != Var4) ) OR (hB > lB AND LL>H*0.70 and (hh != Var3 and ll != Var4) ) Then { hd = sDate[hb]; ht = sTime[hb]; hv = hh; hd1 = hd[1]; ht1 = ht[1]; hv1 = hv[1]; if hv1 > 0 Then { TLH1 = TLH[1]; TLH2 = TLH1[1]; TLH3 = TLH2[1]; TLH4 = TLH3[1]; TLH5= TLH4[1]; TL_SetExtRight(TLH5,False); TLH = TL_new(hd1,ht1,hv1,hd,ht,hv); TL_SetExtRight(TLH,True); IF (HV > HV1*0.9 AND HV < HV1*1.09) OR (HV1 > HV*0.9 AND HV1 <HV*1.09) TheN TL_SetColoR(TLH,LightGreen); } LD = sDatE[LB]; LT = sTimE[LB]; LV = LL; LD1 = LD[1]; LT1 = LT[1]; LV1 = LV[1]; IF LV1 > 0 TheN { TLL1 = TLL[1]; TLL2 = TLL1[1]; TLL3 = TLL2[1]; TLL4 = TLL3[1]; TLL5= TLL4[1]; TL_SetExtRighT(TLL5,FalsE); TLL= TL_NEW(LD1,LT1,LV1,LD,LT,LV); TL_SetExtRighT(TLL,TRUE); TL_SetColoR(TLL,Yellow); } VAR3 = hh; VAR4 = ll; VAR1 = Index[lb]; VAR2 = VAR1[1]; if VAR2 > 0 Then { VAR5 = 0; For cnt = Index-var1 to Index-var2 { if Var5 == 0 or (Var5 > 0 and h[cnt] > Var5) Then Var5 = h[cnt]; } } if var1 >= Var2 Then { TL = TL_New(sDate[lb],sTime[lb],ll,sDate[hb],sTime[hb],hh); TL_SetDrawMode(tl,1); TL_SetColoR(TL,Cyan); TXper= text_new(sDate[lb],sTime[lb],ll,"★"); Text_SetStyle(txper,2,0); Text_SetSizE(TXPER,18); Text_SetColor(txper,MagentA); TXpaa= text_new(sDate[HB],sTime[HB],HH,"★"); Text_SetStyle(TXPAA,2,0); Text_SetSizE(TXPAA,15); Text_SetColor(tXPAA,LightGreen); } } } if lb > hb Then { TL_SetColor(TL,LIGHTReD); TL_SetStyle(tl,2); TL_SetDrawMode(tl,1); } Else { TL_SetColor(TL,LightBlue); TL_SetStyle(tl,2); } if (abs(hb-lb) <= 9) Then { TL_SetColor(tl,LightGreen); TL_SetStyle(tl,3); } If VAR5 > 0 Then { PLOT35(VAR5,"INTER TL HH",Tomato); IF CrossUP(C,Var5) Then PLOT34(C,"CROSS구간고가",CyaN); }
프로필 이미지
yamu
2024-09-19
692
글번호 183534
지표
답변완료

두가지 조건에 만족하는 조건검색식 부탁드립니다. 항상 수고에 감사드립니다.

1 VAR : A(0),A1(False),A2(False),A3(0),PL(False); PL= L[5] < L[9] && L[5] < L[8] && L[5] < L[7] && L[5] < L[6] && L[5] < L[4] && L[5] < L[3] && L[5] < L[2] && L[5] < L[1] && L[5] < L[0]; IF PL==TRUE TheN A=L[5]; A1=A[1]<A; A2=MA(c,224)<C; IF A1=TRUE && A2==TRUE TheN A3=A; IF CROSSUP(C, A3) TheN Find(1); ======================================= 2 INPUT : period(20),기간1(12),기간2(5),기간3(5); VAR : A(0),B(0),GB(0),GS(0),SS(0),AA(0); A=(C - lowest(C, period))/C*100; GB=max(A, 0); B=(highest(C, period) -C)/C*100; GS=max(B, 0); SS=AccumN(C-lowest(L,기간1),기간2) /AccumN((highest(H,기간1)-lowest(L,기간1)),기간2)* 100; //스토케스틱 슬로우 본선 AA=EmA(SS, 기간3); //스토케스틱 시그널선 IF CROSSUP(GB, GS) && C>O && SS[1]<=20 && (CROSSUP(SS,AA) OR CROSSUP(SS,20)) TheN Find(1);
프로필 이미지
그냥저냥
2024-09-19
563
글번호 183533
종목검색

타요 님에 의해서 삭제되었습니다.

프로필 이미지
타요
2024-09-19
45
글번호 183523
사용자 함수

와우리 님에 의해서 삭제되었습니다.

프로필 이미지
와우리
2024-09-19
11
글번호 183502
지표
답변완료

수식 부탁드립니다

1 매수신호 나올때 마다 매수,신호 바뀌면 청산후 무포지션 (단순이동평균 5 20) 2 매도신호 나올때 마다 매도,신호 바뀌면 청산후 무포지션 (단순이동평균 5 20) 3 매수신호 나오면 2개 매수,신호 바뀌면 2개 청산하고 매도 1개 다시 신호 바뀌면 매도 1개 청산하고 2개 매수 계속반복 (단순이동평균 5 20) 4 매도신호 나오면 2개 매도,신호 바뀌면 2개 청산하고 매수 1개 다시 신호 바뀌면 매수 1개 청산하고 2개 매도 계속반복 (단순이동평균 5 20) 감사합니다
프로필 이미지
a초보
2024-09-19
540
글번호 183501
시스템

와우리 님에 의해서 삭제되었습니다.

프로필 이미지
와우리
2024-09-19
13
글번호 183500
지표
답변완료

종목 검색식 문의 드립니다.

안녕하세요, 조건 검색식 문의 드립니다. 5분봉에서 종가가 VWAP선 위에 있거나, 아래에 있다가 돌파하는 종목 검색식을 만들고 싶습니다. 그리고 VWAP선은 2개로 쓰고 싶습니다. (종가만 이용: sum(c*v),고저종 이용:sum(((h+l+c)/3)*v) ) 그래서 이 2개의 VWAP선을 모두 돌파하거나 위에 있는 종목 검색식을 알려주시면 감사드리겠습니다.
프로필 이미지
amdbwww
2024-09-19
714
글번호 183499
종목검색
답변완료

문의드립니다

input : tenkan_len(9),tenkan_mult(2),kijun_len(26),kijun_mult(4),spanB_len(52),spanB_mult(6),offset(26); Input : 당일수익틱수(100),당일손실틱수(200); Var : N1(0),dayPl(0),당일수익(0),당일손실(0); var : Xcond(false); var : ATR1(0),up1(0),dn1(0),upper1(0),lower1(0),os1(0),spt1(0),max1(0),min1(0),tenkan(0); var : ATR2(0),up2(0),dn2(0),upper2(0),lower2(0),os2(0),spt2(0),max2(0),min2(0),kijun(0); var : senkouA(0); var : ATR3(0),up3(0),dn3(0),upper3(0),lower3(0),os3(0),spt3(0),max3(0),min3(0),senkouB(0); var : tenkan_css(0),kijun_css(0),cloud_a(0),cloud_b(0),chikou_css(0),tx(0); ATR1 = ATR(tenkan_len)*tenkan_mult; up1 = (h+L)/2 + ATR1; dn1 = (h+L)/2 - ATR1; upper1 = iff(C[1] < upper1[1],min(up1,upper1[1]),up1); lower1 = iff(C[1] > lower1[1],max(dn1,lower1[1]),dn1); os1 = iff(c > upper1 , 1 ,IFf(c < lower1, 0 , os1[1])); spt1 = iff(os1 == 1 , lower1 , upper1); max1 = iff(CrossUp(c,spt1) or CrossDown(c,spt1) , max(c,max1[1]) , IFf(os1 == 1 , max(c,max1[1]) , spt1)); min1 = iff(CrossUp(c,spt1) or CrossDown(c,spt1) , min(c,min1[1]) , iff(os1 == 0 , min(c,min1[1]) , spt1)); tenkan = avg(max1,min1); ATR2 = ATR(kijun_len)*kijun_mult; up2 = (h+L)/2 + ATR2; dn2 = (h+L)/2 - ATR2; upper2 = iff(C[1] < upper2[1],min(up2,upper2[1]),up2); lower2 = iff(C[1] > lower2[1],max(dn2,lower2[1]),dn2); os2 = iff(c > upper2 , 1 ,IFf(c < lower2, 0 , os2[1])); spt2 = iff(os2 == 1 , lower2 , upper2); max2 = iff(CrossUp(c,spt2) or CrossDown(c,spt2) , max(c,max2[1]) , IFf(os2 == 1 , max(c,max2[1]) , spt2)); min2 = iff(CrossUp(c,spt2) or CrossDown(c,spt2) , min(c,min2[1]) , iff(os2 == 0 , min(c,min2[1]) , spt2)); kijun = avg(max2,min2); senkouA = avg(kijun,tenkan); ATR3 = ATR(spanB_len)*spanB_mult; up3 = (h+L)/2 + ATR3; dn3 = (h+L)/2 - ATR3; upper3 = iff(C[1] < upper3[1],min(up3,upper3[1]),up3); lower3 = iff(C[1] > lower3[1],max(dn3,lower3[1]),dn3); os3 = iff(c > upper3 , 1 ,IFf(c < lower3, 0 , os3[1])); spt3 = iff(os3 == 1 , lower3 , upper3); max3 = iff(CrossUp(c,spt3) or CrossDown(c,spt3) , max(c,max3[1]) , IFf(os3 == 1 , max(c,max3[1]) , spt3)); min3 = iff(CrossUp(c,spt3) or CrossDown(c,spt3) , min(c,min3[1]) , iff(os3 == 0 , min(c,min3[1]) , spt3)); senkouB = avg(max3,min3); tenkan_css = Red; kijun_css = Blue; cloud_a = teal; cloud_b = red; chikou_css = Green; 당일수익 = PriceScale*당일수익틱수; 당일손실 = PriceScale*당일손실틱수; if Bdate != Bdate[1] Then { Xcond = false; N1 = NetProfit; } daypl = NetProfit-N1; if TotalTrades > TotalTrades[1] then { if daypl >= 당일수익 or daypl <= -당일손실 Then Xcond = true; if (IsExitName("dbp",1) == true or IsExitName("dbl",1) == true or IsExitName("dsp",1) == true or IsExitName("dsl",1) == true) then Xcond = true; } if Xcond == false Then { if CrossUp(tenkan,kijun) Then { Buy(); } if CrossDown(tenkan,kijun) Then { sell(); } } if MarketPosition == 1 then { ExitLong("dbp",atlimit,EntryPrice+((당일수익-daypl)/CurrentContracts)); ExitLong("dbl",AtStop,EntryPrice-((당일손실+daypl)/CurrentContracts)); } if MarketPosition == -1 then{ ExitShort("dsp",atlimit,EntryPrice-((당일수익-daypl)/CurrentContracts)); ExitShort("dsl",AtStop,EntryPrice+((당일손실+daypl)/CurrentContracts)); } 수고많으십니다 얼마전 만들어주신 수식인데 한가지 더 추가 부탁드리겠습니다 매수 신호인 경우 Kijun-Sen이 직전봉보다 내려가면 진입금지 매도 청산 매도 신호인 경우 Kijun-Sen이 직전봉보다 올라가면 진입금지 매수 청산 이수식을 추가하고싶어 도움 부탁드립니다 감사합니다
프로필 이미지
cjfdk
2024-09-19
717
글번호 183498
시스템
답변완료

수식 부탁드립니다.

수고하십니다. 앞전에 매매된 수익을 변수에 담고 싶습니다. 앞전에 매도가 0.45 수익이면 mame=-1 bef=0.45 앞전에 매수가 -0.45 손실이면 mame=-1 bref=-0.45
프로필 이미지
구름달
2024-09-19
595
글번호 183497
시스템