답변완료
3연속봉 박스
1. 지표 연속봉이 3개보다 많아질 때 박스의 끝이, 음봉은 끝까지 연장되는데 양봉은 3개에서 멈춤. 양봉도 끝까지 연장. 2.시스템 음봉 박스가 생성되면 (3음봉) 매수, 다음봉에 매수청산. 양봉 박스 생성되면 매도, 다음봉에 매도청산. 감사합니다. Inputs: N(3), // 연속 봉 개수 기준 BullishColor(Red), // 양봉 선 색상 BearishColor(Blue); // 음봉 선 색상Vars: bullishCount(0),bearishCount(0), FirstDate(0),FirstTime(0),LineTop(0),bullishBox(0), LastDate(0),LastTime(0),lineBottom(0),BearishBox(0);If Close > Open ThenBegin bullishCount = bullishCount + 1; If bullishCount == 1 Then Begin firstDate = sDate; firstTime = sTime; lineBottom = L; End; lastDate = sDate; lastTime = sTime; lineTop= high; // 상단 선: 첫봉 시간 ~ 현재 시간, 가격 = 마지막 봉 고가 if bullishCount >= N Then Begin if bullishCount == N Then Begin bullishBox = Box_New(firstDate, firstTime, lineTop, lastDate, lastTime, lineBottom); box_SetColor(bullishBox, BullishColor); Box_SetFill(bullishBox,true); end; Box_SetEnd(bullishBox,lastDate, lastTime, lineBottom); end;EndElseBegin bullishCount = 0; #Box_Delete(bullishBox);End;If Close < Open ThenBegin BearishCount = BearishCount + 1; If BearishCount == 1 Then Begin firstDate = sDate; firstTime = sTime; lineTop = H; End; lastDate = sDate; lastTime = sTime; lineBottom = Low; // 상단 선: 첫봉 시간 ~ 현재 시간, 가격 = 마지막 봉 고가 if BearishCount >= N Then Begin if BearishCount == N Then Begin BearishBox = Box_New(firstDate, firstTime, lineTop, lastDate, lastTime, lineBottom); box_SetColor(BearishBox, BearishColor); Box_SetFill(BearishBox,true); end; Box_SetEnd(BearishBox,lastDate, lastTime, lineBottom); end;EndElseBegin BearishCount = 0; #Box_Delete(BearishBox);End;
답변완료
문의드립니다
input : length(20);input : mult(2.0);input : lengthKC(20);input : multKC(1.5);input : useTrueRange(true);#1:TrueRange 0:고저폭var : source(0),basis(0),dev(0),upperbb(0),lowerbb(0);var : mav(0),r(0),rangema(0),upperKC(0),lowerKC(0);var : sqzOn(False),sqzOff(False),noSqz(False),val(0),bcolor(0),scolor(0);// Calculate BBsource = close;basis = ma(source, length);dev = multKC * std(source, length);upperBB = basis + dev;lowerBB = basis - dev;// Calculate KCmav = ma(source, lengthKC);r = iff(useTrueRange == 1 , TrueRange , (high - low));rangema = ma(r, lengthKC);upperKC = mav + rangema * multKC;lowerKC = mav - rangema * multKC;sqzOn = (lowerBB > lowerKC) and (upperBB < upperKC);sqzOff = (lowerBB < lowerKC) and (upperBB > upperKC);noSqz = (sqzOn == false) and (sqzOff == false);val = LRL(source - avg(avg(highest(high, lengthKC), lowest(low, lengthKC)),ma(close,lengthKC)), lengthKC);bcolor = iff( val > 0, iff( val > iff(IsNan(val[1]),0,val[1]), lime, green), iff( val < iff(IsNan(val[1]),0,val[1]), red, maroon));scolor = iff(noSqz ,blue ,IFf( sqzOn , black , gray ));if bcolor == lime and scolor == Gray Then Buy("b");if bcolor == green and scolor == black Then ExitLong("bx");수고많으십니다 위 수식은 lime과 Gray 가 만나는 지점에서 매수green와 black이 만나면 청산 입니다만매수 진입은 똑 같이하고매수 청산을 회색과 검정색 상관 없이 maroon 색이 나오면 매수 청산 하는 식을 부탁드립니다 항상 감사드립니다