UP:=IF(REF(C,1)<=REF(C,2),C>=REF(C,1),C>=REF(O,1));
DN:=IF(REF(C,1)>=REF(C,2),C<=REF(C,1),C<=REF(O,1));
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=R
DRAWGBK(1,COLORRGB(20,20,110),COLORRGB(0,0,50),1);
TBS:=POW(10,ABS(LOG(MINDIFF)));
//半月线
YB:=MOD(DAY,15)<REF(MOD(DAY,15),1)OR DATETOD1970(DATE)-REF(DATETOD1970(DATE),1)>14 OR BARPOS=1;
w:BARSLAST(YB),LINETHICK;
dg:=w=0
DRAWGBK(1,COLORRGB(30,60,150),COLORRGB(255,255,255),1);
VAR1:=EMA(CLOSE,3);
VAR2:=EMA(CLOSE,8);
MA5:=MA(CLOSE,5);
MA21:=EMA(CLOSE,21);
STICKLINE((VAR1 < MA21),CLOSE,OPEN,9,0),colorFF3300;
STICKLINE((VAR1 < MA21),C
利用“K线解盘模块”,把几种常用的“K线组合”形式标示在K线图上,并把“翻倍黑马”均线汇同一起,合成一个飞狐主图。
MA5:MA(C,5)COLORRED;
MA24:MA(C,24)COLORWHITE;
MA72:MA(C,72)COLORYELLOW;
MA200:MA(C,200)COLORGREEN;
{K线}
STICKLINE(CLO
DRAWGBK(1, COLORRGB(30,15,35) ,COLORRGB(50,50,90),1);
t85:=(85/40-1)*(ma(c,30)/20)*2.5+c,color888800;
t73:=(73/40-1)*(ma(c,30)/20)*2.5+c,color008888;
t60:=(60/40-1)*(ma(c,30)/20)*2.5+c,color880088;
t20:=(20/40-1)*(ma(c,30)/20)*2.5+
三线:C>Ref(C,1) and Cross(C,Ma(C,5)) and Cross(C,Ma (C,10)) and
Cross(C,Ma(C,20)),colorgreen;
四线:C>Ref(C,1) and Cross(C,Ma(C,5)) and
Cross(C,Ma (C,10)) and Cross(C,Ma(C,20)) and Cross(C,Ma(C,30)),coloryellow;
五线:C>Ref(C,1) a
TBS:=POW(10,ABS(LOG(MINDIFF)));
jqd:=LSOLARTERMday(date);
fd:=date;
tj:=(jqd-ref(jqd,1)<>DATEDIFF(ref(fd,1),fd))*((month)*2-(jqd>day)-(day<=16));
Jw:BARSLAST(tj),LINETHICK;
Jdg:=Jw=0 or ISLASTBAR;
Jwx:=0*C;
工作线:EMA(CLOSE,7),COLORRED,LINETHICK2;
工作线2:EMA(CLOSE,14),LINETHICK2;
九号线:=EMA(CLOSE,18);
暴涨线:=MA(CLOSE,181);
牛:=EMA(CLOSE,144)>=REF(EMA(CLOSE,144),1);
DRAWTEXT((工作线2>=REF(工作线2,1) AND
L<工作线2 AND C>工作线2) ,L,
pv:=INDEXV;
lb1:=v/ref(ma(v,5),1);lb2:=pv/ref(ma(pv,5),1);
a1:=lb1>lb2;a2:=lb1<lb2;
a3:=lb1>1.3*lb2 and lb1<=2*lb2;a4:=lb1>2*lb2;
a5:=lb2>1.3*lb1 and lb2<=2*lb1;a6:=lb2>2*lb1;
低于大盘:STICKLINE(a2,
gdxd:=(SYSPARAM(4)-SYSPARAM(5));
{主力操盘轨迹}
RSV:=(((CLOSE - LLV(LOW,36)) / (HHV(HIGH,36) - LLV(LOW,36)))*gdxd)+SYSPARAM(5);
Y0:SMA(RSV,7,1);
Y1:SMA(SMA(RSV,7,1),3,1);
Y3:SMA(Y0,7,1),COLORGREEN;
//立体K线
STICKLI
ma6:ma(c,6),colorwhite,linethick2;
ma18:ma(c,18),color0099ff,linethick2;
ma55:ma(c,55),colorff00FF;
ma125:ma(c,125),colorffcc66;
ma250:ma(c,250),colorblue;
TY:=C;
A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BA
均价:=(2*C+(H-L)/2+L+o)/4;
价差:=SUM(均价-REF(均价,1),2)/2;
高低:=(均价+价差);
实价:=(高低+均价)/2;
M24:=SMA(FORCAST(实价,32),32,2);
M26:=SMA(FORCAST(均价,32),32,2);
VAR1:=(M24+M26)/2;
开:=(O-VAR1);高:=(H-VAR1);
低:=(L-VAR1);收:(C-VAR1
DIFF:=(EMA(CLOSE,12) - EMA(CLOSE,26));
DEA:=EMA(DIFF,2);
MACD:=(2 * (DIFF - DEA));
A1:=(REFX((DIFF > DEA),1) AND (DIFF < DEA));
A3:=(REFX((DIFF < DEA),1) AND (DIFF > DEA));
STICKLINE((DIFF > DEA),HIGH,LO
N:=5;
开:SMA(MAX(O-REF(O,1),0),6,1)/SMA(ABS(O-REF(O,1)),6,1)*100 LINETHICK0;
高:SMA(MAX(H-REF(H,1),0),6,1)/SMA(ABS(H-REF(H,1)),6,1)*100 LINETHICK0;
低:SMA(MAX(L-REF(L,1),0),6,1)/SMA(ABS(L-REF(L,1)),6,1)*100 LINETHICK0;
收:SMA(MAX(C-REF
差:=((c-REF(c,1))*0.382+(C-O)*0.618)*0.382;
均价:=(2*C+(C+H+L+O)/4+O)/4;
R:=(2*L+3*均价)/5;R1:=(2*H+3*均价)/5;
CCI:=((R+R1)/2-MA((R+R1)/2,36))/(0.015*AVEDEV((R+R1)/2,36))/4+50;
DRAWGBK(CCI>=25 AND CCI<50,COLORRGB(30,30,30),COLORRGB(
JJ:=((o+c+l+h)/4)linethick0;
ZZ:=(AMOUNT/vol/100)linethick0;
风卷残云:=ref(C<ref(C,2),1)and ref(C<O,2)AND C>REF(h,1)AND ref(O>ref(C,2),4)and C>O ;
JP1:=IF(风卷残云>0,'风卷残云','');
映日荷花:=O<ref(C,1)AND C>ref(jj,1)and C
N:=6;
大K:REF((C+H+l)/3,BARSLAST(ABS(c-ref(C,1))/ref(C,1)*100>N)),COLORYELLOW;
倍V:REF((C+H+l)/3,BARSLAST((V)/ref(V,1)>=2)),CROSSDOT;
N:=19;
oo:=REF(o,n);
cc:=C;
HH:=REF(hhv(H,n),1);
LL:=REF(LLV(L,n),1);
STICKLINE(ISLASTBAR=1 AND CC>OO,OO,CC,N*20+10,1),COLORRED,LINEDOT;
STICKLINE(ISLASTBAR=1 AND CC<OO,OO,CC,N*20+10,1),COLORCYAN,LINEDOT;
ST
INPUT:N(5,1,100);
fc:=c;fo:=o;cc:0*c,PRECISION4,LINETHICK0;oo:0*c,PRECISION4,LINETHICK0;t1:=0*c;t2:=0*c;
for i=1 to datacount do begin
if i=1 and fc[i]>fo[i] then
cc[i]:=fc[i];
oo[i]:=fc[i];
if i=1 and fc[i]<fo[i]
MAc:=(WMA(c,30)+WMA(c,60)+WMA(c,90))/3;
MAh:=(WMA(h,30)+WMA(h,60)+WMA(h,90))/3;
MAl:=(WMA(l,30)+WMA(l,60)+WMA(l,90))/3;
MAo:=(WMA((o+ref(C,1))/2,30)+WMA((o+ref(C,1))/2,60)+WMA((o+ref(C,1))/2,90))/3;
FILLRGN(MAC>=MAO,maH,maL),COL