커뮤니티

예스랭귀지 Q&A

글쓰기
답변완료

문의드립니다.

문의드립니다. 예를 들어 키움에서 쓰는 Valuewhen(1, 조건 && WT1>WT1(1), (H+L)/2); 을 예스랭귀지로 어떻게 표현하는지 여쭤봅니다.
프로필 이미지
정도령7
2024-02-15
637
글번호 176670
종목검색
답변완료

부탁드립니다

1. 1분차트에서 5분(5개봉) 간격으로 합한 거래량이 전 5분 시간대와 비교하여 늘었는지, 줄었는지 확인하여 전 5분 시간대보다 늘어난 경우에는 마지막 봉(5개중 마지막봉)에 빨강색으로, 줄어든 경우에는 마지막 봉(5개중 마지막봉)에 파란색으로 계속하여 구현해 주세요 2. 종가가 양봉으로 직전 봉의 고가와 저가를 모두 갱신하면 빨강색으로, 종가가 음봉으로 직전 봉의 고가와 저가를 모두 갱신하면 파란색으로 구현해 주세요 3. 종가가 보조차트1의 전일 고가를 갱신하면 본차트에 빨강색으로, 종가가 보조차트1의 전일 저가를 갱신하면 본차트에 파란색으로 구현해 주세요 고맙습니다.
프로필 이미지
서태공
2024-02-16
657
글번호 176669
강조
답변완료

수식 수정

지난 90일내에 아래 조건을 만족하는 봉이 있는 종목을 찾는 수식을 만들었는데, 잘못된 부분 수정 부탁드려요 조건 : 지난 90일 간 1. 윗꼬리(양봉,음봉) 달린 캔들 발생한 날에 2. 90일간 중에서 가장 많은 거래량이 발생한 종목 검색 Variables: Body(0),highbody(0),lowbody(0),value(0); var : maxVolume (max(dayVolume, 88)); // 검색 기간 설정 var : startDate (DayIndex - 90); // 최근 3개월 var : endDate (dayindex); body= Abs(O-C); Highbody = Max(O,C); Lowbody = Min(O,C); if (body > (high - low) * 0.5 and volume == maxvolume) Then value = 1; Else value = 0; Find(value);
프로필 이미지
yunmx
2024-02-15
783
글번호 176668
종목검색
답변완료

지표식 시간설정 문의드립니다.

안녕하세요..항상 많은 도움 감사드립니다. 아래는 네이버 블로그에 나와있는 마켓프로파일 수식인데요... 이것은 나스닥 1분봉에 현지 장 개장 시간(오전 8시 30분)부터 오후 3:40까지만 나오게 하고 싶은데 방법을 잘몰라서 부탁 문의 드립니다. 데이터를 오전 8시 30분 부터 오후 3시40분 까지만 사용해서 지표에 나타날 수 있게 부탁드립니다. 혹 오후3시 40분 마감이 기능상 불가능하다면 마켓프로파일의 시작 시간만 오전 8시 30분으로 설정 부탁드립니다. #==========================================# # 지 표 명 : 마켓프로파일 # 작 성 자 : 수식지왕 # 블 로 그 : http://yahoosir.blog.me #==========================================# Var:j(0),행번호(0),단위가격(0),추가행(0),알파벳(0),최대개수(0),총개수(0),봉개수(0), 추정거래량(0),cnt(0),중앙가격(0),최대행(0),중심행(0),상위개수(0), 하위개수(0),시초범위상(0),시초범위하(0),가치영역상한(0),가치영역하한(0),누적개수(0), 위꼬리상한(0),위꼬리하한(0),아래꼬리상한(0),아래꼬리하한(0); Array:가격대[500](0),거래량[500](0),개수[500](0),프로파일[500](0), 중심가격[50](0),가치영역상[50](0),가치영역하[50](0); 단위가격 = PriceScale; if DayIndex()==0 then //날짜 변경시점에 { for j = 48 downto 0 { 중심가격[j+1] = 중심가격[j]; //전일 중심가격과 가치영역상[j+1] = 가치영역상[j]; //전일 가치영역 관리 가치영역하[j+1] = 가치영역하[j]; } for 행번호 = 0 to 499 //0값으로 초기화 { 거래량[행번호] = 0; 개수[행번호] = 0; 프로파일[행번호] = 0; } 최대개수 = 0; 총개수 = 0; 시초범위상 = 0; //장 개시 후 1시간내의 가격범위 시초범위하 = 0; 가격대[0] = H + 단위가격 * 100; //100호가의 여유를 둠 for 행번호 = 0 to 498 { 가격대[행번호+1] = 가격대[행번호] - 단위가격; //가격대 배열에 가격 대입 } } if 가격대[0] <= H then //고가가 가격대 배열 이상이 되면 { 추가행 = ceiling((H-가격대[0])/단위가격) + 20; //고가에 20호가 여유를 더 두어 재설정 for 행번호 = (499 - 추가행) downto 0 { 가격대[행번호+추가행] = 가격대[행번호]; //추가행만큼 뒤로 옮긴다 거래량[행번호+추가행] = 거래량[행번호]; 개수[행번호+추가행] = 개수[행번호]; 프로파일[행번호+추가행] = 프로파일[행번호]; } 가격대[0] = 가격대[0] + 단위가격 * 추가행; //추가된 행에 가격 재설정 for 행번호 = 0 to (추가행-1) { 가격대[행번호+1] = 가격대[행번호] - 단위가격; } for 행번호 = 0 to 추가행 //추가된 행의 나머지 항목은 { 거래량[행번호] = 0; //0값으로 초기화 개수[행번호] = 0; 프로파일[행번호] = 0; } 중심행 = 중심행 + 추가행; //중심가격의 행번호도 뒤로 밀린다 } 알파벳 = DayIndex() + 1; //알파벳 대신 숫자 사용 중앙가격 = (DayHigh()+Daylow())/2; //전체가격폭의 중앙 if DayIndex() == 60/BarInterval-1 then //장 개시 후 1시간내의 가격범위 { 시초범위상 = DayHigh(); 시초범위하 = DayLow(); } cnt = 0; for 행번호 = 0 to 499 { if L <= 가격대[행번호] and 가격대[행번호] <= H then //현재 봉 가격대가 몇가격대 cnt = cnt + 1; //걸쳐져 있는지 계산 } 추정거래량 = V/cnt; //가격대별 배분할 거래량 for 행번호 = 0 to 499 { if L <= 가격대[행번호] and 가격대[행번호] <= H then { 거래량[행번호] = 거래량[행번호] + 추정거래량; 개수[행번호] = 개수[행번호] + 1; 프로파일[행번호] = 알파벳; 총개수 = 총개수 + 1; if 최대개수 < 개수[행번호] then //신규 최빈값 나왔을 때 { 최대개수 = 개수[행번호]; 중심행 = 행번호; } else if 최대개수 == 개수[행번호] then //최빈값과 동일하다면 { if 거래량[중심행] < 거래량[행번호] then //거래량 많은 가격대를 중심행 = 행번호; else if 거래량[중심행] == 거래량[행번호] and //거래량도 동일하면 abs(중앙가격-가격대[중심행]) > //전체가격폭 중앙에 abs(중앙가격-가격대[행번호]) then //가까운 가격으로 중심행 = 행번호; } } } 중심가격[0] = 가격대[중심행]; //알파벳 개수가 가장 많은 가격 가치영역상한 = 중심행; //중심가격을 중심으로 위, 아래 70% 해당하는 가치영역하한 = 중심행; //행을 찾기 위해 시작 행을 중심행으로 함 누적개수 = 개수[중심행]; //가치영역을 찾기 위해 알파벳 개수 누적 for j = 0 to 499 { var2 = 개수[가치영역상한-1]; //가치영역상한선은 1행씩 위로(-1) var3 = 개수[가치영역하한+1]; //가치영역하한선은 1행씩 아래로(+1) if var2 > var3 then //개수가 많은 쪽의 개수를 먼저 누적한다 { 누적개수 = 누적개수 + var2; 가치영역상한 = 가치영역상한 - 1; } else if var2 < var3 then { 누적개수 = 누적개수 + var3; 가치영역하한 = 가치영역하한 + 1; } else if var2 == var3 and var2 > 0 and var3 > 0 then { 누적개수 = 누적개수 + var2; 가치영역상한 = 가치영역상한 - 1; } if 누적개수 >= 총개수 * 0.7 or var2 + var3 == 0 then j = 499; } 가치영역상[0] = 가격대[가치영역상한]; 가치영역하[0] = 가격대[가치영역하한]; 상위개수 = 0; 하위개수 = 0; 위꼬리상한 = 499; 위꼬리하한 = 0; 아래꼬리상한 = 499; if 개수[499] == 1 then 아래꼬리하한 = 499; else 아래꼬리하한 = 0; for 행번호 = 0 to 중심행-1 { if 개수[행번호] > 1 then 상위개수 = 상위개수 + 개수[행번호]; if 개수[행번호] == 0 and 개수[행번호+1] == 1 then 위꼬리상한 = 행번호 + 1; if 개수[행번호] == 1 and 개수[행번호+1] > 1 and 위꼬리하한 == 0 then 위꼬리하한 = 행번호; } for 행번호 = 499 downto 중심행+1 { if 개수[행번호] > 1 then 하위개수 = 하위개수 + 개수[행번호]; if 개수[행번호] == 1 and 개수[행번호-1] > 1 and 아래꼬리상한 == 499 then 아래꼬리상한 = 행번호; if 개수[행번호] == 0 and 개수[행번호-1] == 1 then 아래꼬리하한 = 행번호 - 1; } 봉개수 = 0; //단봉, 쌍봉, 삼봉 등 패턴파악용 for 행번호 = 1 to 499 { if 개수[행번호-1] < 개수[행번호] then //개수가 올라가면 { if 봉개수 == 0 then 봉개수 = 0.3; //x.3 else if 봉개수 == 1 then 봉개수 = 1.3; else if 봉개수 == 2 then 봉개수 = 2.3; else if 봉개수 == 3 then 봉개수 = 3.3; else if 봉개수 == 4 then 봉개수 = 4.3; } if 최대개수 * 0.8 < 개수[행번호] then //꼭지에 도달하면 { if 봉개수 == 0.3 then 봉개수 = 0.7; //x.7 else if 봉개수 == 1.3 then 봉개수 = 1.7; //낮은 봉은 배제하려고 else if 봉개수 == 2.3 then 봉개수 = 2.7; //최대개수의 80% 수준으로 설정 else if 봉개수 == 3.3 then 봉개수 = 3.7; else if 봉개수 == 4.3 then 봉개수 = 4.7; } if 개수[행번호-1] > 개수[행번호] then //개수가 떨어지는데 { if 봉개수 == 0.7 then 봉개수 = 1; //꼭지 찍고 내려오는 것은 else if 봉개수 == 1.7 then 봉개수 = 2; //1.0 else if 봉개수 == 2.7 then 봉개수 = 3; else if 봉개수 == 3.7 then 봉개수 = 4; else if 봉개수 == 4.7 then 봉개수 = 5; else if 봉개수 == 0.3 then 봉개수 = 0; //꼭지 못찍고 내려오면 else if 봉개수 == 1.3 then 봉개수 = 1; //원위치 else if 봉개수 == 2.3 then 봉개수 = 2; else if 봉개수 == 3.3 then 봉개수 = 3; else if 봉개수 == 4.3 then 봉개수 = 4; } } plot1(중심가격[0],"중심가격"); plot2(가치영역상[0],"가치영역(상)",RED); //선그래프,채우기 plot3(가치영역하[0],"가치영역(하)",RED); if 위꼬리상한 <= 위꼬리하한 then { plot4(가격대[위꼬리상한],"위꼬리상단",BLACK); //점그래프,채우기 plot5(가격대[위꼬리하한],"위꼬리하단",BLACK); } if 아래꼬리상한 <= 아래꼬리하한 then { plot6(가격대[아래꼬리상한],"아래꼬리상단",BLACK); //점그래프,채우기 plot7(가격대[아래꼬리하한],"아래꼬리하단",BLACK); } if 시초범위상 > 0 then plot8(시초범위상,"시초범위(상)",GREEN); //점그래프,채우기 if 시초범위하 > 0 then plot9(시초범위하,"시초범위(하)",GREEN);
프로필 이미지
비정성시
2024-02-16
730
글번호 176667
지표
답변완료

수식좀 요청 드립니다(수직선)

* 항상 많은 도움에 고맙습니다. * 아래 수식을 적용 하면 4개의 점선이 생김니다 참고사항 : 실제 수식은 아래 조건임 if StoD < 20 Then if slowMA > slowMA[2] Then if Signal2 and wasUp[1] Then if Midline < Midline[2] Then * 요청 사항: 4개 점선중 3개 이상(3포함)의 점선이 생기면 5번재 점(★)으로 한줄 더 요청 합니다. 즉 1~2개의 점(●) 이면 안 생기고 한봉에 점(●)이 3개이상(3포함) 이면 5번재 점(★)이 찍히고 ★선 기준봉에 수직선이 그려 질수 있도록 부탁 드립니다. ## 수직선: TL_New(sDate,sTime,c,sDate,sTime,999); ## 아래 수식 (이것중 3개 이상이면 별점 생기고 수평선 부탁 드립니다) var : TX63(0); Input : 이격도81(20),Period86(5); var : DParity(0),mav86(0); DParity = Disparity(이격도81); mav86 = ma(DParity,Period86); var81 = ma(mav86,3) ; var82 = ma(var81,3) ; var83 = ma(var82,3) ; var84 = ma(var82,3) ; var85 = ma(var82,3) ; var86 = ma(mav86,12) ; Plot1(Var86) ; ## var: TX63(0); if var85 > var86 Then { TX63 = Text_New_Self(sDate,sTime,var85-PriceScale*3,"●"); Text_SetStyle(TX63,2,1); Text_SetColor(TX63,Rgb(250,0,250)); Text_SetSize(TX63,12); } if var85 < var84+PriceScale*3 Then { TX63 = Text_New_Self(sDate,sTime,var85+PriceScale*6,"●"); Text_SetStyle(TX63,2,1); Text_SetColor(TX63,Rgb(0,0,255)); Text_SetSize(TX63,12); } if var85+PriceScale*3 > var83 Then { TX63 = Text_New_Self(sDate,sTime,var85-PriceScale*9,"●"); Text_SetStyle(TX63,2,1); Text_SetColor(TX63,Rgb(0,0,0)); Text_SetSize(TX63,12); } if var85+PriceScale*3 > var83-PriceScale*8 Then { TX63 = Text_New_Self(sDate,sTime,var85-PriceScale*15,"●"); Text_SetStyle(TX63,2,1); Text_SetColor(TX63,Rgb(0,135,0)); Text_SetSize(TX63,12); } * 고맙습니다 좋은 시간 되십시요. ##======================================================================= 안녕하세요 예스스탁입니다. 1.매도식 1) Inputs: N(3),Per(30),P1(10),P2(20); Variables: BBTop(0), BBMid(0), BBBot(0),Bwidth(0),MACDV(0),MACDS(0); BBTop = BollBandUp(20,2); BBMid = ma(C,20); BBBot = BollBandDown(20,2); BWidth = ((BBTop - BBBot)/ BBMid); MACDV = MACD(12,26); MACDS = ema(MACDV,9); if BWidth >= BWidth[N]*(1+Per/100) And #N봉전 대비 밴드폭이 Per%이상 큼 countif(CrossDown(MACDV,MACDS),2) >= 1 And #현재봉과 전봉중에 MACD 데드크로스 있음 C <= O-PriceScale*P1 And C >= O-PriceScale*P2 and #P1틱이상 P2틱 이하의 장대음봉 발생 (c <= BBTop*1.02 or CrossDown(c,ma(C,20))) Then #종가가 밴드 상단 2% 이내이거나 20이평 하향이탈 sell("s1",AtMarket); if MarketPosition == -1 Then{ #MACD 골든크로스 발생하면 다음봉 시가에 매수청산 if CrossUp(MACDV,MACDS)Then ExitShort("sx1",AtMarket); #장대음봉으로 5이평 상향돌파 if crossup(C,ma(C,5)) and C >= O+PriceScale*P1 And C <= O+PriceScale*P2 Then ExitShort("sx2"); #하단선 1% 근접 if CrossDown(c,BBBot*1.01) Then ExitShort("sx3"); #6틱이상 수익후에 4틱 밀리면 청산 if Lowest(L,BarsSinceEntry) <= EntryPrice-PriceScale*6 Then ExitShort("sx4",AtStop,lowest(L,BarsSinceEntry)+PriceScale*4); } #손절 SetStopLoss(PriceScale*8,PointStop); 2) Inputs: N(3),Per(30),P1(10),P2(20); Variables: BBTop(0), BBMid(0), BBBot(0),Bwidth(0),MACDV(0),MACDS(0); BBTop = BollBandUp(20,2); BBMid = ma(C,20); BBBot = BollBandDown(20,2); BWidth = ((BBTop - BBBot)/ BBMid); MACDV = MACD(12,26); MACDS = ema(MACDV,9); if BWidth >= BWidth[N]*(1+Per/100) And #N봉전 대비 밴드폭이 Per%이상 큼 countif(CrossDown(MACDV,MACDS),2) >= 1 And #현재봉과 전봉중에 MACD 데드크로스 있음 C <= O-PriceScale*P1 And C >= O-PriceScale*P2 and #P1틱이상 P2틱 이하의 장대음봉 발생 (CrossDown(c,BBmid) or CrossDown(c,ma(C,20))) Then #종가가 밴드 중심선이나 20이평 하향이탈 sell("s2",AtMarket); if MarketPosition == -1 Then{ #MACD 골든크로스 발생하면 다음봉 시가에 매수청산 if CrossUp(MACDV,MACDS)Then ExitShort("sx1",AtMarket); #장대음봉으로 5이평 상향돌파 if crossup(C,ma(C,5)) and C >= O+PriceScale*P1 And C <= O+PriceScale*P2 Then ExitShort("sx2"); } #손절 SetStopLoss(PriceScale*8,PointStop); 2. 매수 input : P1(10),P2(15);#시가대비 10틱~15틱몸통 var1 = BollBandUp(20,2); var2 = BollBandDown(20,2); var3 = ma(c,20); var4 = MACD(12,26); var5 = ema(var4,9); /*1) 볼린저밴드 하단을 타고 하락추세를 가다가 하단선을 분봉상 장대양봉으로 돌파과 함께 5이동평균을 분봉상 동시에 돌파하고 MACD SIG널과 골든크로스신호가 동시에 발생시에 봉완성을 확인하고 그 다음봉에 진입하는데 진입은 앞전봉의 종가나 - 1~2틱에서만 진입한다.*/ if C < C[1] and var2 < var2[1] and#주가와 볼밴하단 하향 countif(crossup(c,var2),5) >= 1 and C <= var2*1.02 and #5봉안에 종가가 볼댄하단 상향돌파한적이 있고 2% 내 C >= O+PriceScale*P1 And C <= O+PriceScale*P2 and #P1틱 이상~P2틱 이하 몸통을 가지는 장대양봉 crossup(c,ma(c,5)) and # 종가가 5이평 상향돌파 crossup(var4,var5) Then#MACD가 시그널선 상향돌파 buy("b1"); /*2) 볼린저밴드 중심선을 타고 횡보추세(또는 이동평균 5이평과10이평과20이평의 이격도가 1%이내)를 가다가 중심선을 분봉상 장대양봉으로 돌파과 함께 5이동평균과 중심선을 분봉상 동시에 돌파하고 MACD SIG널과 골든크로스신호가 동시에 발생시에 봉완성을 확인하고 그 다음봉에 진입하는데 진입은 앞전봉의 종가나 - 1~2틱에서만 진입한다.*/ if max(ma(c,5),ma(C,10),ma(C,20)) <= Min(ma(c,5),ma(C,10),ma(C,20))*1.01 and#3이평이 1%안 밀집 crossup(c,var3) and #종가가 볼댄중심 상향돌파 C >= O+PriceScale*P1 And C <= O+PriceScale*P2 and #P1틱 이상~P2틱 이하 몸통을 가지는 장대양봉 crossup(c,ma(c,5)) and # 종가가 5이평 상향돌파 crossup(var4,var5) Then#MACD가 시그널선 상향돌파 buy("b2"); #((매수진입추가)) #3) macd sig골든크로스와 동시에 전봉거래량대비 3배이상의거래량으로 장대양봉(몇틱이상 ~몇틱이하)으로 볼린저밴드 상단돌파시를 확정하고 그다음봉 시가에 진입한다. #진입후 익절은 10틱 손절은 5일선하락이나 -6틱손실시에 매수청산을 추가해주세요. if crossup(c,var1) and #종가가 볼밴상단 상향돌파 C >= O+PriceScale*P1 And C <= O+PriceScale*P2 and #P1틱 이상~P2틱 이하 몸통을 가지는 장대양봉 V >= V[1]*3 and #진적봉대비 거래량 3개 증가 crossup(var4,var5) Then#MACD가 시그널선 상향돌파 buy("b3"); #손절 SetStopLoss(PriceScale*6,PointStop); #목표이익 SetStopProfittarget(PriceScale*10,PointStop); if MarketPosition == 1 Then{ #진입봉(장대양봉)의 저가 이탈 ExitLong("bx1",AtStop,L[BarsSinceEntry]-PriceScale); #MACD데드 if CrossDown(var4,var5) Then exitlong("bx2"); } #5일선 하락 매수청산 if MarketPosition == 1 and ma(c,5) < ma(C,5)[1] Then exitlong(); 즐거운 하루되세요 ================================================================== 안녕하세요 예스스탁입니다. 1. input : P(5); var : D1(0),MM(0); MM = stime%100; D1 = C/ma(c,P)*100; #이격3개가 모두 99.5이하인 시점에 매수진입 if CrossDown(d1,99.5) and ((MM >= 0 and MM < 25) or (MM >= 30 and MM < 55)) Then buy("b",OnClose,def,1); #이격3개가 모두 100.5이상인 시점에 매도진입 if crossup(d1,100.05) and ((MM >= 0 and MM < 25) or (MM >= 30 and MM < 55)) Then sell("s",OnClose,def,1); #매수진입후 if MarketPosition == 1 Then{ if CurrentContracts > CurrentContracts[1] Then var1 = H; if H > var1 Then var1 = H; #진입이 1번일경우 if MaxEntries == 1 Then{ #15틱 하락하면 1계약 추가매수진입 buy("bb",atlimit,EntryPrice-PriceScale*15,1); #진입가+10틱에 청산 ExitLong("bp1",Atlimit,EntryPrice+PriceScale*10); #4틱이상 상승후 진입가+2틱에 도달하면 매수청산 if var1 >= EntryPrice+PriceScale*4 Then exitlong("bx1",AtStop,EntryPrice+PriceScale*2); } #진입이 2번일 경우 if MaxEntries == 2 Then{ #청산이 아직 발생하지 않은 경우 평단가+4틱 수익이면 1계약청 if CurrentContracts == MaxContracts Then ExitLong("bp21",Atlimit,avgEntryPrice+PriceScale*4,"",1,1); #일부청산이 된 경우 if CurrentContracts < MaxContracts Then #평단가 +10틱이상이면 나머지 청산 ExitLong("bp22",Atlimit,AvgEntryPrice+PriceScale*10); #평단가 +4틱이상 상승후 하락해서 평단가+4틱에 도달하면 나머지 청산 if var1 > AvgEntryPrice+PriceScale*4 Then exitlong("bx2",AtStop,EntryPrice+PriceScale*4); } } #매도진입후 if MarketPosition == -1 Then{ if CurrentContracts > CurrentContracts[1] Then var2 = L; if L < var2 Then var2 = L; #진입이 1번일경우 if MaxEntries == 1 Then{ #15틱 상승하면 1계약 추가매도진입 sell("ss",atlimit,EntryPrice+PriceScale*15,1); #진입가-10틱에 청산 ExitShort("sp1",Atlimit,EntryPrice-PriceScale*10); #4틱 하락 후 진입가-2틱에 도달하면 매도청산 if var2 <= EntryPrice-PriceScale*4 Then ExitShort("sx1",AtStop,EntryPrice-PriceScale*2); } #진입이 2번일 경우 if MaxEntries == 2 Then{ if CurrentContracts == MaxContracts Then ExitShort("sp21",Atlimit,avgEntryPrice-PriceScale*4); if CurrentContracts < MaxContracts Then ExitShort("sp22",Atlimit,AvgEntryPrice-PriceScale*10); if var2 < AvgEntryPrice-PriceScale*4 Then ExitShort("sx2",AtStop,EntryPrice-PriceScale*4); } } 2 가능하지 않습니다. 봉미완성시 조건체크해서 신호나오게 할수는 없습니다. 즐거운 하루되세요 안녕하세요 예스스탁입니다. var : box(0); var1 = BollBandDown(40,2); Var2 = BollBandDown(80,2); Condition1 = var1 < Var2; if Condition1 == true Then { if Condition1[1] == False Then { box = Box_New(sDate,sTime,H,NextBarSdate,NextBarStime,L); Box_SetColor(box,Yellow); Box_SetFill(box,true); Box_SetExtFill(box,true); } Else { Box_SetEnd(box,NextBarSdate,NextBarStime,l); } } 즐거운 하루되세요
프로필 이미지
요타
2024-07-24
990
글번호 176666
지표
답변완료

확인 부탁드립니다.

안녕하세요 아래 수식을 다시한번 확인 부탁드립니다. 글로 표현하자니 제가 잘 표현하지 못한것 같습니다. 매도(매수)신호 1봉의 3등분이 아니라 매도신호봉과 매수신호봉까지의 고가,중심,저가 입니다. 감사합니다 var : mav1(0),mav2(0),mav3(0),T1(0),T2(0),T3(0); var : bTL1(0),bTL2(0),bTL3(0); var : sTL1(0),sTL2(0),sTL3(0); mav1 = ma(c,5); mav2 = ma(c,20); mav3 = ma(c,60); if mav1 > mav1[1] Then T1 = 1; if mav1 < mav1[1] Then T1 = -1; if T1 == 1 and T1[1] != 1 Then var1 = 0; // if T1 == 1 and C > O and (C+O)/2 >= mav1 and mav2 > mav2[1] and mav3 > mav3[1] Then{ 60이평포함 if T1 == 1 and C > O and (C+O)/2 >= mav1 and mav2 > mav2[1] and mav1 > mav2 Then { var1 = var1+1; if MarketPosition <= 0 and var1 == 1 Then { buy("5매수"); value1 = H; value2 = (H+L)/2; value3 = L; TL_Delete(bTL1); TL_Delete(bTL2); TL_Delete(bTL3); bTL1 = TL_New(sDate,sTime,value1,NextBarSdate,NextBarStime,value1); bTL2 = TL_New(sDate,sTime,value2,NextBarSdate,NextBarStime,value2); bTL3 = TL_New(sDate,sTime,value3,NextBarSdate,NextBarStime,value3); TL_SetExtRight(bTL1,true); TL_SetExtRight(bTL2,true); TL_SetExtRight(bTL3,true); TL_SetColor(bTL1,Red); TL_SetColor(bTL2,Red); TL_SetColor(bTL3,Red); } } if T1 == -1 and T1[1] != -1 Then var2 = 0; // if T1 == -1 and C < O and (C+O)/2 <= mav1 and mav2 < mav2[1] and mav3 < mav3[1] Then{ 60이평포함 if T1 == -1 and C < O and (C+O)/2 <= mav1 and mav2 < mav2[1] and mav1 < mav2 Then { var2 = var2+1; if MarketPosition >= 0 and var2 == 1 Then { sell("5매도"); value4 = H; value5 = (H+L)/2; value6 = L; TL_Delete(sTL1); TL_Delete(sTL2); TL_Delete(sTL3); sTL1 = TL_New(sDate,sTime,value4,NextBarSdate,NextBarStime,value4); sTL2 = TL_New(sDate,sTime,value5,NextBarSdate,NextBarStime,value5); sTL3 = TL_New(sDate,sTime,value6,NextBarSdate,NextBarStime,value6); TL_SetExtRight(sTL1,true); TL_SetExtRight(sTL2,true); TL_SetExtRight(sTL3,true); TL_SetColor(sTL1,Blue); TL_SetColor(sTL2,Blue); TL_SetColor(sTL3,Blue); } }
프로필 이미지
라몬
2024-02-15
761
글번호 176665
시스템
답변완료

문의드립니다.

다음 수식을 종목검색식으로 부탁드립니다. 기준봉조건 = C > C(1) * 종가등락률 && H > C(1) * 고가등락률 && (V > 거래량기준 or 거래대금 > 거래대금기준) && C > O; 기준봉V = Valuewhen(1, 기준봉조건, V); Sv = sum(V); K1 = Sv - Valuewhen(1, 기준봉조건, Sv(1)) - 기준봉V; K = Valuewhen(1, 기준봉조건, V); CrossUp(k, k1)
프로필 이미지
redcon
2024-02-15
637
글번호 176659
종목검색
답변완료

항셍 분봉 관련 문의

1. 항셍 3분봉을 예로 들면 오전 10시12분으로 표기되는 봉에 동시호가 체결가가 차트에 점으로 찍히고, (240215 기준 15918) 다음 봉이 10시15분 봉으로 표기되어 시/고/저/종가가 나오는데요, (240215 기준 시/고/저/종가 15927/15927/15757/15806) 1-1. 수식에 dayOpen은 15918원일까요? 15927원일까요? 1-2. dayindex==0 의 종가는 15918원일까요? 15806원일까요? 2. 제가 2003년도 예스트레이더로 작업하면서 사용자함수를 많이 만들었었는데 하도 오래되서 기억이 잘 안나는 부분이 있어서 문의드려요. ABC=accumN(iff(L<dayLow(1) && dayindex()==2,1,0),dayindex()+1); 3분봉으로 설명을 하면, 전일 저가보다 dayindex()==2의 저가[10시18분봉_10시18분~21분 거래 결과 (또는 21분봉_10시21분~24분 거래결과)]가 작으면 1, 크면 0 -> 여기까지는 알겠는데 뒤에 dayindex()+1 -->> 이 부분은 어떻게 이해하면 될까요? 늘 감사합니다^^
프로필 이미지
sysking
2024-02-15
600
글번호 176648
시스템
답변완료

나스닥 시뮬레이션을 위한 썸머타임, 거래시간, 매매횟수

안녕하세요. 지난번 항셍 거래시간 수식 관련 명쾌한 답변 주셔서 많은 진척이 있었습니다. 깊은 감사드립니다!^^ 아래의 조건으로 나스닥 수식 적용 중인데 막히는 부분이 있어 문의 올립니다! - 3분봉 - 당일청산 - 5년이상 시뮬레이션 예정 수식 문의사항 - 매년 썸머타임 적용 수식 - 거래시간 23시30분~07시 썸머타임 기간에는 (22시30분~06시) - 매수진입, 매도진입 1일 각 3회까지만 허용 위 수식만 있으면 진입,청산 대입하여 시뮬레이션 돌릴 수 있는 상황입니다! 항상 감사합니다^^ P.S : 회신 주실 때 각 수식에 대해 간단하게 설명해주시면 나중에 조금 변경하거나 응용을 제 스스로 하는데 많은 도움이 될 것 같아요^^
프로필 이미지
sysking
2024-02-15
646
글번호 176647
시스템
답변완료

문의 드립니다.

아래 식에서 MACD를 추가하고자 합니다. 매수 때 30분봉에서 MACD 12 26 9 선이 시그널선 위에 있을 때 아래 식을 적용하여 매수 매도 때 30분봉 에서 MACD 12 26 9 선이 시그널선 아래에 있을 때 아래 식을 적용하여 매도 부탁드립니다. input : ntime(30); var : S1(0),D1(0),TM(0),TF(0),OO(0); if Bdate != Bdate[1] Then { S1 = TimeToMinutes(stime); D1 = sdate; } if D1 > 0 then { if sdate == D1 Then TM = TimeToMinutes(stime)-S1; Else TM = TimeToMinutes(stime)+1440-S1; TF = TM%ntime; if Bdate != Bdate[1] or (Bdate == Bdate[1] and ntime > 1 and TF < TF[1]) or (Bdate == Bdate[1] and ntime > 1 and TM >= TM[1]+ntime) or (Bdate == Bdate[1] and ntime == 1 and TM > TM[1]) Then { OO = O; } if MarketPosition <= 0 and OO > 0 and C > OO and C > O and C[1] < O[1] Then Buy(); if MarketPosition == 1 and C < O Then ExitLong(); } ------------------------------------------------------------------------------- input : ntime(30); var : S1(0),D1(0),TM(0),TF(0),OO(0); if Bdate != Bdate[1] Then { S1 = TimeToMinutes(stime); D1 = sdate; } if D1 > 0 then { if sdate == D1 Then TM = TimeToMinutes(stime)-S1; Else TM = TimeToMinutes(stime)+1440-S1; TF = TM%ntime; if Bdate != Bdate[1] or (Bdate == Bdate[1] and ntime > 1 and TF < TF[1]) or (Bdate == Bdate[1] and ntime > 1 and TM >= TM[1]+ntime) or (Bdate == Bdate[1] and ntime == 1 and TM > TM[1]) Then { OO = O; } if MarketPosition >= 0 and OO > 0 and C < OO and C < O and C[1] > O[1] Then Sell(); if MarketPosition == -1 and C > O Then ExitShort(); }
프로필 이미지
선물대장
2024-02-15
719
글번호 176646
시스템