커뮤니티

예스랭귀지 Q&A

글쓰기

관리자에 의해 프로그램 사용법 QnA로 이동되었습니다

프로필 이미지
히익
2022-10-25
6
글번호 163257
시스템
답변완료

문의드립니다

아래 지표식에서 지표 라인의 색상이 바뀌면 화면바탕색도 바뀌게 하고싶습니다 검색해보니까 강조식으로 이런식으로 표현하는거 같은데요. (예를 든겁니다) input : P(20); var : T(0); var1 = ma(C,P); if var1 > var1[1] Then T = 1; if var1 < var1[1] Then T = -1; if T == 1 Then PlotPaintBar(99999999,0,"강조",RED); if T == -1 Then PlotPaintBar(99999999,0,"강조",BLUE); --------------------------------------------- 2가지 버전으로 부탁합니다 1. 아래지표식에서 Plot1 ht 의 색상이 바뀔때 바탕화면 색도 바뀌는 강조식 2. ht의 색상이 바뀔때 세로선이 그어지게 하는 지표식 감사합니다 if trend == 0 Then { if IsNaN(trend[1]) == False and trend[1] != 0 Then { up = iff(IsNaN(down[1]) == true,down,down[1]); arrowUp = up - atr2; } else { up = iff(IsNan(up[1]) == true, maxLowPrice , max(maxLowPrice, up[1])); } atrHigh = up + dev; atrLow = up - dev; } else { if isnan(trend[1]) == False and trend[1] != 1 Then { down = iff(IsNan(up[1]) == true, up , up[1]); arrowDown = down + atr2; } else { down = iff(IsNan(down[1]) == true, minHighPrice ,min(minHighPrice, down[1])); } atrHigh = down + dev; atrLow = down - dev; } ht = iff(trend == 0 , up , down); plot1(ht, "HalfTrend",iff(trend == 0 , Rgb(255,90,90), Green));
프로필 이미지
러블리
2022-10-25
1039
글번호 163256
강조
답변완료

감사합니다

전달잘못된거같아서 죄송합니다 다시 부탁드려요 꾸벅 1번 input : Period(10); var :AA(False),VV(False),box(0); AA = crossup(C, max((highest(high,9)[25]+lowest(low,9)[25]+highest(high,26)[25]+lowest(low,26)[25])/4 , (highest(high,52)[25]+lowest(low,52)[25])/2)); VV=V>highest(V, Period)[1]; if AA and VV Then { box = Box_New(sDate,sTime,H,NextBarSdate,NextBarStime,L); Box_SetColor(box,Magenta); Box_SetFill(box,true); Box_SetExtFill(box,true); } 2번 input : midPeriod(26),period(20),d1(2); var : bb(0); bb = BollBandUp(Period,d1); if CrossUp(c,bb[midperiod-1]) Then Plot1(L,"검색"); 다른색으로 두식을 을 합처서 표현 하고자 합니다 위 캡처 처럼 부탁 드립니다 감사합니다
프로필 이미지
매치다는
2022-10-25
1085
글번호 163255
강조
답변완료

감사 합니다

1번 input : midPeriod(26),period(20),d1(2); var : bb(0); bb = BollBandUp(Period,d1); if CrossUp(c,bb[midperiod-1]) Then Plot1(L,"검색"); 2번 input : Period(10); var :AA(False),VV(False),box(0); AA = crossup(C, max((highest(high,9)[25]+lowest(low,9)[25]+highest(high,26)[25]+lowest(low,26)[25])/4 , (highest(high,52)[25]+lowest(low,52)[25])/2)); VV=V>highest(V, Period)[1]; if AA and VV Then { box = Box_New(sDate,sTime,H,NextBarSdate,NextBarStime,L); Box_SetColor(box,Magenta); Box_SetFill(box,true); Box_SetExtFill(box,true); } 1번 2번 수식으로 시스템식 부탁드립니다 1번 시스템 2번시스템으로 부탁드립니다 꾸뻑
프로필 이미지
매치다는
2022-10-24
1085
글번호 163254
시스템
답변완료

감사 합니다

1번 input : midPeriod(26),period(20),d1(2); var : bb(0); bb = BollBandUp(Period,d1); if CrossUp(c,bb[midperiod-1]) Then Plot1(L,"검색"); 2번 input : Period(10); var :AA(False),VV(False),box(0); AA = crossup(C, max((highest(high,9)[25]+lowest(low,9)[25]+highest(high,26)[25]+lowest(low,26)[25])/4 , (highest(high,52)[25]+lowest(low,52)[25])/2)); VV=V>highest(V, Period)[1]; if AA and VV Then { box = Box_New(sDate,sTime,H,NextBarSdate,NextBarStime,L); Box_SetColor(box,Magenta); Box_SetFill(box,true); Box_SetExtFill(box,true); } 1번 2번 두가지 조건으로 종목검색식 부탁드립니다 1번 2번 각 각 부탁드립니다
프로필 이미지
매치다는
2022-10-24
1024
글번호 163253
종목검색
답변완료

문의 드립니다.

input : Period(10); Var:선두께(1),상승색(red), 하락색(blue); Var:j(0),T(0); Var: date11(0),date12(0),time11(0),time12(0),TL1(0),TL(0), date21(0),date22(0),time21(0),time22(0), date31(0),date32(0),time31(0),time32(0),tx(0),tx1(0),tl4(0); Array:HiVal[20](0),LoVal[20](0),HiBar[20](0),LoBar[20](0)/*,ZZ[20](0)*/; Array:r[7](0),fr[7](0),TL2[7](0),TL3[7](0),TX2[7](0),TX3[7](0); r[0] = 0; r[1] = 2; r[2] = 3.; r[3] = -1; r[4] = -2.; r[5] = 1; r[6] = 0.5; For j = 0 To 19 { HiBar[j] = HiBar[j] + 1; LoBar[j] = LoBar[j] + 1; } if crossup(c,highest(H,Period)[1]) Then T = 1; if CrossDown(c,Lowest(L,Period)[1]) Then T = -1; If T == -1 Then { If T[1] != -1 Then { Sell(); For j = 18 DownTo 0 { LoVal[j+1] = LoVal[j]; LoBar[j+1] = LoBar[j]; //ZZ[j+1] = ZZ[j]; } LoVal[0] = L; LoBar[0] = 0; //ZZ[0] = L; date11 = date[HiBar[0]]; time11 = stime[HiBar[0]]; Value11 = HiVal[0]; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(TL1,하락색); Tx = Text_New(date11,time11,Value11,"●"); #동그라미 색상, 빨강 Text_SetColor(Tx,Green); Text_SetStyle(Tx,2,2); Text_SetSize(tx,7); //tx = Text_New(date11,time11,Value11,NumToStr(value11,2)+NewLine+NumToStr(value11,2)+NewLine); //Text_SetStyle(tx,2,1); date21 = date[HiBar[0]]; time21 = stime[HiBar[0]]; date22 = date[0]; time22 = stime[0]; for j = 0 to 6 { fr[j] = LoVal[1] + ((HiVal[0] - LoVal[1]) * r[j]); } #TL2[1] = TL_New(date21,time21,fr[1],date22,time22,fr[1]); #TL_SetColor(TL2[1],RED); #TL_SetStyle(TL2[1], 3); #TL2[2] = TL_New(date21,time21,fr[2],date22,time22,fr[2]); #TL_SetColor(TL2[2],RED); #TL_SetSize(TL2[2],1); #TX2[2] = Text_New(date22,time22,fr[2],NumToStr(fr[2],2)); #Text_SetColor(Tx2[2],BWHITE); #Text_SetStyle(TX2[2],1,1); #TL2[3] = TL_New(date21,time21,fr[3],date22,time22,fr[3]); #TL_SetColor(TL2[3],RED); #TL_SetStyle(TL2[3], 3); #TL2[4] = TL_New(date21,time21,fr[4],date22,time22,fr[4]); #TL_SetColor(TL2[4],RED); #TL_SetSize(TL2[4],1); #TX2[4] = Text_New(date22,time22,fr[4],NumToStr(fr[4],2)); #Text_SetColor(Tx2[4],BWHITE); #Text_SetStyle(TX2[4],1,0); } If LoVal[0] > L Then { LoVal[0] = L; LoBar[0] = 0; //ZZ[0] = L; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date22 = date[0]; time22 = stime[0]; TL_SetEnd(TL2[0],date22,time22,fr[0]); TL_SetEnd(TL2[1],date22,time22,fr[1]); TL_SetEnd(TL2[2],date22,time22,fr[2]); Text_SetLocation(TX2[2],date22,time22,fr[2]); TL_SetEnd(TL2[3],date22,time22,fr[3]); TL_SetEnd(TL2[4],date22,time22,fr[4]); Text_SetLocation(TX2[4],date22,time22,fr[4]); TL_SetEnd(TL2[5],date22,time22,fr[5]); TL_SetEnd(TL2[6],date22,time22,fr[6]); TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); } } If T == 1 Then { If T[1] != 1 Then { Buy(); For j = 18 DownTo 0 { HiVal[j+1] = HiVal[j]; HiBar[j+1] = HiBar[j]; //ZZ[j+1] = ZZ[j]; } HiVal[0] = H; HiBar[0] = 0; //ZZ[0] = H; date11 = date[LoBar[0]]; time11 = stime[LoBar[0]]; Value11 = LoVal[0]; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(TL1,상승색); Tx1 = Text_New(date11,time11,Value11,"●"); #동그라미 색상, 파랑 Text_SetColor(Tx1,Green); Text_SetStyle(Tx1,2,2); Text_SetSize(tx1,7); //tx = Text_New(date11,time11,Value11,NewLine+NumToStr(value11,2)+NewLine+NumToStr(value11,2)); //Text_SetStyle(tx,2,0); date31 = date[LoBar[0]]; time31 = stime[LoBar[0]]; date32 = date[0]; time32 = stime[0]; for j = 0 to 5 { fr[j] = LoVal[0] + ((HiVal[1] - LoVal[0]) * r[j]); } } If HiVal[0] < H Then { HiVal[0] = H; HiBar[0] = 0; //ZZ[0] = H; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date32 = date[0]; time32 = stime[0]; TL_SetEnd(TL3[0],date32,time32,fr[0]); TL_SetEnd(TL3[1],date32,time32,fr[1]); TL_SetEnd(TL3[2],date32,time32,fr[2]); Text_SetLocation(TX3[2],date32,time32,fr[2]); TL_SetEnd(TL3[3],date32,time32,fr[3]); TL_SetEnd(TL3[4],date32,time32,fr[4]); Text_SetLocation(TX3[4],date32,time32,fr[4]); TL_SetEnd(TL3[5],date32,time32,fr[5]); TL_SetEnd(TL3[6],date32,time32,fr[6]); TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); } } TL_SetSize(TL1,선두께); //TL_SetEnd(tl,NextBarSdate,NextBarStime,NextBarOpen); ------------------------- 위 추세선 수식어를 지표식으로 변경하고 (시스템식으로 바로 사용해도 상관없음 ) 그걸 응용하여 그래프내용처럼 식을 구하고자합니다. 장시직시 봉차트가 이동평균선 2300선 위일때 계단식 하락 6파동후 매수 2번째 신호시 체결후 상승 5파에 청산 계단식 상승 6파동후 매도 2번째 신호시 체결후 하락 5파에 청산하는식을 한 수식어에 포함하고자 합니다. 처음의 그래프는 위 수식어의 출력자료입니다. 매매시간의 수식어는 아래 분봉시스템 자료를 대입하면 좋겠고 손절은 40틱 입니다. input : 익절틱수(0),손절틱수(40); var : DD(0),Year(0),V1(0),V2(0),V3(0),V4(0),summer(False); var : ST(0),ET(0),entry(0); if NextBarSdate != sDate Then { DD = DayOfWeek(NextBarSdate); Year = Floor(NextBarSdate/10000); V1 = (10000 * Year) + (100 * 3) + 1; V2 = 15 - dayofweek(v1); v3 = (10000 * Year) + (100 * 11) + 1; v4 = 8 - dayofweek(v3); Summer = Sdate > (10000 * Year) + (100 * 3) + v2 and Sdate < (10000 * Year) + (100 * 11) + v4; if summer == true Then { ST = 70000; ET = 55000; } Else { ST = 80000; ET = 65000; } } if Bdate != Bdate[1] Then entry = 0; if (MarketPosition != 0 and MarketPosition != MarketPosition[1]) or (MarketPosition == MarketPosition[1] and TotalTrades > TotalTrades[1]) Then entry = entry+1; if Year > 0 Then { IF ET > ST Then SetStopEndofday(ET); Else { if NextBarSdate != sDate Then SetStopEndofday(ET); } if ((NextBarSdate != sDate and NextBarStime >= ST) or (NextBarSdate == sDate and NextBarStime >= ST and sTime < ST)) Then { if ET < ST Then SetStopEndofday(0); SetStopProfittarget(PriceScale*익절틱수,PointStop); SetStopLoss(PriceScale*손절틱수,PointStop);
프로필 이미지
푸른
2022-10-25
855
글번호 163252
시스템
답변완료

해외선물 순매수체결량???

안녕하세요? 해외선물 순매수체결량을 보려고 아래처럼 수식을 이용했는데 모든 체결이 매수체결량으로 나오는데 뭐가 문제일까요? sumPL = sumPL + (Upvol-DownVol);
프로필 이미지
브라이언bj
2022-10-24
982
글번호 163251
지표

푸른 님에 의해서 삭제되었습니다.

프로필 이미지
푸른
2022-10-24
3
글번호 163244
시스템
답변완료

수식 부탁드립니다.

5, 20, 60이평선의 역배열상태와 하향추세에서 5이평선의 상승전환과 5이평선위에서 종가상으로 최소 2개봉이 형성된후(순서1) 다시 종가상 또는 시가상으로 5이평선을 이탈하고(순서2) 다시 5이평선을 돌파한후 전고종가(고가상이 아닌 종가상 고가)를 돌파(순서3)하는 종목 검색수식. 여기에서 다음의 제한 조건을 만족해야한다. 1. 최저가격조건: 순서1이 만족할때의 봉으로 부터 최근 5봉중 최저가격은 최근 60봉중의 최저가격조건을 만족해야한다. 2. 전고종가라 함은 5이평선을 시가나 종가상으로 깨고 내려오기전의 5이평선위에서 형성된 가격중 종가 또는 시가중 가장 높은 가격을 의미한다 3. 순서2가 형성될 때 즉 5이평선 아래에 형성되는 종가는 1의 최저가격조건보다 높아야 한다. 추가적으로 순서1,2,3의 발생순서를 표현하는 수식에 대하여 주석을 표기해주시면 감사하겠읍니다. 항상 감사하고 고맙습니다.
프로필 이미지
해피오
2022-10-24
985
글번호 163242
종목검색
답변완료

지표문의.

input:고점(20220907); if sDate == 고점 Then{Var1=DayHigh;} plot1(Var1,"추세고점",Yellow,DEF,3); 일봉에서 입력값 고정선을 그리는 지표식입니다. 일봉상에는 바른값이 나타납니다. 이상태서 분봉으로 변경하면 10분 까지는 바른값이 출력됩니다. 10분 이하 차트에서는 지표값이 0제로 출력됩니다. 3분차트에서도 지표값이 바르게 출력할수는 없는지요?
프로필 이미지
좋운날
2022-10-24
1050
글번호 163238
지표