커뮤니티

예스랭귀지 Q&A

글쓰기
답변완료

문의

안녕하세요. 직전봉에 "A" 라는 신호로 매수를 정리 하였을때, 이번봉에서 매도를 하려면 간단히 수식을 어떻게 만들어야 할까요? if ~~~~ Then EXITLONG("A"); 다음봉에서 매도 신호,, 부탁 드립니다.
프로필 이미지
orfeu
2023-03-28
1590
글번호 167600
시스템
답변완료

이것도 부탁드립니다^^

항상 감사드립니다^^ 앞전 n30개의 봉의 최저점과 최고점의 차이가 x30포인트 이상이면 지그재그(전번에 작성해 주셨던식)로 매매 앞전 n30개의 봉의 최저점과 최고접의 차이가 x30보인트 이하이면 이동평균 y20과 y60의 이동평균 골든 크로스시 매수 이동평균 y20과 y60의 이동평균 데드 크로스시 매도 미리 감사드립니다^^ ↓↓##전번에 알려주신 지그재그식 ##↓↓ input : Period(5); Array : HD[10](0),HT[10](0),HV[10](0); //고점 날짜, 시간, 가격 저장할 배열 Array : LD[10](0),LT[10](0),LV[10](0); //저점 날짜, 시간, 가격 저장할 배열 var : cnt(0),Hprice(0),Lprice(0); var : UpTrend(false),DownTrend(False),Trend(0); var : ZigZagTL(0),HTL(0),LTL(0),HTX(0),LTX(0); HPrice = H; LPrice = L; if Index == 0 Then { //초기 최고값 HD[0] = sDate; HT[0] = sTime; HV[0] = HPrice; //초기 최저값 LD[0] = sDate; LT[0] = sTime; LV[0] = LPrice; } Else { UpTrend = HPrice >= Highest(HPrice,Period)[1]; DownTrend = LPrice <= Lowest(LPrice,Period)[1]; //상승추세 전환 if trend <= 0 and UpTrend == true Then { //추세구분 1 trend = 1; Buy(); //과거 고점의 날짜, 시간, 값을 다음 배열방으로 이동 For cnt = 9 DownTo 1 { HD[cnt] = HD[cnt-1]; HT[cnt] = HT[cnt-1]; HV[cnt] = HV[cnt-1]; } //0번방에 날짜, 시간, 가격 저장 HD[0] = sDate; HT[0] = sTime; HV[0] = HPrice; //직전 저점에서 현재 고점까지 연결선 출력 ZigZagTL = TL_New(LD[0],LT[0],LV[0],HD[0],HT[0],HV[0]); //색상은 Red TL_SetColor(ZigZagTL,Gray); //추세선 굵기는 1 TL_SetSize(ZigZagTL,1); HTL = TL_New(HD[0],HT[0],HV[0],NextBarSdate,NextBarStime,HV[0]); TL_SetColor(HTL,Red); HTX = text_new(HD[0],HT[0],HV[0],NumToStr(HV[0],2)); Text_SetStyle(HTX,2,1); } Else if trend >= 0 and DownTrend Then//하락추세 전환 { //추세구분은 -1 trend = -1; Sell(); //과거 저점의 날짜, 시간, 값을 다음 배열방으로 이동 For cnt = 9 DownTo 1 { LD[cnt] = LD[cnt-1]; LT[cnt] = LT[cnt-1]; LV[cnt] = LV[cnt-1]; } //0번방에 날짜, 시간, 가격 저장 LD[0] = sDate; LT[0] = sTime; LV[0] = LPrice; //직전 고점에서 현재 저점까지 연결선 출력 ZigZagTL = TL_New(HD[0],HT[0],HV[0],LD[0],LT[0],LV[0]); //색상은 Blue TL_SetColor(ZigZagTL,Gray); //굴긱는 1 TL_SetSize(ZigZagTL,1); LTL = TL_New(LD[0],LT[0],LV[0],NextBarSdate,NextBarStime,LV[0]); TL_SetColor(LTL,Blue); LTX = text_new(LD[0],LT[0],LV[0],NumToStr(LV[0],2)); Text_SetStyle(LTX,2,0); } Else { //상승구간 if trend == 1 Then { //고점이 갱신되면 if HPrice > HV[0] Then { //갱신된 봉의 날짜/시간/가격으로 변경 HD[0] = sDate; HT[0] = sTime; HV[0] = HPrice; //지그재그 추세선의 끝점을 현재봉으로 이동 TL_SetEnd(ZigZagTL,HD[0],HT[0],HV[0]); //고점 수평 추세선의 끝점을 현재봉으로 이동 TL_SetBegin(HTL,HD[0],HT[0],HV[0]); Text_SetString(HTX,NumToStr(HV[0],2)); Text_SetLocation(HTX,HD[0],HT[0],HV[0]); } } //하락구간 if trend == -1 Then { //저점이 갱신되면 if LPrice < LV[0] Then { //갱신된 봉의 날짜/시간/가격으로 변경 LD[0] = sDate; LT[0] = sTime; LV[0] = LPrice; //지그재그 추세선의 끝점을 현재봉으로 이동 TL_SetEnd(ZigZagTL,LD[0],LT[0],LV[0]); //저점 수평 추세선의 끝점을 현재봉으로 이동 TL_SetBegin(LTL,LD[0],LT[0],LV[0]); Text_SetString(LTX,NumToStr(LV[0],2)); Text_SetLocation(LTX,LD[0],LT[0],LV[0]); } } TL_SetEnd(HTL,sDate,sTime,HV[0]); TL_SetEnd(LTL,sDate,sTime,LV[0]); } }
프로필 이미지
말비
2023-03-28
1717
글번호 167599
시스템
답변완료

시스템식 부탁드립니다^^

앞전 n20개의 봉중 양봉이 음봉보다 많고, 이동평균 x20과 x100가 골든크로스면 (이평 y5와 y20의 골든크로스시 매도 이평 y5와 y20의 데드크로스시 청산) 앞전 n20개의 봉중 음봉이 양봉보다 많고, 이동평균 x20과 x100가 데드크로스면 (이평 y5와 y20의 데드크로스시 매도 이평 y5와 y20의 콜든크로스시 청산) 괄호부분이 첨부파일 식이였으면 좋겠는데. 공개 차트쉐어라 제 능력으로는 해석이 안되서요^^ 정보가 부족해서 안되면 괄호안에 것으로 해주셔도 됩니다^^ 부탁드립니다^^ 항상 감사드립니다^^
프로필 이미지
말비
2023-03-28
1139
글번호 167598
시스템
답변완료

수정요청 드립니다.

번거롭게 해드려 죄송합니다. 서툴러서 뜻대로 잘 안되어 수정 요청 드립니다. 81357 질문에 수정사항 추가요청 드립니다. 1.당일가격 포함하지 않는 20일간 1.2 ATR 2.P=20일전종가 - 19일전 종가 3.k=20 일전 최고가-19일전 최저가 4.J = 당일가격 포함하지 않는 20일간 1.2 ATR*0.9 5.JH=P-20일평균선 6.S=현재가-P 7.SM=J+현재가*0.9-P 8.W1C=W1*0.9 9.W2C=W2*0.9 10.W3C=W3*0.9 11.W4C=W4*0.9
프로필 이미지
월드맨
2023-03-28
1170
글번호 167597
지표
답변완료

감사드리며 부탁드립니다

안녕하세요~~항상 감사드립니다~ 손실과 수익을 반영 기준으로한 수식이 꼭필요해서 부탁드립니다~ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 질문 ~1~ 앞 매수 1,2진입신호에서 현재 봉이 수익이 났을때는 ("매수1청")으로 청산 앞 매수 1,2진입신호에서 현재 봉이 손실이 났을때는 ("매수2청")으로만!! 청산되게 앞 매도 1,2진입신호에서 현재 봉이 수익이 났을때는 ("매도1청")으로 청산 앞 매도 1,2진입신호에서 현재 봉이 손실이 났을때는 ("매도2청")으로만!! 청산되게 ~~~~~~~~~~~~~~~~~아래 이평수치는 임시 예시용입니다~(의미없음)~~~~~~~~~~~~~~~~~~~~~ if 5 > 50 Then buy("매수1진입"); if 10 > 60 Then buy("매수2진입"); if 20 < 50 Then exitlong("매수1청"); if 30 < 60 Then exitlong("매수2청"); /////////////////////////////////////////////////////////////////////////// 질문 ~2~ (손절된 2청산 때) ("매수2진입")진행은 직전 청산에서 ("매수2청")으로 청산된것만 매수2진입 적용!! ("매도2진입")진행은 직전 청산에서 ("매도2청")으로 청산된것만 매도2진입 적용!! ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ if 5 > 50 Then buy("매수1진입"); if 10 > 60 Then buy("매수2진입"); if 20 < 50 Then exitlong("매수1청"); if 30 < 60 Then exitlong("매수2청"); 꼭~부탁드립니다~~
프로필 이미지
째일
2023-03-27
1049
글번호 167596
시스템
답변완료

시스템 로직 수정부탁드립니다.

아무것도 안 건드리고 수식 잘 쓰고 있었는데, 갑자기 제대로 안 나오네요? 수정한 부분 표시 좀 해주세요.. Input:전환비율(0.5); input : StartTime(070000),EndTime(055500); Input :익절(15),손절(18),당일수익(100),당일손실(80); Var : N1(0),dayPl(0),Tcond(false),Xcond(false); Var : j(0),jj(0),HH(0),LL(0),hiBar(0),loBar(0),최종꼭지점(""),처리구분(""); var : TL1(0),Text1(0),ADXV1(0),tl2(0),tl3(0),tx2(0),tx3(0),t(0); var : TL4(0),TX4(0),TL5(0),TX5(0),Bcond(False),Scond(False); Array:고[10,4](0),저[10,4](0); HH = H; LL = L; If Index == 0 Then { 고[1,1] = HH; 고[1,2] = 0; 고[1,3] = sDate; 고[1,4] = sTime; 저[1,1] = LL; 저[1,2] = 0; 저[1,3] = sDate; 저[1,4] = sTime; } If Index > 0 Then { hiBar = hiBar + 1; loBar = loBar + 1; } If HH[hiBar] < HH Then hiBar = 0; If LL[loBar] > LL Then loBar = 0; Condition1 = 저[1,1] * (1 + (전환비율/100)) < HH and hiBar == 0; Condition2 = 고[1,1] * (1 - (전환비율/100)) > LL and loBar == 0; 처리구분 = ""; If Condition1 and Condition2 Then // 고점과 저점 조건 동시 만족 { If 최종꼭지점 == "저점" Then { If 저[1,1] > LL Then 처리구분 = "저점처리"; Else 처리구분 = "고점처리"; } Else If 최종꼭지점 == "고점" Then { If 고[1,1] < HH Then 처리구분 = "고점처리"; Else 처리구분 = "저점처리"; } } Else If Condition1 Then 처리구분 = "고점처리"; Else If Condition2 Then 처리구분 = "저점처리"; If 처리구분 == "고점처리" Then { T = 1; If 최종꼭지점 == "저점" Then { TL_SetEnd(TL2,저[1,3],저[1,4],value2); Text_SetLocation(TX2,저[1,3],저[1,4],Value2 ); TL_SetEnd(TL4,저[1,3],저[1,4],value3); Text_SetLocation(TX4,저[1,3],저[1,4],Value3 ); For j = 10 DownTo 2 { For jj = 1 To 4 { 고[j,jj] = 고[j-1,jj]; } } 고[1,1] = HH[hiBar]; 고[1,2] = Index - hiBar; 고[1,3] = sDate[hiBar]; 고[1,4] = sTime[hiBar]; hiBar = -1; loBar = -1; TL1 = TL_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]); TL_SetSize(TL1,1); TL_SetColor(TL1,RED); value1 = 저[1,1]*(1+(전환비율/100)); value2 = 고[1,1]*(1-(전환비율/100)); value3 = (value1+Value2)/2; TL2 = TL_New(고[1,3],고[1,4],value2 ,NextBarSdate,NextBarStime,value2); TL_SetColor(TL2,Cyan); TL_SetStyle(TL2,3); Tx2 = Text_New(NextBarSdate,NextBarStime,value2,NumToStr(value2,2)); Text_SetColor(Tx2,Cyan); //TL4 = TL_New(고[1,3],고[1,4],value3 ,NextBarSdate,NextBarStime,value3); TL_SetColor(TL4,Orange); TL_SetStyle(TL4,3); //Tx4 = Text_New(NextBarSdate,NextBarStime,value3,NumToStr(value3,2)); Text_SetColor(Tx4,Orange); } Else If 고[1,1] < HH[hiBar] Then // 1번 고점보다 높은 고가 출현 { 고[1,1] = HH[hiBar]; 고[1,2] = Index - hiBar; 고[1,3] = sDate[hiBar]; 고[1,4] = sTime[hiBar]; hiBar = -1; loBar = -1; TL_SetEnd(TL1,고[1,3],고[1,4],고[1,1]); value2 = 고[1,1]*(1-(전환비율/100)); value3 = (value1+Value2)/2; TL_SetBegin(TL2,고[1,3],고[1,4],value2); Text_SetString(TX2,NumToStr(value2,2)); TL_SetBegin(TL4,고[1,3],고[1,4],value3); Text_SetString(TX4,NumToStr(value3,2)); } 최종꼭지점 = "고점"; } If 처리구분 == "저점처리" Then { t = -1; If 최종꼭지점 == "고점" Then { TL_SetEnd(TL3,고[1,3],고[1,4],value5 ); Text_SetLocation(TX3,고[1,3],고[1,4],value5); TL_SetEnd(TL5,고[1,3],고[1,4],value6 ); Text_SetLocation(TX5,고[1,3],고[1,4],value6); For j = 10 DownTo 2 { For jj = 1 To 4 { 저[j,jj] = 저[j-1,jj]; } } 저[1,1] = LL[loBar]; 저[1,2] = Index - loBar; 저[1,3] = sDate[loBar]; 저[1,4] = sTime[loBar]; hiBar = -1; loBar = -1; TL1 = TL_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]); TL_SetSize(TL1,1); TL_SetColor(TL1,BLUE); value4 = 고[1,1]*(1-(전환비율/100)); value5 = 저[1,1]*(1+(전환비율/100)); value6 = (value4+Value5)/2; TL3 = TL_New(저[1,3],저[1,4],value5,NextBarSdate,NextBarStime,value5 ); TL_SetColor(TL3,Magenta); TL_SetStyle(TL3,3); TX3 = Text_New(NextBarSdate,NextBarStime,value5,NumToStr(value5,2)); Text_SetColor(TX3,Magenta); //TL5 = TL_New(저[1,3],저[1,4],value6,NextBarSdate,NextBarStime,value6 ); TL_SetColor(TL5,Orange); TL_SetStyle(TL5,3); //TX5 = Text_New(NextBarSdate,NextBarStime,value5,NumToStr(value5,2)); Text_SetColor(TX5,Orange); } Else If 저[1,1] > LL[loBar] Then { 저[1,1] = LL[loBar]; 저[1,2] = Index - loBar; 저[1,3] = sDate[loBar]; 저[1,4] = sTime[loBar]; hiBar = -1; loBar = -1; TL_SetEnd(TL1,저[1,3],저[1,4],저[1,1]); value5 = 저[1,1]*(1+(전환비율/100)); value6 = (value4+Value5)/2; TL_SetBegin(TL3,저[1,3],저[1,4],value5 ); Text_SetString(TX3,NumToStr(value5,2)); TL_SetBegin(TL5,저[1,3],저[1,4],value6 ); Text_SetString(TX5,NumToStr(value6,2)); } 최종꼭지점 = "저점"; } TL_SetEnd(TL2,NextBarSdate,NextBarStime,Value2); Text_SetLocation(TX2,NextBarSdate,NextBarStime,Value2); TL_SetEnd(TL3,NextBarSdate,NextBarStime,Value5 ); Text_SetLocation(TX3,NextBarSdate,NextBarStime,Value5 ); TL_SetEnd(TL4,NextBarSdate,NextBarStime,Value3); Text_SetLocation(TX4,NextBarSdate,NextBarStime,Value3); TL_SetEnd(TL5,NextBarSdate,NextBarStime,Value6); Text_SetLocation(TX5,NextBarSdate,NextBarStime,Value6); IF Endtime > starttime Then SetStopEndofday(Endtime); Else { if sDate != sDate[1] Then SetStopEndofday(Endtime); } if (sdate != sdate[1] and stime >= EndTime) or (sdate == sdate[1] and stime >= EndTime and stime[1] < EndTime) Then Tcond = False; if (sdate != sdate[1] and stime >= StartTime) or (sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime) Then { Tcond = true; Xcond = false; N1 = NetProfit; IF Endtime <= starttime Then { SetStopEndofday(0); } } 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; } Bcond = MarketPosition == 0 and MarketPosition(1) == 1 and MarketPosition(2) == 1; Scond = MarketPosition == 0 and MarketPosition(1) == -1 and MarketPosition(2) == -1; if Tcond == true and Xcond == false then { if MarketPosition >= 0 and T == 1 and L > 고[1,1]* (1 - (전환비율/100)) and 고[1,1] < 고[2,1] and Scond == False Then Sell("s",AtStop,고[1,1]* (1 - (전환비율/100))); if MarketPosition <= 0 and T == -1 and H < 저[1,1]* (1 + (전환비율/100)) and 저[1,1] > 저[2,1] and Bcond == False Then Buy("b",AtStop,저[1,1]* (1 + (전환비율/100))); } if MarketPosition == 1 then { ExitLong("bl",AtStop, max(EntryPrice-손절,고[1,1]* (1 - (전환비율/100)))); ExitLong("dbp",atlimit,EntryPrice+((당일수익-daypl)/CurrentContracts)); ExitLong("dbl",AtStop,EntryPrice-((당일손실+daypl)/CurrentContracts)); } if MarketPosition == -1 then { ExitShort("sl",AtStop, min(EntryPrice+손절,저[1,1]* (1 + (전환비율/100)))); ExitShort("dsp",atlimit,EntryPrice-((당일수익-daypl)/CurrentContracts)); ExitShort("dsl",AtStop,EntryPrice+((당일손실+daypl)/CurrentContracts)); } SetStopProfittarget(익절,PointStop);
프로필 이미지
제이디1
2023-03-27
1494
글번호 167595
시스템
답변완료

수식부탁드립니다

수식부탁드립니다 1. 매수는 직접하고, 청산은 자동으로 하려고 합니다 아래와 같이 매수포지션이 있다면 시스템 적용하자마자 청산되게 하려합니다 if MarketPosition == 1 && DayIndex() Then ExitLong(); 이렇게 하니 검증까지는 되는데 시스템적용시 파일자체가 보이질 않네요 수식 좀 부탁드려요 2. 옵션에서 (위클리 C 315 ) 시장가로 진입하면 잔고가 부족하다고 나오는데 옵션에서 시장가는 상한가 개념인것 같은데, 그값이 얼마인지 알수있는 방법이 있나요
프로필 이미지
베스트시스템
2023-03-27
1046
글번호 167594
시스템
답변완료

81282 작성식에 대한 재요청 드립니다.

게시판에 재요청 드렸었는데 못 보셨나해서 글쓰기 추가합니다. 수식 감사드립니다. 문의사항이 있습니다. 아래 시스템으로 테스트해보니, StartTime에 이미 아래 진입조건이 만족되어 있으면 진입을 하게되어 있는 듯 합니다. 이를, StartTime이후 나오는 진입조건에 진입하도록 하고 싶습니다. 예로, StartTime에 이미 매수진입조건이 만족되어 있을 때는 진입하지 않고, 이후 나오는 청 매도진입조건에 진입. 결국은 StartTime 이후 나오는 첫 반대 신호에 진입 ===> 손절/익절 후 대기 다음 반대신호 나올 때까지 대기했다 진입 ====> 손적/익절 후 대기 다음 반대신호 나올 때까지 대기했다 진입 ====> 손적/익절 후 대기 제가 해보려는데 잘 안되네요... > 예스스탁 님이 쓴 글입니다. > 제목 : Re : 이평 20선 수식 > 안녕하세요 예스스탁입니다. input : StartTime(93000),EndTime(113000),P(20); input : 익절틱수(20),손절틱수(15); var : Tcond(false); var1 = Ema(C,P); IF Endtime > starttime Then SetStopEndofday(Endtime); Else { if sDate != sDate[1] Then SetStopEndofday(Endtime); } if (sdate != sdate[1] and stime >= EndTime) or (sdate == sdate[1] and stime >= EndTime and stime[1] < EndTime) Then Tcond = False; if (sdate != sdate[1] and stime >= StartTime) or (sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime) Then { Tcond = true; IF Endtime <= starttime Then { SetStopEndofday(0); } } if Tcond == true Then { if MarketPosition <= 0 and c > var1 and var1 > var1[1] Then buy("b",AtMarket); if MarketPosition >= 0 and c < var1 and var1 < var1[1] Then Sell("s",AtMarket); } SetStopProfittarget(PriceScale*익절틱수,PointStop); SetStopLoss(PriceScale*손절틱수,PointStop); 즐거운 하루되세요 > 바꿔야만산다 님이 쓴 글입니다. > 제목 : 이평 20선 수식 > 아래 조건으로 수식/시스템 가능한지요? 부탁드립니다. 0. 9시 30분 부터 11시 30분 사이에만 작동 1. 챠트에서 종가가 지수이평 20 위이고 기울기가 양이면 다음봉 시가 매수 진입 아래이고 기울기가 음이면 다음봉 시가 매도 진입 이때, 매수/도 시 익절 20틱, 손절 12틱 11시30분 되면 포지션 강제 청산 11시25분 부터는 진입안함 2. 손절이 나면서 위 1번 상황이되면, 반대 신호 진입.
프로필 이미지
바꿔야만산다
2023-03-27
801
글번호 167593
시스템
답변완료

MACD 지표가아니라 MACD OCCILATER 지표에...

위에 macdocill...에 매수도 사인이 나오게 하고싶어요 핑크색과 파란색이나타나는차트에 하고 싶습니다 올려주신 수식으론 밑에 거에만 되네요 위에 차트에 하려면 어떻게 해야는지요?
프로필 이미지
bdew
2023-03-27
1052
글번호 167592
지표
답변완료

종목 검색식 부탁 드립니다.

안녕하십니까 항상 도움 주셔서 감사합니다. A=H(1)-L(1); A1=O+A*0.5; VALUEWHEN(1,CROSSUP(C,A1),A1) 키움증권 지표로 해 놓은건데 주가가 이선을 돌파시 검색이 되었으면 합니다. 종목 검색으로 부탁드립니다. 추가로 틱 120 으로도 설정 가능 한가요 ? 감사합니다.
프로필 이미지
칼이쓰마빡가
2023-03-27
1448
글번호 167591
종목검색