답변완료
수정부탁드립니다.
수고하십니다.
수식이 돌아가질 않습니다. 수정부탁드립니다.
<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;
2021-06-01
439
글번호 149505
사용자 함수