編程思路破譯

AS賦值:(收盤價*3+開盤價+最高價+最低價)/6

XJ賦值:(AS+0.618*1日前的AS+0.382*2日前的AS+0.236*3日前的AS+0.146*4日前的AS)/2.382

HLX賦值:3日內(nèi)XJ的最高值的15日指數(shù)移動平均

LLX賦值:3日內(nèi)XJ的最低值的15日指數(shù)移動平均

CH賦值:XJ上穿HLX

CL賦值:LLX上穿XJ

CHH賦值:上次CH距今天數(shù)

CLL賦值:上次CL距今天數(shù)

YF1賦值:(CHH<CLL OR CH) AND 取反

YF2賦值:(CHH>CLL OR CL) AND 取反

TF賦值:如果YF1,返回LLX,否則返回HLX

TFB賦值:(HLX+LLX)/2

XJK賦值:XJ的3日指數(shù)移動平均的3日[1日權(quán)重]移動平均

ZWSH賦值:(2日內(nèi)XJ的最高值+3日內(nèi)XJ的最高值+4日內(nèi)XJ的最高值+5日內(nèi)XJ的最高值)/4

SH賦值:ZWSH的21日指數(shù)移動平均

ZWSL賦值:(2日內(nèi)XJ的最低值+3日內(nèi)XJ的最低值+4日內(nèi)XJ的最低值+5日內(nèi)XJ的最低值)/4

SL賦值:ZWSL的21日指數(shù)移動平均

SCH賦值:XJ上穿SH

SCL賦值:SL上穿XJ

SHH賦值:上次SCH距今天數(shù)

SLL賦值:上次SCL距今天數(shù)

SF1賦值:(SHH<SLL OR SCH) AND 取反

SF2賦值:(SHH>SLL OR SCL) AND 取反

TFS賦值:如果SF1,返回SL,否則返回SH

TFBS賦值:(SL+SH)/2

KX1賦值:(收盤價>=開盤價) AND XJ>=TFS

KX2賦值:(收陰線) AND XJ>=TFS

KX3賦值:(收盤價>=開盤價) AND XJ<TFS

KX4賦值:(收陰線) AND XJ<TFS

KX5賦值:((XJ>=TFS AND XJ<TF)OR (XJ<TFS AND XJ>=TF)) AND 收盤價>=開盤價

KX6賦值:((XJ>=TFS AND XJ<TF)OR (XJ<TFS AND XJ>=TF)) AND 收陰線

FILLRGN(XJ>TFS,TFB,TFS),COLOR400040

FILLRGN(XJ<TFS,TFB,TFS),COLOR800000

FILLRGN(XJ>TF,TFB,TF),COLOR000060

FILLRGN(XJ<TF,TFB,TF),COLORFF2020

當(dāng)滿足條件KX1時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,1不為0則畫空心柱.,COLOR4440FF

當(dāng)滿足條件KX1時,在收盤價和最高價位置之間畫柱狀線,寬度為0.5,1不為0則畫空心柱.,COLOR4440FF

當(dāng)滿足條件KX1時,在開盤價和最低價位置之間畫柱狀線,寬度為0.5,1不為0則畫空心柱.,COLOR4440FF

當(dāng)滿足條件KX2時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR4440FF

當(dāng)滿足條件KX2時,在開盤價和最高價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR4440FF

當(dāng)滿足條件KX2時,在收盤價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR4440FF

當(dāng)滿足條件KX3時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,1不為0則畫空心柱.,COLORFFFF33

當(dāng)滿足條件KX3時,在收盤價和最高價位置之間畫柱狀線,寬度為0.5,1不為0則畫空心柱.,COLORFFFF33

當(dāng)滿足條件KX3時,在開盤價和最低價位置之間畫柱狀線,寬度為0.5,1不為0則畫空心柱.,COLORFFFF33

當(dāng)滿足條件KX4時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORFFFF33

當(dāng)滿足條件KX4時,在開盤價和最高價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLORFFFF33

當(dāng)滿足條件KX4時,在收盤價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLORFFFF33

程序源碼

AS:=(C*3+O+H+L)/6;

XJ:=(AS+0.618*REF(AS,1)+0.382*REF(AS,2)+0.236*REF(AS,3)+0.146*REF(AS,4))/2.382;

HLX:=EMA(HHV(XJ,3),15);

LLX:=EMA(LLV(XJ,3),15);

CH:=CROSS(XJ,HLX);CL:=CROSS(LLX,XJ);

CHH:=BARSLAST(CH);CLL:=BARSLAST(CL);

YF1:=(CHH<CLL OR CH) AND NOT(CL);

YF2:=(CHH>CLL OR CL) AND NOT(CH);

TF:=IF(YF1,LLX,HLX);

TFB:=(HLX+LLX)/2;

XJK:=SMA(EMA(XJ,3),3,1);

ZWSH:=(HHV(XJ,2)+HHV(XJ,3)+HHV(XJ,4)+HHV(XJ,5))/4;

SH:=EMA(ZWSH,21);

ZWSL:=(LLV(XJ,2)+LLV(XJ,3)+LLV(XJ,4)+LLV(XJ,5))/4;

SL:=EMA(ZWSL,21);

SCH:=CROSS(XJ,SH);SCL:=CROSS(SL,XJ);

SHH:=BARSLAST(SCH);SLL:=BARSLAST(SCL);

SF1:=(SHH<SLL OR SCH) AND NOT(SCL);

SF2:=(SHH>SLL OR SCL) AND NOT(SCH);

TFS:=IF(SF1,SL,SH);

TFBS:=(SL+SH)/2;

{K線}

KX1:=(CLOSE>=OPEN) AND XJ>=TFS;

KX2:=(CLOSE<OPEN) AND XJ>=TFS;

KX3:=(CLOSE>=OPEN) AND XJ<TFS;

KX4:=(CLOSE<OPEN) AND XJ<TFS;

KX5:=((XJ>=TFS AND XJ<TF)OR (XJ<TFS AND XJ>=TF)) AND CLOSE>=OPEN;

KX6:=((XJ>=TFS AND XJ<TF)OR (XJ<TFS AND XJ>=TF)) AND CLOSE<OPEN;

FILLRGN(XJ>TFS,TFB,TFS),COLOR400040;

FILLRGN(XJ<TFS,TFB,TFS),COLOR800000;

FILLRGN(XJ>TF,TFB,TF),COLOR000060;

FILLRGN(XJ<TF,TFB,TF),COLORFF2020;

{K線}

STICKLINE(KX1,C,O,4,1),COLOR4440FF;

STICKLINE(KX1,C,H,0.5,1),COLOR4440FF;

STICKLINE(KX1,O,L,0.5,1),COLOR4440FF;

STICKLINE(KX2,C,O,4,0),COLOR4440FF;

STICKLINE(KX2,O,H,0.5,0),COLOR4440FF;

STICKLINE(KX2,C,L,0.5,0),COLOR4440FF;

STICKLINE(KX3,C,O,4,1),COLORFFFF33;

STICKLINE(KX3,C,H,0.5,1),COLORFFFF33;

STICKLINE(KX3,O,L,0.5,1),COLORFFFF33;

STICKLINE(KX4,C,O,4,0),COLORFFFF33;

STICKLINE(KX4,O,H,0.5,0),COLORFFFF33;

STICKLINE(KX4,C,L,0.5,0),COLORFFFF33;

{STICKLINE(KX5,C,O,4,1),COLOR5E5E5E;

STICKLINE(KX5,C,H,0.5,1),COLOR5E5E5E;

STICKLINE(KX5,O,L,0.5,1),COLOR5E5E5E;

STICKLINE(KX6,C,O,4,0),COLOR5E5E5E;

STICKLINE(KX6,O,H,0.5,0),COLOR5E5E5E;

STICKLINE(KX6,C,L,0.5,0),COLOR5E5E5E;}

注：

       館內(nèi)各種公式為學(xué)習(xí)編程而保存，實戰(zhàn)使用前一定要看其中是否有未來函數(shù)并自己親自測試成功率，決不能依據(jù)公式名稱的描述和形容去投資，據(jù)此入市造成投資損失由投資者自己承擔(dān)。

       發(fā)文不易，如獲益，歡迎贊賞，贊賞必復(fù)！