커뮤니티
시스템식
2013-10-28 09:41:47
184
글번호 68891
안녕하세요
아래식은 시스템에 있는 상승 반전식인데요
이식을 이식이 하나만 만족해도 매수하는식 만들어주주세요 단, MACD오실레이터 파란색막대에서만 나오는 식으로요
1.입금금액은 50만원
2. MACD오실레이터 파란색막대 및 상승반전식 하나 만족시
3.손절은 -1프로 입니다
4.수익은 +3프로입니다
수고하십시오~
Vars : DnTail(0),Height(0),Uptail(0),Long(False),Body(0),highbody(0),Lowbody(0);
DnTail = Min(O,C) - L;
Uptail = H - Max(O,C);
Height = H - L;
body= Abs(O-C);
highbody = Max(O,C);
LowBody = Min(O,C);
If Abs(Open-Close) > ma(Abs(Open-Close),10)*2 Then
Long = True;
Else
Long = False;
If UpTail == 0 and DnTail == 0 Then
Condition1 = True;
Else
Condition1 = False;
If C < Ma(C,10) and DnTail < Height*0.1 and C == O and Height > Ma(Height,10) Then
plot1(H,"강세비석형");
Else
Noplot(1);
If C < Ma(C,10) and (Uptail < Height * 0.1) and C == O and (Height > Ma(Height,10)) Then
plot2(H,"강세잠자리형");
Else
NoPlot(2);
If C[1] < Ma(C,10)[1] and C[1] < O[1] and Long[1] == True
and C > O and Long and O < L[1] and C >= (O[1]+C[1])/2 and C < O[1] Then
plot3(H,"관통형");
Else
NoPlot(3);
If (C[2] >= Ma(C,10)[2] and C[2] < O[2] and C[1] < O[1] and C < O) and
(O[1] > Min(O,C)[2] and O[1] < Max(O,C)[2]) and
(O > Min(O,C)[1] and O < Max(O,C)[1]) and
(C[2] > C[1] and C[1] > C[0]) and
(L[2] < L[1] and L[1]< L[0]) Then
plot4(H,"남삼성형");
Else
NoPlot(4);
If C[1] < Ma(C,10)[1] and Long[1] == True and Close[1] < Open[1] and
Close < Open and Open>Close[1] and Close == Close[1] Then
plot5(H,"동일저점형");
Else
NoPlot(5);
If C[2] < Ma(C,10)[2] and C[2] < O[2] and C[1] > O[1] and C < O and
O[1] > C[2] and O[1] == L[1] and
O > Max(H[1],H[2]) and C[2] == C[0] Then
plot6(H,"막대샌드위치형");
Else
Noplot(6);
If (C[4] < Ma(C,10)[4] and C[4] < O[4] and C[3] < O[3] and C[2] < O[2]) and
(O[4] > O[3] and O[3] > O[2]) and
(C[4] > C[3] and C[3] > C[2]) and
(C[1] < O[1] and H[1] - MaxList(O,C)[1] > 0) and
(H[1] < O[3] and C[2] > C[1]) and
Close > Open and (O > O[1] and C > MaxList(H[1],H[2])) Then
plot7(H,"사다리바닥형");
Else
NoPlot(7);
If (C[2] < Ma(C,10)[2] and Long[2] == True and C[2] < O[2]) and
(C[1] == O[1] and Max(O,C)[1] < Min(O,C)[2])and
(C > O and Min(O,C) > Max(O,C)[1])and (C > C[2]) Then
plot8(H,"상승기아형");
Else
NoPlot(8);
If (C[1] < O[1] and Long[1] == True and Condition1[1] == True ) and
(Long == True and C > O and Condition1 == True ) and (L > H[1]) Then
plot9(H,"상승박차형");
Else
NoPlot(9);
If C[1] < Ma(C,10)[1] and C[1] < O[1] and body[1] > Ma(body[1],10)*2 and
C > O and
Abs(C-C[1]) < Ma(Height,10)*0.1 Then
plot10(H,"상승반격형");
Else
NoPlot(10);
If C < Ma(C,10) and body > Ma(body,10)*2 and C > O and
O == L and Uptail > 0 and Uptail < Height*0.1 Then
plot11(H,"상승샅바형");
Else
NoPlot(11);
If C[2] < Ma(C,10)[2] and C[2] == O[2] and C[1] == O[1] and C == O and
HighBody[1]< LowBody[2] and HighBody[1] < LowBody[0] Then
plot12(H,"상승세십자별형");
Else
NoPlot(12);
If C[1] < Ma(C,10)[1] and C[1] < O[1] and body[1] > Ma(body[1],10)*2 and
C == O and Highbody < Highbody[1] and Lowbody > Lowbody[1] Then
plot13(H,"상승십자잉태형");
Else
NoPlot(13);
If C[1] < Ma(C,10)[1] and C[1] < O[1] and body[1] > Ma(body[1],10)*2
and C > O and Highbody < Highbody[1] and Lowbody > Lowbody[1] Then
plot14(H,"상승잉태형");
Else
NoPlot(14);
If C[2] < Ma(C,10)[2] and C[2] < O[2] and body[2] > Ma(body[2],10)*2 and
C[1] > O[1] and Highbody[1] < Highbody[2] and Lowbody[1] > Lowbody[2] and
C > O and C > C[1] Then
plot15(H,"상승잉태확인형");
Else
NoPlot(15);
If C[1] < Ma(c,10)[1] and C[1] < O[1] and
C > O and Body > Ma(Body,10)*2 and
Highbody > Highbody[1] and Lowbody < Lowbody[1] Then
plot16(H,"상승장악형");
Else
NoPlot(16);
If C[2] < Ma(C,10)[2] and C[2] < O[2] and
C[1] > O[1] and Body[1] > Ma(Body[1],10)*2 and
Highbody[1] > Highbody[2] and Lowbody[1] < Lowbody[2] and
C > O and C > C[1] Then
plot17(H,"상승장악확인형");
Else
NoPlot(17);
If (C[4] < Ma(c,10)[4] and Body[4] > Ma(Body,10)[4]*2 and C[4] < O[4]) and
(C[3] < O[3] and C[1] < O[1]) and
(Body > Ma(Body,10)*2 and C > O) and
(O[3] > HighBody[2] and HighBody[2] > O[1]) and
(C[3] > LowBody[2] and LowBody[2] > C[1]) and
(C >= O[1] and C > O[3] and C < C[4]) Then
plot18(H,"상승탈출형");
Else
NoPlot(18);
If C[2] < Ma(C,10)[2] and Body[2] > Ma(Body,10)[2]*2 and C[2] < O[2] and
C[1] == O[1] and HighBody[1]<LowBody[2] and
C > O and C > C[2] Then
plot19(H,"샛별십자형");
Else
NoPlot(19);
If C[2] < Ma(C,10)[2] and Body[2] > Ma(Body,10)[2]*2 and C[2] < O[2] and
Body[1] < Ma(Body,10)[1]*0.5 and HighBody[1] < LowBody[2] and
C > O and C > C[2] Then
plot20(H,"샛별형");
Else
NoPlot(20);
If C[3] < Ma(C,10)[3] and
Body[3] > Ma(Body,10)[3]*2 and C[3] < O[3] and
Body[2] > Ma(Body,10)[2]*2 and C[2] < O[2] and
O[3] == H[3] and C[3] == L[3] and
O[2] == H[2] and C[2] == L[2] and
O[1] < Min(O,C)[2] and H[1] > C[2] and UpTail[1] > Height*0.5 and
O > H[1] and C < L[1] Then
plot21(H,"애기제비감추기형");
Else
NoPlot(21);
If C < Ma(C,10) and DnTail < Height*0.1 and
UpTail > Body*2 and
Height > Ma(Height,10) and
C != O Then
plot22(H,"역망치형");
Else
NoPlot(22);
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 <= HighBody[1] and
C[2] <= C[1] and C[1] <= C Then
plot23(H,"적삼병");
Else
NoPlot(23);
If C[1] < Ma(C,10)[1] and C[1] < O[1] and Body[1] > Ma(Body,10)[1]*2 and
C < O and Highbody < Highbody[1] and Lowbody > Lowbody[1] Then
plot24(H,"전서구형");
Else
NoPlot(24);
If C[1] < Ma(C,10)[1] and Low == Low[1] Then
plot25(H,"집게바닥형");
Else
NoPlot(25);
If C < Ma(C,10) and UpTail < Height*0.1 and DnTail > Body*2 and
Height > Ma(Height,10) and C != O Then
plot26(H,"해머형");
Else
NoPlot(26);
If (C[2] < Ma(C,10)[2] and Body[2] > Ma(Body,10)[2]*2 and C[2] < O[2]) and
(C[1] < O[1] and C > O and Highbody[1] < Highbody[2] and Lowbody[1] > Lowbody[2]) and
(L[1] < L[2] or L[1] < Min(L[2],L[3],L[4])) and
(L[1] < O and C[1] > C) Then
plot27(H,"희귀삼천바닥형");
Else
NoPlot(27);
답변 1
예스스탁 예스스탁 답변
2013-10-28 16:02:20
안녕하세요
예스스탁입니다.
input : P1(12),P2(26),P3(9);
input : 투자금액(500000);
Vars : DnTail(0),Height(0),Uptail(0),Long(False),Body(0),highbody(0),Lowbody(0);
var : MACDO(0),Vol(0);
if CodeCategoryEx == 11 and BasePrice < 50000 Then{
vol = int(int((투자금액)/C)/10)*10;
}
Else{
vol = int((투자금액)/C);
}
MACDO = MACD_OSC(P1,P2,P3);
DnTail = Min(O,C) - L;
Uptail = H - Max(O,C);
Height = H - L;
body= Abs(O-C);
highbody = Max(O,C);
LowBody = Min(O,C);
If Abs(Open-Close) > ma(Abs(Open-Close),10)*2 Then
Long = True;
Else
Long = False;
If UpTail == 0 and DnTail == 0 Then
Condition1 = True;
Else
Condition1 = False;
If C < Ma(C,10) and DnTail < Height*0.1 and C == O and Height > Ma(Height,10) and MACDO < 0 Then
buy("b1",OnClose,def,Vol);
If C < Ma(C,10) and (Uptail < Height * 0.1) and C == O and (Height > Ma(Height,10)) and MACDO < 0 Then
buy("b2",OnClose,def,Vol);
If C[1] < Ma(C,10)[1] and C[1] < O[1] and Long[1] == True
and C > O and Long and O < L[1] and C >= (O[1]+C[1])/2 and C < O[1] and MACDO < 0 Then
buy("b3",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] > Min(O,C)[2] and O[1] < Max(O,C)[2]) and
(O > Min(O,C)[1] and O < Max(O,C)[1]) and
(C[2] > C[1] and C[1] > C[0]) and
(L[2] < L[1] and L[1]< L[0]) and MACDO < 0 Then
buy("b4",OnClose,def,Vol);
If C[1] < Ma(C,10)[1] and Long[1] == True and Close[1] < Open[1] and
Close < Open and Open>Close[1] and Close == Close[1] and MACDO < 0 Then
buy("b5",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] > C[2] and O[1] == L[1] and
O > Max(H[1],H[2]) and C[2] == C[0] and MACDO < 0 Then
buy("b6",OnClose,def,Vol);
If (C[4] < Ma(C,10)[4] and C[4] < O[4] and C[3] < O[3] and C[2] < O[2]) and
(O[4] > O[3] and O[3] > O[2]) and
(C[4] > C[3] and C[3] > C[2]) and
(C[1] < O[1] and H[1] - MaxList(O,C)[1] > 0) and
(H[1] < O[3] and C[2] > C[1]) and
Close > Open and (O > O[1] and C > MaxList(H[1],H[2])) and MACDO < 0 Then
buy("b7",OnClose,def,Vol);
If (C[2] < Ma(C,10)[2] and Long[2] == True and C[2] < O[2]) and
(C[1] == O[1] and Max(O,C)[1] < Min(O,C)[2])and
(C > O and Min(O,C) > Max(O,C)[1])and (C > C[2]) and MACDO < 0 Then
buy("b8",OnClose,def,Vol);
If (C[1] < O[1] and Long[1] == True and Condition1[1] == True ) and
(Long == True and C > O and Condition1 == True ) and (L > H[1]) and MACDO < 0 Then
buy("b9",OnClose,def,Vol);
If C[1] < Ma(C,10)[1] and C[1] < O[1] and body[1] > Ma(body[1],10)*2 and
C > O and
Abs(C-C[1]) < Ma(Height,10)*0.1 and MACDO < 0 Then
buy("b10",OnClose,def,Vol);
If C < Ma(C,10) and body > Ma(body,10)*2 and C > O and
O == L and Uptail > 0 and Uptail < Height*0.1 and MACDO < 0 Then
buy("b11",OnClose,def,Vol);
If C[2] < Ma(C,10)[2] and C[2] == O[2] and C[1] == O[1] and C == O and
HighBody[1]< LowBody[2] and HighBody[1] < LowBody[0] and MACDO < 0 Then
buy("b12",OnClose,def,Vol);
If C[1] < Ma(C,10)[1] and C[1] < O[1] and body[1] > Ma(body[1],10)*2 and
C == O and Highbody < Highbody[1] and Lowbody > Lowbody[1] and MACDO < 0 Then
buy("b13",OnClose,def,Vol);
If C[1] < Ma(C,10)[1] and C[1] < O[1] and body[1] > Ma(body[1],10)*2
and C > O and Highbody < Highbody[1] and Lowbody > Lowbody[1] and MACDO < 0 Then
buy("b14",OnClose,def,Vol);
If C[2] < Ma(C,10)[2] and C[2] < O[2] and body[2] > Ma(body[2],10)*2 and
C[1] > O[1] and Highbody[1] < Highbody[2] and Lowbody[1] > Lowbody[2] and
C > O and C > C[1] and MACDO < 0 Then
buy("b15",OnClose,def,Vol);
If C[1] < Ma(c,10)[1] and C[1] < O[1] and
C > O and Body > Ma(Body,10)*2 and
Highbody > Highbody[1] and Lowbody < Lowbody[1] and MACDO < 0 Then
buy("b16",OnClose,def,Vol);
If C[2] < Ma(C,10)[2] and C[2] < O[2] and
C[1] > O[1] and Body[1] > Ma(Body[1],10)*2 and
Highbody[1] > Highbody[2] and Lowbody[1] < Lowbody[2] and
C > O and C > C[1] and MACDO < 0 Then
buy("b17",OnClose,def,Vol);
If (C[4] < Ma(c,10)[4] and Body[4] > Ma(Body,10)[4]*2 and C[4] < O[4]) and
(C[3] < O[3] and C[1] < O[1]) and
(Body > Ma(Body,10)*2 and C > O) and
(O[3] > HighBody[2] and HighBody[2] > O[1]) and
(C[3] > LowBody[2] and LowBody[2] > C[1]) and
(C >= O[1] and C > O[3] and C < C[4]) and MACDO < 0 Then
buy("b18",OnClose,def,Vol);
If C[2] < Ma(C,10)[2] and Body[2] > Ma(Body,10)[2]*2 and C[2] < O[2] and
C[1] == O[1] and HighBody[1]<LowBody[2] and
C > O and C > C[2] and MACDO < 0 Then
buy("b19",OnClose,def,Vol);
If C[2] < Ma(C,10)[2] and Body[2] > Ma(Body,10)[2]*2 and C[2] < O[2] and
Body[1] < Ma(Body,10)[1]*0.5 and HighBody[1] < LowBody[2] and
C > O and C > C[2] and MACDO < 0 Then
buy("b20",OnClose,def,Vol);
If C[3] < Ma(C,10)[3] and
Body[3] > Ma(Body,10)[3]*2 and C[3] < O[3] and
Body[2] > Ma(Body,10)[2]*2 and C[2] < O[2] and
O[3] == H[3] and C[3] == L[3] and
O[2] == H[2] and C[2] == L[2] and
O[1] < Min(O,C)[2] and H[1] > C[2] and UpTail[1] > Height*0.5 and
O > H[1] and C < L[1] and MACDO < 0 Then
buy("b21",OnClose,def,Vol);
If C < Ma(C,10) and DnTail < Height*0.1 and
UpTail > Body*2 and
Height > Ma(Height,10) and
C != O and MACDO < 0 Then
buy("b22",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 <= HighBody[1] and
C[2] <= C[1] and C[1] <= C and MACDO < 0 Then
buy("b23",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 Highbody < Highbody[1] and Lowbody > Lowbody[1] and MACDO < 0 Then
buy("b24",OnClose,def,Vol);
If C[1] < Ma(C,10)[1] and Low == Low[1] and MACDO < 0 Then
buy("b25",OnClose,def,Vol);
If C < Ma(C,10) and UpTail < Height*0.1 and DnTail > Body*2 and
Height > Ma(Height,10) and C != O and MACDO < 0 Then
buy("b26",OnClose,def,Vol);
If (C[2] < Ma(C,10)[2] and Body[2] > Ma(Body,10)[2]*2 and C[2] < O[2]) and
(C[1] < O[1] and C > O and Highbody[1] < Highbody[2] and Lowbody[1] > Lowbody[2]) and
(L[1] < L[2] or L[1] < Min(L[2],L[3],L[4])) and
(L[1] < O and C[1] > C) and MACDO < 0 Then
buy("b27",OnClose,def,Vol);
SetStopLoss(1,PercentStop);
SetStopProfittarget(3,PercentStop);
즐거운 하루되세요
> HI_jh***** 님이 쓴 글입니다.
> 제목 : 시스템식
> 안녕하세요
아래식은 시스템에 있는 상승 반전식인데요
이식을 이식이 하나만 만족해도 매수하는식 만들어주주세요 단, MACD오실레이터 파란색막대에서만 나오는 식으로요
1.입금금액은 50만원
2. MACD오실레이터 파란색막대 및 상승반전식 하나 만족시
3.손절은 -1프로 입니다
4.수익은 +3프로입니다
수고하십시오~
Vars : DnTail(0),Height(0),Uptail(0),Long(False),Body(0),highbody(0),Lowbody(0);
DnTail = Min(O,C) - L;
Uptail = H - Max(O,C);
Height = H - L;
body= Abs(O-C);
highbody = Max(O,C);
LowBody = Min(O,C);
If Abs(Open-Close) > ma(Abs(Open-Close),10)*2 Then
Long = True;
Else
Long = False;
If UpTail == 0 and DnTail == 0 Then
Condition1 = True;
Else
Condition1 = False;
If C < Ma(C,10) and DnTail < Height*0.1 and C == O and Height > Ma(Height,10) Then
plot1(H,"강세비석형");
Else
Noplot(1);
If C < Ma(C,10) and (Uptail < Height * 0.1) and C == O and (Height > Ma(Height,10)) Then
plot2(H,"강세잠자리형");
Else
NoPlot(2);
If C[1] < Ma(C,10)[1] and C[1] < O[1] and Long[1] == True
and C > O and Long and O < L[1] and C >= (O[1]+C[1])/2 and C < O[1] Then
plot3(H,"관통형");
Else
NoPlot(3);
If (C[2] >= Ma(C,10)[2] and C[2] < O[2] and C[1] < O[1] and C < O) and
(O[1] > Min(O,C)[2] and O[1] < Max(O,C)[2]) and
(O > Min(O,C)[1] and O < Max(O,C)[1]) and
(C[2] > C[1] and C[1] > C[0]) and
(L[2] < L[1] and L[1]< L[0]) Then
plot4(H,"남삼성형");
Else
NoPlot(4);
If C[1] < Ma(C,10)[1] and Long[1] == True and Close[1] < Open[1] and
Close < Open and Open>Close[1] and Close == Close[1] Then
plot5(H,"동일저점형");
Else
NoPlot(5);
If C[2] < Ma(C,10)[2] and C[2] < O[2] and C[1] > O[1] and C < O and
O[1] > C[2] and O[1] == L[1] and
O > Max(H[1],H[2]) and C[2] == C[0] Then
plot6(H,"막대샌드위치형");
Else
Noplot(6);
If (C[4] < Ma(C,10)[4] and C[4] < O[4] and C[3] < O[3] and C[2] < O[2]) and
(O[4] > O[3] and O[3] > O[2]) and
(C[4] > C[3] and C[3] > C[2]) and
(C[1] < O[1] and H[1] - MaxList(O,C)[1] > 0) and
(H[1] < O[3] and C[2] > C[1]) and
Close > Open and (O > O[1] and C > MaxList(H[1],H[2])) Then
plot7(H,"사다리바닥형");
Else
NoPlot(7);
If (C[2] < Ma(C,10)[2] and Long[2] == True and C[2] < O[2]) and
(C[1] == O[1] and Max(O,C)[1] < Min(O,C)[2])and
(C > O and Min(O,C) > Max(O,C)[1])and (C > C[2]) Then
plot8(H,"상승기아형");
Else
NoPlot(8);
If (C[1] < O[1] and Long[1] == True and Condition1[1] == True ) and
(Long == True and C > O and Condition1 == True ) and (L > H[1]) Then
plot9(H,"상승박차형");
Else
NoPlot(9);
If C[1] < Ma(C,10)[1] and C[1] < O[1] and body[1] > Ma(body[1],10)*2 and
C > O and
Abs(C-C[1]) < Ma(Height,10)*0.1 Then
plot10(H,"상승반격형");
Else
NoPlot(10);
If C < Ma(C,10) and body > Ma(body,10)*2 and C > O and
O == L and Uptail > 0 and Uptail < Height*0.1 Then
plot11(H,"상승샅바형");
Else
NoPlot(11);
If C[2] < Ma(C,10)[2] and C[2] == O[2] and C[1] == O[1] and C == O and
HighBody[1]< LowBody[2] and HighBody[1] < LowBody[0] Then
plot12(H,"상승세십자별형");
Else
NoPlot(12);
If C[1] < Ma(C,10)[1] and C[1] < O[1] and body[1] > Ma(body[1],10)*2 and
C == O and Highbody < Highbody[1] and Lowbody > Lowbody[1] Then
plot13(H,"상승십자잉태형");
Else
NoPlot(13);
If C[1] < Ma(C,10)[1] and C[1] < O[1] and body[1] > Ma(body[1],10)*2
and C > O and Highbody < Highbody[1] and Lowbody > Lowbody[1] Then
plot14(H,"상승잉태형");
Else
NoPlot(14);
If C[2] < Ma(C,10)[2] and C[2] < O[2] and body[2] > Ma(body[2],10)*2 and
C[1] > O[1] and Highbody[1] < Highbody[2] and Lowbody[1] > Lowbody[2] and
C > O and C > C[1] Then
plot15(H,"상승잉태확인형");
Else
NoPlot(15);
If C[1] < Ma(c,10)[1] and C[1] < O[1] and
C > O and Body > Ma(Body,10)*2 and
Highbody > Highbody[1] and Lowbody < Lowbody[1] Then
plot16(H,"상승장악형");
Else
NoPlot(16);
If C[2] < Ma(C,10)[2] and C[2] < O[2] and
C[1] > O[1] and Body[1] > Ma(Body[1],10)*2 and
Highbody[1] > Highbody[2] and Lowbody[1] < Lowbody[2] and
C > O and C > C[1] Then
plot17(H,"상승장악확인형");
Else
NoPlot(17);
If (C[4] < Ma(c,10)[4] and Body[4] > Ma(Body,10)[4]*2 and C[4] < O[4]) and
(C[3] < O[3] and C[1] < O[1]) and
(Body > Ma(Body,10)*2 and C > O) and
(O[3] > HighBody[2] and HighBody[2] > O[1]) and
(C[3] > LowBody[2] and LowBody[2] > C[1]) and
(C >= O[1] and C > O[3] and C < C[4]) Then
plot18(H,"상승탈출형");
Else
NoPlot(18);
If C[2] < Ma(C,10)[2] and Body[2] > Ma(Body,10)[2]*2 and C[2] < O[2] and
C[1] == O[1] and HighBody[1]<LowBody[2] and
C > O and C > C[2] Then
plot19(H,"샛별십자형");
Else
NoPlot(19);
If C[2] < Ma(C,10)[2] and Body[2] > Ma(Body,10)[2]*2 and C[2] < O[2] and
Body[1] < Ma(Body,10)[1]*0.5 and HighBody[1] < LowBody[2] and
C > O and C > C[2] Then
plot20(H,"샛별형");
Else
NoPlot(20);
If C[3] < Ma(C,10)[3] and
Body[3] > Ma(Body,10)[3]*2 and C[3] < O[3] and
Body[2] > Ma(Body,10)[2]*2 and C[2] < O[2] and
O[3] == H[3] and C[3] == L[3] and
O[2] == H[2] and C[2] == L[2] and
O[1] < Min(O,C)[2] and H[1] > C[2] and UpTail[1] > Height*0.5 and
O > H[1] and C < L[1] Then
plot21(H,"애기제비감추기형");
Else
NoPlot(21);
If C < Ma(C,10) and DnTail < Height*0.1 and
UpTail > Body*2 and
Height > Ma(Height,10) and
C != O Then
plot22(H,"역망치형");
Else
NoPlot(22);
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 <= HighBody[1] and
C[2] <= C[1] and C[1] <= C Then
plot23(H,"적삼병");
Else
NoPlot(23);
If C[1] < Ma(C,10)[1] and C[1] < O[1] and Body[1] > Ma(Body,10)[1]*2 and
C < O and Highbody < Highbody[1] and Lowbody > Lowbody[1] Then
plot24(H,"전서구형");
Else
NoPlot(24);
If C[1] < Ma(C,10)[1] and Low == Low[1] Then
plot25(H,"집게바닥형");
Else
NoPlot(25);
If C < Ma(C,10) and UpTail < Height*0.1 and DnTail > Body*2 and
Height > Ma(Height,10) and C != O Then
plot26(H,"해머형");
Else
NoPlot(26);
If (C[2] < Ma(C,10)[2] and Body[2] > Ma(Body,10)[2]*2 and C[2] < O[2]) and
(C[1] < O[1] and C > O and Highbody[1] < Highbody[2] and Lowbody[1] > Lowbody[2]) and
(L[1] < L[2] or L[1] < Min(L[2],L[3],L[4])) and
(L[1] < O and C[1] > C) Then
plot27(H,"희귀삼천바닥형");
Else
NoPlot(27);