飞狐多种公式

【飞狐】平台起飞(分时预警)

N:=0.005;
A1:=DYNAINFO(11)*N;
A2:=DYNAINFO(5)<DYNAINFO(11)+A1;
A3:=DYNAINFO(6)>DYNAINFO(11)-A1;
A4:=TIME>100000;
EE:=A1 and A2 and A3 and A4;
AA:=DYNAINFO(24)>=1;
BB:=SUM(VOL,10)/10;
CC:=ref(BB,1);
DD:=vol/CC>3;
FF:=COUNT(EE,20);
AA and DD and EE ;

 

 

抓底真准

MA7:=MA(C,7);
角度71:=ATAN((MA7/REF(MA7,1)-1)*100)*180/3.1416;
范围1:=角度71<-55;
-55,LINEDOT;
-65,LINEDOT;
-75,LINEDOT;
FILLRGN(范围1,角度71,-55),colorred;
FILLRGN(范围1<>55,55,-55),COLOR000000;
角度7:ATAN((MA7/REF(MA7,1)-1)*100)*180/3.1416,LINETHICK3,color00FFFF;
AA:MA(角度7,4),LINETHICK3,color0000FF;
底部:=range(角度7,-75,-55);
小底:range(角度7,-65,-55)*20-70,LINETHICK2,colorFFFFFF;
大底:range(角度7,-75,-65.001)*20-70,LINETHICK2,color00FF00;
选股:CROSS(角度7,AA) and 底部;
CC:DRAWICON(CROSS(角度7,AA) and 底部,AA,1);
{自用均线角度，适用于个股日线，抓底很准}

 

 

飞狐用的漂亮强大的成交量

DRAWGBK(1,COLOR#143232,COLOR#1e1e8c,1);
NDDX:=10;金额:amount/100000000,linethick0;
JJDDX:=(HIGH+LOW+CLOSE)/3;
QJ0DDX:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
QJ1DDX:=IF(CAPITAL=0,QJ0DDX*(JJDDX-MIN(CLOSE,OPEN)),QJ0DDX*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
QJ2DDX:=IF(CAPITAL=0,QJ0DDX*(MIN(OPEN,CLOSE)-LOW),QJ0DDX*IF(HIGH=LOW,1,(JJDDX-MIN(CLOSE,OPEN))));
QJ3DDX:=IF(CAPITAL=0,QJ0DDX*(HIGH-MAX(OPEN,CLOSE)),QJ0DDX*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
QJ4DDX:=IF(CAPITAL=0,QJ0DDX*(MAX(CLOSE,OPEN)-JJDDX),QJ0DDX*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJDDX)));
大单: ((QJ1DDX+QJ2DDX)-(QJ3DDX+QJ4DDX))/IF(CAPITAL=0,1000000,10000),COLORRED;
交易分钟数:=if(CURRENTTIME>93000 and CURRENTTIME<150000,
if(CURRENTTIME<113000,(TIMETOT0(CURRENTTIME)-34200)/60,
if(CURRENTTIME>130000,(TIMETOT0(CURRENTTIME)-39600)/60,120)),240);
日期差:=DATEDIFF(DATE,CURRENTDATE);
预量:IF(BARSTATUS=2 and 日期差=0,VOL/交易分钟数*240,VOL),COLOR00FFFF,LINETHICK0;
{预测量2:IF(BARSTATUS=2,VOL*240/OPENMINUTES(CURRENTTIME),VOL),COLOR00FF00,LINETHICK0;}
STICKLINE(BARSTATUS=2,vol,预量,8,0),COLOR00FFFF,LINEDOT;
JJ:=(HIGH+LOW+CLOSE)/3;
QJ9:=AMOUNT/IF(HIGH=LOW,4,HIGH-LOW);
TD1:=QJ9*(MIN(OPEN,CLOSE)-LOW);
XD1:=QJ9*(JJ-MIN(CLOSE,OPEN));
XD2:=QJ9*(HIGH-MAX(OPEN,CLOSE));
TD2:=QJ9*(MAX(CLOSE,OPEN)-JJ);
日净:((TD1+XD1)-(TD2+XD2))/10000,LINETHICK0;
量＿价:=1;CTKG:=1;
W:=量＿价;
EPSL:=0.0001;
ZZ:=(C+H+L)/3;
TJA:=ZZ>=MAX(C,O) AND CTKG=1;{倒锤头};
TJB:=ZZ<=MIN(C,O) AND CTKG=1;{正锤头};
Z，:=IF(TJA,1,IF(TJB,-1,0));{正负数};
TJ0:=TJA OR TJB;
TJ1:=H=L AND C>REF(C,1);{一字涨停};
TJ2:=H=L AND C<REF(C,1);{一字跌停};
TJ3:=H=L AND C=REF(C,1);{连续一字涨、跌停};
量_价:=IF(W=1,VOL,AMOUNT),STICK,COLOREEFFEE;{平盘量,白色}
EE:=IF(TJ1,EPSL,IF(TJ2,-EPSL,0));
ZL:=2*(H-L)+ABS(C-O)+3*IF(TJ3,EPSL,ABS(EE));
JGL_DX:=(IF(TJ0,2/3*(2*C-H-L)+Z，*ABS(C-O),(C-O))+EE)/ZL;
差:(JGL_DX*量_价)/20000,COLOR13AADD,LINETHICK0;
DX:=JGL_DX*100,LINETHICK0;
买:量_价*(1+JGL_DX)/20000,COLOR1133AA,LINETHICK0;
卖:量_价*(1-JGL_DX)/20000,COLORFFFF00,LINETHICK0;
量差:买-卖,LINETHICK0,COLORYELLOW;

VAR2:=HIGH-LOW;
VAR3:=ABS(OPEN-CLOSE);
VAR4:=HIGH-(IF(CLOSE>OPEN,CLOSE,OPEN));
VAR5:=(IF(CLOSE>OPEN,OPEN,CLOSE))-LOW;
VAR6:=VAR3/VAR2*VOL;
VAR7:=VAR4/VAR2*VOL;
VAR8:=VAR5/VAR2*VOL;
VAR9:=IF(VOL/CAPITAL>0.001,1,EXP(ABS(LOG(VOL/CAPITAL*100))));
VARA:=(CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100;
VARB:=MA(CLOSE,5)>MA(CLOSE,10) AND MA(CLOSE,10)>MA(CLOSE,30) AND MA(CLOSE,30)>MA(CLOSE,60);
VARC:=MA(CLOSE,5)<MA(CLOSE,10) AND MA(CLOSE,10)<MA(CLOSE,30);
{红柱}

STICKLINE(量差>0,0,v,8,0) ,COLORFF00FF;
STICKLINE(量差>0,0,v,7,0) ,COLORFF22FF;
STICKLINE(量差>0,0,v,6,0) ,COLORFF44FF;
STICKLINE(量差>0,0,v,5,0) ,COLORFF66FF;
STICKLINE(量差>0,0,v,4,0) ,COLORFF88FF;
STICKLINE(量差>0,0,v,3,0) ,COLORFF99FF;
STICKLINE(量差>0,0,v,2,0) ,COLORFFAAFF;
STICKLINE(量差>0,0,v,1,0) ,COLORFFBBFF;
STICKLINE(0>=量差 ,0 ,v,8,0 ),COLOR008800;
STICKLINE(0>=量差 ,0 ,v,7,0 ),COLOR009900;
STICKLINE(0>=量差 ,0 ,v,6,0 ),COLOR00AA00;
STICKLINE(0>=量差 ,0 ,v,5,0 ),COLOR00BB00;
STICKLINE(0>=量差 ,0 ,v,4,0 ),COLOR00CC00;
STICKLINE(0>=量差 ,0 ,v,3,0 ),COLOR00DD00;
STICKLINE(0>=量差 ,0 ,v,2,0 ),COLOR00EE00;
STICKLINE(0>=量差 ,0 ,v,1,0 ),COLOR00FF00;
STICKLINE(VOL>MA(VOL,5)*2.5,0,VOL,0.2,0),colorFFFFFF;
DRAWTEXT(VAR9>2 AND VOL<MA(VOL,5)/2,VOL+10000,'地量'),colorFFFF;
DRAWTEXT(VAR7>VAR6 AND VARA>2 AND VAR7>VAR8 AND CLOSE>MA(CLOSE,5) AND CLOSE>MA(CLOSE,30) AND HIGH>MA(CLOSE,60) AND VOL>MA(VOL,5) AND VAR7>=MA(VOL,5),VOL,'逢高出货'),colorFF00;
DRAWTEXT(VAR8>VAR6 AND VAR8>VAR7 AND VARA<-2 AND CLOSE<MA(CLOSE,30) AND VAR8<MA(VOL,5)/2 AND MA(VOL,5)<MA(VOL,10),VOL+15000,'逢低跟进'),colorFF00FF;
DRAWTEXT(VAR6>MA(VOL,5)*2 AND VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE>OPEN OR VOL>MA(VOL,5)*3 AND VARB,VOL,'强势参与'),colorCC99CC;
DRAWTEXT(VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE<OPEN AND VAR6/VOL>0.7 AND VARC AND VAR6>MA(VOL,5),v+15000,'空头释放'),colorFF00;
BB:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主动买:=IF(CLOSE>OPEN,BB*(HIGH-LOW),IF(CLOSE<OPEN,BB*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
主买:主动买/10000,COLORRED,LINETHICK0;
主动卖:=IF(CLOSE>OPEN,0-BB*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-BB*(HIGH-LOW),0-VOL/2));
主卖:-主动卖/10000,COLORFFCC00,LINETHICK0;
差额:主买-主卖,COLORGREEN,LINETHICK0;
MA5:MA(VOL,5),colorFF;
MA10:MA(VOL,10),colorFF00;
MA60:MA(VOL,60),colorFFFF;
F:=100*(CLOSE-REF(CLOSE,1))/REF(CLOSE,1);
今小昨:=IF(CLOSE<REF(OPEN,1) AND F<0,1,0);
Sa1:=今小昨;
今小前:=IF(CLOSE<REF(OPEN,2) AND F<0,1,0),LINETHICK0;
Sa2:=今小前;
svol:=INTPART(SUM(VOL,0)/CAPITAL);
tj0:=svol>REF(svol,1) or BARSSINCE(CLOSE)=0;
S1:=BARSLAST(tj0)+1,PRECISION,COLORWHITE;//时间1
tj2:=S1<REF(S1,1);//取点
S2:=IF(tj2,REF(S1,1)+1,S1),PRECISION,COLORMAGENTA;//时间2
S3:=SUM(tj2,0),COLORMAGENTA;
阶段总额（万元）:=SUM(AMOUNT/10000,S2)*100,PRECISION,LINETHICK,Color008BFA;//换手100%AMOUNT
阶段总量（手）:=SUM(VOL,S2)*100,PRECISION,LINETHICK,COLORCYAN;//换手100%VOL
阶段成本（元）:=(阶段总额（万元）/(阶段总量（手）/100)),LINETHICK,PRECISION2,COLORRED;
A:=SUMBARS(V ,CAPITAL*1);{累计换手=100%的周期}
A2:=ma(COST(20),A);{在A周期里获利20%的平均价}
A1:=ma(COST(10),A);{在A周期里获利10%的平均价}
A3:=ma(COST(30),A);{在A周期里获利30%的平均价}
A4:=ma(COST(40),A);{在A周期里获利40%的平均价}
A5:=ma(COST(50),A);{在A周期里获利50%的平均价}
E:=LLV(L,250)=L;{一年中最低价的位置}
E1:=BARSLAST(E);{求得一年中最低价的位置到现在的周期}
主力成本:=(5*A1+4*A2+3*A3+2*A4+A5)/15, COLORRED,linethick0;
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,'■阶段平均成本:'+NUMTOSTR(阶段成本（元）[SYSPARAM(1)],2)+'(元)'),align4,ColorFFE0FF,pxdn30,shift;
{取点}
Zk1:=STKINDI('' ,'kdj.k',0,7);
Zd2:=STKINDI('' ,'kdj.d',0,7);
Z，1:=STKINDI('' ,'macd.diff',0,7);
ZA2:=STKINDI('' ,'macd.dea',0,7);
{建仓统计}
JCD:=FILTER(CROSS(Zk1,Zd2) and Zd2<30,13);{周KD金叉位置}
取点:=BARSLAST(JCD);
吸筹区:=IF(取点>0 and 取点<61,取点,0);
换手率:=VOL/CAPITAL*100,ColorD19857;
ZS1:= 吸筹区;
ZS2:= 吸筹区+1;
ZS3:= 换手率/5;{庄家筹码估算}
ZSA:=IF(ZS1>0,SUM((ZS3),吸筹区+1),0);{统计庄家筹码}
{控制画线高度}
n1:=SYSPARAM(3);
nn:=n1-SYSPARAM(2)+1;
hh:=HHV(VOL,nn);
ll:=LLV(VOL,nn);
最高:=hh[n1];
最低:=ll[n1];
中:=最低+(最高-最低)*0.5;
PARTLINE(RANGE(BARPOS,SYSPARAM(2),SYSPARAM(1)+1)&&ZS1>0,中),COLORCYAN;//建仓横线
VERTLINE(JCD),LINEDOT,COLORGREEN;//建仓点竖线
{可移动变化数字}
DRAWTEXT(BARSCOUNT(CLOSE)=SYSPARAM(1)&&SYSPARAM(1)>ZS1, 中*2.2,' ■主力建仓天数:'+NUMTOSTR(ZS1[SYSPARAM(1)],0)+'(天)'),PXDN1,align2,COLORYELLOW;
DRAWTEXT(BARSCOUNT(CLOSE)=SYSPARAM(1)&&SYSPARAM(1)>ZS1, 中*2.2,' \n■估算主力筹 码:'+NUMTOSTR(ZSA[SYSPARAM(1)],2)+'%'),PXDN10,align2,COLORMAGENTA;
dRAWTEXT(BARSCOUNT(CLOSE)=SYSPARAM(1)&&SYSPARAM(1)>ZS1, 中*2.2,' \n■主力成本:'+NUMTOSTR(主力成本[SYSPARAM(1)],2)+'元'),PXDN35,align2,COLORgreen;

此指标是以切线（黄金分割）均价线（MA EMA) 均价线角度 来统
计计算的模式。切线是以某以区间的高低点价位与均价线的比较及
结合量价进行研判进行买卖
INPUT:高(0,0,255),XS(0,0,1),调(0,0,2),F(0,0,255),F1(0,0,255),F2(0,0,255),角(0,0,1),角2(0,0,1);
TJA:=CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1);
STICKLINE(TJA,LOW,HIGH,0,0),ColorE9;
STICKLINE(TJA,O,CLOSE,8,0),Color80;
STICKLINE(TJA,O,CLOSE,6,0),ColorA5;
STICKLINE(TJA,O,CLOSE,4,0),ColorC0;
STICKLINE(TJA,O,CLOSE,2,0),ColorE6;
STICKLINE(NOT(TJA),HIGH,LOW,0,0),Colorff00;
STICKLINE(NOT(TJA),CLOSE,OPEN,8,0),Color5000;
STICKLINE(NOT(TJA),CLOSE,OPEN,6,0),Color6600;
STICKLINE(NOT(TJA),CLOSE,OPEN,4,0),Color8000;
STICKLINE(NOT(TJA),CLOSE,OPEN,2,0),ColorA000;
QC:=REF(C,1);QO:=REF(O,1);QH:=REF(H,1);QL:=REF(L,1);
FUZ:=L+((H-L)/2);FUS:=O+((C-O)/2); FUSY:=C+((O-C)/2);SSFU:=(FUZ+IF(C>O,FUS,FUSY))/2;
FUZ1:=L+((H-L)*0.333);FUS1:=O+((C-O)*0.333);FUS1Y:=C+((O-C)*0.333);SSFU1:=(FUZ1+IF(C>O,FUS1,FUS1Y))/2;
FUZ2:=L+((H-L)*0.667);FUS2:=O+((C-O)*0.677);FUS2Y:=C+((O-C)*0.667);SSFU2:=(FUZ2+IF(C>O,FUS2,FUS2Y))/2;
B1:=Ql+((Qh-Ql)/2);B2:=QO+((QC-QO)/2);B3:=QC+((QO-QC)/2);
DB1:=QL+((QH-QL)*0.333);DB2:=QO+((QC-QO)*0.333);DB3:=QC+((QO-QC)*0.333);
EB1:=QL+((QH-QL)*0.667);EB2:=QO+((QC-QO)*0.667);EB3:=QC+((QO-QC)*0.667);
SYB1:=QH-((QH-QC)/2);SYB2:=QH-((QH-QO)/2);
SYB3:=IF(QC>QO,SYB1,SYB2);
XYB1:=QL+((QC-QL)/2);XYB2:=QL+((QO-QL)/2);
XYB3:=IF(QC<QO,XYB1,XYB2);
QFU:=(B1+IF(QC>QO,B2,B3))/2;
QDFU:=(DB1+IF(QC>QO,DB2,DB3))/2;
QEFU:=(EB1+IF(QC>QO,EB2,EB3))/2;
STICKLINE(C=C,SSFU2,SSFU2,4,0),COLOR00FF00,LINETHICK1;
STICKLINE(C=C,SSFU1,SSFU1,4,0),COLOR00FF00,LINETHICK1;
STICKLINE(C=C,SSFU,SSFU,6,0),COLOR00FFFF,LINETHICK1;
STICKLINE(C=C,IF(C>O,H-((H-C)/2),H-((H-O)/2)),IF(C>O,H-((H-C)/2),H-((H-O)/2)),1.3,0),COLORYELLOW,LINETHICK1;
STICKLINE(C=C,IF(C<O,L+((C-L)/2),L+((O-L)/2)),IF(C<O,L+((C-L)/2),L+((O-L)/2)),1.3,0),COLORYELLOW,LINETHICK1;
AJ:=AMOUNT/(VOL*100),COLORFFFFFF,LINETHICK0;
DRAWTEXT(C=C,AJ,'←'),COLORFFFFFF;
TT1:=ISLASTBAR=1 AND 角=0;
DRAWTEXTEX(TT1,0,10,17,' 前/现日振幅的1/2 【'+NUMTOSTR(QFU,2)+'】/【'+NUMTOSTR(SSFU,2)+'】'),Color00AAFF;
DRAWTEXTEX(TT1,0,10,30,' 前/现日振幅的:1/3 【'+NUMTOSTR(QDFU,2)+'】/【'+NUMTOSTR(SSFU1,2)+'】'),Color00FF00;
DRAWTEXTEX(TT1,0,10,47,' 前/现日振幅的:2/3 【'+NUMTOSTR(QEFU,2)+'】/【'+NUMTOSTR(SSFU2,2)+'】'),Color00FF00;
DRAWTEXTEX(TT1,0,10,60,' 前上影线幅度的1/2 【'+NUMTOSTR(SYB3,2)+'】'),ColorFFFFFF;
DRAWTEXTEX(TT1,0,10,73,' 前下影线幅度的1/2 【'+NUMTOSTR(XYB3,2)+'】'),ColorFFFFFF;
TTt:=ISLASTBAR=1;
TA1:=BARPOS=SYSPARAM(1);
TA2:=BARPOS=SYSPARAM(3);
T1:=datacount-barpos+0;
T2:=DATEDIFF(date,CURRENTDATE);
A1:=((H-L)/L)*100;
A2:=H-L;
MAI:=C*1.015;
MAII:=C*1.03;
DRAWTEXTEX(TTT AND 调=0,0,310,1,'▼明短线赢利[1.5%--3%:]'+'/'+NUMTOSTR(MAI[SYSPARAM(1)],2)+'-- '+NUMTOSTR(MAII [SYSPARAM(1)],2)),Color00dd00;
DRAWTEXTEX(TTt,0,176,1,'【振幅:'+NUMTOSTR(A1[SYSPARAM(1)],2)+'% '+NUMTOSTR(A2[SYSPARAM(1)],2)+'元 】'+''),Colordddd00;
DRAWTEXTEX(TTT,0,1,1,'【代码:'+STKLABEL+' 名称:'+STKNAME+'】'),Color00FFFF;
as:=(o+h+l+c)/4;
BL: eMA(as,F),linethick1,Color208FFF;
BL1: MA(C,F1),linethick1,ColorFFFFFF;
BL2: MA(C,F2),linethick1,Color00FFFF;
PARTLINE(BL<REF(BL,1),BL),colorff0000,linethick2;
PARTLINE(BL1<REF(BL1,1),BL1),color00ff00,linethick1;
PARTLINE(BL2<REF(BL2,1),BL2),color00ff00,linethick1;
TT1:=ISLASTBAR=1 AND 角=1;TT2:=ISLASTBAR=1 AND 角2=1;
QMC:=REF(BL1,1);QMC1:=REF(BL1,2);
QMC2:=REF(BL2,1);QMC3:=REF(BL2,2);
CMC:=BL1-QMC;CMC1:=QMC-QMC1;CPJ:=(CMC+CMC1)/2;
CMD:=BL2-QMC2;CMD1:=QMC2-QMC3;DPJ:=(CMD+CMD1)/2;
Q1:=ATAN((BL1/REF(BL1,1)-1)*100)*180/3.1416;
Q2:=ATAN((QMC/REF(QMC,1)-1)*100)*180/3.1416;
Q3:=ATAN((QMC1/REF(QMC1,1)-1)*100)*180/3.1416;
AQ1:=ATAN((BL2/REF(BL2,1)-1)*100)*180/3.1416;
AQ2:=ATAN((QMC2/REF(QMC2,1)-1)*100)*180/3.1416;
AQ3:=ATAN((QMC3/REF(QMC3,1)-1)*100)*180/3.1416;
DRAWTEXTEX(TT1,0,75,16,'【任意均线角度】'+' '),COLORFFFFFF;
DRAWTEXTEX(TT1,0,2,30,' '+NUMTOSTR(F1,0)+''+'日=； ∠'+NUMTOSTR(Q1,2)+' 度'+'/ 前日=；∠'+NUMTOSTR(Q2,2)+' 度'+'/ 前2日=；∠'+NUMTOSTR(Q3,2)+' 度'+''),ColorFFffff;
DRAWTEXTEX(TT1,0,2,44,' '+NUMTOSTR(F1,0)+''+'日均值：'+NUMTOSTR(BL1,2)+' 元'+''+'/ 前日=： '+NUMTOSTR(QMC,2)+' 元'+'/ 前2日=： '+NUMTOSTR(QMC1,2)+' 元'),ColorFFffff;
DRAWTEXTEX(TT1,0,2,58,' '+NUMTOSTR(F1,0)+''+'日均线近三日的平均增(减)速；'+NUMTOSTR(CPJ,2)+' 元'+''),ColorFFffff;
DRAWTEXTEX(TT2,0,2,88,' '+NUMTOSTR(F2,0)+''+'日=； ∠'+NUMTOSTR(AQ1,2)+' 度'+'/ 前日=；∠'+NUMTOSTR(AQ2,2)+' 度'+'/ 前2日=；∠'+NUMTOSTR(AQ3,2)+' 度'+''),Color00ffff;
DRAWTEXTEX(TT2,0,2,102,' '+NUMTOSTR(F2,0)+''+'日均值：'+NUMTOSTR(BL2,2)+' 元'+''+'/ 前日=： '+NUMTOSTR(QMC2,2)+' 元'+'/ 前2日=： '+NUMTOSTR(QMC3,2)+' 元'),Color00ffff;
DRAWTEXTEX(TT2,0,2,116,' '+NUMTOSTR(F2,0)+''+'日均线近三日的平均增(减)速；'+NUMTOSTR(DPJ,2)+' 元'+''),Color00ffff;
BLT:=BARSTATUS=2;
DRAWTEXT(BLT AND BL>REF(BL,1),BL,'↑'+NUMTOSTR(f,0)+':'+NUMTOSTR(BL,2)),COLOR208fff;
DRAWTEXT(BLT AND BL<REF(BL,1),BL,'↓'+NUMTOSTR(f,0)+':'+NUMTOSTR(BL,2)),Color208FFF;
DRAWTEXT(BLT AND BL1>REF(BL1,1),BL1,'↑'+NUMTOSTR(f1,0)+':'+NUMTOSTR(BL1,2)),COLORFFffff;
DRAWTEXT(BLT AND BL1<REF(BL1,1),BL1,'↓'+NUMTOSTR(f1,0)+':'+NUMTOSTR(BL1,2)),ColorFFFDED;
DRAWTEXT(BLT AND BL2>REF(BL2,1),BL2,'↑'+NUMTOSTR(f2,0)+':'+NUMTOSTR(BL2,2)),COLOR00CCCC;
DRAWTEXT(BLT AND BL2<REF(BL2,1),BL2,'↓'+NUMTOSTR(f2,0)+':'+NUMTOSTR(BL2,2)),Color00CCCC;
B:=IF((SYSPARAM(1) = (BARSSINCE((C > 0)) + 1)),1,0);
B1:=(H<REF(L,1));
B2:=(L>REF(H,1));
STICKLINE(B1,o+(c-o)*0.25,O,5,0),colorcc0000;
STICKLINE(B1,o+(c-o)*0.25,O,3,0),colordd0000;
STICKLINE(B1,o+(c-o)*0.25,O,1,0),coloree0000;
STICKLINE(B2,O,o+(c-o)*0.25,6,0),color208AAA;
STICKLINE(B2,O,o+(c-o)*0.25,4,0),color208DDD;
STICKLINE(B2 ,O,o+(c-o)*0.25,2,0),color208FFF;
DRAWTEXT(((B > 0) AND B1),H,'↓缺口'),colorFFFFEE,pxdn10,ALIGN2;
DRAWTEXT(((B > 0) AND B2),L,'↑缺口'),color00FFEE,pxup20,ALIGN1;
//DRAWTEXTEX(TTT,0,2,61,'【创于09.08.02 草根】'),ColorFFFFFF;
X:=SYSPARAM(2);//最初
X1:=SYSPARAM(3);//最后
X2:=SYSPARAM(4);//最高
X3:=SYSPARAM(5);//最低
X4:=SYSPARAM(1);
YG:=REF(H,BARSLAST(TA1));YD:=REF(L,BARSLAST(TA1));
N:=((X1 - X) + 1);
ZG:=ref(H,高);
HH:=HHV(zg,1);
LL:=LLV(L,N);
GG:HH[X1],colorFF00FF;
DD1:LL[X1],colorff0000;
DD:=YD[X1],color005555,LINEDOT;
PARTLINE(YD,YD),LINETHICK1,COLOR00FF00;
//DRAWTEXT(TA2,YD,'K线低--'+NUMTOSTR(YD,2)),COLORFFFFFF,ALIGN2,PXDN5;
//DRAWTEXT(TA2,YG,'K线高--'+NUMTOSTR(YG,2)),COLORFFFFFF,ALIGN2,PXDN5;
DRAWTEXT(TTT ,DD1,'最低'+NUMTOSTR(DD1,2)),ALIGN1,colorFFEE00,,pxup25;
DRAWTEXT(TTT ,GG,' 最高'+NUMTOSTR(GG,2)),ALIGN1,colorffaaaa,,pxDN5;
Q:=(DD + ((GG - DD) * 0.191));
Q2:=(DD + ((GG - DD) * 0.382));
Q3:=(DD + ((GG - DD) * 0.50));
Q4:=(DD + ((GG - DD) * 0.618));
Q5:=(DD + ((GG - DD) * 0.809));
Y_1:=REF(Q,BARSLAST(TA1));
Y_2:=REF(Q2,BARSLAST(TA1));
Y_3:=REF(Q3,BARSLAST(TA1));
Y_4:=REF(Q4,BARSLAST(TA1));
Y_5:=REF(Q5,BARSLAST(TA1));
PARTLINE(Y_1,Y_1),LINEDOT,Color005555;
PARTLINE(Y_2,Y_2),LINEDOT,Color005555;
PARTLINE(Y_3,Y_3),LINEDOT,Colordddddd;
PARTLINE(Y_4,Y_4),LINEDOT,Color005555;
PARTLINE(Y_5,Y_5),LINEDOT,Color005555;
DRAWTEXT(TA2,Q,NUMTOSTR(Q,2)+' :--0.191'),COLOR00bbbb,ALIGN2,PXDN5;
DRAWTEXT(TA2,Q2,NUMTOSTR(Q2,2)+' :--0.382'),COLOR00bbbb,ALIGN2,PXUP22;
DRAWTEXT(TA2,Q3,'★:('+NUMTOSTR(Q3,2)+') ←*1/2'),COLORFFFFFF,ALIGN2,PXDN5;
DRAWTEXT(TA2,Q4,NUMTOSTR(Q4,2)+' :--0.618'),COLOR00bbbb,ALIGN2,PXDN5;
DRAWTEXT(TA2,Q5,NUMTOSTR(Q5,2)+' :--0.809'),COLOR00bbbb,ALIGN2,PXDN5;
JN1:=dd+(HH-dd)*0.875; JN7:=dd+(HH-dd)*0.85; JN9:=dd+(HH-dd)*0.72; JN12:=dd+(HH-dd)*0.28;
JN14:=dd+(HH-dd)*0.75; JN8:=dd+(HH-dd)*0.78; JN2:=dd+(HH-dd)*0.667;
JN6:=dd+(HH-dd)*0.125; JN10:=dd+(HH-dd)*0.25; JN13:=dd+(HH-dd)*0.15;
JN3:=dd+(HH-dd)*0.333; HJ6:=dd+(HH-dd)*0.55; HJ7:=dd+(HH-dd)*0.45;
HJ13:=dd+(HH-dd)*0.98; HJ14:=dd+(HH-dd)*0.93; JN11:=dd+(HH-dd)*0.22;
TT6:=ISLASTBAR=1 AND XS=1;
DRAWTEXT(TT6,JN1,''+'7/8﹡→('+NUMTOSTR(JN1,2)+' '+'← *'),ALIGN2,Coloraa88aa,pxUP8;
DRAWTEXT(TT6,JN14,''+'6/8﹡→('+NUMTOSTR(JN14,2)+' '+'← *'),ALIGN2,Coloraa88aa,pxUP8;
DRAWTEXT(TT6,JN7,''+'85%﹡→('+NUMTOSTR(JN7,2)+''+'-----'),ALIGN2,Color208bbb,pxUP8;
DRAWTEXT(TT6,JN8,''+'78%﹡→('+NUMTOSTR(JN8,2)+''+'← '),ALIGN2,Color9bbb00,pxUP8;
DRAWTEXT(TT6,JN9,''+'72%﹡→('+NUMTOSTR(JN9,2)+''+'← '),ALIGN2,Color9bbb00,pxUP8;
DRAWTEXT(TT6,JN2,''+'2/3﹡→('+NUMTOSTR(JN2,2)+' '+'←-- *'),ALIGN2,Color00FF00,pxUP8;
DRAWTEXT(TT6,JN3,''+'1/3﹡→('+NUMTOSTR(JN3,2)+' '+'←-- *'),ALIGN2,Color00FF00,pxUP8;
DRAWTEXT(TT6,HJ6,''+'55%﹡→('+NUMTOSTR(HJ6,2)+''+'←'),ALIGN2,ColorAAAAAA,pxUP8;
DRAWTEXT(TT6,HJ7,''+'45%﹡→('+NUMTOSTR(HJ7,2)+''+'←'),ALIGN2,ColorAAAAAA,pxUP8;
DRAWTEXT(TT6,JN10,''+'2/8﹡→('+NUMTOSTR(JN10,2)+' '+'← *'),ALIGN2,Coloraa88aa,pxUP8;
DRAWTEXT(TT6,JN6,''+'1/8﹡→('+NUMTOSTR(JN6,2)+' '+'← *'),ALIGN2,Coloraa88aa,pxUP8;
DRAWTEXT(TT6,HJ13,''+'98%﹡→('+NUMTOSTR(HJ13,2)+''+'← '),ALIGN2,Colorcccc00,pxUP8;
//DRAWTEXT(TT6,HJ9,''+'95%('+NUMTOSTR(HJ9,2)+''+'←'),ALIGN2,ColorFFFF00,pxDN2;
DRAWTEXT(TT6,HJ14,''+'93%﹡→('+NUMTOSTR(HJ14,2)+''+'← '),ALIGN2,Colorcccc00,pxUP8;
DRAWTEXT(TT6,JN13,''+'15%﹡→('+NUMTOSTR(JN13,2)+''+'-----'),ALIGN2,Color208EEE,pxUP8;
DRAWTEXT(TT6,JN12,''+'28%﹡→('+NUMTOSTR(JN12,2)+''+'← '),ALIGN2,Color9FFF00,pxUP8;
DRAWTEXT(TT6,JN11,''+'22%﹡→('+NUMTOSTR(JN11,2)+''+'← '),ALIGN2,Color9FFF00,pxUP8;
//DRAWTEXT(TT6,HJ10,''+'10%﹡→('+NUMTOSTR(HJ10,2)+''+'← '),ALIGN2,ColorFFFF00,pxUP8;
//DRAWTEXT(TT6,HJ12,''+'8%﹡→('+NUMTOSTR(HJ12,2)+''+'← '),ALIGN2,ColorFFFF00,pxUP8;
//DRAWTEXT(TT6,HJ15,''+'3%﹡→('+NUMTOSTR(HJ15,2)+''+'← '),ALIGN2,ColorFFFF00,pxUP8;
TT4:=ISLASTBAR=1 and 调=1;
TT5:=ISLASTBAR=1 and 调=2;
GHJS1:=YD+(HH-YD)*1.191; GJNS1:=YD+(HH-YD)*1.333;
GHJS2:=YD+(HH-YD)*1.382; GJNS2:=YD+(HH-YD)*1.25;
GHJS3:=YD+(HH-YD)*1.03; GJNS3:=YD+(HH-YD)*1.15;
GHJS4:=YD+(HH-YD)*1.08; GJNS4:=YD+(HH-YD)*1.125;
GHJS5:=YD+(HH-YD)*1.45; GJNS5:=YD+(HH-YD)*1.22;
GHJS6:=YD+(HH-YD)*1.50; GJNS6:=YD+(HH-YD)*1.28;
DRAWTEXT(TT4,GHJS3,''+'3%﹡→('+NUMTOSTR(GHJS3,2)+''+'← '),ALIGN2,ColorAAAA00,pxUP8;
DRAWTEXT(TT4,GHJS4,''+'8%﹡→('+NUMTOSTR(GHJS4,2)+''+'← '),ALIGN2,ColorAAAA00,pxUP8;
DRAWTEXT(TT4,GJNS4,''+'1/8﹡→('+NUMTOSTR(GJNS4,2)+' '+'← *'),ALIGN2,ColorFFAAAA,pxUP8;
DRAWTEXT(TT4,GJNS3,''+'15%﹡→('+NUMTOSTR(GJNS3,2)+' '+'← *'),ALIGN2,Color208EEE,pxUP8;
DRAWTEXT(TT4,GHJS1,''+'19.1%﹡→('+NUMTOSTR(GHJS1,2)+' '+'←- *'),ALIGN2,Color00BBBB,pxUP8;
DRAWTEXT(TT4,GJNS5,''+'22%﹡→('+NUMTOSTR(GJNS5,2)+''+'← '),ALIGN2,Color9AAA00,pxUP8;
DRAWTEXT(TT4,GJNS2,''+'2/8﹡→('+NUMTOSTR(GJNS2,2)+' '+'← *'),ALIGN2,ColorFFAAAA,pxUP8;
DRAWTEXT(TT4,GJNS6,''+'28%﹡→('+NUMTOSTR(GJNS6,2)+''+'← '),ALIGN2,Color9AAA00,pxUP8;
DRAWTEXT(TT4,GJNS1,''+'1/3﹡→('+NUMTOSTR(GJNS1,2)+' '+'←-- *'),ALIGN2,Color00DD00,pxUP8;
DRAWTEXT(TT4,GHJS2,''+'38.2%﹡→('+NUMTOSTR(GHJS2,2)+' '+'←- *'),ALIGN2,Color00BBBB,pxUP8;
DRAWTEXT(TT4,GHJS5,''+'45%﹡→('+NUMTOSTR(GHJS5,2)+' '+'← *'),ALIGN2,ColorBBBBBB,pxUP8;
DRAWTEXT(TT4,GHJS6,''+'50%﹡→('+NUMTOSTR(GHJS6,2)+''+'﹊﹊﹊﹊﹊﹊﹊﹊﹊﹊﹊﹊﹊'),ALIGN2,ColorDDDDDD,pxDN2;
GHJ1:=HH+(YD-HH)*1.191; GJN1:=HH+(YD-HH)*1.333;
GHJ2:=HH+(YD-HH)*1.382; GJN2:=HH+(YD-HH)*1.25;
GHJ3:=HH+(YD-HH)*1.03; GJN3:=HH+(YD-HH)*1.15;
GHJ4:=HH+(YD-HH)*1.08; GJN4:=HH+(YD-HH)*1.125;
GHJ5:=HH+(YD-HH)*1.45; GJN5:=HH+(YD-HH)*1.22;
GHJ6:=HH+(YD-HH)*1.50; GJN6:=HH+(YD-HH)*1.28;
GHJ7:=HH+(YD-HH)*1.55; GJN7:=HH+(YD-HH)*1.667;
GHJ8:=HH+(YD-HH)*1.618; GJN8:=HH+(YD-HH)*1.75;
GHJ9:=HH+(YD-HH)*1.809;
DRAWTEXT(TT5,GHJ3,''+'3%﹡→('+NUMTOSTR(GHJ3,2)+''+'← '),ALIGN2,ColorDDDD00,pxUP8;
DRAWTEXT(TT5,GHJ4,''+'8%﹡→('+NUMTOSTR(GHJ4,2)+''+'← '),ALIGN2,ColorDDDD00,pxUP8;
DRAWTEXT(TT5,GJN4,''+'1/8﹡→('+NUMTOSTR(GJN4,2)+' '+'← *'),ALIGN2,Color208FFF,pxUP8;
DRAWTEXT(TT5,GJN3,''+'15%﹡→('+NUMTOSTR(GJN3,2)+' '+'← *'),ALIGN2,Color208EEE,pxDN2;
DRAWTEXT(TT5,GHJ1,''+'19.1%﹡→('+NUMTOSTR(GHJ1,2)+' '+'←- *'),ALIGN2,Color00FFFF,pxUP8;
DRAWTEXT(TT5,GJN5,''+'22%﹡→('+NUMTOSTR(GJN5,2)+''+'← '),ALIGN2,ColorFFFF00,pxUP8;
DRAWTEXT(TT5,GJN2,''+'2/8﹡→('+NUMTOSTR(GJN2,2)+' '+'← *'),ALIGN2,Color208FFF,pxUP8;
DRAWTEXT(TT5,GJN8,''+'6/8﹡→('+NUMTOSTR(GJN8,2)+' '+'← *'),ALIGN2,Color208FFF,pxUP8;
DRAWTEXT(TT5,GJN6,''+'28%﹡→('+NUMTOSTR(GJN6,2)+''+'← '),ALIGN2,ColorFFFF00,pxUP8;
DRAWTEXT(TT5,GJN1,''+'1/3﹡→('+NUMTOSTR(GJN1,2)+' '+'←-- *'),ALIGN2,Color00FF00,pxUP8;
DRAWTEXT(TT5,GJN7,''+'2/3﹡→('+NUMTOSTR(GJN7,2)+' '+'←-- *'),ALIGN2,Color00FF00,pxUP8;
DRAWTEXT(TT5,GHJ2,''+'38.2%﹡→('+NUMTOSTR(GHJ2,2)+' '+'←- *'),ALIGN2,Color00FFFF,pxUP8;
DRAWTEXT(TT5,GHJ5,''+'45%﹡→('+NUMTOSTR(GHJ5,2)+' '+'← *'),ALIGN2,ColorffFFff,pxUP8;
DRAWTEXT(TT5,GHJ6,''+'50%﹡→('+NUMTOSTR(GHJ6,2)+''+'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,ColorfffFFF,pxDN2;
DRAWTEXT(TT5,GHJ7,''+'55%﹡→('+NUMTOSTR(GHJ7,2)+' '+'← *'),ALIGN2,ColorffFFff,pxUP8;
DRAWTEXT(TT5,GHJ8,''+'61.8%﹡→('+NUMTOSTR(GHJ8,2)+''+'￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,Color00FFff,pxDN2;
DRAWTEXT(TT5,GHJ9,''+'80.9%﹡→('+NUMTOSTR(GHJ9,2)+''+'￣￣￣￣￣￣￣￣'),ALIGN2,Color00FFff,pxDN2;
D1:=HH-dd;
D2:=D1/hh*100;
Dz2:=D1/dd*100;
D3:=HH-L;
D4:=D3/HH*100;
D5:=HH-c;
D6:=D5/HH*100;
D7:=H-dd;
D8:=D7/dd*100;
D9:=C-dd;
D10:=D9/dd*100;
GH1:=dd+(HH-dd)*1.55;
GH2:=dd+(HH-dd)*1.618;
GH3:=dd+(HH-dd)*1.667;
GH4:=dd+(HH-dd)*1.75;
GH5:=dd+(HH-dd)*1.809;
GH6:=dd+(HH-dd)*1.875;
DRAWTEXTEX(TT4,0,327,1,'【突破后空间】55%:('+NUMTOSTR(GH1,2)+' 元)--0.618:('+NUMTOSTR(GH2,2)+' 元)--2/3('+NUMTOSTR(GH3,2)+' 元)'),Coloraaaaaa;
DRAWTEXTEX(TT4,0,327,16,' 6/8:('+NUMTOSTR(GH4,2)+' 元)--0.809:('+NUMTOSTR(GH5,2)+' 元)--7/8('+NUMTOSTR(GH6,2)+' 元)'),Color00bb00;
STICKLINE(TA1,gg,dd,0,0),LINETHICK0,COLORFFAAAA;
DRAWTEXT((BARPOS = SYSPARAM(1)),dd,'▲'),ALIGN0,color00FFdd,pxdn5;
DRAWTEXT(TA1,SYSPARAM(4),'\n \n \n \n \n \n \n \n ★交易天:'+NUMTOSTR(T1[SYSPARAM(1)],0)+'(天) / '+'◆自然天:'+NUMTOSTR(T2[SYSPARAM(1)],0)+'(天) '),COLORbbbbbb,PXDN107,align2;
DRAWTEXT(TA1,SYSPARAM(4),' \n \n \n \n \n \n \n \n 阶段高（'+NUMTOSTR(HH,2)+' 元）'+'\n ----至 ---'+ '\n K线低（'+NUMTOSTR(YD,2)+' 元）'+''),COLOR00ee00,PXDN107,align2;
//DRAWTEXT(TA1,SYSPARAM(4),' \n \n \n \n \n \n \n \n ' +' \n \n \n 【创于09.08.02 草根】'),COLORFFFFFF,PXDN107,align2;
A:=SYSPARAM(1);
VERTLINE(BARPOS=A),pointdot,color996666,shift4;
VERTLINE(BARPOS=A),POINTDOT,color996666,shift7;
VERTLINE(BARPOS=A),POINTDOT,color996666,shift12;
VERTLINE(BARPOS=A),POINTDOT,color996666,shift20;
VERTLINE(BARPOS=A),POINTDOT,color996666,shift33;
VERTLINE(BARPOS=A),POINTDOT,color996666,shift54;
VERTLINE(BARPOS=A),POINTDOT,color996666,shift88;
VERTLINE(BARPOS=A),POINTDOT,color996666,shift143;
VERTLINE(BARPOS=A),POINTDOT,color996666,shift232;
DRAWTEXT(BARPOS=A,SYSPARAM(5),'天数'+NUMTOSTR(T1[SYSPARAM(1)],0)+' '),Color0095BC,align2,pxup50;
DRAWTEXT(BARPOS=A,SYSPARAM(5),'5'),Color0095BC,shift4,pxup50;
DRAWTEXT(BARPOS=A,SYSPARAM(5),'8'),Color0095BC,shift7,pxup50;
DRAWTEXT(BARPOS=A,SYSPARAM(5),'13'),Color0095BC,shift12,pxup50;
DRAWTEXT(BARPOS=A,SYSPARAM(5),'21'),Color0095BC,shift20,pxup50;
DRAWTEXT(BARPOS=A,SYSPARAM(5),'34'),Color0095BC,shift33,pxup50;
DRAWTEXT(BARPOS=A,SYSPARAM(5),'55'),Color0095BC,shift54,pxup50;
DRAWTEXT(BARPOS=A,SYSPARAM(5),'89'),Color0095BC,shift88,pxup50;
DRAWTEXT(BARPOS=A,SYSPARAM(5),'144'),Color0095BC,shift143,pxup50;
DRAWTEXT(BARPOS=A,SYSPARAM(5),'233'),Color0095BC,shift232,pxup50;
//添加到参数精灵
{
--------黄金线调整--------
峰顶 高 Param#1 手动调节任意波幅顶点（即交易天数）;
回调 XS Param#2 调1时，计算K线低到任意顶点区间价位;
穿越 调 Param#3 调1-2时，计算上或下破点后区间价位;
--------均 价 线--------
均线 EMA Param#4 手动调节任意均线周期;
均线2 F1 Param#5 手动调节任意均线周期;
均线3 F2 Param#6 手动调节任意均线周期;
--------启用均线角度值--------
角=1 Param#7 对应均线2 F1; *角=0时是分位价
角2=1 Param#8 对应均线3 F2;

 

{白沙分时抓涨停}

INPUT:N(1000),TT(2);
流通:FINANCE(7)/10000,LINETHICK0,PRECISION2,colorFFFF00;
系数:=IF(流通>=10,1,IF(流通<10,0.75,0));
门限:=流通*系数/10*N;
主动买入:=SUM(BUYVOL,0);
主动卖出:=SUM(SELLVOL,0);
买卖差:=主动买入-主动卖出;
大单买:=IF(BUYVOL>=门限,BUYVOL,0);
大单卖:=IF(SELLVOL>门限,SELLVOL,0);
大单买入:=SUM(大单买,0);
大单卖出:=SUM(大单卖,0);
小单买入:=主动买入-大单买入;
小单卖出:=主动卖出-大单卖出;
DRAWTEXTEX(DYNAINFO(7),1,20,70,'■ 大单买入: '+NUMTOSTR(大单买入,0)),LINETHICK2,colorFF;
DRAWTEXTEX(DYNAINFO(7),1,300,70,'占:'+NUMTOSTR(FLOOR(大单买入/(主动买入+主动卖出)*100),0)+'%'),LINETHICK2,colorFF;
DRAWTEXTEX(DYNAINFO(7),1,20,130,'■ 大单卖出: '+NUMTOSTR(大单卖,0)),LINETHICK2,colorFF00;
DRAWTEXTEX(DYNAINFO(7),1,300,130,'占:'+NUMTOSTR(FLOOR(大单卖出/(主动买入+主动卖出)*100),0)+'%'),LINETHICK2,colorFF00;
DRAWTEXTEX(DYNAINFO(7),1,20,190,'■ 小单买入: '+NUMTOSTR(小单买入,0)),LINETHICK2,colorFF00FF;
DRAWTEXTEX(DYNAINFO(7),1,300,190,'占:'+NUMTOSTR(FLOOR(小单买入/(主动买入+主动卖出)*100),0)+'%'),LINETHICK2,colorFF00FF;
DRAWTEXTEX(DYNAINFO(7),1,20,240,'■ 小单卖出: '+NUMTOSTR(小单卖出,0)),LINETHICK2,colorFFFF00;
DRAWTEXTEX(DYNAINFO(7),1,300,240,'占:'+NUMTOSTR(FLOOR(小单卖出/(主动买入+主动卖出)*100),0)+'%'),LINETHICK2,colorFFFF00;
VARA:=IF(BUYVOL<=REF(ASKVOL(1),1)+REF(ASKVOL(2),1)+REF(ASKVOL(3),1) AND CLOSE>=REF(ASKPRICE(3),1),BUYVOL,0);
上扫单:=SUM(INTPART(IF(VARA>100 AND VARA<500 OR VARA>=500,BUYVOL,0)),0);
VARB:=IF(SELLVOL<=REF(BIDVOL(1),1)+REF(BIDVOL(2),1)+REF(BIDVOL(3),1) AND CLOSE<=REF(BIDPRICE(3),1),SELLVOL,0);
下扫单:=SUM(INTPART(IF(VARB>100 AND VARA<500 OR VARB>=500,SELLVOL,0)),0);
DRAWTEXTEX(DYNAINFO(7),1,20,300,'■ 上扫单: '+NUMTOSTR(上扫单,0)),LINETHICK2,colorFF;
DRAWTEXTEX(DYNAINFO(7),1,20,360,'■ 下扫单: '+NUMTOSTR(下扫单,0)),LINETHICK2,colorFFFF00;
DRAWTEXTEX(DYNAINFO(7),1,20,420,'■ 买卖差: '+NUMTOSTR(买卖差,0)),LINETHICK2,colorFF00;
TST:=OPENMINUTES(TIME);
CLOSE=DYNAINFO(7);
总量:=SUM(VOL,TST);
总额:=SUM(AMOUNT,TST);
均价:总额/(总量*100),LINETHICK0;
次数:COUNT(CLOSE>均价,TT),LINETHICK0;
占比:次数/TST*100,LINETHICK0;
分时强势:DRAWICON(CROSS(CLOSE,均价) AND CLOSE>均价 AND 占比>80 AND TST>5,CLOSE*0.99,10);
PK:=VOL*(OPEN+CLOSE+HIGH+LOW)/4;
PK1:=IF(VOL>0,PK/VOL,(OPEN+CLOSE+HIGH+LOW)/4);
C11:=PK1;
A01:=(C11-LLV(C11,75))/(HHV(C11,75)-LLV(C11,75));
A11:=SMA(A01,13,1);
A21:=SMA(A11,13,1);
A31:=3*A11-2*A21;
A41:=2*A31-0.5;
ZS:DYNAINFO(3)*0.92;
K1:=IF(1,C11*(1-(A41-A21)/40),0);
K2:=CROSS(C11,K1) AND CLOSE/REF(CLOSE,1)<1.03 AND SUM(BUYVOL,5)>=3000 AND 主动买入>主动卖出*1.15;
K3:IF(K2,ZS*1.03,ZS),colorFF00;
LB:=SUM(VOL,0)*240/DYNAINFO(38)/BARSCOUNT(CLOSE);
PK:=IF(TIME>=93100,BUYVOL,0);
A1:=CLOSE>=REF(HHV(HIGH,100),1);
A2:=BUYVOL>260 AND SUM(BUYVOL,6)>3600;
A3:=TIME>94000 AND TIME<145000;
A4:=CLOSE/REF(LLV(LOW,1200),1)<=1.07 AND CLOSE>=OPEN;
A5:=BUYVOL>REF(HHV(PK,100),1);
A6:=主动买入>主动卖出*1.18;
DRAWTEXT(LB<3 AND A1 AND A2 AND A3 AND A4 AND A5 AND A6,CLOSE*1.99,'一箭封喉');

分时抓涨停
BU:=BARSLAST(CLOSE=HHV(CLOSE,2000));
SE:=BARSLAST(CLOSE=LLV(CLOSE,2000));
KK1:=SE;
KK2:=BU;
LM1:=SE;
LM2:=BU;
OK:=KK1>KK2
AND LM1>LM2;
OK1:=KK1>KK2 AND LM1<LM2;
NOK:=KK2>KK1 AND
LM2>LM1;
NOK1:=KK2>KK1 AND
LM2<LM1;
DRAWICON(CROSS(KK1,KK2),OPEN*1,1);
DRAWTEXT(CROSS(KK1,KK2),OPEN*0.99,'抓'),colorFF00;
A:POLYLINE(CLOSE<COST(50),COST(20)),POINTDOT,color8800;
B:POLYLINE(CLOSE<COST(50),COST(80)),POINTDOT,color66CC00;
T:=OPENMINUTES(TIME);
CLOSE=DYNAINFO(7);
总量:=SUM(VOL,T);
总额:=SUM(AMOUNT,T);
均价:=总额/(总量*100);
次数:=COUNT(CLOSE>均价,T);
占比:=次数/T*100;
分时强势:DRAWICON(CROSS(CLOSE,均价)
AND CLOSE>均价 AND 占比>80 AND
T>5,CLOSE*0.985,4);
DRAWTEXT(CROSS(CLOSE,均价) AND CLOSE>均价 AND 占比>80
AND
T>5,CLOSE*0.98,'涨价'),colorFFFF;
VAR1:=AMOUNT/VOL/100;
VAR2:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
VAR3:=SUM(AMOUNT,5)/VAR1/100;
VAR4:=SUM(AMOUNT,13)/VAR1/100;
VAR5:=SUM(AMOUNT,34)/VAR1/100;
CYC5:=DMA(VAR2,VOL/VAR3);
CYC13:=DMA(VAR2,VOL/VAR4);
CYC34:=DMA(VAR2,VOL/VAR5);
CYC∞:=DMA(VAR2,VOL/CAPITAL);
一剑封喉:=CROSS(CLOSE,MA(CLOSE,13))
AND CROSS(CLOSE,MA(CLOSE,34)) AND
CROSS(CLOSE,MA(CLOSE,55));
A1:=(CLOSE-LLV(LOW,22))/(HHV(HIGH,22)-LLV(LOW,22))*100;
A2:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
A:=3*SMA(A1,5,1)-2*SMA(SMA(A2,5,1),3,1),POINTDOT,color8800;
YNGS:=一剑封喉
AND A<30;
DRAWICON(一剑封喉 AND A<30,LOW*0.985,10);
DRAWTEXT(一剑封喉 AND
A<30,LOW*0.98,'停'),colorFF;
昨收:=DYNAINFO(3);
HH:=DYNAINFO(5);
LL:=DYNAINFO(6);
FK:=MAX(HH-昨收,昨收-LL);
ZS:=昨收-FK*1.01;
Q1:=昨收-FK*1.012;
Q2:=昨收-2*FK*1.012;
Q3:=昨收-3*FK*1.01;
RSV:=((CLOSE-LLV(LOW,240))/(HHV(HIGH,240)-LLV(LOW,240))*200-100)/2;
K:=SMA(SMA(RSV,18,1),3,1);
D:=MA(EMA(K,18),3);
J:=3*K-2*D;
空头:=-3*K-2*D;
DIFF:=EMA(CLOSE,240)-EMA(CLOSE,240)*100;
DEA:=EMA(DIFF,18);
多头MACD:=(-3*(DIFF-DEA))*2;
ZD:=HHV(多头MACD,0);
ZX:=LLV(多头MACD,0);
CZ:=(Q2-Q3)/6;
FILLRGN(1,昨收-2*FK*1.015,昨收-3*FK*1.01),color10000;
Q1,LINETHICK2,colorCC;
Q2-CZ,POINTDOT,colorCC;
Q2-2*CZ,POINTDOT,colorCC;
Q2-3*CZ,POINTDOT,colorCC;
Q2-4*CZ,POINTDOT,colorCC;
Q2-5*CZ,POINTDOT,colorCC;
FDM:=MAX(ABS(ZD),ABS(ZX))*1.5;
RB:=(Q2+Q3)/2+2*(Q2-Q3)/3/FDM*多头MACD;
STICKLINE(多头MACD>0,RB,(Q2+Q3)/2,2,1),LINETHICK2,colorFF;
STICKLINE(多头MACD<0,RB,(Q2+Q3)/2,2,1),LINETHICK2,colorFF00;
短买:IF(CROSS(K,D)
AND
K>0,(Q2+Q3)/2+(Q2-Q3)/4,(Q2+Q3)/2),LINETHICK2,colorFF00FF;
突击:IF(CROSS(多头MACD,空头)
AND
多头MACD>0,(Q2+Q3)/2+(Q2-Q3)/4,(Q2+Q3)/2),LINETHICK2,colorFFFF;
DRAWICON(CROSS(K,D)
AND K>0,RB,1),ALIGN1;
DRAWTEXT(CROSS(K,D) AND
K>0,(Q2+Q3)/2+(Q2-Q3)/3,'短买'),colorFF0000;
DRAWTEXT(CROSS(多头MACD,空头) AND
多头MACD>0,(Q2+Q3)/2+(Q2-Q3)/3,'突击'),colorFFFF00;
KK:=DATE<1341231;
PK:=VOL*(OPEN+CLOSE+HIGH+LOW)/4;
PK1:=IF(VOL>0,PK/VOL,(OPEN+CLOSE+HIGH+LOW)/4);
C11:=PK1;
A01:=(C11-LLV(C11,75))/(HHV(C11,75)-LLV(C11,75));
A11:=SMA(A01,13,1);
A21:=SMA(A11,13,1);
A31:=3*A11-2*A21;
A41:=2*A31-0.5;
ZS:=DYNAINFO(3)*0.95;
选1:=IF(KK,C11*(1-(A41-A21)/40),0);
选2:=CROSS(C11,选1)
AND CLOSE/REF(CLOSE,1)<1.03;
选3:IF(选2,ZS*1.03,ZS),colorFF00;
{明关键价位}
c1:=ref(c,1);
c2:=hhv(c1,2);
c3:=llv(c1,1);
et:=hhv(c1,2);
et1:=ref(et,1);
xb:=llv(c1,1);
xb1:=ref(xb,1);
m:=BARSLAST(c<xb and c1>=xb1);
m11:=ref(m,1);
n9:=BARSLAST(c>et and c1<=et1);
n1:=ref(n9,1);
m21:=BARSLAST(m-n9>0 and m11<=n1)+1;
n2:=BARSLAST(n9-m>0 and n1<=m11)+1;
et2:=hhv(et,m21);
xb2:=llv(xb,n2);
a:=if(m-n9>0 and m11<=n1,1,if(n9-m>0 and n1<=m11,0,2));
h1:=if(m-n9>0,c,et2);
h2:=if(a=1,c,c2);
h3:=if(m-n9<0,c,xb2);
h4:=if(a=1,c,xb2);
h5:=if(m-n9>0 or a=1,c,h3);
明关键价位:ref(h5,1);{公称名称: 一剑封喉}
A1:=IF(BUYVOL,V,10000);//取主动性买盘，你可用自己的条件！
A2:=IF(SELLVOL,V,0);//取主动性卖盘，你可用自己的条件！
ZS:=DYNAINFO(3)*0.92;
K1:=(SUM(A1,0)/SUM(V,0));
K2:=(SUM(A2,0)/SUM(V,0));
K3:(((K1*0.35)+ZS)+((K2*0.35)+ZS))/2,POINTDOT;
KK1:IF(K1 ,(K1*0.35)+ZS,ZS),COLORGREEN;
KK30:IF(K2,(K2*0.35)+ZS,ZS),COLORMAGENTA;

 

 

愿赌服输分时

 

p40:=MIN(COUNT( vol,0 )-1,40 );
p80:=MIN(COUNT( vol,0 )-1,80 );
A1:=AMOUNT/VOL/100;
A2:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
A3:=SUM(AMOUNT,p40)/A1/100;
A4:=SUM(AMOUNT,p80)/A1/100;
B1:=DMA(A2,VOL/A3);
B2:=DMA(A2,VOL/A4);
B3:=(CLOSE-B1)/B1*100;
B4:=(CLOSE-B2)/B2*100;
控盘:3,COLOR00ffff,LINETHICK1;
高点:7,COLORFF6600;
风险:-3,COLOR00ee00,LINETHICK2;
低点:-6,COLORCCFF33;
现价:C,LINETHICK0;
{
DRAWTEXT(ISLASTBAR AND C,4,  愿赌服输四段分时),COLOR0000BB;
DRAWTEXT(ISLASTBAR AND C,3,  操作选择正确时段),COLOR0000BB;
DRAWTEXT(ISLASTBAR AND C,2,  黄线上方谨慎看多),COLOR0000BB;
DRAWTEXT(ISLASTBAR AND C,-1.5,  绿线下方保持警惕),COLOR0000BB;
DRAWTEXT(ISLASTBAR AND C,-2.5,  严格遵守操作纪律),COLOR0000BB;
DRAWTEXT(ISLASTBAR AND C,-3.5,  心态平衡投资顺利),COLOR0000BB;
}
均价:SUM(现价*V,240)/SUM(V,240),COLORYELLOW,LINETHICK0;
回调认同:EMA(WMA(C,20),13),LINETHICK0;
分时压力:MA(REF(HHV(C,30),1),2),LINETHICK0;
分时支撑:MA(REF(LLV(C,30),1),2),LINETHICK0;
STICKLINE(FILTER(C,60)>0,高点,低点,0.5,0),COLOR000088;
STICKLINE(B4>0,0,B4+2,4,0),COLOR00ffff;
STICKLINE(B3>0,0,B3+2,4,0),COLOR0000aa;
STICKLINE(B3<=0,0,B3-2,4,0),COLOR00aa00;

 

 

分时机密指标

 

V1:=(C*2+H+L)/4*10;
V2:=EMA(V1,13)-EMA(V1,34);
V3:=EMA(V2,5);
V4:=2*(V2-V3)*5.5;
庄秘撤: IF(V4<=0,V4,0),COLOR00FF00,LINETHICK2;
庄秘进: IF(V4>=0,V4,0),COLORFF00FF,LINETHICK2;
V5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8;
V6:=EMA(3*V5-2*SMA(V5,18,1),5);
V7:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10;
V8:=(INDEXC*2+INDEXH+INDEXL)/4;
V9:=EMA(V8,13)-EMA(V8,34);
VA:=EMA(V9,3);
VB:=(V9-VA)/2;
大筹金进场: IF(VB>=0,VB,0),COLORYELLOW,LINETHICK2;
大筹金撤走: IF(VB<=0,VB,0),COLORBLUE,LINETHICK2;
aa:=WINNER(CLOSE+CLOSE*15/100)*100;
bb:=WINNER(CLOSE+CLOSE*0/100)*100;
cc:=aa-bb;
dd:=(WINNER(CLOSE-CLOSE*0.1/100)-WINNER(CLOSE-CLOSE*15/100))*100;
ee:=cc<3 and dd<0.5 and OPEN<>LOW;
a1:=DYNAINFO(6);
a2:=IF(LOW>a1,0,IF(HIGH<a1,1,(a1-LOW+0.01)/(HIGH-LOW+0.01)));
a3:=VOL/WINNER(LOW);
a4:=REF(HHV(CLOSE,120),1);
a5:=REF(LLV(CLOSE,120),1);
a6:=100*(CLOSE-a5)/(a4-a5);
a7:=a2>0 or a2=1;
a8:=a7 and a3/REF(a3,3)>=3 and a6<80;
a9:=REF(a8,1) or REF(a8,2) or REF(a8,3) or REF(a8,4);
a10:=a8 and a9;
a11:=IF(FILTER(a8,3),5,0);
a12:=IF(FILTER(a10,3) or ee,10,0);
筹码进场日:IF(a11,8,0),LINETHICK0;
STICKLINE(a12,0,15,5,0),colorff00ff;
筹码加仓日:IF(a12,88,0),LINETHICK0;
STICKLINE(a12,0,15,5,0),colorff00ff;
STICKLINE(a11,0,5,5,0),colorff7700;
STICKLINE(a11,0,5,4.5,0),colorff8800;
STICKLINE(a11,0,5,4,0),colorff9900;
STICKLINE(a11,0,5,3.5,0),colorffaa00;
STICKLINE(a11,0,5,3,0),colorffbb00;
STICKLINE(a11,0,5,2.5,0),colorffcc00;
STICKLINE(a11,0,5,2,0),colorffdd00;
STICKLINE(a11,0,5,1,0),colorffee00;
STICKLINE(a12,0,15,4.5,0),color102099;
STICKLINE(a12,0,15,4,0),color1020aa;
STICKLINE(a12,0,15,3.5,0),color1020bb;
STICKLINE(a12,0,15,3,0),color1020cc;
STICKLINE(a12,0,15,2.5,0),color1020dd;
STICKLINE(a12,0,15,2,0),color1020ee;
STICKLINE(a12,0,15,1,0),color1020ff;
DRAWTEXT(a11,8,'筹码进场');
DRAWTEXT(a12,17,'筹码加仓');
Var1:=REF(LOW,1);