커뮤니티
수정부탁드립니다.
2021-06-01 12:41:21
440
글번호 149505
수고하십니다.
수식이 돌아가질 않습니다. 수정부탁드립니다.
<1번>종목검색 _CandleNameSearch
<2번>사용자함수 _CandleName
# 숫자범위 필터링은 1번 종목검색, 2번 사용자함수 어디에서 해야하나요
<1번>종목검색 _CandleNameSearch
# candleN 숫자범위 필터링 필요(나중추가)
# _CandleName 사용자함수에서 필터링해야하나
Inputs : CandleN(1);
if _CandleName == CandleN
Then
Find(1);
#<2번>사용자함수 _CandleName
#상승반전
Vars : CandleNo(Numeric);
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,"강세비석형");
CandleNo = 1;
If C < Ma(C,10) and (Uptail < Height * 0.1) and C == O and (Height > Ma(Height,10)) Then
# plot2(H,"강세잠자리형");
CandleNo = 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,"관통형");
CandleNo = 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,"남삼성형");
CandleNo = 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,"동일저점형");
CandleNo = 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,"막대샌드위치형");
CandleNo = 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,"사다리바닥형");
CandleNo = 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,"상승기아형");
CandleNo = 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,"상승박차형");
CandleNo = 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,"상승반격형");
CandleNo = 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,"상승샅바형");
CandleNo = 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,"상승세십자별형");
CandleNo = 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,"상승십자잉태형");
CandleNo = 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,"상승잉태형");
CandleNo = 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,"상승잉태확인형");
CandleNo = 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,"상승장악형");
CandleNo = 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,"상승장악확인형");
CandleNo = 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,"상승탈출형");
CandleNo = 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,"샛별십자형");
CandleNo = 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,"샛별형");
CandleNo = 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,"애기제비감추기형");
CandleNo = 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,"역망치형");
CandleNo = 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,"적삼병");
CandleNo = 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,"전서구형");
CandleNo = 24;
If C[1] < Ma(C,10)[1] and Low == Low[1] Then
# plot25(H,"집게바닥형");
CandleNo = 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,"해머형");
CandleNo = 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,"희귀삼천바닥형");
CandleNo = 27;
# CandleNo = 99;
#상승지속 --------------------------------------------------------------------------------------------------
#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,"강세삼선반격형");
CandleNo = 101;
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,"매트형");
CandleNo = 102;
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,"블럭형");
CandleNo = 103;
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,"상승갈림길형");
CandleNo = 104;
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,"상승갭삼법형");
CandleNo = 105;
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,"상승나란히형");
CandleNo = 106;
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,"상승삼법형");
CandleNo = 107;
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,"상승타스키갭형");
CandleNo = 108;
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,"장대양봉형");
CandleNo = 109;
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,"지연형");
CandleNo = 110;
# CandleNo = 199;
#하락반전 =============================================================================================
#Var : UpTail(0),DnTail(0),Height(0),Body(0),HighBody(0),LowBody(0),Midbody(0);
Var : Midbody(0);
UpTail = H-Max(C,O);
DnTail = Min(C,O)-L;
Height = H-L;
Body = Abs(C-O);
HighBody = Max(C,O);
LowBody = Min(C,O);
Midbody = (Open+Close)/2;
If C > Ma(C,10) and
UpTail < Height*0.1 and DnTail > Body*2 and
Height > Ma(Height,10) and C != O Then
# plot1(H,"교수형");
CandleNo = -1;
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[1] > C[2] and
C < O and O >= LowBody[1] and O <= HighBody[1] and C > C[2] Then
# plot2(H,"까마귀형");
CandleNo = -2;
If C[2] >= Ma(c,10)[2] and C[2] < O[2] and C[1] < O[1] and C < O and
Abs(O[1]-C[2]) < Ma(Height,10)*0.1 and
Abs(O-C[1]) < Ma(Height,10)*0.1 and
C[2] > C[1] and C[1] > C Then
# plot3(H,"동일흑삼병형");
CandleNo = -3;
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 LowBody[1] > HighBody[2] and
C < O and C < C[2] Then
# plot4(H,"석별십자형");
CandleNo = -4;
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 LowBody[1]>HighBody[2] and
C < O and C < C[2] Then
# plot5(H,"석별형");
CandleNo = -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[1] > C[2] and C < O and
O >= LowBody[1] and O <= HighBody[1] and C < C[2] Then
# plot6(H,"약세까마귀형");
CandleNo = -6;
If C > Ma(C,10) and C == O and
DnTail < Height*0.1 and
Height > Ma(Height,10) Then
# plot7(H,"약세비석형");
CandleNo = -7;
If C > Ma(C,10) and C ==O and
UpTail < Height*0.1 and
Height > Ma(Height,10) Then
# plot8(H,"약세잠자리형");
CandleNo = -8;
If (C >= Ma(C,10) and C != O) and (DnTail<Height*0.1) and
(UpTail>Body*2) and (Height > Ma(Height,10)) Then
# plot9(H,"유성형");
CandleNo = -9;
If C[1] >= Ma(c,10)[1] and H == H[1] Then
# plot10(H,"집게천장형");
CandleNo = -10;
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 LowBody[1] > HighBody[2] and
C < O and HighBody < LowBody[1] and C < C[2] Then
# plot11(H,"하락기아형");
CandleNo = -11;
If C[1] > O[1] and Body[1] > Ma(Body,10)[1]*2 and UpTail[1] == 0 and DnTail[1] == 0 and
C < O and Body > Ma(Body,10)*2 and UpTail == 0 and DnTail == 0 and H < L[1] Then
# plot12(H,"하락박차형");
CandleNo = -12;
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(C-C[1]) < Ma(Height,10)*0.1 Then
# plot13(H,"하락반격형");
CandleNo = -13;
If C > Ma(C,10) and Body > Ma(Body,10)*2 and C < O and
O == H and DnTail > 0 and DnTail < Height*0.1 Then
# plot14(H,"하락샅바형");
CandleNo = -14;
If C[2] > Ma(C,10)[2] and C[1] == O[2] and C[1] == O[1] and C == O and
LowBody[1] > HighBody[2] and HighBody < LowBody[1] Then
# plot15(H,"하락세십자별형");
CandleNo = -15;
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
# plot16(H,"하락십자잉태형");
CandleNo = -16;
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
# plot17(H,"하락잉태형");
CandleNo = -17;
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 Highbody[1] < Highbody[2] and Lowbody[1] > Lowbody[2] and
C < O and C < C[1] Then
# plot18(H,"하락잉태확인형");
CandleNo = -18;
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
# plot19(H,"하락장악형");
CandleNo = -19;
If C[2] >= Ma(c,10)[2] and C[2] > O[2] and
C[1] < O[1] and Body[1] > Ma(Body,10)[1]*2 and
Highbody[1] > Highbody[2] and Lowbody[1] < Lowbody[2] and
C < O and C < C[1] Then
# plot20(H,"하락장악확인형");
CandleNo = -20;
If C[4] >= Ma(C,10)[4] and Body[4] > Ma(Body,10)[4]*2 and C[4] > O[4] and
C[2] > O[2] and C[1] > O[1] and C < O and
O[3] >= C[4] and O[3] < LowBody[2] and O[1] > LowBody[2] and
C[3] < HighBody[2] and C[1] > HighBody[2] and
C < O[3] and C > C[4] Then
# plot21(H,"하락탈출형");
CandleNo = -21;
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 Then
# plot22(H,"흑삼병");
CandleNo = -22;
If C[1] > Ma(C,10)[1] and C[1] > O[1] and Body[1] > Ma(Body,10)[1]*2 and
C < O and Body > Ma(Body,10)*2 and
O > H[1] and C <= MidBody[1] Then
# plot23(H,"흑운형");
CandleNo = -23;
# CandleNo = -99;
#하락지속 ------------------------------------------------------------------------------
#Variables : body(0),MidBody(0),height(0),Uptail(0),Dntail(0),Highbody(0),Lowbody(0);
body = Abs(O-C);
Height = H-L;
Uptail = H - Max(O,C);
Dntail = Min(O,C) - L;
MidBody = (Open+Close)/2;
Highbody = Max(O,C);
LowBody = Min(O,C);
If C[1] < Ma(C,10)[1] and body[1] > Ma(body[1],10)*2 and C[1] < O[1] and C > O and
O < L[1] and C > C[1] and C < MidBody[1] Then
# plot1(H,"Trusting Line");
CandleNo = -101;
If (C[1] < Ma(C,10)[1] and body[1] > Ma(body[1],10)*2 and C[1] < O[1]) and
(C > O and O < L[1] and C == L[1]) Then
# plot2(H,"걸침형");
CandleNo = -102;
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
(L[3] > L[2] and L[2] > L[1]) and
(O[2] > C[3] and O[1] > C[2]) and
(body > Ma(body,10)*2 and C > O) and
(O < L[1] and C > H[3]) Then
# plot3(H,"약세삼선반격형");
CandleNo = -103;
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
# plot4(H,"장대음봉형");
CandleNo = -104;
If C[1] < Ma(C,10)[1] and body[1] > Ma(body[1],10)*2 and C[1] < O[1] and
C > O and O < L[1] and C == C[1] Then
# plot5(H,"진입형");
CandleNo = -105;
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(O - O[1]) < Ma(Height,10)*0.1 Then
# plot6(H,"하락갈림길형");
CandleNo = -106;
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 body[1] > Ma(body[1],10)*2 and O[1] < Min(O,C)[2] and
C > O and C > C[2] Then
# plot7(H,"하락갭삼법형");
CandleNo = -107;
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 C[1] < C[2] and
C > O and Abs(Body-Body[1]) < O[1]*0.005 and
abs(O-O[1]) < Ma(Height,10)*0.1 Then
# plot8(H,"하락나란히형");
CandleNo = -108;
If C[4] < Ma(C,10)[4] and C[4] < O[4]and body[4] > Ma(body[4],10)*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
LowBody[3] <= LowBody[2] and LowBody[2] < LowBody[1] and
C < O and body > Ma(body,10)*2 and Close == Lowest(C,5) Then
# plot9(H,"하락삼법형");
CandleNo = -109;
IF C[2] < Ma(C,10)[2] and C[2] < O[2] and C[1] < O[1] and O[1] < Min(O,C)[2] and
C > O and O >= LowBody[1] and O <= HighBody[1] and C < C[2] Then
# plot10(H,"하락타스키갭형");
CandleNo = -110;
# CandleNo = -199;
_CandleName = CandleNo;
답변 1
예스스탁 예스스탁 답변
2021-06-01 14:23:12
안녕하세요
예스스탁입니다.
1
종목검색서버는 다수의 이용자들이 공용으로 사용하는 서버로
종목검색실행시 일정시간이상 요구되고 리소스를 많이 사용하는 종목검색은 거부하게 됩니다.
작성하신 수식은 서버에서 시간이 많이 소모되므로 검색이 되지 않습니다.
검색이 되게 하시려면 함수식 내용을 좀더 가볍게 동작하게 만드시거나
케이스별로 분할해서 별도로 만들어 검색하셔야 합니다
2
아래는 함수식에서 불필요하게 반복계산되는 부분을 변수처리해 사용하게 수정해 드립니다.
현재 사용자함수가 동일계산을 자주 반복해서 무겁게 동작하게 작성이 되어 있습니다.
10단순이평만 해도 수식안에서 봉당 68번 계산을 반복합니다.
수식에 불필요한 반복 연산을 없애셔야 차트나 적용할 때도 종목검색에 적용할때도
계산시 연산을 빨리하게 됩니다.
사용자함수안에 동일계산을 하는 함수들은
하나의 변수로 처리해서 각 수식에서 이용하게 하셔야 합니다.
해당 함수의 자주 반복되고 있는 동일 이동평균만 변수처리해서 변경해 드립니다.
Vars : CandleNo(0);
Vars : DnTail(0),Height(0),Uptail(0),Long(False),Body(0),highbody(0),Lowbody(0);
var : ma1(0),ma2(0),ma3(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);
ma1 = ma(C,10);
ma2 = Ma(Height,10);
ma3 = ma(body,10);
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 < ma1 and DnTail < Height*0.1 and C == O and Height > ma2 Then
# plot1(H,"강세비석형");
CandleNo = 1;
If C < ma1 and (Uptail < Height * 0.1) and C == O and (Height > ma2) Then
# plot2(H,"강세잠자리형");
CandleNo = 2;
If C[1] < ma1[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,"관통형");
CandleNo = 3;
If (C[2] >= ma1[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,"남삼성형");
CandleNo = 4;
If C[1] < ma1[1] and Long[1] == True and Close[1] < Open[1] and
Close < Open and Open>Close[1] and Close == Close[1] Then
# plot5(H,"동일저점형");
CandleNo = 5;
If C[2] < ma1[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,"막대샌드위치형");
CandleNo = 6;
If (C[4] < ma1[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,"사다리바닥형");
CandleNo = 7;
If (C[2] < ma1[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,"상승기아형");
CandleNo = 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,"상승박차형");
CandleNo = 9;
If C[1] < ma1[1] and C[1] < O[1] and body[1] > ma3[1]*2 and
C > O and
Abs(C-C[1]) < ma2*0.1 Then
# plot10(H,"상승반격형");
CandleNo = 10;
If C < ma1 and body > ma3*2 and C > O and
O == L and Uptail > 0 and Uptail < Height*0.1 Then
# plot11(H,"상승샅바형");
CandleNo = 11;
If C[2] < ma1[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,"상승세십자별형");
CandleNo = 12;
If C[1] < ma1[1] and C[1] < O[1] and body[1] > ma3[1]*2 and
C == O and Highbody < Highbody[1] and Lowbody > Lowbody[1] Then
# plot13(H,"상승십자잉태형");
CandleNo = 13;
If C[1] < ma1[1] and C[1] < O[1] and body[1] > ma3[1]*2
and C > O and Highbody < Highbody[1] and Lowbody > Lowbody[1] Then
# plot14(H,"상승잉태형");
CandleNo = 14;
If C[2] < ma1[2] and C[2] < O[2] and body[2] > ma3[2]*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,"상승잉태확인형");
CandleNo = 15;
If C[1] < ma1[1] and C[1] < O[1] and
C > O and Body > ma3*2 and
Highbody > Highbody[1] and Lowbody < Lowbody[1] Then
# plot16(H,"상승장악형");
CandleNo = 16;
If C[2] < ma1[2] and C[2] < O[2] and
C[1] > O[1] and Body[1] > ma3[1]*2 and
Highbody[1] > Highbody[2] and Lowbody[1] < Lowbody[2] and
C > O and C > C[1] Then
# plot17(H,"상승장악확인형");
CandleNo = 17;
If (C[4] < ma1[4] and Body[4] > ma3[4]*2 and C[4] < O[4]) and
(C[3] < O[3] and C[1] < O[1]) and
(Body > ma3*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,"상승탈출형");
CandleNo = 18;
If C[2] < ma1[2] and Body[2] > ma3[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,"샛별십자형");
CandleNo = 19;
If C[2] < ma1[2] and Body[2] > ma3[2]*2 and C[2] < O[2] and
Body[1] < ma3[1]*0.5 and HighBody[1] < LowBody[2] and
C > O and C > C[2] Then
# plot20(H,"샛별형");
CandleNo = 20;
If C[3] < ma1[3] and
Body[3] > ma3[3]*2 and C[3] < O[3] and
Body[2] > ma3[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,"애기제비감추기형");
CandleNo = 21;
If C < ma1 and DnTail < Height*0.1 and
UpTail > Body*2 and
Height > ma2 and
C != O Then
# plot22(H,"역망치형");
CandleNo = 22;
If C[2] < ma1[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,"적삼병");
CandleNo = 23;
If C[1] < ma1[1] and C[1] < O[1] and Body[1] > ma3[1]*2 and
C < O and Highbody < Highbody[1] and Lowbody > Lowbody[1] Then
# plot24(H,"전서구형");
CandleNo = 24;
If C[1] < ma1[1] and Low == Low[1] Then
# plot25(H,"집게바닥형");
CandleNo = 25;
If C < ma1 and UpTail < Height*0.1 and DnTail > Body*2 and
Height > ma2 and C != O Then
# plot26(H,"해머형");
CandleNo = 26;
If (C[2] < ma1[2] and Body[2] > ma3[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,"희귀삼천바닥형");
CandleNo = 27;
# CandleNo = 99;
#상승지속 --------------------------------------------------------------------------------------------------
#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] > ma1[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 > ma3*2 and C < O) and
(O > H[1] and C < L[3]) Then
# plot1(H,"강세삼선반격형");
CandleNo = 101;
If (C[4] >= ma1[4] and C[4] > O[4] and Body[4] > ma3[4]*2) and
(LowBody[3] > Highbody[4]) and
(HighBody[3] >= HighBody[2] and HighBody[2] >= HighBody[1]) and
(C > O and Body > ma3*2 and Close == Highest(C,5)) Then
# plot2(H,"매트형");
CandleNo = 102;
If (C[2] >= ma1[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,"블럭형");
CandleNo = 103;
If (C[1] >= ma1[1] and C[1] < O[1] and Body[1] > ma3[1]*2 and C > O) and
(Abs(Open-Open[1]) < ma2*0.1) Then
# plot4(H,"상승갈림길형");
CandleNo = 104;
If C[2] >= ma1[2] and C[2] > O[2] and Body[2] > ma3[2]*2 and
C[1] > O[1] and Body[1] > ma3[1]*2 and Open[1] > Max(O,C)[2] and
C < O and C < C[2] Then
# plot5(H,"상승갭삼법형");
CandleNo = 105;
If C[2] >= ma1[2] and C[2] > O[2] and Body[2] > ma3[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]) < ma2*0.1 Then
# plot6(H,"상승나란히형");
CandleNo = 106;
If C[4] >= ma1[4] and C[4] > O[4] and Body[4] > ma3[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 > ma3*2 and
Close == Highest(C,5) Then
# plot7(H,"상승삼법형");
CandleNo = 107;
If C[2] > ma1[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,"상승타스키갭형");
CandleNo = 108;
If C > ma1 and Body > ma3*2 and C > O and
UpTail < Height*0.1 and DnTail < Height*0.1 Then
# plot9(H,"장대양봉형");
CandleNo = 109;
If C[2] > ma1[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 < ma3*0.5 and O > Max(C,O)[1] Then
# plot10(H,"지연형");
CandleNo = 110;
# CandleNo = 199;
#하락반전 =============================================================================================
#Var : UpTail(0),DnTail(0),Height(0),Body(0),HighBody(0),LowBody(0),Midbody(0);
Var : Midbody(0);
UpTail = H-Max(C,O);
DnTail = Min(C,O)-L;
Height = H-L;
Body = Abs(C-O);
HighBody = Max(C,O);
LowBody = Min(C,O);
Midbody = (Open+Close)/2;
If C > ma1 and
UpTail < Height*0.1 and DnTail > Body*2 and
Height > ma2 and C != O Then
# plot1(H,"교수형");
CandleNo = -1;
If C[2] >= ma1[2] and C[2] > O[2] and Body[2] > ma3[2]*2 and
C[1] < O[1] and C[1] > C[2] and
C < O and O >= LowBody[1] and O <= HighBody[1] and C > C[2] Then
# plot2(H,"까마귀형");
CandleNo = -2;
If C[2] >= ma1[2] and C[2] < O[2] and C[1] < O[1] and C < O and
Abs(O[1]-C[2]) < ma2*0.1 and
Abs(O-C[1]) < ma2*0.1 and
C[2] > C[1] and C[1] > C Then
# plot3(H,"동일흑삼병형");
CandleNo = -3;
If C[2] > ma1[2] and Body[2] > ma3[2]*2 and C[2] > O[2] and
C[1] == O[1] and LowBody[1] > HighBody[2] and
C < O and C < C[2] Then
# plot4(H,"석별십자형");
CandleNo = -4;
If C[2] >= ma1[2] and Body[2] > ma3[2]*2 and C[2] > O[2] and
Body[1] < ma3[1]*0.5 and LowBody[1]>HighBody[2] and
C < O and C < C[2] Then
# plot5(H,"석별형");
CandleNo = -5;
If C[2] >= ma1[2] and C[2] > O[2] and Body[2] > ma3[2]*2 and
C[1] < O[1] and C[1] > C[2] and C < O and
O >= LowBody[1] and O <= HighBody[1] and C < C[2] Then
# plot6(H,"약세까마귀형");
CandleNo = -6;
If C > ma1 and C == O and
DnTail < Height*0.1 and
Height > ma2 Then
# plot7(H,"약세비석형");
CandleNo = -7;
If C > ma1 and C ==O and
UpTail < Height*0.1 and
Height > ma2 Then
# plot8(H,"약세잠자리형");
CandleNo = -8;
If (C >= ma1 and C != O) and (DnTail<Height*0.1) and
(UpTail>Body*2) and (Height > ma2) Then
# plot9(H,"유성형");
CandleNo = -9;
If C[1] >= ma1[1] and H == H[1] Then
# plot10(H,"집게천장형");
CandleNo = -10;
If C[2] >= ma1[2] and Body[2] > ma3[2]*2 and C[2] > O[2] and
C[1] == O[1] and LowBody[1] > HighBody[2] and
C < O and HighBody < LowBody[1] and C < C[2] Then
# plot11(H,"하락기아형");
CandleNo = -11;
If C[1] > O[1] and Body[1] > ma3[1]*2 and UpTail[1] == 0 and DnTail[1] == 0 and
C < O and Body > ma3*2 and UpTail == 0 and DnTail == 0 and H < L[1] Then
# plot12(H,"하락박차형");
CandleNo = -12;
If C[1] > ma1[1] and C[1] > O[1] and Body[1] > ma3[1]*2 and
C < O and Abs(C-C[1]) < ma2*0.1 Then
# plot13(H,"하락반격형");
CandleNo = -13;
If C > ma1 and Body > ma3*2 and C < O and
O == H and DnTail > 0 and DnTail < Height*0.1 Then
# plot14(H,"하락샅바형");
CandleNo = -14;
If C[2] > ma1[2] and C[1] == O[2] and C[1] == O[1] and C == O and
LowBody[1] > HighBody[2] and HighBody < LowBody[1] Then
# plot15(H,"하락세십자별형");
CandleNo = -15;
If C[1] > ma1[1] and C[1] > O[1] and Body[1] > ma3[1]*2 and
C == O and Highbody < Highbody[1] and Lowbody > Lowbody[1] Then
# plot16(H,"하락십자잉태형");
CandleNo = -16;
If C[1] >= ma1[1] and C[1] > O[1] and Body[1] > ma3[1]*2 and
C < O and Highbody < Highbody[1] and Lowbody > Lowbody[1] Then
# plot17(H,"하락잉태형");
CandleNo = -17;
If C[2] >= ma1[2] and C[2] > O[2] and Body[2] > ma3[2]*2 and
C[1] < O[1] and Highbody[1] < Highbody[2] and Lowbody[1] > Lowbody[2] and
C < O and C < C[1] Then
# plot18(H,"하락잉태확인형");
CandleNo = -18;
If C[1] >= ma1[1] and C[1] > O[1] and
C < O and Body > ma3*2 and
Highbody > Highbody[1] and Lowbody < Lowbody[1] Then
# plot19(H,"하락장악형");
CandleNo = -19;
If C[2] >= ma1[2] and C[2] > O[2] and
C[1] < O[1] and Body[1] > ma3[1]*2 and
Highbody[1] > Highbody[2] and Lowbody[1] < Lowbody[2] and
C < O and C < C[1] Then
# plot20(H,"하락장악확인형");
CandleNo = -20;
If C[4] >= ma1[4] and Body[4] > ma3[4]*2 and C[4] > O[4] and
C[2] > O[2] and C[1] > O[1] and C < O and
O[3] >= C[4] and O[3] < LowBody[2] and O[1] > LowBody[2] and
C[3] < HighBody[2] and C[1] > HighBody[2] and
C < O[3] and C > C[4] Then
# plot21(H,"하락탈출형");
CandleNo = -21;
If C[2] > ma1[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 Then
# plot22(H,"흑삼병");
CandleNo = -22;
If C[1] > ma1[1] and C[1] > O[1] and Body[1] > ma3[1]*2 and
C < O and Body > ma3*2 and
O > H[1] and C <= MidBody[1] Then
# plot23(H,"흑운형");
CandleNo = -23;
# CandleNo = -99;
#하락지속 ------------------------------------------------------------------------------
#Variables : body(0),MidBody(0),height(0),Uptail(0),Dntail(0),Highbody(0),Lowbody(0);
body = Abs(O-C);
Height = H-L;
Uptail = H - Max(O,C);
Dntail = Min(O,C) - L;
MidBody = (Open+Close)/2;
Highbody = Max(O,C);
LowBody = Min(O,C);
If C[1] < ma1[1] and body[1] > ma3[1]*2 and C[1] < O[1] and C > O and
O < L[1] and C > C[1] and C < MidBody[1] Then
# plot1(H,"Trusting Line");
CandleNo = -101;
If (C[1] < ma1[1] and body[1] > ma3[1]*2 and C[1] < O[1]) and
(C > O and O < L[1] and C == L[1]) Then
# plot2(H,"걸침형");
CandleNo = -102;
If (C[3] < ma1[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
(L[3] > L[2] and L[2] > L[1]) and
(O[2] > C[3] and O[1] > C[2]) and
(body > ma3*2 and C > O) and
(O < L[1] and C > H[3]) Then
# plot3(H,"약세삼선반격형");
CandleNo = -103;
If C < ma1 and body > ma3*2 and C < O and
Uptail < Height*0.1 and Dntail < Height*0.1 Then
# plot4(H,"장대음봉형");
CandleNo = -104;
If C[1] < ma1[1] and body[1] > ma3[1]*2 and C[1] < O[1] and
C > O and O < L[1] and C == C[1] Then
# plot5(H,"진입형");
CandleNo = -105;
IF C[1] < ma1[1] and C[1] > O[1] and body[1] > ma3[1]*2 and
C < O and Abs(O - O[1]) < ma2*0.1 Then
# plot6(H,"하락갈림길형");
CandleNo = -106;
If C[2] < ma1[2] and C[2] < O[2] and body[2] > ma3[2]*2 and
C[1] < O[1] and body[1] > ma3[1]*2 and O[1] < Min(O,C)[2] and
C > O and C > C[2] Then
# plot7(H,"하락갭삼법형");
CandleNo = -107;
If C[2] < ma1[2] and C[2] < O[2] and body[2] > ma3[2]*2 and
C[1] > O[1] and C[1] < C[2] and
C > O and Abs(Body-Body[1]) < O[1]*0.005 and
abs(O-O[1]) < ma2*0.1 Then
# plot8(H,"하락나란히형");
CandleNo = -108;
If C[4] < ma1[4] and C[4] < O[4]and body[4] > ma3[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
LowBody[3] <= LowBody[2] and LowBody[2] < LowBody[1] and
C < O and body > ma3*2 and Close == Lowest(C,5) Then
# plot9(H,"하락삼법형");
CandleNo = -109;
IF C[2] < ma1[2] and C[2] < O[2] and C[1] < O[1] and O[1] < Min(O,C)[2] and
C > O and O >= LowBody[1] and O <= HighBody[1] and C < C[2] Then
# plot10(H,"하락타스키갭형");
CandleNo = -110;
# CandleNo = -199;
_CandleName = CandleNo;
즐거운 하루되세요
> 목포댁 님이 쓴 글입니다.
> 제목 : 수정부탁드립니다.
>
수고하십니다.
수식이 돌아가질 않습니다. 수정부탁드립니다.
<1번>종목검색 _CandleNameSearch
<2번>사용자함수 _CandleName
# 숫자범위 필터링은 1번 종목검색, 2번 사용자함수 어디에서 해야하나요
<1번>종목검색 _CandleNameSearch
# candleN 숫자범위 필터링 필요(나중추가)
# _CandleName 사용자함수에서 필터링해야하나
Inputs : CandleN(1);
if _CandleName == CandleN
Then
Find(1);
#<2번>사용자함수 _CandleName
#상승반전
Vars : CandleNo(Numeric);
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,"강세비석형");
CandleNo = 1;
If C < Ma(C,10) and (Uptail < Height * 0.1) and C == O and (Height > Ma(Height,10)) Then
# plot2(H,"강세잠자리형");
CandleNo = 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,"관통형");
CandleNo = 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,"남삼성형");
CandleNo = 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,"동일저점형");
CandleNo = 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,"막대샌드위치형");
CandleNo = 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,"사다리바닥형");
CandleNo = 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,"상승기아형");
CandleNo = 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,"상승박차형");
CandleNo = 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,"상승반격형");
CandleNo = 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,"상승샅바형");
CandleNo = 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,"상승세십자별형");
CandleNo = 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,"상승십자잉태형");
CandleNo = 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,"상승잉태형");
CandleNo = 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,"상승잉태확인형");
CandleNo = 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,"상승장악형");
CandleNo = 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,"상승장악확인형");
CandleNo = 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,"상승탈출형");
CandleNo = 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,"샛별십자형");
CandleNo = 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,"샛별형");
CandleNo = 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,"애기제비감추기형");
CandleNo = 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,"역망치형");
CandleNo = 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,"적삼병");
CandleNo = 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,"전서구형");
CandleNo = 24;
If C[1] < Ma(C,10)[1] and Low == Low[1] Then
# plot25(H,"집게바닥형");
CandleNo = 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,"해머형");
CandleNo = 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,"희귀삼천바닥형");
CandleNo = 27;
# CandleNo = 99;
#상승지속 --------------------------------------------------------------------------------------------------
#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,"강세삼선반격형");
CandleNo = 101;
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,"매트형");
CandleNo = 102;
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,"블럭형");
CandleNo = 103;
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,"상승갈림길형");
CandleNo = 104;
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,"상승갭삼법형");
CandleNo = 105;
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,"상승나란히형");
CandleNo = 106;
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,"상승삼법형");
CandleNo = 107;
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,"상승타스키갭형");
CandleNo = 108;
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,"장대양봉형");
CandleNo = 109;
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,"지연형");
CandleNo = 110;
# CandleNo = 199;
#하락반전 =============================================================================================
#Var : UpTail(0),DnTail(0),Height(0),Body(0),HighBody(0),LowBody(0),Midbody(0);
Var : Midbody(0);
UpTail = H-Max(C,O);
DnTail = Min(C,O)-L;
Height = H-L;
Body = Abs(C-O);
HighBody = Max(C,O);
LowBody = Min(C,O);
Midbody = (Open+Close)/2;
If C > Ma(C,10) and
UpTail < Height*0.1 and DnTail > Body*2 and
Height > Ma(Height,10) and C != O Then
# plot1(H,"교수형");
CandleNo = -1;
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[1] > C[2] and
C < O and O >= LowBody[1] and O <= HighBody[1] and C > C[2] Then
# plot2(H,"까마귀형");
CandleNo = -2;
If C[2] >= Ma(c,10)[2] and C[2] < O[2] and C[1] < O[1] and C < O and
Abs(O[1]-C[2]) < Ma(Height,10)*0.1 and
Abs(O-C[1]) < Ma(Height,10)*0.1 and
C[2] > C[1] and C[1] > C Then
# plot3(H,"동일흑삼병형");
CandleNo = -3;
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 LowBody[1] > HighBody[2] and
C < O and C < C[2] Then
# plot4(H,"석별십자형");
CandleNo = -4;
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 LowBody[1]>HighBody[2] and
C < O and C < C[2] Then
# plot5(H,"석별형");
CandleNo = -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[1] > C[2] and C < O and
O >= LowBody[1] and O <= HighBody[1] and C < C[2] Then
# plot6(H,"약세까마귀형");
CandleNo = -6;
If C > Ma(C,10) and C == O and
DnTail < Height*0.1 and
Height > Ma(Height,10) Then
# plot7(H,"약세비석형");
CandleNo = -7;
If C > Ma(C,10) and C ==O and
UpTail < Height*0.1 and
Height > Ma(Height,10) Then
# plot8(H,"약세잠자리형");
CandleNo = -8;
If (C >= Ma(C,10) and C != O) and (DnTail<Height*0.1) and
(UpTail>Body*2) and (Height > Ma(Height,10)) Then
# plot9(H,"유성형");
CandleNo = -9;
If C[1] >= Ma(c,10)[1] and H == H[1] Then
# plot10(H,"집게천장형");
CandleNo = -10;
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 LowBody[1] > HighBody[2] and
C < O and HighBody < LowBody[1] and C < C[2] Then
# plot11(H,"하락기아형");
CandleNo = -11;
If C[1] > O[1] and Body[1] > Ma(Body,10)[1]*2 and UpTail[1] == 0 and DnTail[1] == 0 and
C < O and Body > Ma(Body,10)*2 and UpTail == 0 and DnTail == 0 and H < L[1] Then
# plot12(H,"하락박차형");
CandleNo = -12;
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(C-C[1]) < Ma(Height,10)*0.1 Then
# plot13(H,"하락반격형");
CandleNo = -13;
If C > Ma(C,10) and Body > Ma(Body,10)*2 and C < O and
O == H and DnTail > 0 and DnTail < Height*0.1 Then
# plot14(H,"하락샅바형");
CandleNo = -14;
If C[2] > Ma(C,10)[2] and C[1] == O[2] and C[1] == O[1] and C == O and
LowBody[1] > HighBody[2] and HighBody < LowBody[1] Then
# plot15(H,"하락세십자별형");
CandleNo = -15;
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
# plot16(H,"하락십자잉태형");
CandleNo = -16;
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
# plot17(H,"하락잉태형");
CandleNo = -17;
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 Highbody[1] < Highbody[2] and Lowbody[1] > Lowbody[2] and
C < O and C < C[1] Then
# plot18(H,"하락잉태확인형");
CandleNo = -18;
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
# plot19(H,"하락장악형");
CandleNo = -19;
If C[2] >= Ma(c,10)[2] and C[2] > O[2] and
C[1] < O[1] and Body[1] > Ma(Body,10)[1]*2 and
Highbody[1] > Highbody[2] and Lowbody[1] < Lowbody[2] and
C < O and C < C[1] Then
# plot20(H,"하락장악확인형");
CandleNo = -20;
If C[4] >= Ma(C,10)[4] and Body[4] > Ma(Body,10)[4]*2 and C[4] > O[4] and
C[2] > O[2] and C[1] > O[1] and C < O and
O[3] >= C[4] and O[3] < LowBody[2] and O[1] > LowBody[2] and
C[3] < HighBody[2] and C[1] > HighBody[2] and
C < O[3] and C > C[4] Then
# plot21(H,"하락탈출형");
CandleNo = -21;
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 Then
# plot22(H,"흑삼병");
CandleNo = -22;
If C[1] > Ma(C,10)[1] and C[1] > O[1] and Body[1] > Ma(Body,10)[1]*2 and
C < O and Body > Ma(Body,10)*2 and
O > H[1] and C <= MidBody[1] Then
# plot23(H,"흑운형");
CandleNo = -23;
# CandleNo = -99;
#하락지속 ------------------------------------------------------------------------------
#Variables : body(0),MidBody(0),height(0),Uptail(0),Dntail(0),Highbody(0),Lowbody(0);
body = Abs(O-C);
Height = H-L;
Uptail = H - Max(O,C);
Dntail = Min(O,C) - L;
MidBody = (Open+Close)/2;
Highbody = Max(O,C);
LowBody = Min(O,C);
If C[1] < Ma(C,10)[1] and body[1] > Ma(body[1],10)*2 and C[1] < O[1] and C > O and
O < L[1] and C > C[1] and C < MidBody[1] Then
# plot1(H,"Trusting Line");
CandleNo = -101;
If (C[1] < Ma(C,10)[1] and body[1] > Ma(body[1],10)*2 and C[1] < O[1]) and
(C > O and O < L[1] and C == L[1]) Then
# plot2(H,"걸침형");
CandleNo = -102;
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
(L[3] > L[2] and L[2] > L[1]) and
(O[2] > C[3] and O[1] > C[2]) and
(body > Ma(body,10)*2 and C > O) and
(O < L[1] and C > H[3]) Then
# plot3(H,"약세삼선반격형");
CandleNo = -103;
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
# plot4(H,"장대음봉형");
CandleNo = -104;
If C[1] < Ma(C,10)[1] and body[1] > Ma(body[1],10)*2 and C[1] < O[1] and
C > O and O < L[1] and C == C[1] Then
# plot5(H,"진입형");
CandleNo = -105;
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(O - O[1]) < Ma(Height,10)*0.1 Then
# plot6(H,"하락갈림길형");
CandleNo = -106;
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 body[1] > Ma(body[1],10)*2 and O[1] < Min(O,C)[2] and
C > O and C > C[2] Then
# plot7(H,"하락갭삼법형");
CandleNo = -107;
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 C[1] < C[2] and
C > O and Abs(Body-Body[1]) < O[1]*0.005 and
abs(O-O[1]) < Ma(Height,10)*0.1 Then
# plot8(H,"하락나란히형");
CandleNo = -108;
If C[4] < Ma(C,10)[4] and C[4] < O[4]and body[4] > Ma(body[4],10)*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
LowBody[3] <= LowBody[2] and LowBody[2] < LowBody[1] and
C < O and body > Ma(body,10)*2 and Close == Lowest(C,5) Then
# plot9(H,"하락삼법형");
CandleNo = -109;
IF C[2] < Ma(C,10)[2] and C[2] < O[2] and C[1] < O[1] and O[1] < Min(O,C)[2] and
C > O and O >= LowBody[1] and O <= HighBody[1] and C < C[2] Then
# plot10(H,"하락타스키갭형");
CandleNo = -110;
# CandleNo = -199;
_CandleName = CandleNo;