input : Period(130); Var:j(0),T(0),tx(0),tx1(0),box(0),TL(0),upt(0),dnt(0); Var: date11(0),date12(0),time11(0),time12(0), date21(0),date22(0),time21(0),time22(0), date31(0),date32(0),time31(0),time32(0); Array:HiVal[20](0),LoVal[20](0),HiBar[20](0),LoBar[20](0); For j = 0 To 19 { HiBar[j] = HiBar[j] + 1; LoBar[j] = LoBar[j] + 1; } if crossup(C,highest(H,Period)[1]) Then T = 1; if CrossDown(C,Lowest(L,Period)[1]) Then T = -1; If T == -1 Then { If T[1] != -1 Then { For j = 18 DownTo 0 { LoVal[j+1] = LoVal[j]; LoBar[j+1] = LoBar[j]; } LoVal[0] = L; LoBar[0] = 0; date11 = date[HiBar[0]]; time11 = stime[HiBar[0]]; Value11 = HiVal[0]; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; date21 = date[HiBar[0]]; time21 = stime[HiBar[0]]; date22 = date[0]; time22 = stime[0]; Text_Delete(dnt); var1 = loval[0]-loval[1]; dnt = Text_New(date12,time12,value12,NewLine+NumToStr(abs(var1/PriceScale),0)+" "+NewLine); Text_SetColor(dnt,iff(var1>0,Magenta,Blue)); Text_SetStyle(dnt,1,2); Text_SetSize(dnt,35); Text_SetBold(dnt,1); Condition1 = False; box = Box_New(date11,time11,Value11,date12,time12,Value12); if abs(value12[1]-value11[1]) < 0.8 Then Text_Delete(tx); tx = Text_New(sDate,stime,value12,NumToStr(value11-value12,2)); Text_SetColor(Tx,Blue); Text_SetStyle(tx,1,0); Text_SetSize(tx,25); Text_SetBold(tx,1); } If LoVal[0] > L Then { LoVal[0] = L; LoBar[0] = 0; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; date22 = date[0]; time22 = stime[0]; var1 = loval[0]-loval[1]; Text_SetLocation(dnt,date12,time12,value12); Text_SetString(dnt,NewLine+NumToStr(abs(var1/PriceScale),0)+" "); Text_SetColor(dnt,iff(var1>0,Magenta,Blue)); Text_SetStyle(dnt,1,2); Text_SetSize(dnt,35); Text_SetBold(dnt,1); Box_SetEnd(box,date12,time12,Value12); Text_SetString(tx,NumToStr(value11-value12,2)); Text_SetLocation(tx,sDate,sTime,value12); } if value12 > value11-0.5 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,90); } else if value12 <= value11-0.5 and value12 > value11-0.7 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,50); } else if value12 <= value11-0.7 and value12 > value11-0.8 Then { Box_SetColor(box,Yellow); Box_SetFill(box,true,150); } else if value12 <= value11-0.8 and value12 > value11-1.2 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,80); } else if value12 <= value11-1.2 and value12 > value11-1.6 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,80); } else if value12 <= value11-1.6 and value12 > value11-1.9 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,30); } else { Box_SetColor(box,Yellow); Box_SetFill(box,true,80); } if Condition1 == False and hival[0] < hival[1] and hival[1] < hival[2] and Loval[0] < loval[1] and Loval[1] < loval[2] Then { Condition1 = true; tx1 = Text_New(sDate,sTime,L+0.6,"●"); Text_SetStyle(tx1,2,2); Text_SetColor(tx1,Red); Text_SetSize(tx1,40); Sell(); } } If T == 1 Then { If T[1] != 1 Then { For j = 18 DownTo 0 { HiVal[j+1] = HiVal[j]; HiBar[j+1] = HiBar[j]; } HiVal[0] = H; HiBar[0] = 0; date11 = date[LoBar[0]]; time11 = stime[LoBar[0]]; Value11 = LoVal[0]; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; date31 = date[LoBar[0]]; time31 = stime[LoBar[0]]; date32 = date[0]; time32 = stime[0]; Text_Delete(upt); var1 = hival[0]-hival[1]; upt = Text_New(date12,time12,value12,NumToStr(abs(var1/PriceScale),0)+" "+NewLine); Text_SetColor(upt,iff(var1>0,Magenta,Blue)); Text_SetStyle(upt,1,2); Text_SetSize(upt,35); Text_SetBold(upt,1); Condition2 = False; box = Box_New(date11,time11,Value11,date12,time12,Value12); if abs(value12[1]-value11[1]) < 0.8 Then Text_Delete(tx); tx = Text_New(sDate,stime,value12,NumToStr(value12-value11,2)); Text_SetColor(Tx,Red); Text_SetStyle(tx,1,1); Text_SetSize(tx,25); Text_SetBold(tx,1); } If HiVal[0] < H Then { HiVal[0] = H; HiBar[0] = 0; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; date32 = date[0]; time32 = stime[0]; var1 = hival[0]-hival[1]; Text_SetLocation(upt,date12,time12,value12); Text_SetString(upt,NumToStr(abs(var1/PriceScale),0)+" "+NewLine); Text_SetColor(upt,iff(var1>0,Magenta,Blue)); Text_SetStyle(upt,1,2); Text_SetSize(upt,35); Text_SetBold(upt,1); Box_SetEnd(box,date12,time12,Value12); Text_SetString(tx,NumToStr(value12-value11,2)); Text_SetLocation(tx,sDate,sTime,value12); } if Value12 >= value11+1.9 Then { Box_SetColor(box,Pink); Box_SetFill(box,true,70); } else if value12 >= value11+1.2 and value12 < value11+1.9 Then { Box_SetColor(box,Gray); Box_SetFill(box,true,60); } else if value12 >= value11+0.8 and value12 < value11+1.2 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,40); } else if value12 >= value11+0.5 and value12 < value11+0.8 Then { Box_SetColor(box,Orange); Box_SetFill(box,true,100); } Else { Box_SetColor(box,Gold); Box_SetFill(box,true,150); } if Condition2 == False and loval[0] > loval[1] and loval[1] > loval[2] and hival[0] > hival[1] and hival[1] > hival[2] Then { Condition2 = true; tx1 = Text_New(sDate,sTime,H-0.6,"●"); Text_SetStyle(tx1,2,2); Text_SetColor(tx1,Blue); Text_SetSize(tx1,40); Sell(); } } if MarketPosition == 1 and BarsSinceEntry == 1 Then ExitLong(); if MarketPosition == -1 and BarsSinceEntry == 1 Then ExitShort(); a.하락하는 주가가 직전 하락추세선의 저점에서 +2틱에서 -3틱 사이에 있으면 세로선 표시. 벗어나거나 양전환되면 삭제. 일시적으로 벗어났다 들어오면 다시 표시. 상승하는 주가가 직전 상승추세선의 고점에서 -2틱에서 +3틱 사이에 있으면 세로선 표시. 벗어나거나 음전환되면 삭제. (쌍바닥 쌍봉 위치 표시) b.직전 고저점과의 차이를 틱수로 표시하는 부분을, (abs(var1/PriceScale),0) 단순 수치로 수정. (5틱을 0.25로). 감사합니다.

a=ma(c,240); b=(a+avgif(c-a,-1,0.0) -2*stdevif(c-a,-1,0.0)); d=(b*1.02); crossup(c,d) 가격박스 240 하단 돌파

볼린져밴드 이전봉 (예:45봉 이전) 값을 현재가가 하향돌파할때 매도, 매수 이전봉 값을 변수로 입력할수 있도록 수식부탁드립니다..

1. 당일 최고가와 전일 최고가, 그리고 당일 최고가와 전전일 최고가를 각각 서로 연결한 우측 추세선을, 당일 최저가와 전일 최저가, 그리고 당일 최저가와 전전일 최저가를 각각 서로 연결한 우측 추세선을 계속하여 구현해 주세요 2. 당시간대(60분) 최고가와 전시간대 최고가, 그리고 당시간대 최고가와 전전시간대 최고가를 각각 서로 연결한 우측 추세선을, 당시간대 최저가와 전시간대 최저가, 그리고 당시간대 최저가와 전전시간대 최저가를 각각 서로 연결한 우측 추세선을 계속하여 구현해 주세요 2. 당월 최고가와 전월 최고가, 그리고 당일 최고가와 전전월 최고가를 각각 서로 연결한 우측 추세선을, 당월 최저가와 전월 최저가, 그리고 당월 최저가와 전전월 최저가를 각각 서로 연결한 우측 추세선을 계속하여 구현해 주세요 고맙습니다.

A=MA(C,240); B=(A+AVGIF(C-A,-1,0.0)-2*STDEVIF(C-A,-1,0.0)); //가격박스 하단선 D=(B*1); AA=BBandsdown(95,2); //BB 하단선 crossup(C,D) && crossup(C,AA)

아침 08시부터 오후 10시까지 기준선 2000을 기준 종가로 기준선 2000 상향 돌파하면 1계약 매수, 반등하지 못하고 다시 2000 하향 돌파하면 2계약 매도 (1계약 손절후) 다시 2000 상승 돌파하면 3계약 매수 (2계약 손절후) 다시 2000 하향 돌파하면 4계약 매도..(3계약 손절수)... 7계약 까지만 차례로 매매수식 부탁드립니다.. 수고하세요....^^

볼린저 밴드 중심 밴드의 당일 최고치를 그린다 볼린저 밴드 중심 밴드의 당일 최저치를 그린다 감사합니다