안녕하세요 예스스탁입니다. input : 투자금액(500000); Var : Body(0),HighBody(0),LowBody(0),Height(0),UpTail(0),DnTail(0); var : Vol(0); if CodeCategoryEx == 11 and BasePrice < 50000 Then vol = int(int((투자금액)/C)/10)*10; Else vol = int((투자금액)/C); Body = Abs(C-O); HighBody = Max(C,O); LowBody = Min(C,O); Height = H-L; UpTail = H-Max(C,O); DnTail = Min(C,O)-L; If (C[3] > Ma(C,10)[3] and C[3] > O[3] and C[2] > O[2] and C[1] > O[1]) and (O[3] < O[2] and O[2] < O[1]) and (C[3] < C[2] and C[2] < C[1]) and (H[3] < H[2] and H[2] < H[1]) and (C[3] > O[2] and O[2] > O[3]) and (C[2] > O[1] and O[1] > O[2]) and (Body > ma(Body,10)*2 and C < O) and (O > H[1] and C < L[3]) Then buy("b1",OnClose,def,vol); If (C[4] >= Ma(C,10)[4] and C[4] > O[4] and Body[4] > Ma(Body,10)[4]*2) and (LowBody[3] > Highbody[4]) and (HighBody[3] >= HighBody[2] and HighBody[2] >= HighBody[1]) and (C > O and Body > Ma(Body,10)*2 and Close == Highest(C,5)) Then buy("b2",OnClose,def,vol); If (C[2] >= Ma(C,10)[2] and C[2] > O[2] and C[1] > O[1] and C > O) and (O[1] > LowBody[2] and Open[1]<=HighBody[2]) and (O > LowBody[1] and O <= HighBody[1]) and (C[2] < C[1] and C[1] < C[0]) and (Body[2]>Body[1] and Body[1]>Body[0]) Then buy("b3",OnClose,def,vol); If (C[1] >= Ma(C,10)[1] and C[1] < O[1] and Body[1] > Ma(Body,10)[1]*2 and C > O) and (Abs(Open-Open[1]) < Ma(Height,10)*0.1) Then buy("b4",OnClose,def,vol); If C[2] >= ma(C,10)[2] and C[2] > O[2] and Body[2] > Ma(Body,10)[2]*2 and C[1] > O[1] and Body[1] > Ma(Body,10)[1]*2 and Open[1] > Max(O,C)[2] and C < O and C < C[2] Then buy("b5",OnClose,def,vol); If C[2] >= Ma(C,10)[2] and C[2] > O[2] and Body[2] > Ma(Body,10)[2]*2 and C[1] > O[1] and C > O and O[1] > C[2] and Abs(Body-Body[1]) < Body*0.1 and Abs(O-O[1]) < Ma(Height,10)*0.1 Then buy("b6",OnClose,def,vol); If C[4] >= Ma(C,10)[4] and C[4] > O[4] and Body[4] > Ma(Body,10)[4]*2 and HighBody[3] < H[4] and LowBody[3] >= L[4] and HighBody[2] < H[4] and LowBody[2] >= L[4] and HighBody[1] < H[4] and LowBody[1] >= L[4] and HighBody[3] >= HighBody[2] and HighBody[2]>=HighBody[1] and C > O and Body > Ma(Body,10)*2 and Close == Highest(C,5) Then buy("b7",OnClose,def,vol); If C[2] > Ma(C,10)[2] and C[2] > O[2] and C[1] > O[1] and O[1] > Max(O,C)[2] and C < O and O >= LowBody[1] and O <= HighBody[1] and C > C[2] Then buy("b8",OnClose,def,vol); If C > Ma(C,10) and Body > Ma(Body,10)*2 and C > O and UpTail < Height*0.1 and DnTail < Height*0.1 Then buy("b9",OnClose,def,vol); If C[2] > Ma(C,10)[2] and C[2] > O[2] and C[1] > O[1] and C > O and O[1] >= LowBody[2] and O[1] <= HighBody[2] and O >= LowBody[1] and O <= HighBody[1] and C[2] < C[1] and C[1] < C and Body < Ma(Body,10)*0.5 and O > Max(C,O)[1] Then buy("b10",OnClose,def,vol); if MarketPosition == 1 and CrossDown(c,ma(c,5)) and C > EntryPrice Then ExitLong(); SetStopLoss(1,PercentStop); 즐거운 하루되세요 > HI_jh***** 님이 쓴 글입니다. > 제목 : 수식문의요 > 안녕하세요 아래식은 시스템에 있는 상승 지속캔인데요 이식을 이식이 하나만 만족해도 매수하는식 만들어주주세요 1.입금금액은 50만원 3.손절은 -1프로 입니다 4.수익은 3일선이탈시 매도수익입니다 단,손실시 3일선이탈 매도는 안나가는식 수고하십시오~ Variables: Body(0),HighBody(0),LowBody(0),Height(0),UpTail(0),DnTail(0); Body = Abs(C-O); HighBody = Max(C,O); LowBody = Min(C,O); Height = H-L; UpTail = H-Max(C,O); DnTail = Min(C,O)-L; If (C[3] > Ma(C,10)[3] and C[3] > O[3] and C[2] > O[2] and C[1] > O[1]) and (O[3] < O[2] and O[2] < O[1]) and (C[3] < C[2] and C[2] < C[1]) and (H[3] < H[2] and H[2] < H[1]) and (C[3] > O[2] and O[2] > O[3]) and (C[2] > O[1] and O[1] > O[2]) and (Body > ma(Body,10)*2 and C < O) and (O > H[1] and C < L[3]) Then plot1(H,"강세삼선반격형"); Else NoPlot(1); If (C[4] >= Ma(C,10)[4] and C[4] > O[4] and Body[4] > Ma(Body,10)[4]*2) and (LowBody[3] > Highbody[4]) and (HighBody[3] >= HighBody[2] and HighBody[2] >= HighBody[1]) and (C > O and Body > Ma(Body,10)*2 and Close == Highest(C,5)) Then plot2(H,"매트형"); Else NoPlot(2); If (C[2] >= Ma(C,10)[2] and C[2] > O[2] and C[1] > O[1] and C > O) and (O[1] > LowBody[2] and Open[1]<=HighBody[2]) and (O > LowBody[1] and O <= HighBody[1]) and (C[2] < C[1] and C[1] < C[0]) and (Body[2]>Body[1] and Body[1]>Body[0]) Then plot3(H,"블럭형"); Else NoPlot(3); If (C[1] >= Ma(C,10)[1] and C[1] < O[1] and Body[1] > Ma(Body,10)[1]*2 and C > O) and (Abs(Open-Open[1]) < Ma(Height,10)*0.1) Then plot4(H,"상승갈림길형"); Else NoPlot(4); If C[2] >= ma(C,10)[2] and C[2] > O[2] and Body[2] > Ma(Body,10)[2]*2 and C[1] > O[1] and Body[1] > Ma(Body,10)[1]*2 and Open[1] > Max(O,C)[2] and C < O and C < C[2] Then plot5(H,"상승갭삼법형"); Else NoPlot(5); If C[2] >= Ma(C,10)[2] and C[2] > O[2] and Body[2] > Ma(Body,10)[2]*2 and C[1] > O[1] and C > O and O[1] > C[2] and Abs(Body-Body[1]) < Body*0.1 and Abs(O-O[1]) < Ma(Height,10)*0.1 Then plot6(H,"상승나란히형"); Else NoPlot(6); If C[4] >= Ma(C,10)[4] and C[4] > O[4] and Body[4] > Ma(Body,10)[4]*2 and HighBody[3] < H[4] and LowBody[3] >= L[4] and HighBody[2] < H[4] and LowBody[2] >= L[4] and HighBody[1] < H[4] and LowBody[1] >= L[4] and HighBody[3] >= HighBody[2] and HighBody[2]>=HighBody[1] and C > O and Body > Ma(Body,10)*2 and Close == Highest(C,5) Then plot7(H,"상승삼법형"); Else NoPlot(7); If C[2] > Ma(C,10)[2] and C[2] > O[2] and C[1] > O[1] and O[1] > Max(O,C)[2] and C < O and O >= LowBody[1] and O <= HighBody[1] and C > C[2] Then plot8(H,"상승타스키갭형"); Else NoPlot(8); If C > Ma(C,10) and Body > Ma(Body,10)*2 and C > O and UpTail < Height*0.1 and DnTail < Height*0.1 Then plot9(H,"장대양봉형"); Else NoPlot(9); If C[2] > Ma(C,10)[2] and C[2] > O[2] and C[1] > O[1] and C > O and O[1] >= LowBody[2] and O[1] <= HighBody[2] and O >= LowBody[1] and O <= HighBody[1] and C[2] < C[1] and C[1] < C and Body < Ma(Body,10)*0.5 and O > Max(C,O)[1] Then plot10(H,"지연형"); Else NoPlot(10);