시스템식 문의드립니다 9시부터 15시 까지 당일매매횟수 10회 이하 A지표가 0 부터 200 까지 1간격으로 된 선들중에 크로스업 B지표가 0 부터 2.00 까지 0.02 간격으로 된 선들중에 크로스업 2% 익절 2% 손절 A,B 지표가 다른간격의 선들이 있고 두개의 크로스업이 동시만족 감사합니다

계속 같은 질문인거 같아 죄송스럽네요 너그럽게.....^^ TL13 이 신규로 발생하는 시점에 의도치 않은 상황이 발생해서 그렇습니다 1.A 와 B 사이에 캔들중 최고가를 pinkline 으로 리턴 이 방식으로 가능하면 정말 좋겠습니다... 감사합니다! input:length(6); 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),고점변곡(""),저점변곡(""); var : clr1(0),clr2(0),BE(0),SE(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 { Text1 = Text_New(고[1,3],고[1,4],고[1,1],NumToStr(고[1,1],2)); Text_SetStyle(Text1, 0, 1); Text_SetColor(Text1,Red); } TL_SetSize(TL1,1); TL_SetColor(TL1,Gray); } 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 { Text1 = Text_New(저[1,3],저[1,4],저[1,1],NumToStr(저[1,1],2)); Text_SetStyle(Text1, 0, -1); Text_SetColor(Text1,Blue); } TL_SetSize(TL1,1); TL_SetColor(TL1,Gray); } 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 T == -1 and T[1] != -1 Then { TL12 = TL_New(고[2,3],고[2,4],고[2,1],sdate,stime,고[2,1]); TL_Delete(TL13); TL13 = TL_New(고[1,3],고[1,4],고[1,1],Sdate,Stime,고[1,1]); TL_SetExtRight(TL13,true); TL_SetSize(TL13,2); TL_SetColor(TL12,clr1); TL_SetSize(TL12,2); clr1 = Pink; TL_SetColor(TL13,Pink); } if T == 1 and T[1] != 1 Then { TL14= TL_New(저[2,3],저[2,4],저[2,1],sdate,stime,저[2,1]); TL_Delete(TL15); TL15= TL_New(저[1,3],저[1,4],저[1,1],sdate,stime,저[1,1]); TL_SetExtRight(TL15,true); TL_SetColor(TL14,clr2); TL_SetSize(TL14,2); clr2 = LightBlue; TL_SetColor(TL15,clr2); TL_SetSize(TL15,2); } if min(C,ma(c,5)) > TL_GetValue(TL13,sDate,sTime) Then { clr1 = Red; TL_SetColor(TL13,clr1); } if max(C,ma(c,5)) < TL_GetValue(TL15,sDate,sTime) Then { clr2 = Blue; TL_SetColor(TL15,clr2); } if T == 1 Then Pinkline = 고[2,1]; Else Pinkline = 고[1,1]; if T == -1 Then liblueline = 저[2,1]; Else liblueline = 저[1,1];

주가이평이 아닌 거래량이평을 중심선으로 하는 볼린저밴드를 만드는데, 2개의 볼린저밴드를 한 지표안에 동시에 집어넣고 싶습니다 따로 period와 편차를 다르게 2개의 수식을 만들고 지표를 합쳤을 때 제대로 합쳐지지 않더라구요 Period와 표준편차는 각각 20,2 / 10,1.9 로 부탁드립니다

문의 드립니다. 일중 분봉거래를 합니다. 진입조건에 맞으나, 첫진입은 걸러내고, 두번째 진입부터 실제주문으로 구성하고 싶습니다. 어떻게 해야할까요??

실시간 현재봉 까지 색상적용 부탁드립니다 input :Peod(10),색상두께(35); Var:하락색a(Red), 상승색a(Blue); Var:jr(0),gT(0); Var: 고11(0),고12(0),시간11(0),시간12(0),선TL1(0),선TL(0), 고21(0),고22(0),시간21(0),시간22(0),Vlue11(0),Vlue12(0), 고31(0),고32(0),시간31(0),시간32(0); Array:고Val[20](0),저val[20](0),고Bar[20](0),저Bar[20](0)/*,ZZ[20](0)*/; Array:dr[7](0),dfr[7](0); var : dbox(0),dbox1(0); dr[0] = 0; dr[1] = 2; dr[2] = 3.; dr[3] = -1; dr[4] = -2.; dr[5] = 1; dr[6] = 0.5; For jr = 0 To 19 { 고Bar[jr] = 고Bar[jr] + 1; 저Bar[jr] = 저Bar[jr] + 1; } if crossup(c,highest(H,Peod)[1]) Then gT = 1; if CrossDown(c,Lowest(L,Peod)[1]) Then gT = -1; If gT == -1 Then { If gT[1] != -1 Then { For jr = 18 DownTo 0 { 저val[jr+1] = 저val[jr]; 저Bar[jr+1] = 저Bar[jr]; //ZZ[j+1] = ZZ[j]; } 저val[0] = L; 저Bar[0] = 0; //ZZ[0] = L; 고11 = Date[고Bar[0]]; 시간11 = stime[고Bar[0]]; Vlue11 = 고Val[0]; 고12 = Date[저Bar[0]]; 시간12 = stime[저Bar[0]]; Vlue12 = 저val[0]; 고21 = Date[고Bar[0]]; 시간21 = stime[고Bar[0]]; 고22 = Date[0]; 시간22 = stime[0]; for jr = 0 to 6 { dfr[jr] = 저val[1] + ((고Val[0] - 저val[1]) * dr[jr]); } dbox = box_new(고11,시간11,Vlue11,고12,시간12,Vlue12); Box_SetColor(dbox,상승색a); Box_SetFill(dbox,true,색상두께); // Sell(); } If 저val[0] > L Then { 저val[0] = L; 저Bar[0] = 0; //ZZ[0] = L; 고12 = Date[저Bar[0]]; 시간12 = stime[저Bar[0]]; Vlue12 = 저val[0]; 고22 = Date[0]; 시간22 = stime[0]; Box_SetEnd(dbox,고12,시간12,Vlue12); } } If gT == 1 Then { If gT[1] != 1 Then { For jr = 18 DownTo 0 { 고Val[jr+1] = 고Val[jr]; 고Bar[jr+1] = 고Bar[jr]; //ZZ[j+1] = ZZ[j]; } 고Val[0] = H; 고Bar[0] = 0; //ZZ[0] = H; 고11 = Date[저Bar[0]]; 시간11 = stime[저Bar[0]]; Vlue11 = 저val[0]; 고12 = Date[고Bar[0]]; 시간12 = stime[고Bar[0]]; Vlue12 = 고Val[0]; 고31 = Date[저Bar[0]]; 시간31 = stime[저Bar[0]]; 고32 = Date[0]; 시간32 = stime[0]; for jr = 0 to 5 { dfr[jr] = 저val[0] + ((고Val[1] - 저val[0]) * dr[jr]); } dbox = box_new(고11,시간11,Vlue11,고12,시간12,Vlue12); Box_SetColor(dbox,하락색a); Box_SetFill(dbox,true,색상두께); // Buy(); } If 고Val[0] < H Then { 고Val[0] = H; 고Bar[0] = 0; //ZZ[0] = H; 고12 = Date[고Bar[0]]; 시간12 = stime[고Bar[0]]; Vlue12 = 고Val[0]; 고32 = Date[0]; 시간32 = stime[0]; Box_SetEnd(dbox,고12,시간12,Vlue12); } }

수정부탁드립니다. Input:length사각(12),상승색c(Red),하락색c(Lime),색상두께c(60); Var:j사각(0),lastHiVal사각(0),lastLoVal사각(0),sBar사각(0),eBar사각(0),TL1사각(0),TL2사각(0), Text1사각(0),처리구분사각(""),T사각(0); Array:고점사각[10,2](0),저점사각[10,2](0); //가격,위치 var : d1(0),t1(0),hh(0),ll(0),cdbox(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 { 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사각); TL_Delete(TL2사각); Text_Delete(Text1사각); } TL1사각 = TL_New(sDate[sBar사각],sTime[sBar사각],저점사각[1,1], sDate[eBar사각],sTime[eBar사각],고점사각[1,1]); TL2사각 = TL_New(sDate[sBar사각],sTime[sBar사각],저점사각[1,1], sDate[eBar사각],sTime[eBar사각],저점사각[1,1]); cdbox = box_new(sDate[sBar사각],sTime[sBar사각],고점사각[1,1],NextBarSdate,NextBarStime,L); Box_SetColor(cdbox,상승색c); Box_SetFill(cdbox,true,색상두께c); Box_SetExtFill(cdbox,true); Text1사각 = Text_New(sDate[eBar사각],sTime[eBar사각],고점사각[1,1], NumToStr(고점사각[1,1],2)); Text_SetStyle(Text1사각, 2, 1); TL_SetSize(TL2사각,2); TL_SetColor(TL2사각,REd); } Box_SetEnd(cdbox,NextBarSdate,NextBarStime,ll); } If 처리구분사각 == "저점사각처리" Then { 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사각); TL_Delete(TL2사각); Text_Delete(Text1사각); } TL1사각 = TL_New(sDate[sBar사각],sTime[sBar사각],고점사각[1,1], sDate[eBar사각],sTime[eBar사각],저점사각[1,1]); TL2사각 = TL_New(sDate[sBar사각],sTime[sBar사각],고점사각[1,1], sDate[eBar사각],sTime[eBar사각],고점사각[1,1]); cdbox = box_new(sDate[sBar사각],sTime[sBar사각],고점사각[1,1],NextBarSdate,NextBarStime,L); Box_SetColor(cdbox,하락색c); Box_SetFill(cdbox,true,색상두께c); Box_SetExtFill(cdbox,true); Text1사각 = Text_New(sDate[eBar사각],sTime[eBar사각],저점사각[1,1], NumToStr(저점사각[1,1],2)); Text_SetStyle(Text1사각, 2, 0); TL_SetSize(TL2사각,2); TL_SetColor(TL2사각,BLUe); } Box_SetEnd(cdbox,NextBarSdate,NextBarStime,저점사각[1,1]); } TL_SetSize(TL1사각,2); TL_SetColor(TL1사각,red);

1. 당일부터 적용되는 종가 파라볼릭에서 파라볼릭 양전환시 전전(前前) 파라볼릭을 음전환시킨 음봉 고가를 표시 -----> 당일부터 적용되는 종가 파라볼릭에서 파라볼릭 양전환시 전전전(前前前) 파라볼릭을 음전환시킨 음봉 고가를 표시 당일부터 적용되는 종가 파라볼릭에서 파라볼릭 음전환시 전전(前前) 파라볼릭을 양전환시킨 양봉 저가를 표시 -----> 당일부터 적용되는 종가 파라볼릭에서 파라볼릭 음전환시 전전전(前前前) 파라볼릭을 양전환시킨 양봉 저가를 표시 2. 전일과 연속되는 종가 파라볼릭에서 파라볼릭 양전환시 전전(前前) 파라볼릭을 음전환시킨 음봉 고가를 표시 -----> 전일과 연속되는 종가 파라볼릭에서 파라볼릭 양전환시 전전전(前前前) 파라볼릭을 음전환시킨 음봉 고가를 표시 전일과 연속되는 종가 파라볼릭에서 파라볼릭 음전환시 전전(前前) 파라볼릭을 양전환시킨 양봉 저가를 표시 -----> 전일과 연속되는 종가 파라볼릭에서 파라볼릭 음전환시 전전전(前前前) 파라볼릭을 양전환시킨 양봉 저가를 표시 감사합니다

안녕하세요? AA = C, H, L, ..., input: p(10); dayma(AA, p) 이라는 사용자 함수 부탁드립니다. dayma(C, 10)은 분봉차트에서 적용되는데, 첫봉에서는 그날의 첫 C 2번째 봉에서는 그날의 처음과 2번째 C의 평균, 그러니까 ma(C,2) 3번째 봉에서는 그날의 처음 ~` 3번째 C의 평균, 그러니까 ma(C,3) ... 9번째 봉에서는 그날의 ma(C, 9) 그리고, 드디어 그 날의 10번째 봉 이후부터는 ma(C, 10)을 리턴하는 함수 입니다. 감사합니다.

if CrossUp(C, DayHigh(1)) and DayOpen >= DayClose(1)*0.985 and DayOpen <= DayClose(1)*1.035 and C >= 1000 and C <= 100000 Then find(1); 위 수식에 1분봉상 이전 캔들대비 거래량 150% 이상 상승수식 추가할 수 있을까요?

1. 당일부터 적용되는 종가 파라볼릭에서 파라볼릭 양전환시 직전(直前) 파라볼릭을 음전환시킨 음봉 고가를 표시 -----> 당일부터 적용되는 종가 파라볼릭에서 파라볼릭 양전환시 전전(前前) 파라볼릭을 음전환시킨 음봉 고가를 표시 당일부터 적용되는 종가 파라볼릭에서 파라볼릭 음전환시 직전(直前) 파라볼릭을 양전환시킨 양봉 저가를 표시 -----> 당일부터 적용되는 종가 파라볼릭에서 파라볼릭 음전환시 전전(前前) 파라볼릭을 양전환시킨 양봉 저가를 표시 2. 전일과 연속되는 종가 파라볼릭에서 파라볼릭 양전환시 직전(直前) 파라볼릭을 음전환시킨 음봉 고가를 표시 -----> 전일과 연속되는 종가 파라볼릭에서 파라볼릭 양전환시 전전(前前) 파라볼릭을 음전환시킨 음봉 고가를 표시 전일과 연속되는 종가 파라볼릭에서 파라볼릭 음전환시 직전(直前) 파라볼릭을 양전환시킨 양봉 저가를 표시 -----> 전일과 연속되는 종가 파라볼릭에서 파라볼릭 음전환시 전전(前前) 파라볼릭을 양전환시킨 양봉 저가를 표시 감사합니다