커뮤니티

예스랭귀지 Q&A

글쓰기
답변완료

수식작성 부탁드립니다.

안녕하세요. 운영자님 아래와 같은 트레이딩뷰 수식을 예스트레이더 수식으로 변환 부탁드립니다. 감사합니다. //@version=4 study("Mobo Bands", overlay=false) price = input(hl2, "Price") colorNormLength = input(3, "colorNormLength", input.integer) dpoLength = input(13, "dpoLength", input.integer) moboDisplace = input(0, "moboDisplace", input.integer) moboLength = input(10, "moboLength", input.integer) numDevDn = input(-0.8, "numDevDn", input.float) numDevUp = input(0.8, "numDevUp", input.float) coloredMobo = input(true, "coloredMobo") coloredFill = input(true, "coloredFill") breakArrows = input(true, "breakArrows") moboShowMid = input(true, "moboShowMid") //def DPO = price - Average(price[DPO_length / 2 + 1], DPO_length); xsma = sma(price[dpoLength / 2 + 1], dpoLength) //xsma = sma(price, dpoLength) DPO = price - xsma Midline = sma(DPO, moboLength) sDev = stdev(DPO, moboLength) LowerBand = Midline + numDevDn * sDev UpperBand = Midline + numDevUp * sDev plot(DPO, color=color.yellow,linewidth=2) plot(Midline, color=Midline > Midline[1] ? color.lime : color.red,linewidth=2) Upper = plot(UpperBand, color=color.black,linewidth=1) Lower = plot(LowerBand, color=color.black,linewidth=1) plot(0, color=color.white,linewidth=1) Signal1 = DPO > UpperBand and DPO[1] < UpperBand[1] Signal2 = DPO < LowerBand and DPO[1] > LowerBand[1] wasUp = 1 wasDn = 1 wasUp := Signal1 ? 1 : (Signal2 ? 0 : nz(wasUp[1])) wasDn := Signal2 ? 1 : (Signal1 ? 0 : nz(wasDn[1])) //plotshape(Signal1 and wasDn[1] ? UpperBand : na, style=shape.arrowup, location=location.absolute, size=size.normal, color=color.red) //plotshape(Signal2 and wasUp[1] ? LowerBand : na, style=shape.arrowdown, location=location.absolute, size=size.normal, color=color.green) plotshape(Signal1 and wasDn[1] ? UpperBand : na, style=shape.labelup, location=location.absolute, size=size.normal, color=color.green, text="Buy",textcolor=color.white) plotshape(Signal2 and wasUp[1] ? LowerBand : na, style=shape.labeldown, location=location.absolute, size=size.normal, color=color.red, text="Sell",textcolor=color.white) fill(Upper, Lower, color=color.purple) alertcondition(Signal1 and wasDn[1], "Break Out Arrow", "Break Out Arrow") alertcondition(Signal2 and wasUp[1], "Break Down Arrow", "Break Down Arrow")
프로필 이미지
고박사122
2023-03-28
1098
글번호 167609
지표
답변완료

문의 드립니다.

아래에서 수량 추가 할 수 있도록 부탁드립니다. input : 익절틱수(20); var1 = BollBandUp(20,2); Var2 = BollBandDown(20,2); if CrossUp(c,var1) Then Buy(); if CrossDown(c,var1) Then ExitLong(); if CrossDown(c,var2) Then Sell(); if CrossUp(c,var2) Then ExitShort(); SetStopProfittarget(PriceScale*익절틱수,PointStop);
프로필 이미지
선물대장
2023-03-28
1337
글번호 167608
시스템
답변완료

질문이 많아 죄송합니다.

밑에 식의 문제가 이익볼때는 몇번이고 계속 이익보고 손실볼때는 몇번이고 계속 손실보는데요. 이번 매매 손실보면 다음번 매매부터 매수매도를 토글 시킬는 시스템을 구현할수 도 있나요?(손실 청산하고 조금 텀을 주더라도) 항상 감사드립니다. 항상 행복하고 건강하시길 바랍니다~^^ ↓↓##전번에 알려주신 지그재그식 ##↓↓ 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
1661
글번호 167601
시스템
답변완료

문의

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

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

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

수식부탁드립니다

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