Input:length(3),선굵기(1); Var:j(0),lastHiVal(0),lastLoVal(0),sBar(0),eBar(0),TL1(0),처리구분(""), TL_Val1(0),TL_Val2(0); var : T(0),LTL1(0); var : HTL1(0); Array:고점[10,2](0),저점[10,2](0); 처리구분 = ""; If Highest(H,length) == H and lastHiVal <> H and Lowest(L,length) == L and lastLoVal <> L Then { If 저점[1,1] > L Then 처리구분 = "저점처리"; If 고점[1,1] < H Then 처리구분 = "고점처리"; } Else If Highest(H,length) == H and lastHiVal <> H Then 처리구분 = "고점처리"; Else If Lowest(L,length) == L and lastLoVal <> L Then 처리구분 = "저점처리"; If 처리구분 == "고점처리" Then { T = 1; lastHiVal = H; If 고점[1,2] < 저점[1,2] Then { For j = 10 DownTo 2 { 고점[j,1] = 고점[j-1,1]; 고점[j,2] = 고점[j-1,2]; } } If 고점[1,2] < 저점[1,2] or 고점[1,1] < H Then { 고점[1,1] = H; 고점[1,2] = Index; sBar = Index - 저점[1,2]; eBar = 0; If TL_GetBeginDate(TL1) == sDate[sBar] and TL_GetBeginTime(TL1) == sTime[sBar] Then { TL_Delete(TL1); } if T[1] != 1 Then{ TL_SetExtRight(LTL1,False); TL_Delete(LTL1); LTL1 = TL_New(sDate[index-저점[2,2]],sTime[index-저점[2,2]],저점[2,1],sDate[index-저점[1,2]],sTime[index-저점[1,2]],저점[1,1]); // TL_SetExtRight(LTL1,true); } If 고점[3,1] < 고점[2,1] and 고점[2,1] > 고점[1,1] and 저점[2,1] < 저점[1,1] Then { sBar = Index - 저점[2,2]; eBar = Index - 저점[1,2]; } } } If 처리구분 == "저점처리" Then { T = -1; lastLoVal = L; If 저점[1,2] < 고점[1,2] Then { For j = 10 DownTo 2 { 저점[j,1] = 저점[j-1,1]; 저점[j,2] = 저점[j-1,2]; } } If 저점[1,2] < 고점[1,2] or 저점[1,1] > L Then { 저점[1,1] = L; 저점[1,2] = Index; sBar = Index - 고점[1,2]; eBar = 0; If TL_GetBeginDate(TL1) == sDate[sBar] and TL_GetBeginTime(TL1) == sTime[sBar] Then { TL_Delete(TL1); } if T[1] != -1 then{ TL_SetExtRight(HTL1,false); TL_Delete(HTL1); HTL1 = TL_New(sDate[index-고점[2,2]],sTime[index-고점[2,2]],고점[2,1],sDate[index-고점[1,2]],sTime[index-고점[1,2]],고점[1,1]); TL_SetExtRight(HTL1,true); } If 저점[2,1] < 저점[1,1] and 저점[2,1] < 저점[3,1] and 고점[2,1] > 고점[1,1] Then { sBar = Index - 고점[2,2]; eBar = Index - 고점[1,2]; } } } TL_SetSize(TL1,선굵기); TL_SetColor(TL1,BLACK); TL_SetColor(LTL1,green); TL_SetColor(HTL1,red); TL_SetSize(LTL1,선굵기); TL_SetSize(HTL1,선굵기); Input:blength(20); Var:bj(0),blastHiVal(0),blasbTLoVal(0),sbBar(0),ebBar(0),bTL1(0),b처리구분(""), bTL_Val1(0),bTL_Val2(0); var : bT(0),LbTL1(0); var : HbTL1(0); Array:b고점[10,2](0),b저점[10,2](0); b처리구분 = ""; If Highest(H,blength) == H and blastHiVal <> H and Lowest(L,blength) == L and blasbTLoVal <> L Then { If b저점[1,1] > L Then b처리구분 = "b저점처리"; If b고점[1,1] < H Then b처리구분 = "b고점처리"; } Else If Highest(H,blength) == H and blastHiVal <> H Then b처리구분 = "b고점처리"; Else If Lowest(L,blength) == L and blasbTLoVal <> L Then b처리구분 = "b저점처리"; If b처리구분 == "b고점처리" Then { bT = 1; blastHiVal = H; If b고점[1,2] < b저점[1,2] Then { For bj = 10 DownTo 2 { b고점[bj,1] = b고점[bj-1,1]; b고점[bj,2] = b고점[bj-1,2]; } } If b고점[1,2] < b저점[1,2] or b고점[1,1] < H Then { b고점[1,1] = H; b고점[1,2] = Index; sbBar = Index - b저점[1,2]; ebBar = 0; If TL_GetBeginDate(bTL1) == sDate[sbBar] and TL_GetBeginTime(bTL1) == sTime[sbBar] Then { TL_Delete(bTL1); } if bT[1] != 1 Then{ TL_SetExtRight(LbTL1,False); TL_Delete(LbTL1); LbTL1 = TL_New(sDate[index-b저점[2,2]],sTime[index-b저점[2,2]],b저점[2,1],sDate[index-b저점[1,2]],sTime[index-b저점[1,2]],b저점[1,1]); // TL_SetExtRight(LbTL1,true); } If b고점[3,1] < b고점[2,1] and b고점[2,1] > b고점[1,1] and b저점[2,1] < b저점[1,1] Then { sbBar = Index - b저점[2,2]; ebBar = Index - b저점[1,2]; } } } If b처리구분 == "b저점처리" Then { bT = -1; blasbTLoVal = L; If b저점[1,2] < b고점[1,2] Then { For bj = 10 DownTo 2 { b저점[bj,1] = b저점[bj-1,1]; b저점[bj,2] = b저점[bj-1,2]; } } If b저점[1,2] < b고점[1,2] or b저점[1,1] > L Then { b저점[1,1] = L; b저점[1,2] = Index; sbBar = Index - b고점[1,2]; ebBar = 0; If TL_GetBeginDate(bTL1) == sDate[sbBar] and TL_GetBeginTime(bTL1) == sTime[sbBar] Then { TL_Delete(bTL1); } if bT[1] != -1 then{ TL_SetExtRight(HbTL1,false); TL_Delete(HbTL1); HbTL1 = TL_New(sDate[index-b고점[2,2]],sTime[index-b고점[2,2]],b고점[2,1],sDate[index-b고점[1,2]],sTime[index-b고점[1,2]],b고점[1,1]); TL_SetExtRight(HbTL1,true); } If b저점[2,1] < b저점[1,1] and b저점[2,1] < b저점[3,1] and b고점[2,1] > b고점[1,1] Then { sbBar = Index - b고점[2,2]; ebBar = Index - b고점[1,2]; } } } TL_SetSize(bTL1,선굵기); TL_SetColor(bTL1,BLACK); TL_SetColor(LbTL1,darkgreen); TL_SetColor(HbTL1,darkred); TL_SetSize(LbTL1,선굵기); TL_SetSize(HbTL1,선굵기);

안녕하세요~ mp = MarketPosition; f mp[1] == 0 && mp == 1 Then enP=100; 포지션 진입 기간동안 상기 변수 100 값을 유지하려면 아래 수식이 필요한가요? If mp[1] == 1 && mp == 1 Then enP=enP[1];

안녕하세요~! 오늘도 질문을 드리고자 왔습니다! 아래 작성한 수식을 통해, ma(c,60)선보다 TSF(Period:40)선이 "위"에 위치하며 2일전보다 현제 tsf선이 상승 상태의 검색식을 만들었습니다만, 실제로 검색을 해 보니, TSF가 60이평선 위던 아래던, TSF가 상승중이던 하락중이던, 막우잡이로 검색이 되더라구요.. 3201 3202 두 화면에서 모두 막우잡이로 나왔고, 기준봉0봉 & 일봉차트로 검색하였습니다. 제가 무엇인가 잘못한것이 있는지 싶어 질문을 남깁니다! 아래는 제가 사용한 수식입니다. -------------------------------------- Input : TsF기간(40),중심기간(60); var : TsF1(0),이평(0); TsF1 = LRL(C,TsF기간)+LRS(C,TsF기간); 이평 = ma(c,적용기간); if TsF1 > 이평 and TsF1 > TsF1[2] Then Find(1); --------------------------------------

1. input : 익절틱수(150),손절틱수(30); 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 = NextBarSdate > (10000 * Year) + (100 * 3) + v2 And NextBarSdate < (10000 * Year) + (100 * 11) + v4; if summer == true Then { ST = 70000; ET = 55000; } Else { ST = 80000; ET = 65000; } } if Year > 0 Then { IF ET > ST Then SetStopEndofday(ET); Else { if sDate != sDate[1] Then SetStopEndofday(ET); } 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 ((NextBarSdate != sDate and NextBarStime >= ST) or (NextBarSdate == sDate and NextBarStime >= ST and sTime < ST)) Then { IF ET <= ST Then { SetStopEndofday(0); } if NextBarOpen > C Then { Buy("b1",AtStop,NextBarOpen+PriceScale*1); Sell("s1",AtStop,NextBarOpen-PriceScale*1); } if NextBarOpen < C Then { ExitLong("bx1",AtStop,NextBarOpen-PriceScale*1); ExitShort("sx1",AtStop,NextBarOpen+PriceScale*1); } } Else { if DayHigh < DayOpen+PriceScale*1 and DayOpen > DayClose(1) and entry < 1 Then Buy("b2",AtStop,DayOpen+PriceScale*1); if DayLow > DayOpen-PriceScale*1 and DayOpen > DayClose(1) and entry < 1 Then Sell("s2",AtStop,DayOpen-PriceScale*1); if DayOpen < DayClose(1) Then { if DayLow > DayOpen-PriceScale*1 Then ExitLong("bx2",AtStop,DayOpen-PriceScale*1); if DayHigh < DayOpen+PriceScale*1 Then ExitShort("sx2",AtStop,DayOpen+PriceScale*1); } } } SetStopProfittarget(PriceScale*익절틱수,PointStop); SetStopLoss(PriceScale*손절틱수,PointStop); 2. input : 익절틱수(160),손절틱수(30); if NextBarSdate != sDate Then { if NextBarOpen < C Then { Buy("b",AtStop,NextBarOpen+PriceScale*1); Sell("s",AtStop,NextBarOpen-PriceScale*1); } if NextBarOpen > C Then { ExitLong("bx",AtStop,NextBarOpen-PriceScale*1); ExitShort("sx",AtStop,NextBarOpen+PriceScale*1); } } SetStopProfittarget(PriceScale*익절틱수,PointStop); SetStopLoss(PriceScale*손절틱수,PointStop); if MarketPosition == 1 Then Sell("s1",AtStop,EntryPrice-2); if MarketPosition == -1 Then Buy("b1",AtStop,EntryPrice+2); if MarketPosition == 1 Then Sell("s2",AtStop,EntryPrice-4); if MarketPosition == -1 Then Buy("b2",AtStop,EntryPrice+4); 3. input : 익절틱수(160),손절틱수(30); if NextBarSdate != sDate Then { if NextBarOpen > C Then { Buy("b",AtStop,NextBarOpen+PriceScale*1); ExitLong("bx",AtLimit, NextBarOpen+PriceScale*1+(H-L)*0.7); } if NextBarOpen < C Then { Sell("s",AtStop,NextBarOpen-PriceScale*1); ExitShort("sx",AtLimit,NextBarOpen-PriceScale*1-(H-L)*0.7); } } SetStopProfittarget(PriceScale*익절틱수,PointStop); SetStopLoss(PriceScale*손절틱수,PointStop); 위 3가지 수식은 일봉매매 수식어입니다. 당일 익절이 장종료 5분전까지 없을때 그 5분의 싯점에 자동청산되는 수식어를 추가하고자 합니다.

안녕하세요? 2개의 이벤트가 동시에 발생했을 때 서로 다른 소리를 내는 2개의 playsound()가 동시에 실행되었으면 합니다. 현재는 하나만 소리가 나더군요. 원래 2개의 playsound()가 동시에 작동할 수는 없는 건가요? 아니면 저의 코드에 문제가 있는 걸까요? 예를 들면, 아래 연속된 2개 if 문의 조건이 모두 True 일때, 소리는 두번째 "이벤트B발생알람.wav" 소리만 나서요. if 이벤트A발생 == True Then playsound("C"￦이벤트A발생알람.wav"); if 이벤트B발생 == True Then playsound("C"￦이벤트B발생알람.wav"); 감사합니다.

안녕하세요. 일봉차트에서 매월 마지막날임을 확인하는 수식을 좀 알려주시면 좋겠습니다~

안녕 하십니까 키움증권 사용중 인데 화살표 만든거 종목검색식 부탁 드립니다. V >avg(V(1), p1) * m && C > highest(C(1), p2) 지표변수 p1 60 m 3 p2 180 이렇게 신호 설정 되어 있습니다. 이걸 종목검색 으로 부탁드립니다. 파일 첨부 합니다. 감사합니다.

안녕하세요. 아래 이전 답변에서 문의드립니다. cnt가 0부터 시작하는데, 분봉차트에서 보기에 전일부터 10전일까지 계산되어야 하니까(P=10기준) cnt =1~11까지 여야 하는게 아닌지요? cnt=0일때 값들은(dayclose(0) 등) 일중에 변하게 될텐데, 그러면 일중에 일봉기준 atr값이 변하게 되는것 같아서 맞지 않는거 아닌지요? ----------------------- 안녕하세요 예스스탁입니다. input : P(10); var : sumTR(0),TH(0),TL(0),cnt(0),ATRV(0); sumTR = 0; for cnt = 0 to P-1 { If DayClose(cnt+1) > DayHigh(cnt) then TH = DayClose(cnt+1); else TH = DayHigh(cnt); If DayClose(cnt+1) < daylow(cnt) then TL = DayClose(cnt+1); else TL = daylow(cnt); sumTR = sumTR + (TH-TL); } ATRV = sumTR/P; plot1(ATRV,"일봉ATR"); 즐거운 하루되세요 > 2ndbus 님이 쓴 글입니다. > 제목 : 분봉에서 일별Data로 ATR를 구하는 방법? > 분봉에서 ATR(6)이면 분봉기준으로 ATR를 구합니다. 분봉에서 일별데이타를 기준으로 ATR을 구할려면 별도로 ATR함수를 만들어야 할것으로 생각됩니다. 가능하다면 도움 부탁드립니다.

수고많으세요 종목검색식 문의드립니다 당일 해당되는 일봉 종목을 검색하고 싶은데요 조건은 1. macd 강세약세를 적용했을때(0선위 강세, 0선아래 약세) 당일 검색하는 일봉이 직전 macd 강세 바닥의 고점 가격을 처음돌파해서 종가마감하는 봉(고점을 봉의 몸통으로 돌파하는 그런 종목검색원함)과 2. 터치만하고 내려온(종가 돌파 마감은 못한) 종목검색식 이렇게 두가지 검색식 알고 싶습니니다 부탁드립니다~