무지한 백성을 돌보시냐 수고많으신관리자님께 감사 말씀드리며... 아래챠트수식은 다른회원님이 하락률을 연속계산하게 예스관리자님이 만들어 주신수식입니다 부탁드리고 싶은부분은 1 반대로 상승률로 표현된챠트 2 한챠트로 하락률과상승률 둘다 표현이 가능한지여부를 부탁드립니다 input:length(6),n(1); Var:j(0),jj(0),HH(0),LL(0),최종고가(0),최종저가(0),최종꼭지점(""),처리구분(""), TL1(0),Text1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL12(0),TL13(0),TL14(0),TL15(0),T(0),md(0); Array:고[10,4](0),저[10,4](0); // 1:가격,2:Index,3:sDate,4:sTime #==========================================# HH = IFF(0==1,C,H); LL = IFF(0==1,C,L); If Index == 0 Then { 고[1,1] = HH; 저[1,1] = LL; } Condition1 = Highest(HH,length) == HH and 최종고가 <> HH; Condition2 = Lowest (LL,length) == LL and 최종저가 <> LL; 처리구분 = ""; 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; 최종고가 = HH; // 신규고점을 체크하기 위해 저장 If 최종꼭지점 == "저점" Then { For j = 10 DownTo 2 { For jj = 1 To 4 { 고[j,jj] = 고[j-1,jj]; } } 고[1,1] = HH; 고[1,2] = Index; 고[1,3] = sDate; 고[1,4] = sTime; TL1 = TL_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]); If 1 == 1 Then TL_SetSize(TL1,n); TL_SetColor(TL1,WHITE); } Else If 고[1,1] < HH Then // 1번 고점보다 높은 고가 출현 { 고[1,1] = HH; 고[1,2] = Index; 고[1,3] = sDate; 고[1,4] = sTime; TL_SetEnd(TL1,고[1,3],고[1,4],고[1,1]); // 시작점은 변동없고 끝점의 위치가 현재 봉으로 연장된 것임 If 1 == 1 Then { Text_SetLocation(Text1,고[1,3],고[1,4],고[1,1]); Text_SetString(Text1,NumToStr(고[1,1],2)); } } 최종꼭지점 = "고점"; } #==========================================# If 처리구분 == "저점처리" Then { T = -1; 최종저가 = LL; If 최종꼭지점 == "고점" then { For j = 10 DownTo 2 { For jj = 1 To 4 { 저[j,jj] = 저[j-1,jj]; } } 저[1,1] = LL; 저[1,2] = Index; 저[1,3] = sDate; 저[1,4] = sTime; TL1 = TL_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]); If 1 == 1 Then TL_SetSize(TL1,n); TL_SetColor(TL1,WHITE); } Else If 저[1,1] > LL then { 저[1,1] = LL; 저[1,2] = Index; 저[1,3] = sDate; 저[1,4] = sTime; TL_SetEnd(TL1,저[1,3],저[1,4],저[1,1]); If 1 == 1 Then { Text_SetLocation(Text1,저[1,3],저[1,4],저[1,1]); Text_SetString(Text1,NumToStr(저[1,1],2)); } } 최종꼭지점 = "저점"; } if 고[1,1] > 0 Then { if T == 1 and T != T[1] Then md = 0; Else { if 고[1,1] != 고[1,1][1] Then md = 0; Else { if (L-고[1,1])/고[1,1]*100 < md Then md = (L-고[1,1])/고[1,1]*100; } } plot1(Md); PlotBaseLine1(0); }

1. if Bdate != Bdate[1] Then { var1 = 0; Var2 = 0; } if C > O Then var1 = var1+v; if C < O Then var2 = var2+v; Var3 = var1-Var2; if Var3 > 0 Then { if var3 < 1000 Then Plot1(Var3,"차",Yellow); Else if Var3 >= 1000 and Var3 < 10000 Then Plot1(Var3,"차",Orange); Else Plot1(Var3,"차",Red); } Else { if var3 > -1000 Then Plot1(Var3,"차",Green); Else if Var3 <= -1000 and Var3 > -10000 Then Plot1(Var3,"차",Blue); Else Plot1(Var3,"차",Black); } 2. Input : Period(12), Period1(5); Var : value(0); value = StochasticsK(Period,Period1); # 매수/매도청산 If CrossUP(value, 20) Then { Buy(); } # 매도/매수청산 If CrossDown(value, 80) Then { Sell(); } 수고 많으십니다 1번 지표는 만들어 주신 거래량 지표인데 아주 잘 사용하고 있습니다 감사합니다 2번은 스톡 전략인데 1번 지표가 +일 때는 스톡이 매수만 진입 매도 신호일 때는 매수 청산 하고 매도 금지 1번 지표가 -일 때는 스톡이 매도만 진입하고 매수 신호일 때 매도청산하고 매수금지 이런 전략을 부탁드립니다 그리고 1번 지표를 이용해서 스톡 말고 다른 지표도 응용해 보고 싶은데 다른 시스템도 응용 할수 있게 간단한 팁도 알려주십시요 감사합니다

선물에 관한 질문 입니다 어제 (전일) 종가의 basis 구하는 식 부탁 드립니다

data2에 9시반 시간이 나오게 부탁드립니다

수고 하십니다. 아래 4가지 조건을 만족하는 지표식을 하나로 만들고 싶습니다. 즉, 각각의 4가지 경우를 모두 다른 색으로 표현하고 싶습니다. 수고 하세요... ###### input : period1(20), period2(60) ; var1 = ema(C,period1); var2 = ema(C,period2); Var3 = (var1+Var2)/2 ; Plot1(var1, "ema1",BLACk); Plot2(var2, "ema2",BLACk); ###### alt1 var : T1(0); if var1 > var1[1] and var2 > var2[1] Then /// 조건1 = Ema1 상승 & Ema2 상승 T1 = 1; if var1 < var1[1] and var2 < var2[1] Then /// 조건2 = Ema1 하락 & Ema2 하락 T1 = -1; Plot11(Var3,"Var3",IFf(T1==1,Red,Blue)); /// var : T2(0); if var1 > var1[1] and var2 < var2[1] Then /// 조건3 = Ema1 상승 & Ema2 하락 T2 = 1; if var1 < var1[1] and var2 > var2[1] Then /// 조건4 = Ema1 하락 & Ema2 상승 T2 = -1; Plot12(Var3,"Var3",IFf(T2==1,green,Magenta)); /// /* ###### alt2 var : T1(0); if var1 > var1[1] Then /// 조건1a = Ema1 상승 T1 = 1; if var2 > var2[1] Then /// 조건1b = Ema2 상승 T1 = -1; Plot21(Var3,"Var3",IFf(T1==1,Red,Blue)); /// var : T2(0); if var1 > var1[1] Then /// 조건2a = Ema1 상승 T2 = 1; if var2 < var2[1] Then /// 조건2b = Ema2 하락 T2 = -1; Plot22(Var3,"Var3",IFf(T2==1,brown,Black)); /// var : T3(0); if var1 < var1[1] Then /// 조건3a = Ema1 하락 T3 = 1; if var2 > var2[1] Then /// 조건3b = Ema2 상승 T3 = -1; Plot31(Var3,"Var3",IFf(T3==1,green,Magenta)); /// var : T4(0); if var1 < var1[1] Then /// 조건4a = Ema1 하락 T4 = 1; if var2 < var2[1] Then /// 조건4b = Ema2 하락 T4 = -1; Plot32(Var3,"Var3",IFf(T4==1,Cyan,Gold)); /// */

매수 : 시가대비+50틱 매도 : 시가대비-50틱 ** 리버스(스위칭) 매매수식부탁드립니다. ** 시가대비+50틱이면 매수로, 시가대비 -50틱이면 매도로...대응... 1. 매수,매도 조건만족하면 10회까지 연속 스위칭(매수,매도). 2. 매수든,매도든 1회차,2회차 매수또는 매도진입신호나오면 1차,2차 진입은 일단 패스...미진입하고 싶습니다. 3. 즉 3회차 진입만족조건식 부터 진입하고 싶습니다. ** 매매수식 부탁드리겠습니다.

네트웩이 끊혔을 때, 다시 시직하게 하는 함수는 없나요. 네트웩을 확인해서 이상이 있거나 끊혔을 때 다시 시작하게 하는 함수 말입니다.

분차트,틱차트 종류 관계없이 200봉마다 막대그래프로 표시되게 해주세요. 그리고 막대그래프로 표시되는 그 봉을 다음 200봉 지나서 막대그래프로 나타나기 전까지 쭉 선으로 표시가 되게 부탁드립니다.