업무에 노고가 많습니다 예를 들어 1분봉 차트에서 거래량이 전봉보다 많을 경우에는 RED로 거래량이 전봉보다 적을 경우에는 BLUE로 1분 봉의 컬러(거래량의 컬러는 가능한데 봉의 컬러)를 변경하여 나타낼 수 있는지요?

DMI 일목균형표 하 DIMinus(Period) D- DIMinus(APeriod) 지표조건 Period 8 APeriod 13 DMI 일목균형 D+ DIPlus(Period) D1 DIPlus(APeriod) 지표조건 Period 9 APeriod 13

data2 외국인 선물 순매수금액 data3 외군인 KP 순매수금액 data4 기관 KP 순매수금액 var:GridID(0); if( LastBarOnChart() == 1 ) Then { GridID = Grid_New(7,2,3,Gray, Black,1,0,0); Grid_SetTransparency(GridID,190); Grid_Cell(GridID,0,0,"외인선물",0,0,Black,Yellow); Grid_Cell(GridID,0,1,"외인현물",0,0,Black,Yellow); Grid_Cell(GridID,0,2,"기관현물",0,0,Black,Yellow); Grid_Cell(GridID,1,0,NumToStr(data2(C),0),0,0,Black,Yellow); Grid_Cell(GridID,1,1,NumToStr(data3(C),0),0,0,Black,Yellow); Grid_Cell(GridID,1,2,NumToStr(data4(C),0),0,0,Black,Yellow); } 여기서 개인현물을 추가로 표현 하는법 부탁드립니다

노고에 늘 감사드립니다. 5, 20선 골든/데드클로스 국내선물 매매에서 2계약을 첫 진입한 후 위로 2틱, 5틱 오를때 마다 1계약씩 추가로 매수하고, 아래로 2틱, 5틱 내릴때 마다 1계약씩 추가로 매수하는 시스템식이 있습니다. 즉 최소 4계약에서 최대 6계약이 진입됩니다. 그런데 청산은 트레이딩스탑이나 특정조건이 만족하면 청산됩니다. 원하는 것은 이럴 경우 분할해서 일부는 청산하고 싶습니다. 첫 2계약은 확실하지만 나머지 계약은 확실하지 않으니 5, 10선이 데드클로스나면 첫 진입 2계약은 무조건 청산되고 나머지 진입분은 원래대로 스테리딩스탑, 청산 특정조건 만족, 다른방향 신호가 나올시 전량 청산하고 싶습니다. 구현이 가능하다면 진입분의 절반이 청산되게 하고 싶으나 3, 5계약은 절반 규정이 힘들듯해 첫진입 2계약 별도 청산으로 요청드립니다. 이 시스템의 경우 분할 청산하는데 다른 방법이 있은지도 궁금합니다. 미리 감사드립니다~

1. 전월(前月) 월봉 시가를 일간 차트에 표시한다 2. 전전월(前前月) 월봉 시가를 일간 차트에 표시한다 감사합니다

문의 드립니다. 1. 1일전,2일전,3일전,4일전 캔들의 최고가를 현재가가 상향 돌파 하면 즉시 매수 진입(현재가로 즉시매수) 매수시 가격 표시, 매수가격 아래로 내려가면 매수 표시가격 삭제, 매수가격 상향돌파시 매수가격 표시 1일전,2일전,3일전,4일전 최저가를 하향붕괴하면 즉시 매도 진입 2.1일전,2일전,3일전,4일전,캔들의 4평균값을 현재가가 돌파하면 즉시 매수( 봉 완성전 현재가로 즉시 매수) 4평균값을 현재가가 하락시 현재가로 즉시 매도 진입(봉 완성전 현재가로 즉각 실행 되어야 합니다.

1. input : StartTime(200000),EndTime(50000); var : Tcond(false); 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; IF Endtime <= starttime Then { SetStopEndofday(0); } } Inputs: VtyPercent(0.05),ATRperiod(5); If MarketPosition() <> 1 Then Buy ("Vty_LE", AtStop, Close + (VtyPercent * ATR(ATRperiod))); If MarketPosition() <> -1 Then Sell ("Vty_SE)", AtStop, Close - (VtyPercent * ATR(ATRperiod))); If MarketPosition() == 1 Then Buy ("Vty_LE1", AtStop, Close + (VtyPercent * ATR(ATRperiod))); If MarketPosition() == -1 Then Sell ("Vty_SE1)", AtStop, Close - (VtyPercent * ATR(ATRperiod))); if MarketPosition == 1 Then Sell("bs",AtStop,EntryPrice-PriceScale*0); if MarketPosition == -1 Then Buy("sb",AtStop,EntryPrice+PriceScale*0); 2. input:length(5),a틱(10),b틱(10),c틱(5); Var:j(0),lastHiVal(0),lastLoVal(0),sBar(0),eBar(0),TL1(0),Text1(0),process(0),T(0); Array:HH[10,2](0),LL[10,2](0); input : StartTime(150000),EndTime(60000); var : Tcond(false); 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; IF Endtime <= starttime Then { SetStopEndofday(0); } } process = 0; If Highest(H,length) == H and lastHiVal <> H and Lowest(L,length) == L and lastLoVal <> L Then { If LL[1,1] > L Then process = -1; If HH[1,1] < H Then process = 1; } Else If Highest(H,length) == H and lastHiVal <> H Then process = 1; Else If Lowest(L,length) == L and lastLoVal <> L Then process = -1; If process == 1 Then { T = 1; lastHiVal = H; If HH[1,2] < LL[1,2] Then { For j = 10 DownTo 2 { HH[j,1] = HH[j-1,1]; HH[j,2] = HH[j-1,2]; } } If HH[1,2] < LL[1,2] or HH[1,1] < H Then { HH[1,1] = H; HH[1,2] = Index; sBar = Index - LL[1,2]; eBar = 0; If TL_GetBeginDate(TL1) == sDate[sBar] and TL_GetBeginTime(TL1) == sTime[sBar] Then { TL_Delete(TL1); Text_Delete(Text1); } if LL[1,1] > 0 Then { TL1 = TL_New(sDate[sBar],sTime[sBar],LL[1,1],sDate[eBar],sTime[eBar],HH[1,1]); Text1 = Text_New(sDate[eBar],sTime[eBar],HH[1,1],"+"+NumToStr(abs(HH[1,1]-LL[1,1])/PriceScale,0)); Text_SetStyle(Text1, 2, 1); } Else { Text_Delete(text1); Text1 = Text_New(sDate[eBar],sTime[eBar],HH[1,1],"+"+NumToStr(abs(HH[1,1]-LL[1,1])/PriceScale,2)); Text_SetStyle(Text1, 2, 1); } Text_SetStyle(Text1, 2, 1); } if MarketPosition <= 0 and HH[2,1] >= LL[2,1]+PriceScale*a틱 and LL[1,1] <= HH[2,1]-PriceScale*b틱 and Tcond == true Then Buy("b",AtStop,HH[2,1]+PriceScale*c틱); } If process == -1 Then { T = -1; lastLoVal = L; If LL[1,2] < HH[1,2] Then { For j = 10 DownTo 2 { LL[j,1] = LL[j-1,1]; LL[j,2] = LL[j-1,2]; } } If LL[1,2] < HH[1,2] or LL[1,1] > L Then { LL[1,1] = L; LL[1,2] = Index; sBar = Index - HH[1,2]; eBar = 0; If TL_GetBeginDate(TL1) == sDate[sBar] and TL_GetBeginTime(TL1) == sTime[sBar] Then { TL_Delete(TL1); Text_Delete(Text1); } if HH[1,1] > 0 Then { TL1 = TL_New(sDate[sBar],sTime[sBar],HH[1,1],sDate[eBar],sTime[eBar],LL[1,1]); Text1 = Text_New(sDate[eBar],sTime[eBar],LL[1,1],"-"+NumToStr(abs(HH[1,1]-LL[1,1])/PriceScale,0)); Text_SetStyle(Text1, 2, 0); } Else { Text_Delete(text1); Text1 = Text_New(sDate[eBar],sTime[eBar],LL[1,1],"-"+NumToStr(abs(HH[1,1]-LL[1,1])/PriceScale,0)); Text_SetStyle(Text1, 2, 0); } } if MarketPosition >= 0 and LL[2,1] <= HH[2,1]-PriceScale*a틱 and HH[1,1] >= LL[2,1]+PriceScale*b틱 and Tcond == true Then Sell("s",AtStop,LL[2,1]-PriceScale*c틱); } 위 2가지 수식어의 진입후 20틱내 청산금지와 손절40틱의 수식어를 추가 하고자 합니다. --------------------------- 아래 수식어를 추가로 부탁드리며 봉 완성시 기준입니다. 3. 10분선 아래에서 샛별형, 관통형, 강세장악형의 봉패턴중 하나 일때 1분 10분선 골든크로스 2회에서 매수 10분선 위에서 저녁별형, 흑운형, 약세장악형의 봉패턴중 하나 일때 1분 10분선 데드크로스 2회에서 청산 매매시간은 해외선물 10 :00 ~ 익일 06 :00 , 익절 100 , 손절50 4. 10분선 위에서 저녁별형, 흑운형, 약세장악형의 봉패턴중 하나 일때 1분 10분선 데드크로스 2회에서 매도 10분선 아래에서 샛별형, 관통형, 강세장악형의 봉패턴중 하나 일때 1분 10분선 골든크로스 2회에서 청산 매매시간은 해외선물 10 :00 ~ 익일 06 :00 , 익절 100 , 손절50

var : 전환선(0),기준선(0),후행스팬(0),선행스팬1(0),선행스팬2(0),기준선2(0),전환선2(0); Input : Period1(9), Period2(26),Period3(52); 전환선 = (highest(high,Period1)+lowest(low,Period1))/2; 기준선 = (highest(high,Period2)+lowest(low,Period2))/2; 기준선2 = (highest(high,Period2)+lowest(low,Period2))/2; 후행스팬 = C; 선행스팬1 = (전환선+기준선)/2; 선행스팬2 = (highest(high,Period3)+lowest(low,Period3))/2; 전환선2 = (highest(high,Period1)+lowest(low,Period1))/2; Plot1(전환선, "전환선"); Plot2(기준선, "기준선"); Plot3(후행스팬, "후행스팬"); Plot4(선행스팬1, "선행스팬1"); Plot5(선행스팬2, "선행스팬2"); Plot6(기준선2, "기준선2"); Plot7(전환선2, "전환선2"); /* 지표속성창 차트표시탭 후행스팬 수평이동 -25 선행스팬1 수평이동 +25 선행스팬2 수평이동 +25 기준선2 수평이동 +25 *? 위 지표에서 오늘봉 기준 기준선2가 선행스팬1을 골든크로스 하는 검색식을 부탁드립니다 ( 오늘봉기준 26일 전 기준선2가 26일 전 선행스팬1을 골든크로스 하는 종목입니다. 꼭 부탁드립니다.)

안녕하세요? 아래 전략에.대해 스크립트 작성 부탁드립니다. 해외선물 1분봉으로 Data1을 일중거래하고자 합니다. Data1 1분봉 종가 완성봉 등락률(전일 종가 대비) > Data2 1분봉 종가 완성봉 등락률(전일 종가 대비) > Data3 1분봉 종가 완성봉 등락률(전일 종가 대비) > 0 완성 익봉 시가에 매수 진입 Data1 1분봉 종가 완성봉 등락률(전일 종가 대비) < Data2 1분봉 종가 완성봉 등락률(전일 종가 대비) < Data3 1분봉 종가 완성봉 등락률(전일 종가 대비) < 0 완성 익봉 시가에 매도 진입 리버스 전략이며 매수 매도 신규로 하루 최대 각 1회씩만 진입합니다. 당영업일 오전 3시에 강제청산합니다.