分享

飞狐主图、副图和选股公式

 鬼舞十七 2014-12-01
主图均线:
KEY:=DATE<=1900731;
ZHC:=IF(KEY,(OPEN+HIGH+LOW+CLOSE)/4,0);
ZHE:=EMA(EMA(EMA(EMA(ZHC,2),2),5),5);
C1:=SMA(EMA(ZHE,1),2,1);
C3:=SMA(EMA(ZHE,3),2,1);
C6:=SMA(EMA(ZHE,6),2,1);
C7:=SMA(EMA(ZHE,7),2,1);
IF NOT(STKTYPE=6 OR STKTYPE=7 AND STKTYPE=8) THEN BEGIN
STICKLINE(C1>=C6,C1,C6,8,1),colorFF00FF;
STICKLINE(C1>=C6,C7,C3,8,0),colorFF00FF;
STICKLINE(C1<=C6,C1,C6,8,1),colorFF00;
STICKLINE(C1<=C6,C7,C3,8,0),colorFF00;
中线:=MA(ZHE,N),LINEDOT,colorBROWN;
阻力:=中线+P*STD(ZHE,N),LINEDOT,color808080;
支撑:=中线-P*STD(ZHE,N),LINEDOT,color808080;
成本价:"AMOUNT#day"/"VOL#day"/100*KEY,LINETHICK0,PRECISION2,COLORGREEN;
分水岭:EMA(EMA(EMA(EMA((MA(ZHC,3)+MA(ZHC,6)+MA(ZHC,12)+MA(ZHC,24))/4,2),2),5),5),colorFFFF00;
//趋势线:ZHE,LINETHICK2,PRECISION2,colorFFFF00;趋势线:ZHE,LINETHICK2,PRECISION2,colorFFFF00;
生命线:EMA(EMA(EMA(EMA(MA(ZHC,60),2),2),5),5),colorFF;
主力:EMA(EMA(EMA(EMA(MA(ZHC,103),2),2),5),5),colorFF00FF;
年线:EMA(EMA(EMA(EMA(MA(ZHC,453),2),2),5),5),colorFFFF;
获利盘:=WINNER(成本价)*100;
集中度:=(COST(95)-COST(5))/(COST(95)+COST(5))*100*KEY;
DRAWTEXTEX(KEY,1,18,0,'当前获利盘比例:'+NUMTOSTR(获利盘,1)+'% 筹码集中度:'+NUMTOSTR(集中度,1)+'%'),colorFF00FF;
IF DATATYPE=1 OR DATATYPE=2 OR DATATYPE=3 OR DATATYPE=4 OR DATATYPE=5 THEN
VERTLINE(TIME=150000),POINTDOT,color80;ELSE
IF DATATYPE=11 THEN
VERTLINE(TIME=140000),POINTDOT,color80;
PARTLINE(KEY,分水岭),LINETHICK2,colorFFFF00;
PARTLINE(KEY,生命线),LINETHICK2,colorFF;
PARTLINE(KEY,主力),LINETHICK2,colorFF00FF;
PARTLINE(KEY,年线),LINETHICK3,colorFFFF;
BC:=ZHC>分水岭 AND ZHC>中线;
SC:=ZHC<分水岭 AND ZHC<中线;
STICKLINE(BC,LOW,HIGH,0.1,1),colorFFFF;
STICKLINE(BC AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFFFF;
STICKLINE(BC AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorFFFF;
STICKLINE(SC,LOW,HIGH,0.1,1),colorFF00;
STICKLINE(SC AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFF00;
STICKLINE(SC AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorFF00;
END;ELSE BEGIN
END;

主图均线:
KEY:=DATE<=1900731;
ZHC:=IF(KEY,(OPEN+HIGH+LOW+CLOSE)/4,0);
ZHE:=EMA(EMA(EMA(EMA(ZHC,2),2),5),5);
FSL:=EMA(EMA(EMA(EMA((MA(ZHC,3)+MA(ZHC,6)+MA(ZHC,12)+MA(ZHC,24))/4,2),2),5),5);
MAINX:=EMA(EMA(EMA(EMA(MA(ZHC,60),2),2),5),5);
FSLMAINX:=EMA(FSL-MAINX,3);
涨停板:=IF(KEY,CLOSE/REF(CLOSE,1)>1.097,0);
跌停板:=IF(KEY,REF(CLOSE,1)/CLOSE>1.097,0);
涨停板ST:=IF(KEY,CLOSE/REF(CLOSE,1)>1.049,0);
跌停板ST:=IF(KEY,REF(CLOSE,1)/CLOSE>1.049,0);
ST0:=STRNCMP(STKNAME,'S',1)=0;
ST1:=STRNCMP(STKNAME,'ST',2)=0;
ST2:=STRNCMP(STKNAME,'*ST',3)=0;
ST3:=STRNCMP(STKNAME,'SST',3)=0;
ST4:=STRNCMP(STKNAME,'S*ST',4)=0;
C1:=SMA(EMA(ZHE,1),2,1);
C3:=SMA(EMA(ZHE,3),2,1);
C6:=SMA(EMA(ZHE,6),2,1);
C7:=SMA(EMA(ZHE,7),2,1);
IF NOT(STKTYPE=6 OR STKTYPE=7 AND STKTYPE=8) THEN BEGIN
STICKLINE(C1>=C6,C1,C6,8,1),colorFF00FF;
STICKLINE(C1>=C6,C7,C3,8,0),colorFF00FF;
STICKLINE(C1<=C6,C1,C6,8,1),colorFF00;
STICKLINE(C1<=C6,C7,C3,8,0),colorFF00;
中线:MA(ZHE,N),colorBROWN;
阻力:中线+P*STD(ZHE,N),color808080;
支撑:中线-P*STD(ZHE,N),color808080;
成本价:"AMOUNT#day"/"VOL#day"/100*KEY,LINETHICK0,PRECISION2,COLORGREEN;
获利盘:=WINNER(成本价)*100;
集中度:=(COST(95)-COST(5))/(COST(95)+COST(5))*100*KEY;
DRAWTEXTEX(KEY,1,18,0,'当前获利盘比例:'+NUMTOSTR(获利盘,1)+'% 筹码集中度:'+NUMTOSTR(集中度,1)+'%'),colorFF00FF;
趋势线:ZHE,LINETHICK2,PRECISION2,colorFFFF00;
生命线:MAINX,LINETHICK2,PRECISION2,colorFF;
分水岭:FSL,LINETHICK2,PRECISION2,colorFFFF;
TA:=REF(趋势线,1)<趋势线;
TB:=REF(趋势线,1)>趋势线;
TD:=趋势线>生命线 AND FSLMAINX>0;
TK:=趋势线<生命线 AND FSLMAINX<0;
PARTLINE(TD AND TA,趋势线),LINETHICK2,colorFFFF;
PARTLINE(TK AND TB,趋势线),LINETHICK2,colorFFFF00;
IF DATATYPE=1 OR DATATYPE=2 OR DATATYPE=3 OR DATATYPE=4 OR DATATYPE=5 THEN
VERTLINE(TIME=150000),POINTDOT,color80;ELSE
IF DATATYPE=11 THEN
VERTLINE(TIME=140000),POINTDOT,color80;
PARTLINE(KEY,分水岭),LINETHICK2,colorFFFF;
PARTLINE(KEY,生命线),LINETHICK2,colorFF;
BC:=ZHC>分水岭 AND ZHC>中线;
SC:=ZHC<分水岭 AND ZHC<中线;
STICKLINE(BC,LOW,HIGH,0.1,1),colorFFFF;
STICKLINE(BC AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFFFF;
STICKLINE(BC AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorFFFF;
STICKLINE(SC,LOW,HIGH,0.1,1),colorFF00;
STICKLINE(SC AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFF00;
STICKLINE(SC AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorFF00;
END;ELSE
EXIT;
IF DATATYPE=6 THEN
IF ST0 OR ST1 OR ST2 OR ST3 OR ST4 THEN BEGIN
DRAWICON(涨停板ST,生命线,10);
DRAWICON(跌停板ST,生命线,11);
END;ELSE BEGIN
DRAWICON(涨停板,生命线,10);
DRAWICON(跌停板,生命线,11);
EXIT;
END;

副图Boll:(N:26   P:2)
KEY:=DATE<=1900731;
ZHC:=IF(KEY,(OPEN+HIGH+LOW+CLOSE)/4,0);
ZHE:=EMA(EMA(EMA(EMA(ZHC,2),2),5),5);
C1:=SMA(EMA(ZHE,1),2,1);
C3:=SMA(EMA(ZHE,3),2,1);
C6:=SMA(EMA(ZHE,6),2,1);
C7:=SMA(EMA(ZHE,7),2,1);
IF NOT(STKTYPE=6 OR STKTYPE=7 AND STKTYPE=8) THEN BEGIN
STICKLINE(C1>=C6,C1,C6,8,0),colorFF;
STICKLINE(C1>=C6,C7,C3,0,0),colorFF;
STICKLINE(C1<=C6,C1,C6,8,0),colorFF00;
STICKLINE(C1<=C6,C7,C3,0,0),colorFF00;
KMA:=MA(ZHC,5);
PARTLINE(KEY,KMA),colorFFFF;
MID:=MA(ZHE,N);
PARTLINE(KEY,MID),colorFFFFFF;
PARTLINE(KEY,MA(MID,55)),LINEDASH,colorFF00FF;
UPPER:=MID+P*STD(ZHE,N);
PARTLINE(KEY,UPPER),POINTDOT,color808080;
LOWER:=MID-P*STD(ZHE,N);
PARTLINE(KEY,LOWER),POINTDOT,color808080;
IF DATATYPE=4 OR DATATYPE=5 THEN
VERTLINE(TIME=150000),POINTDOT,color3333;ELSE BEGIN
END;
END;ELSE


副图筹码集中度:
KEY:=DATE<=1900731;
ZHM:="AMOUNT#day"/"VOL#day"/100*KEY;
CM1:=SMA(EMA(ZHM,1),2,1);
CM3:=SMA(EMA(ZHM,3),2,1);
CM6:=SMA(EMA(ZHM,6),2,1);
CM7:=SMA(EMA(ZHM,7),2,1);
CMM:=(CM1+CM3+CM6+CM7)/4;
IF NOT(STKTYPE=6 OR STKTYPE=7 AND STKTYPE=8) THEN BEGIN
获利盘:WINNER(ZHM)*100,LINETHICK0,PRECISION1,colorFF;
筹码集中度:(COST(95)-COST(5))/(COST(95)+COST(5))*100*KEY,LINETHICK0,PRECISION1,colorFFFF;
STICKLINE(CM1>=CM6,CM1,CM6,8,0),colorFF;
STICKLINE(CM1>=CM6,CM7,CM3,0,0),colorFF;
STICKLINE(CM1<=CM6,CM1,CM6,8,0),colorFF00;
STICKLINE(CM1<=CM6,CM7,CM3,0,0),colorFF00;
CMX1:=SMA(EMA(COST(1),21),2,1);
CMX2:=SMA(EMA(COST(10),21),2,1);
CMX3:=SMA(EMA(COST(30),21),2,1);
CMX4:=SMA(EMA(COST(50),21),2,1);
CMX5:=SMA(EMA(COST(70),21),2,1);
CMX6:=SMA(EMA(COST(90),21),2,1);
CMX7:=SMA(EMA(COST(99),21),2,1);
PARTLINE(KEY,CMX1),colorCC;
PARTLINE(KEY,CMX2),color33CC;
PARTLINE(KEY,CMX3),color66CC;
PARTLINE(KEY,CMX4),color99CC;
PARTLINE(KEY,CMX5),colorCCCC;
PARTLINE(KEY,CMX6),colorFFCC;
PARTLINE(KEY,CMX7),colorFF;
END;ELSE BEGIN
END;


副图多空线:
KEY:=DATE<=1900731;
ZHC:=IF(KEY,(OPEN+HIGH+LOW+CLOSE)/4,0);
DMZ:=IF(HIGH+LOW<=REF(HIGH,1)+REF(LOW,1),0,MAX(ABS(HIGH-REF(HIGH,1)),ABS(LOW-REF(LOW,1))));
DMF:=IF(HIGH+LOW>=REF(HIGH,1)+REF(LOW,1),0,MAX(ABS(HIGH-REF(HIGH,1)),ABS(LOW-REF(LOW,1))));
ADMZ:=IF(KEY,MA(DMZ,10),0);
ADMF:=IF(KEY,MA(DMF,10),0);
STZ0:=IF(ADMZ>ADMF,(ADMZ-ADMF)/ADMZ,IF(ADMZ=ADMF,0,(ADMZ-ADMF)/ADMF));
STZ:=(IF(ADMZ>ADMF,(ADMZ-ADMF)/ADMZ,IF(ADMZ=ADMF,0,(ADMZ-ADMF)/ADMF)))*(60);
ASTZ:=SMA(STZ0,30,1)*60;
IF NOT(STKTYPE=6 OR STKTYPE=7 AND STKTYPE=8) THEN BEGIN
波动线:STZ,PRECISION0,colorFFFFFF;
多空线:ASTZ,PRECISION0,colorFFFF;
主力线:EMA(EMA(EMA(EMA(MA(ASTZ,60),2),2),5),5),PRECISION0,colorFF00FF;
PARTLINE(KEY,-30),LINETHICK2,colorFF00;
PARTLINE(KEY,0),LINETHICK2,color80;
PARTLINE(KEY,30),LINETHICK2,colorFF;
END;ELSE BEGIN
END;

副图FT:
KEY:=DATE<=1900731;
STICKLINE(CLOSE>=OPEN,LOW,HIGH,0.1,1),colorFF;
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFF;
STICKLINE(CLOSE>=REF(CLOSE,1) AND CLOSE=OPEN,LOW,HIGH,0.1,1),colorFF;
STICKLINE(CLOSE>=REF(CLOSE,1) AND CLOSE=OPEN,OPEN,CLOSE,8,1),colorFF;
STICKLINE(CLOSE<OPEN,LOW,HIGH,0.1,0),colorFFFF00;
STICKLINE(CLOSE<OPEN,OPEN,CLOSE,8,0),colorFFFF00;
STICKLINE(CLOSE<REF(CLOSE,1) AND CLOSE=OPEN,LOW,HIGH,0.1,0),colorFFFF00;
STICKLINE(CLOSE<REF(CLOSE,1) AND CLOSE=OPEN,OPEN,CLOSE,8,0),colorFFFF00;
ZHC:=IF(KEY,(OPEN+HIGH+LOW+CLOSE)/4,0);
ZHQS:=EMA(EMA(EMA(EMA(ZHC,2),2),5),5);
MAINX:=EMA(EMA(EMA(EMA(MA(ZHC,60),2),2),5),5);
FSL:=EMA(EMA(EMA(EMA((MA(ZHC,3)+MA(ZHC,6)+MA(ZHC,12)+MA(ZHC,24))/4,2),2),5),5);
IF NOT(STKTYPE=6 OR STKTYPE=7 AND STKTYPE=8) THEN BEGIN
趋势线:ZHQS,LINETHICK2,PRECISION0,colorFFFF00;
生命线:MAINX,LINETHICK2,PRECISION0,colorFF;
分水岭:FSL,LINETHICK2,PRECISION0,colorFFFF;
END;ELSE BEGIN
END;

主图均线:
KEY:=DATE<=1900601;
STICKLINE(CLOSE>=OPEN,LOW,HIGH,0.1,1),colorFF;
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFF;
STICKLINE(CLOSE>=REF(CLOSE,1) AND CLOSE=OPEN,LOW,HIGH,0.1,1),colorFF;
STICKLINE(CLOSE>=REF(CLOSE,1) AND CLOSE=OPEN,OPEN,CLOSE,8,1),colorFF;
STICKLINE(CLOSE<OPEN,LOW,HIGH,0.1,0),colorFFFF00;
STICKLINE(CLOSE<OPEN,OPEN,CLOSE,8,0),colorFFFF00;
STICKLINE(CLOSE<REF(CLOSE,1) AND CLOSE=OPEN,LOW,HIGH,0.1,0),colorFFFF00;
STICKLINE(CLOSE<REF(CLOSE,1) AND CLOSE=OPEN,OPEN,CLOSE,8,0),colorFFFF00;
ST0:=STRNCMP(STKNAME,'S',1)=0;
ST1:=STRNCMP(STKNAME,'ST',2)=0;
ST2:=STRNCMP(STKNAME,'*ST',3)=0;
ST3:=STRNCMP(STKNAME,'SST',3)=0;
ST4:=STRNCMP(STKNAME,'S*ST',4)=0;
ZHC:=IF(KEY,(OPEN+HIGH+LOW+CLOSE)/4,0);
涨停板:=IF(KEY,(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>9.95,0);
跌停板:=IF(KEY,(REF(CLOSE,1)-CLOSE)/REF(CLOSE,1)*100>9.95,0);
涨停板ST:=IF(KEY,(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>4.95,0);
跌停板ST:=IF(KEY,(REF(CLOSE,1)-CLOSE)/REF(CLOSE,1)*100>4.95,0);
ZHQS:=EMA(EMA(EMA(EMA(ZHC,2),2),5),5);
FSL:=EMA(EMA(EMA(EMA((MA(ZHC,3)+MA(ZHC,6)+MA(ZHC,12)+MA(ZHC,24))/4,2),2),5),5);
MAINX:=EMA(EMA(EMA(EMA(MA(ZHC,60),2),2),5),5);
FSLMAINX:=EMA(FSL-MAINX,3);
IF NOT(STKTYPE=6 OR STKTYPE=7 AND STKTYPE=8) THEN BEGIN
成本价:"AMOUNT#day"/"VOL#day"/100*KEY,LINETHICK0,PRECISION2,colorFFFF;
获利盘:=WINNER(成本价)*100;
集中度:=(COST(95)-COST(5))/(COST(95)+COST(5))*100*KEY;
DRAWTEXTEX(KEY,1,18,0,'当前获利盘比例:'+NUMTOSTR(获利盘,1)+'% 筹码集中度:'+NUMTOSTR(集中度,1)+'%'),colorFF00FF;
LA1:=LLVBARS(LOW,17);
LA2:=BACKSET(ISLASTBAR,LA1+1);
LA:=FILTER(LA2,17);
DRAWICON(LA,LOW*0.998,4);
DRAWNUMBER(LA,LOW*0.994,LOW,2),colorFFFFFF;
LB1:=LLVBARS(LOW,144);
LB2:=BACKSET(ISLASTBAR,LB1+1);
LB:=FILTER(LB2,144);
DRAWICON(LB,LOW*0.996,4);
DRAWNUMBER(LB,LOW*0.99,LOW,2),colorFFFFFF;
LC1:=LLVBARS(LOW,453);
LC2:=BACKSET(ISLASTBAR,LC1+1);
LC:=FILTER(LC2,453);
DRAWICON(LC,LOW*0.992,4);
DRAWNUMBER(LC,LOW*0.986,LOW,2),colorFFFFFF;
HA1:=HHVBARS(HIGH,17);
HA2:=BACKSET(ISLASTBAR,HA1+1);
HA:=FILTER(HA2,17);
DRAWICON(HA,HIGH*1.002,5);
DRAWNUMBER(HA,HIGH*1.006,HIGH,2),colorFFFFFF;
HB1:=HHVBARS(HIGH,144);
HB2:=BACKSET(ISLASTBAR,HB1+1);
HB:=FILTER(HB2,144);
DRAWICON(HB,HIGH*1.004,5);
DRAWNUMBER(HB,HIGH*1.008,HIGH,2),colorFFFFFF;
LINEVALUE(LB,LOW,LA,LOW,0,0),LINETHICK2,colorFF;
LINEVALUE(LC,LOW,LB,LOW,0,0),LINETHICK2,color66FF;
LINEVALUE(HB,HIGH,HA,HIGH,0,0),LINETHICK2,color33CC00;
TA:=REF(ZHQS,1)<ZHQS;
TB:=REF(ZHQS,1)>ZHQS;
TD:=ZHQS>MAINX AND FSLMAINX>0;
TK:=ZHQS<MAINX AND FSLMAINX<0;
STICKLINE(CLOSE>ZHQS AND OPEN>ZHQS AND TA,HIGH,LOW,0.5,0),colorFFFF;
STICKLINE(CLOSE>ZHQS AND OPEN>ZHQS AND TA AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorFFFF;
STICKLINE(CLOSE>ZHQS AND OPEN>ZHQS AND TA AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFFFF;
STICKLINE((OPEN<ZHQS OR OPEN<MAINX) AND TB,HIGH,LOW,0.5,0),colorCCCCCC;
STICKLINE((OPEN<ZHQS OR OPEN<MAINX) AND TB AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorCCCCCC;
STICKLINE((OPEN<ZHQS OR OPEN<MAINX) AND TB AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorCCCCCC;
STICKLINE(CLOSE>ZHQS AND OPEN>ZHQS AND TA AND TD,HIGH,LOW,0.5,0),colorFFFF;
STICKLINE(CLOSE>ZHQS AND OPEN>ZHQS AND TA AND TD AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorFFFF;
STICKLINE(CLOSE>ZHQS AND OPEN>ZHQS AND TA AND TD AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFFFF;
STICKLINE((OPEN<ZHQS OR OPEN<MAINX) AND TB AND TK,HIGH,LOW,0.5,0),colorCCCCCC;
STICKLINE((OPEN<ZHQS OR OPEN<MAINX) AND TB AND TK AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorCCCCCC;
STICKLINE((OPEN<ZHQS OR OPEN<MAINX) AND TB AND TK AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorCCCCCC;
STICKLINE((NOT(CLOSE>ZHQS AND OPEN>ZHQS AND TA OR CLOSE>ZHQS AND OPEN>ZHQS AND TA AND TD OR (OPEN<ZHQS OR OPEN<MAINX) AND TB)) AND CLOSE<OPEN,HIGH,LOW,0.5,0),colorFFFF00;
STICKLINE((NOT(CLOSE>ZHQS AND OPEN>ZHQS AND TA OR CLOSE>ZHQS AND OPEN>ZHQS AND TA AND TD OR (OPEN<ZHQS OR OPEN<MAINX) AND TB)) AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorFFFF00;
STICKLINE((NOT(CLOSE>ZHQS AND OPEN>ZHQS AND TA OR CLOSE>ZHQS AND OPEN>ZHQS AND TA AND TD OR (OPEN<ZHQS OR OPEN<MAINX) AND TB)) AND CLOSE>=OPEN,HIGH,LOW,0.5,0),colorFF;
STICKLINE((NOT(CLOSE>ZHQS AND OPEN>ZHQS AND TA OR CLOSE>ZHQS AND OPEN>ZHQS AND TA AND TD OR (OPEN<ZHQS OR OPEN<MAINX) AND TB)) AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFF;
STICKLINE(BARSCOUNT(CLOSE)<=5 AND CLOSE<OPEN,HIGH,LOW,0.5,0),colorFFFF00;
STICKLINE(BARSCOUNT(CLOSE)<=5 AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorFFFF00;
STICKLINE(BARSCOUNT(CLOSE)<=5 AND CLOSE>=OPEN,HIGH,LOW,0.5,0),colorFF;
STICKLINE(BARSCOUNT(CLOSE)<=5 AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFF;
IF DATATYPE=4 OR DATATYPE=5 THEN BEGIN
TC1:=MA(ZHC,55);
TC2:=MA(ZHC,103);
TC3:=MA(ZHC,453);
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC1,2),2),5),5)),colorFFFFFF;
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC2,2),2),5),5)),colorFFFF;
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC3,2),2),5),5)),colorFF00FF;
VERTLINE(TIME=150000),POINTDOT,color3333;
END;ELSE BEGIN
IF DATATYPE=11 THEN BEGIN
TC1:=MA(ZHC,55);
TC2:=MA(ZHC,103);
TC3:=MA(ZHC,453);
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC1,2),2),5),5)),colorFFFFFF;
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC2,2),2),5),5)),colorFFFF;
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC3,2),2),5),5)),colorFF00FF;
VERTLINE(TIME=140000),POINTDOT,color3333;
END;ELSE BEGIN
IF DATATYPE=6 THEN BEGIN
IF ST0 OR ST1 OR ST2 OR ST3 OR ST4 THEN BEGIN
DRAWICON(涨停板ST,HIGH*1.02,10);
DRAWICON(跌停板ST,LOW*0.98,11);
END;ELSE BEGIN
DRAWICON(涨停板,HIGH*1.05,10);
DRAWICON(跌停板,LOW*0.95,11);
END;
TC1:=MA(ZHC,14);
TC2:=MA(ZHC,25);
TC3:=MA(ZHC,99);
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC1,2),2),5),5)),colorFFFFFF;
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC2,2),2),5),5)),colorFFFF;
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC3,2),2),5),5)),colorFF00FF;
END;ELSE BEGIN
IF DATATYPE=7 THEN BEGIN
TC1:=MA(ZHC,33);
TC2:=MA(ZHC,99);
TC3:=MA(ZHC,181);
TC4:=MA(ZHC,272);
发财线:EMA(EMA(EMA(EMA(TC1,2),2),5),5),LINETHICK2,PRECISION2,colorFF;
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC2,2),2),5),5)),colorFFFFFF;
牛熊界:EMA(EMA(EMA(EMA(TC3,2),2),5),5),LINETHICK2,PRECISION2,colorFFFF;
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC4,2),2),5),5)),colorFF00FF;
END;ELSE BEGIN
IF DATATYPE=2 OR DATATYPE=3 THEN BEGIN
TC1:=MA(ZHC,55);
TC2:=MA(ZHC,103);
TC3:=MA(ZHC,453);
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC1,2),2),5),5)),colorFFFFFF;
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC2,2),2),5),5)),colorFFFF;
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC3,2),2),5),5)),colorFF00FF;
VERTLINE(TIME=150000),POINTDOT,color3333;
END;ELSE BEGIN
IF DATATYPE=1 THEN BEGIN
VERTLINE(TIME=150000),POINTDOT,color33CC;
END;ELSE BEGIN
IF DATATYPE=8 THEN BEGIN
TC1:=MA(ZHC,20);
TC2:=MA(ZHC,40);
TC3:=MA(ZHC,60);
TC4:=MA(ZHC,80);
TC5:=MA(ZHC,100);
TC6:=MA(ZHC,120);
TC7:=MA(ZHC,140);
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC1,2),2),5),5)),colorFFFFFF;
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC2,2),2),5),5)),colorFFFF;
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC3,2),2),5),5)),colorFF00FF;
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC4,2),2),5),5)),colorCC00FF;
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC5,2),2),5),5)),color9900FF;
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC6,2),2),5),5)),color6600FF;
PARTLINE(KEY,EMA(EMA(EMA(EMA(TC7,2),2),5),5)),color3300FF;
END;ELSE BEGIN
END;
END;
END;
END;
END;
END;
END;
END;ELSE
WX:=MA(CLOSE,0);
M1:MA(CLOSE,P1);
M2:MA(CLOSE,P2)*(IF(N<2,WX,1));
M3:MA(CLOSE,P3)*(IF(N<3,WX,1));
M4:MA(CLOSE,P4)*(IF(N<4,WX,1));
M5:MA(CLOSE,P5)*(IF(N<5,WX,1));
M6:MA(CLOSE,P6)*(IF(N<6,WX,1));
M7:MA(CLOSE,P7)*(IF(N<7,WX,1));
M8:MA(CLOSE,P8)*(IF(N<8,WX,1));

副图MACD:
KEY:=DATE<=1900731;
PARTLINE(KEY,0),LINETHICK2,color99;
VAR1:=IF(KEY,EMA(EMA(EMA((OPEN+HIGH+LOW+CLOSE)/4,13),13),13),0);
VAR2:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1;
智能DIFF:VAR2*100,PRECISION2;
智能DEA:EMA(VAR2,21)*100,PRECISION2;
智能MACD:VAR2*100,COLORSTICK,PRECISION2;

副图能量线:
KEY:=DATE<=1900701;
ZHC:=IF(KEY,(OPEN+HIGH+LOW+CLOSE)/4,0);
VAR1:=REF(ZHC,1);
VAR2:=SUM(VOL,2)/((HHV(HIGH,2)-LLV(LOW,2))*100);
VAR3:=(CLOSE-VAR1)*VAR2;
VAR4:=SUM(VAR3,0);
VAR5:=SMA(VAR4,5,1);
VAR6:=SMA(VAR4,8,1);
ZHSC0:=IF(KEY,VAR5-VAR6,0);
ZHSC:=ZHSC0/10;
ZHD:=(SUM(IF(ZHSC>0,ZHSC*1.003,ZHSC*1.003>0),34))/(34);
ZHE:=(SUM(IF(ZHSC<=0,ZHSC*0.97,ZHSC*0.97<0),34))/(34);
能量:ZHSC,COLORSTICK,PRECISION1,colorFF;
PARTLINE(KEY,ZHD),LINETHICK2,colorFFFF;
PARTLINE(KEY,ZHE),LINETHICK2,colorFF00;
PARTLINE(KEY,0),LINETHICK2,colorFFFFFF;

副图成交量:
KEY:=DATE<=1900731;
总股本:=FINANCE(1);
净利润:=FINANCE(30);
每股收益:=净利润*1000/(总股本*10000);
流通盘:=CAPITAL;
每股净资:=FINANCE(34);
市盈率:=CLOSE/每股收益;
换手率:=VOL/CAPITAL*100;
流通市值:=CAPITAL*VOLUNIT*CLOSE;
均量10:=MA(VOL,10);
均量20:=MA(VOL,20);
均量40:=MA(VOL,40);
涨跌幅:(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;
成交手数:VOL,VOLSTICK;
DRAWTEXTEX(KEY,0,0,0,STKNAME+'('+STKLABEL+') 流通盘:'+NUMTOSTR(流通盘/100,0)+'万股 市盈率:'+NUMTOSTR(市盈率,0)+'倍 每股净资:'+NUMTOSTR(每股净资,2)+'元 流通市值:'+NUMTOSTR(流通市值/10000,2)+'万元 成交额:'+NUMTOSTR(AMOUNT/10000,2)+'万元 换手率:'+NUMTOSTR(换手率,2)+'%'),color66FF;
PARTLINE(KEY,均量10),colorFF00;
PARTLINE(KEY,均量20),colorFFFF;
PARTLINE(KEY,均量40),colorFFFFFF;
⑤%:CAPITAL*5/100,linedot;
交易分钟数:=if(CURRENTTIME>93000 and CURRENTTIME<150000,
if(CURRENTTIME<113000,(TIMETOT0(CURRENTTIME)-34200)/60,
if(CURRENTTIME>130000,(TIMETOT0(CURRENTTIME)-39600)/60,120)),240);
预测量:IF(BARSTATUS=2,VOL/交易分钟数*240,VOL),COLOR00FFFF,LINETHICK0;
{预测量2:IF(BARSTATUS=2,VOL*240/OPENMINUTES(CURRENTTIME),VOL),COLOR00FF00,LINETHICK0;}
STICKLINE(BARSTATUS=2,0,预测量,8,1),COLOR00FFFF,LINEDOT

副图位置:
KEY:=DATE<=1900731;
VAR3:=LLV(LOW,33);
VAR4:=HHV(HIGH,21);
VAR5:=IF(KEY,EMA((CLOSE-VAR3)/(VAR4-VAR3)*100,20)*0.998,0);
PARTLINE(KEY,20),LINETHICK2,color808080;
PARTLINE(KEY,50),LINETHICK2,colorFFFFFF;
PARTLINE(KEY,80),LINETHICK2,colorFF00FF;
技术位:EMA(0.667*REF(VAR5,1)+0.333*VAR5,1),CIRCLEDOT,PRECISION1,colorFF00;



MACD选股:
智能DIFF:="ZNMACD.智能DIFF";
智能DEA:="ZNMACD.智能DEA";
BUY:=LONGCROSS(智能DIFF,智能DEA,N) AND BETWEEN(智能DEA,-0.05,0.35);
BARSLAST(BUY)<=X;

筹码选股:
KEY:=DATE<=1900731;
ZHM:="AMOUNT#DAY"/"VOL#DAY"/100*KEY;
CM1:=SMA(EMA(ZHM,1),2,1);
CM3:=SMA(EMA(ZHM,3),2,1);
CM6:=SMA(EMA(ZHM,6),2,1);
CM7:=SMA(EMA(ZHM,7),2,1);
CMM:=(CM1+CM3+CM6+CM7)/4;
CMX:=SMA(EMA(COST(59),21),2,1);
LONGCROSS(CMM,CMX,25);

多空选股:
KEY:=DATE<=1900731;
ZHC:=IF(KEY,(OPEN+HIGH+LOW+CLOSE)/4,0);
DMZ:=IF(HIGH+LOW<=REF(HIGH,1)+REF(LOW,1),0,MAX(ABS(HIGH-REF(HIGH,1)),ABS(LOW-REF(LOW,1))));
DMF:=IF(HIGH+LOW>=REF(HIGH,1)+REF(LOW,1),0,MAX(ABS(HIGH-REF(HIGH,1)),ABS(LOW-REF(LOW,1))));
ADMZ:=IF(KEY,MA(DMZ,10),0);
ADMF:=IF(KEY,MA(DMF,10),0);
STZ0:=IF(ADMZ>ADMF,(ADMZ-ADMF)/ADMZ,IF(ADMZ=ADMF,0,(ADMZ-ADMF)/ADMF));
STZ:=(IF(ADMZ>ADMF,(ADMZ-ADMF)/ADMZ,IF(ADMZ=ADMF,0,(ADMZ-ADMF)/ADMF)))*(60);
ASTZ:=SMA(STZ0,30,1)*60;
BUY:=ALL(ASTZ<26,120) AND ASTZ>-5 AND ASTZ<15 AND CROSS(STZ,ASTZ);
BARSLAST(BUY)<=X;

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约