霍建华合影猥琐:理想个人专辑(王照华专辑)
来源:百度文库 编辑:九乡新闻网 时间:2024/07/07 11:36:58
理想个人专辑(王照华专辑)
2010-03-20 13:25:56| 分类: 通达信 | 标签: |字号大中小 订阅
感谢斑竹的呵护----再发一套好的
一个指标叫[魔王神探],没有未来函数!还有一个是很简单的[薛斯通道]优化过!
把这两个指标结合起来使用!效率极高![薛斯通道]的信号本身就比较多![魔王神探]的信号也比较频繁!
使用方法!当[魔王神探]出现信号后,![薛斯通道]的DX小于DN的数值就是买点,一般要收盘后才可以确认!记住一定要收盘后才可以确认!切记切记!在第二天上午开盘就买进!不要犹豫!
这个方法我一直在用,效果不错收益非浅!实战效果相当好!希望大家仔细琢磨!不要过于迷恋什么新的指标!现在新的指标大多是以前的老指标改的!
下面有图!大家可以自己仔细的琢磨和验证!
ST的股票不能用这个指标!强调不要用它做ST股票!
{薛斯通道: 参数 P: 34 10 55}
{Var1://时间限制已去掉
}
Var2:=CLOSE*VOL;
Var3:=EMA((MA(Var2,4)/MA(VOL,4)+MA(Var2,6)/MA(VOL,6)+MA(Var2,13)/MA(VOL,13)+MA(Var2,24)/MA(VOL,24))/4,1);
TX: 1.08*Var3, POINTDOT;
DX: Var3*0.92, POINTDOT;
Var4:=EMA(CLOSE,P);
UP: MA(Var4*1.18,5);
DN: MA(Var4*0.82,5);
STICKLINE(DN>DX,OPEN,CLOSE,10,1), COLORWHITE;
STICKLINE(DN=DX,OPEN,CLOSE,10,1), COLORWHITE;
STICKLINE(DN>DX,LOW,OPEN,0.8,1), COLORWHITE;
STICKLINE(DN=DX,LOW,OPEN,0.8,1), COLORWHITE;
STICKLINE(DN>DX,CLOSE,HIGH,0.8,1),COLORWHITE;
STICKLINE(DN=DX,CLOSE,HIGH,0.8,1),COLORWHITE;
{魔王神探}
相对胜率:=abs((cost(50)-c)/c*100);
庄筹线:=ema(winner(c)*70,5);
a1:=(c-ref(c,13))/c*100;
飞狐神探:=a1;
有短线资金入场:if(相对胜率>50 and 庄筹线<2 and a1<=-14,a1,0),stick,;
注意减仓了:if(相对胜率<10 and a1>=21,a1,0),stick,colorff0000;
0;
=================================================================
庆祝理想胜利-----发“别样红-超敢死队核心”
公式提醒:
1.黄线绿线均在粉红线上为超卖。要空仓休息!
2.黄线下穿粉红线可进货或者绿线下穿黄线且黄线向下可少量进货!
3.黄线向下可不理会绿线的走势,安心持股。
4.黄线绿线均在兰线以下为超买。注意黄线走向,一但黄线拐头向上,
减仓为上!
5.绿线上穿兰线或者上穿黄线可出货!
马快还得骑术好,好骑术不是人人都掌握,包括马的主人。
input:n(30,2,100),m(5,2,10);
Var4:=(HIGH*1.1*V+REF(H,1)*1.1*(CAPITAL-V))/CAPITAL;
Var7:=(L*0.9*V+REF(L,1)*0.9*(CAPITAL-V))/CAPITAL;
Var8:=EMA(Var7,30);{成本下限加上跌停的30日指数平滑均线}
Var9:=EMA(Var4,30);{成本上限加上涨停的30日指数平滑均线}
VarA:=Var9-2;{减去2与减去任何小于Var9 的数对公式来讲都无所谓(随机)}
VarB:=IF(CLOSE<=Var8,VarA,Var9);{公式关键:小于下限 别样}
超卖: VarA,ColorFF00FF;
bb:VarB*(HHV(H,N)-C)/(HHV(H,N)-LLV(L,N)),Color00FF00;//揉进了威廉指标
CC:SMA(bb,5,1),Color00FFFF,LINETHICK2;
超买:VarB/m,ColorFFFF00;
PARTLINE(CLOSE<=Var8,bb),COLORred,LINETHICK1;
=============================================================
根据一位网友的好文而作----量能解盘
网友的好文:
换手率实战分析
主力吸筹往往在筹码分布上留下一个低位密集区。在大多数情况下,主力完成低位吸筹之后并不急于拉抬,甚至主力要把股价故意再作回到低位密集区的下方,因为这个地方市场基本没有抛压,所有投资者处在浅套状态,护盘相对容易一些。一旦时机成熟,主力从低位密集区的下方首先将股价拉抬到密集区的上方,形成对筹码密集区的向上穿越,这个穿越过程极易的持仓状况,如果主力巨量持仓的话,盘面上就不会出现太多的解套抛压。即股价上穿密集区而呈现无量状况,这个时候我们就知道该股已由主力高度持仓了。
技术上我们必须对“无量”这个市场特征给出较明确的参考标准:
即用换手率来精确估计成交量。
通常我们不单纯使用成交量这个技术参数,因为股票的流通盘有大有小,同样的绝对成交量并不能说明这只股票是换手巨大还是基本没有换手。如每天900万股的交易,对于中国石化(600028)来说仅占其流通盘的千分之5.8,而对于胶带股份(600614),这900万股已经是它流通盘的全部了。用放量与缩量来监控获利抛压也不是一个好主意。而换手率则本质得多。
依照本人的经验,我们可以把换手率分成如下个级别:
绝对地量:换手率小于1%
成交低靡:换手率1%——2%
成交温和:换手率2%——3%
成交活跃:换手率3%——5%
带量:换手率5%——8%
放量:换手率8%——15%
巨量:换手率15%——25%
成交怪异:换手率大于25%
我们常使用3%以下这个标准,并将小于3%的成交额称为“无量”,这个标准得到广泛认同。更为严格的标准是2%。下面我们看一个例子这是综艺股份1999年3月末的K线图。当时这只股票的价格仅为8.11元
(复权价)。我们从图上可以看到该股正在从筹码密集区的下方实施向上的穿越,但它的换手率非常小,3月23日那一天的换手率仅为1.74%,属于成交低靡范畴,而在上穿筹码密集区的过程中有约60%的筹码得到了解放。于是,解套不卖的筹码占了流通盘的60%。我们由此可以认定,这60%的筹码大部分为主力所有,于是这只股票的庄家持仓量已经合格了。
该股后来的走势是众所周知的,到了2000年2月21日,该股创下了63.95元的最高价。
以上是通过筹码密集区的无量上穿来判断主力的持仓量的方法,即一旦发现筹码密集区以低靡成交量向上穿越,则被穿越的筹码大部分是主力持仓。这种估计主力持仓的方法尽管简单,但对于低位捉庄的参考价值却是巨大的。
{量能解盘}
HSL:vol/capital*100,LINETHICK0,PRECISION2,Color898987;//换手率
量能:SUM(HSL,3),PRECISION2,COLORWHITE;
RMIMA: SMA(量能,3,1),COLORGREEN;
QS: HHV(MA(量能,3),13),Color0052FF;
RS:llV(MA(量能,3),13),ColorFF8000;
涨幅:(C-REF(C,3))/REF(C,3)*100,LINETHICK0,PRECISION2,Color0089FF;
流通市值:capital*c,LINETHICK0,PRECISION0,COLORMAGENTA;//流通市值相对越小,涨幅越大,流通市值相对越大,涨幅越小
EXPLAIN(1,' 【AHFYXL解盘】'),COLORMAGENTA;
EXPLAIN(1,'---------------------------------------'),COLORWHITE;
EXPLAINEX(HSL<=1,'绝对地量--换手率=',HSL,0,2),COLORWHITE;
EXPLAINEX(HSL>=1 AND HSL<2,'实属无量--换手率=',HSL,0,2),COLORCYAN;
EXPLAINEX(HSL>2 AND HSL<3,'成交温和--换手率=',HSL,0,2),COLORGRAY;
EXPLAINEX(HSL>3 AND HSL<5,'逐渐活跃--换手率=',HSL,0,2),COLORGREEN;
EXPLAINEX(HSL>5 AND HSL<8,'初步带量--换手率=',HSL,0,2),COLORYELLOW;
EXPLAINEX(HSL>8 AND HSL<15,'终于放量--换手率=',HSL,0,2),COLORMAGENTA;
EXPLAINEX(HSL>15 AND HSL<25,'已放巨量--换手率=',HSL,0,2),COLORRED;
EXPLAINEX(HSL>=25,'成交异常--换手率=',HSL,0,2),COLORBLUE;
3,LINEDOT,COLORWHITE;
==================================================================
追马骑牛
{主图指标------追马骑牛,适用于中长线。
1.当追马线穿越神马线时买进。
2.如神牛线穿越大行情线加仓。
3.当追涨线,神马线,神牛线三线都在大行情线之上,则要庆贺你!}
年线:=EMA(C,250);
追涨:EMA(C,3),COLORGREEN;
大行情:年线-(追涨-年线),Colorff80ff;
压力:=MA(LLV(C,9)*1.1,14);
支撑:=MA(HHV(C,26)*0.9,14);
多空线:=(压力+支撑)/2;
神马: (压力+支撑)/2,COLORBLUE;
神牛:MA(LLV(C,9)*1.1,14),color0099ff;
---------------------------------------------------------------------------------------------------------------------
⊙RMI⊙----- 相对动量指数RMI---RSI的改良
由于得到版主的鼓励,特将自编的献给《理想》
这是我遍的较好用的品种之一-----能加精吗?(呵呵---开个玩笑)
使用方法:
相对动量指数RMI是对RSI的改良,与RSI相比,RMI的正负动量MTM量度设定为4而不是1,所以比RSI获利能力强,RMI与RSI的判断原则基本一致。
当RMI下穿35,说明股价进入极弱势的同时也告诉大家,股票将在弱
势区间运行;
当RMI上穿65,说明股价脱离弱势区间,进入强势区间。
RMI上穿65仅仅是个提示!!
关键点是成交量!!确定底部形成一般都是有量的,没有量说明是试探性的!
一、大盘暴跌后连绵阴跌,盘面表现为多方几乎没有还手之力;
二、下跌的时间越长越好,以25周以上为宜。
如果符合以上二个要点,当周线RMI值小于15时,可坚决介入,而且可
以基本确认离牛市的大底已经不远。
{⊙RMI⊙}
DRAWGBK(DATE>900101,COLORRGB(0,150,130),COLORRGB(0,0,0),1);
LC := REF(C,4);
RMI:SMA(MAX(C-LC,0),7,1)/SMA(ABS(C-LC),7,1)*100,ColorFF00FF;
QS: HHV(MA(RMI,3),13),Color00ADFF;
RS:llV(MA(RMI,3),13),ColorFF8000;
RMIMA: SMA(RMI,3,1),Color009C00;
安全:20,POINTDOT,ColorFFFFFF;
分界:35,POINTDOT,Color2EFF5B;
强区:65,POINTDOT,Color0000FF;
高位:80,POINTDOT,ColorCDFFFF;
PARTLINE(RMI>QS,RMI),Color0000FF;
PARTLINE(RMI
南山精品指标汇集介绍
不断添加中.......
南山K线:
aa1:=wma(c,2);//短加权均线
bb1:=ema(aa1,2);//平滑
a:=ma(bb1,3);//平均
aa2:=wma((h+c+o)/3,18);//长加权均线
dd3:=a>=aa2 and c>aa2;//短>长,且收>长
dd4:=a
Var1:=ema(c,3);
Var2:=ema(c,8);
{K线}
STICKLINE((dd4 or dd5) and o
STICKLINE((dd4 or dd5) and o>c ,c,o,7,0),Color3F8C3A;//跌势阴线
STICKLINE((dd3 or c>aa2) and o
STICKLINE((dd3 or c>aa2) and o>c,h,l,0.5,0),Colorff33ff;//涨势阴线
-----------------------------------------------------------------------
南山照妖镜2:
Var1:=AMOUNT/VOL/100;
Var2:=(Var1-REF(Var1,1))/REF(Var1,1);
Var3:=100*VOL/CAPITAL;
Var4:=Var2/Var3;
0;
Var5:=SUM(Var4,10);
Var6:=(Var5-REF(Var5,10))/REF(Var5,10);
Var7:=VOL/(HIGH-LOW);
Var8:=Var7>REF(Var7,1);
Var9:=REF(Var7,1)>REF(Var7,2);
ZYJ: IF(WINNER(CLOSE)<5/100 AND Var3>0.1 AND Var8 AND Var9,Var6,0);
-----------------------------------------------------------------------
南山老鼠:
input:变量(60,1,100);
DRAWGBK( 1,COLORRGB( 60, 60, 60),COLORRGB( 255, 255, 255),1);
A04:=SUM(IF((O < C),V,0),变量) / CAPITAL *100;
米屯:SUM(IF((C >= C),V,0),变量) / CAPITAL*100,COLORGREEN;
地平线:=A04 / 米屯 * 100.000,COLORGRAY;
米仓:STICKLINE(米屯,米屯,0,1,0),color00CC33;
土地:STICKLINE(1,地平线,0, 7, 1),COLORGRAY;
老鼠:100 * WINNER(C),COLORYELLOW;
-----------------------------------------------------------------------
南山金叉:
//kdj//
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*80+40;
K:SMA(RSV,3,1),PRECISION0,linethick1;
D:SMA(K,3,1),PRECISION0,linethick1;
J:3*K-2*D,PRECISION0,linethick1;
DRAWICON(CROSS("KDJ.K#WEEK"(9,3,3),"KDJ.D#WEEK"(9,3,3)) ,k,4);
DRAWICON(CROSS("KDJ.d#WEEK"(9,3,3),"KDJ.k#WEEK"(9,3,3)) ,k,5);
DRAWICON(CROSS("KDJ.K#MONTH"(9,3,3),"KDJ.D#MONTH"(9,3,3)) ,k,6);
DRAWICON(CROSS("KDJ.D#MONTH"(9,3,3),"KDJ.K#MONTH"(9,3,3)) ,k,7);
//macd//
DIFF : (EMA(CLOSE,12) - EMA(CLOSE,26))*100,PRECISION0,linethick1;
DEA : EMA(DIFF,9),PRECISION0,linethick1;
MACD : 2*(DIFF-DEA), COLORSTICK;
DRAWICON(CROSS("MACD.DIFF#WEEK"(26,12,9) ,"MACD.DEA#WEEK"(26,12,9)),DIFF,4);
DRAWICON(CROSS("MACD.DEA#WEEK"(26,12,9) ,"MACD.DIFF#WEEK"(26,12,9)),DIFF,5);
DRAWICON(CROSS("MACD.DIFF#MONTH"(26,12,9) ,"MACD.DEA#MONTH"(26,12,9)),DIFF,6);
DRAWICON(CROSS("MACD.DEA#MONTH"(26,12,9) ,"MACD.DIFF#MONTH"(26,12,9)),DIFF,7);
//rsi//
LC := REF(CLOSE,1);
RSI1:SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100-150,PRECISION0,linethick1;
RSI2:SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100-150,PRECISION0,linethick1;
RSI3:SMA(MAX(CLOSE-LC,0),24,1)/SMA(ABS(CLOSE-LC),24,1)*100-150,PRECISION0,linethick1;
DRAWICON(CROSS("rsi.rsi1#WEEK"(6,12,24),"rsi.rsi2#WEEK"(6,12,24)) ,RSI1,4);
DRAWICON(CROSS("rsi.rsi2#WEEK"(6,12,24),"rsi.rsi1#WEEK"(6,12,24)) ,RSI1,5);
DRAWICON(CROSS("rsi.rsi1#MONTH"(6,12,24),"rsi.rsi2#MONTH"(6,12,24)) ,RSI1,6);
DRAWICON(CROSS("rsi.rsi2#MONTH"(6,12,24),"rsi.rsi1#MONTH"(6,12,24)) ,RSI1,7);
-----------------------------------------------------------------------
南山短线:
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),5,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),10,1)/SMA(ABS(CLOSE-LC),10,1)*100;
r1:=ema(rsi1,3);
r2:=ema(rsi2,3);
r3:(r1-r2),COLORGRAY,LINETHICK2;
r4:-r3,COLORGRAY,LINETHICK2;
PARTLINE(r3>0,r3),COLORyellow,LINETHICK2;
PARTLINE(r3>0,r4),COLORyellow,LINETHICK2;
-----------------------------------------------------------------------
南山动向流:
动向流:(ma(close,3)-ref(ma(close,3),18))/ref(ma(close,3),18);
polyline(1,ma(动向流,2));
polyline(1,ma(动向流,3));
polyline(1,ma(动向流,4));
polyline(1,ma(动向流,5));
polyline(1,ma(动向流,6));
polyline(1,ma(动向流,7));
polyline(1,ma(动向流,8));
polyline(1,ma(动向流,9));
polyline(1,ma(动向流,10));
polyline(1,ma(动向流,11));
polyline(1,ma(动向流,12));
polyline(1,ma(动向流,13));
polyline(1,ma(动向流,14));
polyline(1,ma(动向流,15));
polyline(1,ma(动向流,16));
polyline(1,ma(动向流,17));
polyline(1,ma(动向流,18));
polyline(1,ma(动向流,19));
polyline(1,ma(动向流,20));
polyline(1,ma(动向流,21));
polyline(1,ma(动向流,22));
polyline(1,ma(动向流,23));
polyline(1,ma(动向流,24));
polyline(1,ma(动向流,25));
polyline(1,ma(动向流,26));
polyline(1,ma(动向流,27));
polyline(1,ma(动向流,28));
polyline(1,ma(动向流,29));
polyline(1,ma(动向流,30));
----------------------------------------------------------------------
南山彩量:
流通: CAPITAL/1000000,Linethick0;
业绩: FINANCE(33),Linethick0;
净资产: FINANCE(34),Linethick0;
收盘:c,Colorwhite,Linethick0;
var1:=high-low;
var2:=ABS(open-close );
var3:=high-if(close>open,close,o);
var4:=if(close>open,o,close)-low;
var5:=(var2/var1)*vol;
var6:=(var3/var1)*vol;
var7:=(var4/var1)*vol;
var8:=IF(VOL/CAPITAL>0.001,1,EXP(ABS(LOG(VOL/CAPITAL*100))));
var9:=(c-ma(c,5))/ma(c,5)*100;
var10:=ma(c,5)>ma(c,10) and ma(c,10)>ma(c,30) and ma(c,30)>ma(c,60);
var11:=ma(c,5)
var13:=100*WINNER(C){获利盘筹码};
多头:stickline(c>ma(c,30),0,vol,8,1),colorred;
空头:stickline(c
下攻:stickline(var5>=var6 and var5>=var7 and c
下探:stickline(var7>var5 and var7>var6,0,var7,8,0),colorff6600;
相对地量:=stickline( var8>2 and vol
drawtext(var6>var5 and var6>var7 and c>ma(c,5) and c>ma(c,30) and h>ma(c,60) and v>ma(v,5) and var6>=ma(v,5),vol,'逢高出货'),colorred;{逢高出货}
----------------------------------------------------------------------
南山背离:
A1:=BARSLAST(ref(cross("macd.diff","macd.dea"),1));
B1:=ref(c,A1+1)>c and ref("macd.diff",A1+1)<"macd.diff" and cross("macd.diff","macd.dea");
DRAWTEXT(FILTER(B1>0,5),0,'MACD'),COLORGREEN,ALIGN0;;
Stickline(FILTER(B1>0,5),-1,0,1,0),COLORGREEN;
A2:=BARSLAST(ref(cross("kdj.k","kdj.d"),1));
B2:=ref(c,A2+1)>c and ref("kdj.k",A2+1)<"kdj.k" and cross("kdj.k","kdj.d");
DRAWTEXT(FILTER(B2>0,5),0.5,'KDJ'),COLORYELLOW,ALIGN0;;
Stickline(FILTER(B2>0,5),0.5,-1,1,0),COLORYELLOW;
A3:=BARSLAST(ref(cross("RSI.RSI1","RSI.RSI2"),1));
B3:=ref(c,A3+1)>c and ref("RSI.RSI1",A3+1)<"RSI.RSI1" and cross("RSI.RSI1","RSI.RSI2");
DRAWTEXT(FILTER(B3>0,5),-0.25,'RSI'),COLORCYAN,ALIGN0;;
Stickline(FILTER(B3>0,5),-1,-0.25,1,0),COLORCYAN;
C1:=BARSLAST(ref(cross("macd.dea","macd.diff"),1));
D1:=ref(c,C1+1)
DRAWTEXT(FILTER(D1>0,5),-0.5,'MACD'),COLORwhite,ALIGN0;
Stickline(FILTER(D1>0,5),-0.5,1,1,0),COLORwhite;
C2:=BARSLAST(ref(cross("kdj.d","kdj.k"),1));
D2:=ref(c,C2+1)
DRAWTEXT(FILTER(D2>0,5),0,'KDJ'),COLORwhite,ALIGN0;
Stickline(FILTER(D2>0,5),1,0,1,0),COLORwhite;
C3:=BARSLAST(ref(cross("RSI.RSI2","RSI.RSI1"),1));
D3:=ref(c,C3+1)
DRAWTEXT(FILTER(D3>0,5),0.25,'RSI'),COLORMAGENTA,ALIGN0;;
Stickline(FILTER(D3>0,5),1,0.25,1,0),COLORMAGENTA;
----------------------------------------------------------------------------
南山-主升浪:
i
nput:N(44,1,100);
TYP := ((c+h+o+l+(c+o+l+h)/4+(o+C)/2+(l+h)/2+(o+l)/2+(c+l)/2+(c+h)/2+(o+h)/2+(c+h+o)/3+(h+o+l)/3+(c+h+l)/3+(o+l+c)/3)+(H+L+C*2)/4)/16;
y: (TYP-MA(TYP,n))/(0.015*AVEDEV(TYP,n)),PRECISION2,Color00FFFF;
中:MA(y,20),PRECISION2,POINTDOT,Color00FF00;
顶:中+1.7*STD(y,20),PRECISION2,POINTDOT,colorwhite;
底:中-1.7*STD(y,20),PRECISION2,POINTDOT,colorwhite;
--------------------------------------------------------------------------------------------------------
觅庄建仓
{觅庄建仓}
DRAWGBK(DATE>900101,COLORRGB(0,150,130),COLORRGB(0,0,0),1);
input:N(26,2,100);
{多空}
RSVp:=(C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100-50;
Kv:=SMA(RSVp,3,1);
Dv:=SMA(Kv,3,1);
Jv:=3*Kv-2*Dv;
zdzk1:=EMA(Jv,6);
zdzk2:=REF(zdzk1,1);
做多:IF(zdzk1>=zdzk2,zdzk1+2,zdzk2),PRECISION2,COLORRED;
做空:IF(zdzk2-zdzk1,zdzk2,zdzk1),PRECISION2,COLORGREEn;
xw1:=IF(O<=REF(O,1),0,MAX((H-O),(O-REF(O,1))));//------------
xw2:=IF(O>=REF(O,1),0,MAX((O-L),(O-REF(O,1))));
xw3:=SUM(xw1,21);
xw4:=SUM(xw2,21);
xw5:=IF(xw3>xw4,(xw3-xw4)/xw3,IF(xw3=xw4,0,(xw3-xw4)/xw4));
{14天强弱}
RS:=SMA(MAX(C-REF(C,1),0),14,1)/SMA(ABS(C-REF(C,1)),14,1)*100;
ZD:= EMA(EMA(EMA(RS,7),3),3);
ZD1:=(ZD-REF(ZD,1))/REF(ZD,1)*15;
STICKLINE(ZD1>=0,0,ZD1*50,4,0),Color0000BE;
STICKLINE(ZD1<=0,0,ZD1*50,4,0),COLORCYAN;
y1:=AMOUNT/V/100;//--------------
y2:=(3*H+L+O+2*C)/7;
y3:=100*(WINNER(1.1*C)-WINNER(0.9*C));
y4:=SUM(AMOUNT,13)/y1/100;
y5:= DMA(y2,V/y4);
y6:=(C-y5)/y5*100;
y7:=(y3<10) AND (y6<=-10);
y8:=SMA(MAX(C-REF(C,1.5),0),6,1)/SMA(ABS(C-REF(C,1.5)),6,1)*100;
重亏:STICKLINE(y6<=-10 and ZD1<0,ZD1*55,ZD1*45,6,0),ColorFF89B2;
全亏:STICKLINE(y6<=-16 and ZD1<0,ZD1*60,ZD1*55,6,1),COLORBLUE;
超跌:STICKLINE(y7 and ZD1<0,ZD1*65,ZD1*60,6,0),ColorFFFFFF;
Jct:=100*(c-cost(10))/cost(10);//-----------
PARTLINE(C,if(Jct<0,Jct,0)*3),COLORWHITE;
{备战区1}
ZDD1:=(HHV(H,21)-C)/(HHV(H,21)-LLV(L,21))*100-10;
ZDD2:=(C-LLV(L,21))/(HHV(H,21)-LLV(L,21))*100;
ZDD3:=SMA(ZDD2,13,8);
ZDD4:=CEILING(SMA(ZDD3,13,8));
ZDD5:=SMA(ZDD1,21,8);
Xh1:=SMA(MAX(C-REF(C,2),0),7,1)/SMA(ABS(C-REF(C,2)),7,1)*100;
Xh2:=ZDD4-ZDD5<-65 and Xh1<12;
备战区:DRAWICON(Xh2,0,12),Color006EFF;
STICKLINE(Xh2,0,ZD1*20,4,0),Color006EFF;
{备战区2}
Xx1:=MA(LOW,2)*0.96;
Xx2:=MA(LOW,26)*0.85;
Xx3:= REF(Xx1,1)
DRAWICON(Xx3,0,12);
{备战区3}
C0:=REF(C,2)*0.865;
C1:=REF(C,13)*0.772;
DSY:=100*vol/CApitAl;
STICKLINE((C-MIN(C0,C1))/C<0.1 AND SUM(DSY,5)/5<1.8,0,ZD1*25,4,0),Color006EFF;
DRAWICON((C-MIN(C0,C1))/C<0.1 AND SUM(DSY,5)/5<1.8,0,12);
{备战区4}
Ww1:= sum( ma(c,10),9)/10.110;
Ww2:=cross(c,Ww1);
STICKLINE(Ww2,0,ZD1*26,4,0),Color006EFF;{40}
DRAWICON(Ww2,0,12);
{买1}
Vw1:=DMA(EMA(C,12),SUM(V,5)/3/CAPITAL);
Vw2:=REF(H,10)/C>1.35;
Vw3:=(COST(20)-C)/C>0.15;
Vw4:=H>L*1.051;
Vw5:=Vw4 AND COUNT(Vw4,5)>1;
Vw6:=(((C-Vw1)/Vw1*100<-30) or Vw2) and Vw3 and Vw5;
STICKLINE(Vw6,0,ZD1*40,4,0),Color0000FF;{48}
DRAWICON(Vw6,0,6);
{买2}
XL1:=MA(LOW,2)*0.96;
XL2:=MA(LOW,26)*0.85;
XL3:=REF(XL1,1)
DRAWTEXT(XL3,15,'←买'),ColorF8B7F0;
{井喷}
jjp1:=REF(INDEXC,1);
jjp2:=FILTER((INDEXC-jjp1)/jjp1>0.03 and zdzk1>=zdzk2,7);
STICKLINE(jjp2,0,-15,4,0),ColorFF00FF;
DRAWTEXT(jjp2,-15,'←买'),ColorFF00FF;
//数据源
x1:=EMA(HHV(H,500),21); //
x2:=EMA(HHV(H,250),21); //
x3:=EMA(HHV(H,90),21); //
x4:=EMA(LLV(L,500),21); //
x5:=EMA(LLV(L,250),21); //
x6:=EMA(LLV(L,90),21); //
x7:=EMA((x1*0.558+x2*0.558+x3*0.558+x4*0.96+x5*0.96+x6*0.96)/6,21); //
x8:=EMA((x1*0.55 +x2*0.55+ x3*0.65+ x4*1.25+x5*1.23+x6*1.2 )/6,21); //
x9:=EMA((x1*0.68+ x2*0.68+ x3*0.68+ x4*1.3 +x5*1.3+ x6*1.3 )/6,21); //
VARA:=EMA((x7*3+x8*2+x9)/6*1.738,21); //数据源
VARB:=REF(LOW,1);//昨天最低价
VARC:=SMA(ABS(LOW-VARB),3,1)/SMA(MAX(LOW-VARB,0),3,1)*100; //低价强弱
VARD:=EMA(IF(C*1.35<=VARA,VARC*10,VARC/10),3);
//C*1.35小于等于数据源取低价强弱线*10的3日均线,否则取低价强弱线/10的3日均线
VARE:=LLV(L,30); //取30日最低价
VARF:=HHV(VARD,30); //取VARD均线30日的最高值
VAR10:=IF(MA(C,58),1,0);//取58天均线的收盘价
VAR11:=EMA(IF(LOW<=VARE,(VARD+VARF*2)/2,0),3)/618*VAR10;//取值
MID:=REF(H+L,1)/2;//取作天的中价
CR:=SUM(MAX(0,H-MID),N)/SUM(MAX(0,MID-L),N)*100;//取MID26天的CR值
出击:IF(CR<60 AND VAR11>10,35{6000/CR},0),COLORGREEN;
攻击:IF (VAR11>20,{VAR11*3}30,0),COLORYELLOW;
{加仓}
xc1:=(MA(C,80)-MA(C,13)/3);
xc2:= MA((C-xc1)/xc1,1);
xc3:=ema(xc2,12)*0.7;
xc4:=ema(xc2,3);
xc5:=if(llv(xc4-xc3,12)>0,0,-10);
xc6:=EMA(C,12)-EMA(C,26);
xc7:=EMA(xc6,9);
xc8:=2*(xc6-xc7);
加仓:if(xc5<0 and cross(xc8,0),50,0),LINETHICK1,colorblue;
DRAWICON(加仓>0,30,4);
DRAWTEXT(加仓,35,'←加仓'),colorblue;
===================================================================
看大盘抄个股-----原码公式(回闻英翔网友)
闻英翔 朋友,您要的副图公式。
{看大盘抄个股--个股强弱 }
1.一个好股必须领先大盘
2.领先大盘又分两种情况:一是比大盘涨得快,二是比大盘抗跌,千万要 记住领先大盘不一定就能赚钱哦.
3.可判反转反弹,细细品味,可长功力.
DRAWGBK(DATE>900101,COLORRGB(0,15,13),COLORRGB(0,0,0),1);
RSV:=(C-LLV(L,49))/(HHV(H,49)-LLV(L,49))*100;{kdj变型的摆动线}
变型:=SMA(RSV,100,99);{kdj变型的K线}
短1:=SMA(变型,3,2);{移动平均线}
中1:=SMA(短1,8,1);{移动平均线}
fillrgn(短1<中1,短1,中1),Color6EBB6E;
fillrgn(短1>中1,短1,中1),ColorD6A6FF;
短:短1,PRECISION2,ColorFF00FF;
中:中1,PRECISION2,Color00FFFF;
强弱界:SMA(短1,120,1),PRECISION2,LINETHICK2,Color009C00;{移动平均线}
LC := REF(C,1);
LCDP:= REF(INDEXC,1);
个股:SMA(MAX(C-LC,0),14,1)/SMA(ABS(C-LC),14,1)*100,PRECISION2,LINETHICK2,Color0000FF;
大盘:SMA(MAX(INDEXC-LCDP,0),14,1)/SMA(ABS(INDEXC-LCDP),14,1)*100,PRECISION2,LINETHICK2,ColorFF0000;
======================================================================
一个较好的主图指标
破解器都出来了,今后就都发原码吧,呵呵,你如果喜欢,连名你都自己定吧。
黄K线是介入和加仓的关注点,我因不喜欢明确的信号,所以就省了...........
{主图----名字请你自己定}
DRAWGBK(C>O, COLORRGB(110,0,0), COLORRGB(0,0,0),0); {收阳变红}
DRAWGBK(C
StickLine(C<=O,O,C,8,0),colorcyan;
StickLine(C>=O,L,H,0,0),colorred;
StickLine(C>=O,C,O,8,1),colorred;
x1:=(3*c+l+o+h)/6;
x2:=(20*x1+19*ref(x1,1)+18*ref(x1,2)+17*ref(x1,3)+16*ref(x1,4)+15*ref(x1,5)+14*ref(x1,6)+13*
ref(x1,7)+12*ref(x1,8)+11*ref(x1,9)+10*ref(x1,10)+9*ref(x1,11)+8*ref(x1,12)+7*ref(x1,13)+6*
ref(x1,14)+5*ref(x1,15)+4*ref(x1,16)+3*ref(x1,17)+2*ref(x1,18)+ref(x1,20))/210;
AA:MA(x1,3),ColorFFFFFF;
BB: SMA(AA,3,1),ColorFFFF00;
拉升:HHV(AA,13),Color00FFFF;
底部:LLV(MA(L,3),13),ColorFF8000;
ZSX1 := MAX(MAX((H-L),ABS(REF(C,1)-H)),ABS(REF(C,1)-L));
ZSX2 :=ma(ZSX1,13);
ZSX3:=ref(C,1)-ref(ZSX2,1);
止损:hhv(ZSX3,13),CIRCLEDOT,LINETHICK1,Color006200;
L1:=HHV(h ,1 );
L2:=FORCAST(L1,3);
L3:= (EMA(C,5)*7+EMA(C,5)*3)/10;
L4:= MA(C,13);
持股:STICKLINE(L3>L4 and C>O,C,O,8,0),COLORRED;
STICKLINE(L3>L4 and C
持币:STICKLINE(L3
STICKLINE(L3
STICKLINE(L4
STICKLINE(L4
警戒:STICKLINE(L4
STICKLINE(L4
关注:STICKLINE(L4>O and C>L4 and O
IF(CLOSE>SAR(10,2,20),SAR(10,2,20),CLOSE),CIRCLEDOT,COLORMAGENTA;
IF(CLOSE
DKX1:= EMA(C,5);
长通下轨: MA(LOW,30)*0.85,ColorFF0000;
PARTLINE(DKX1>x2,长通下轨),LINETHICK2,Color0076F0;
PARTLINE(DKX1
PARTLINE(AA<=BB,AA),ColorFF0000;
=========================================================================
美如画-----优化版(MACD & BIAS)
美如画-----优化版
抄股之余,愿朋友们有个好心情。紧张的5天过去了,又到周末,在网友的启发下,特做一个即可用于实战又可欣赏养目的指标。盼朋友们喜欢。谢了.......哈哈
既有买卖点,又有长短趋势......又有资金进出竖线显示(哈哈---是个三合一呀)。
具体理解,仁人见智,请自己多多体会。
朋友,欣赏之余,别忘了提意见啊......
美如画-----优化版(MACD & BIAS)
DIFF1:= EMA(C,3) - EMA(C,13);
DEA1 := EMA(DIFF1,9);
MACD1:= 2*(DIFF1-DEA1)*10;
DIFF2:= EMA(C,5) - EMA(C,26);
DEA2 := EMA(DIFF2,9);
MACD2:= 2*(DIFF2-DEA2)*10;
DIFF3:= EMA(C,7) - EMA(C,89);
DEA3 := EMA(DIFF3,21);
MACD3:= 2*(DIFF3-DEA3)*10;
DRAWGBK(c>0,colorrgb(255,255,220),colorrgb(5,100,255),1),colorf80606;
FILLRGN(macd3>=0,0,macd3),color009e3a;
FILLRGN(macd3<0,0,-macd3),color646464;
FILLRGN(macd2>=0,0,macd2),color007d19;
FILLRGN(macd2<0,0,-macd2),color555555;
FILLRGN(macd1>=0,0,macd1),color006400;
FILLRGN(macd1<0,0,-macd1),color414141;
FILLRGN(macd3,0,-abs(macd3)*0.6),color232323;
FILLRGN(macd1,0,-abs(macd1)*0.6),color0f0f0f;
x1:=MA(LLV(C,8)*1.1,13);
x2:=MA(HHV(C,21)*0.9,13);
x3:=MA(LLV(INDEXC,8)*1.1,13);
x4:=MA(HHV(INDEXC,21)*0.9,13);
资金进出:=3*(MA(C,1)-(x1+x2)/2-(x1+x2)/2*((x3+x4)/2-EMA(INDEXC,3))/((x3+x4)/2));
STICKLINE(资金进出<0,资金进出,0,0.5,0),COLORCYAN;
STICKLINE(资金进出>=0,资金进出,0,0.5,0),ColorFF8BFF;
红持: (SMA(CLOSE,2,1)-EMA(LLV((CLOSE+LOW)/2,10),21))/MA(LLV((CLOSE+LOW)/2,10),21)*25,PRECISION2,LINETHICK0,COLORRED;
白减: (SMA(CLOSE,4,1)-EMA(LLV((CLOSE+LOW)/2,10),21))/MA(LLV((CLOSE+LOW)/2,10),21)*25,PRECISION2,LINETHICK0,COLORFFFFFF;
fillrgn(红持<白减,红持,白减),COLORWHITE;
fillrgn(红持>白减,红持,白减),COLORRED;
==========================================================================
这是什么?----飞狐;分析家通用
朋友找了个东东,让我修修,我改了一下,看看还可以,特发给理想的朋友欣赏。
{名称-----不详}
input:n(13,1,100),m(9,1,100),m1(3,1,100);
Var1:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
Var2:=SMA(Var1,M1,1);
卖线: SMA(Var2,M1,1);
Var3:=(HHV(HIGH,M)-CLOSE)/(HHV(HIGH,M)-LLV(LOW,M))*100;
Var4:=SMA(Var3,M1,1);
Var5:=SMA(Var4,M1,1);
买入线: SMA(Var5,M1,1);
必卖线: SMA(卖线,M1,1);
高压线: 85;
触底线: 9;
DRAWTEXT(买入线>76.5 AND CROSS(卖线,必卖线),必卖线*1.15,'进');
DRAWTEXT(买入线>56 AND 买入线<=76 AND CROSS(卖线,必卖线),卖线,'留意');
DRAWTEXT(买入线<45 AND 卖线>78 AND 必卖线>78 AND CROSS(必卖线,卖线),必卖线,'跑'),colorgreen ;
DRAWTEXT(CROSS(买入线,78.5),买入线,'关注'),colorred ;
DRAWTEXT(CROSS(买入线,85),买入线,'重点关注'),colorwhite ;
========================================================================
卖票预测
{感谢原作者:dyyys
我敢说,此乃超短线朋友的利器,绝对应放在兵器库的第一位。
预测值:MA(REF(H,1)/REF(C,2),Q)*REF(C,1);
次日一开盘,该指标公式即可显示出当日最高预测价。平均误差:0.31%
该预测价可作为当日卖出股票的重要参考价,
强势(昨日收阳),可根据该预测价看高一线,
弱势(昨日收阴):适当看低一线。
同时,对周线,月线,分时线同样适用。
本指标叠加K线,效果更好。
至于误差率,我认为非常小,如果非要让我加上一个数字,
我只能说,比我见过的任何一种方法都要小。
最关键的一点是:它科学,简单,直观,方便。
参数N,取值:最小:1,最大:250,缺省:27}
以下是新添的(你可任意加在任何主图公式后面,你原来的不受影响):
{飞狐用(卖票预测):}
input:n1(8,1,100),n2(20,1,300),n3(50,1,300);
input:Q(27,1,250);
a:=BARPOS; a1:=SYSPARAM(1);{动} a2:=SYSPARAM(2);{左} a3:=SYSPARAM(3);{右}
预测值:=MA(REF(H,1)/REF(C,2),Q)*REF(C,1);
DRAWTEXT(a=a2,c,'明日最高价预测 = '+NUMTOSTR(预测值[SYSPARAM(1)],2)),ALIGN4,color00ff00;
{分析家用(卖票预测):}
input:Q(27,1,250);
预测值:=MA(REF(H,1)/REF(C,2),Q)*REF(C,1);
解:=' 明日最高价预测= '+预测值;
if DISPSTATUS=2 then a:=BARPOS;
if DISPSTATUS=1 then b:=BARPOS;
d:=a-b;
e:=hhv(h,d);
DRAWTEXT(1, e*1.05,解),Color0087FF,ALIGN2;
实例分析
以上证指数为例:
日期 测试价 实际最高价 误差
8/8 1139.48 1146.73 0.6%
8/9 1150.44 1152.53 0.1%
8/10 1164.90 1165.13 0.02%
8/11 1178.23 1184.26 0.5%
平均: 0.31%
=========================================================================
均线测价
///均线测价
input:n(5,2,1000);
mm:=INTPART(ma(c,n)*100);
hh:=INTPART(hhv(mm,30));
ll:=INTPART(llv(mm,30));
cc:=INTPART(c*100);
for i=datacount-50 to datacount do begin
jx[i]:=ll[i];
jd[i]:=hh[i];
tx[i]:=0;
td[i]:=0;
for j=ll[i] to hh[i] do begin
tt:=0;
for k=i-29 to i do begin
if mm[k]=j then tt:=tt+1;
end;
if j<=cc[i] then begin
if tt>=tx[i] then begin tx[i]:=tt; jx[i]:=j; end;
end;
if j>cc[i] then begin
if tt>td[i] then begin td[i]:=tt; jd[i]:=j; end;
end;
end;
end;
支撑:jx/100;
支撑次数:tx,linethick0;
阻力:jd/100;
阻力次数:td,linethick0;
======================================================================
买卖分明
实战关键要关注: --- 趋势要大于强弱分界轴线。
{买卖分明}
趋势:(c-llv(l,250))/llv(l,250)*100,COLORMAGENTA;//变形kd
压: HHV(hhv(趋势,3),13),COLORYELLOW;
托:llV(MA(趋势,3),13),COLORBLUE;
基准: SMA(趋势,3,1),COLORGREEN;
PARTLINE(趋势>基准,趋势),LINETHICK2,COLORMAGENTA;
PARTLINE(趋势<基准,趋势),LINETHICK2,COLORWHITE;
强弱分界:10,POINTDOT,LINETHICK3,COLORCYAN;
=======================================================================
哈哈---------送炒版兄《分价图》。
使用方法:
1.橙色阶梯不断上升,股价在支撑线之上,且上无压力,买入最安全。
2.蓝色乌云密布,阶梯不断下降,股价在支撑之下,且上压力大,应空仓。
3.股价在安全线之下,一般来讲股价比较低了,可关注。
4.股价在中枢线附近,只要橙色阶梯不断上升,守仓。
另可用1;2;两种方法判断追,杀!
5.股价在警惕线之上,一般来讲股价比较高了,要警惕了!可用1;2;两种 方法判断,一但股价落在支撑之下,且压力线上升,就应该逢高减仓了。
6.蓝色乌云显现,可清仓。
7.追高时,要注意大盘的配合,切切!!
《分价图》
DRAWGBK(1, COLORRGB(100,50,0), COLORRGB(100,100,0),0);
x1:=(C+L+H)/3;
x2:=EMA(x1,6);
x3:=EMA(x2,5);
STICKLINE(x2>=x3,x2,x3,10,1),Color00A6F6;
STICKLINE(x2
n:=n1-sysparam(2)+1;
hh:=hhv(H,n);
ll:=llv(L,n);
最高:=hh[n1];
最低:=ll[n1];
安全:最低+(最高-最低)*0.191,POINTDOT,PRECISION2,LINETHICK3,ColorFF8900;
中枢:最低+(最高-最低)*0.5,LINEDOT,PRECISION2,COLORMAGENTA;
警惕:最低+(最高-最低)*0.809,LINEDOT,PRECISION2,COLORYELLOW;
aa1:=wma(c,2
bb1:=ema(aa1,2);
a:=ma(bb1,3);
aa2:=wma((h+c+o)/3,18);
dd3:=a>=aa2 and c>aa2;
dd4:=a
STICKLINE((dd4 or dd5) and o<=c ,h,l,0.5,0),Color00cc99;
STICKLINE((dd4 or dd5) and o<=c ,c,o,7,0),Color00cc99;
STICKLINE((dd4 or dd5) and o>=c ,h,l,0.5,0),Color3F8C3A;
STICKLINE((dd4 or dd5) and o>=c ,c,o,7,0),Color3F8C3A;
STICKLINE((dd3 or c>aa2) and o<=c,c,o,7,0),Colorred;
STICKLINE((dd3 or c>aa2) and o<=c,h,l,0.5,0),Colorred;
STICKLINE((dd3 or c>aa2) and o>=c,c,o,7,0),Colorff33ff;
STICKLINE((dd3 or c>aa2) and o>=c,h,l,0.5,0),Colorff33ff;
STICKLINE(MA(C,13)>O and C>MA(C,13) and O
X1:=HHV(H,3);
X2:=LLV(L,3);
Xc:=c;
Xh:=h;
Xl:=l;
for i=1 to datacount do
IF Xh[i]>x1[i-1] and Xc[i]>Xc[i-1] Then Ycjy[i]:=x2[i];
ELSE IF Xl[i]
y1:=hhv(h,13);
y2:=if(y1>ref(y1,30),y1,ref(y1,8));
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1),COLORWHITE;
D:=SMA(K,3,1),COLORYELLOW;
j1:=-(3*K-2*D)+100;
j2:=if(j1<0 ,0 ,j1);
j:=if(j2>100,100,j2),COLORBLUE;
超短:=SMA(AMOUNT,3,1)/100000000;
中线:=SMA(AMOUNT,13,1)/100000000;
压力:if(j
===========================================================================
一目图
{一目图--------飞狐主图}
input:N(34,1,100);【波段趋势】:((COUNT((CLOSE > REF(CLOSE,N)),N) / N) * 100),LINETHICK0,colorFF9900;
PARTLINE((【波段趋势】 > 0),【波段趋势】),CIRCLEDOT,colorFF9900;
NOBV:=((SUM(IF((CLOSE > REF(CLOSE,1)),VOL,IF((CLOSE < REF(CLOSE,1)),(0 - VOL),0)),34) / CAPITAL) * 100);
【动量】:IF((NOBV > 0),NOBV,0),LINETHICK0,colorFF;
DRAWICON(【动量】,0,10);
A:=(1.1 * CLOSE);
B:=(0.9 * CLOSE);
KP:=(WINNER(OPEN) * 100);
SP:=(WINNER(CLOSE) * 100);
ZG:=(WINNER(HIGH) * 100);
ZD:=(WINNER(LOW) * 100);
TA:=(WINNER(A) * 100);
TB:=(WINNER(B) * 100);
锁中套:=(100 - TA);
活跃套:=(TA - SP);
活跃获:=(SP - TB);
锁中获:=(TB - 0);
STICKLINE((SP >= KP),SP,KP,8,1),colorFF88FF;
STICKLINE((SP >= KP),SP,ZG,0.5,0),colorFF88FF;
STICKLINE((SP >= KP),KP,ZD,0.5,0),colorFF88FF;
STICKLINE((SP < KP),SP,KP,8,0),colorFFFF00;
STICKLINE((SP < KP),ZG,ZD,0.5,0),colorFFFF00;
【筹码K线】:SP,LINETHICK0,colorFF88FF;
【MA13】:EMA((100 * WINNER(CLOSE)),13),colorFFFF;
DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (CLOSE > 0)),127,'锁定套牢筹码'),ALIGN2,colorFF00;
DRAWNUMBER(((SYSPARAM(1) = BARPOS) AND (CLOSE > 0)),127,锁中套,2),SHIFT1,colorFF00;
DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (CLOSE > 0)),113,'活跃套牢筹码'),ALIGN2,colorCCFFFF;
DRAWNUMBER(((SYSPARAM(1) = BARPOS) AND (CLOSE > 0)),113,活跃套,2),SHIFT1,colorCCFFFF;
DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (CLOSE > 0)),(0 - 9),'活跃获利筹码'),ALIGN2,colorFFFFFF;
DRAWNUMBER(((SYSPARAM(1) = BARPOS) AND (CLOSE > 0)),(0 - 9),活跃获,2),SHIFT1,colorFFFFFF;
DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (CLOSE > 0)),(0 - 22),'锁定获利筹码'),ALIGN2,colorFF;
DRAWNUMBER(((SYSPARAM(1) = BARPOS) AND (CLOSE > 0)),(0 - 22),锁中获,2),SHIFT1,colorFF;
VAR1:=(ABS((WINNER(CLOSE) - WINNER(OPEN))) * 100);
VAR2:=((VOL / CAPITAL) * 100);
VAR3:=(ISUP * 20);
VAR4:=(((VAR1 >= 24) AND (VAR2 <= 6)) * 20);
VAR5:=((VAR3 + VAR4) = 40);
无量博弈K线箭头:DRAWICON(VAR5,ZD,'●'),colorFFFFFF;
STICKLINE((CLOSE > 0),100,100,10,0),color888888;
STICKLINE((CLOSE > 0),0,0,10,0),color888888;
VAR6:=(SUM(VOL,21) / CAPITAL);
VAR7:=(100 - (100 / (1 + VAR6)));
DRAWTEXT(((ISLASTBAR = 1) AND (VAR7 < 10)),65,'冷门股n不碰'),SHIFT1,colorFFFFFF;
DRAWTEXT((((ISLASTBAR = 1) AND (VAR7 >= 10)) AND (VAR7 < 20)),65,'觉醒股n关注'),SHIFT1,colorFFFF;
DRAWTEXT((((ISLASTBAR = 1) AND (VAR7 < 40)) AND (VAR7 >= 20)),65,'活跃股n持有'),SHIFT1,colorCCFF66;
DRAWTEXT(((ISLASTBAR = 1) AND (VAR7 >= 40)),65,'热门股n警惕'),SHIFT1,colorFF;
DRAWNUMBER(((ISLASTBAR = 1) AND (VAR7 < 10)),40,VAR7,2),SHIFT1,colorFFFFFF;
DRAWNUMBER((((ISLASTBAR = 1) AND (VAR7 >= 10)) AND (VAR7 < 20)),40,VAR7,2),SHIFT1,colorFFFF;
DRAWNUMBER((((ISLASTBAR = 1) AND (VAR7 < 40)) AND (VAR7 >= 20)),40,VAR7,2),SHIFT1,colorCCFF66;
DRAWNUMBER(((ISLASTBAR = 1) AND (VAR7 >= 40)),40,VAR7,2),SHIFT1,colorFF;
----------------------------------------------------------------------------
喜猫和蓝精灵
VAR1:=((((HHV(HIGH,9) - CLOSE) / (HHV(HIGH,9) - LLV(LOW,9))) * 100) - 70);
VAR2:=(SMA(VAR1,9,1) + 100);
VAR3:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100);
VAR4:=SMA(VAR3,3,1);
VAR5:=(SMA(VAR4,8,1) + 100);
VAR6:=(VAR5 - VAR2);
短逃:IF((VAR6 > 110),100,(0 - 10)),LINETHICK3,color6600;
DRAWICON((VAR6 > 120),100,10);
金叉上升:STICKLINE((CLOSE > 0),100,100,0,0),LINETHICK0,colorFF;
金叉回落:STICKLINE((CLOSE > 0),50,50,0,0),LINETHICK0,color99FF;
死叉下降:STICKLINE((CLOSE > 0),50,50,0,0),LINETHICK0,colorFFFF;
死叉回升:STICKLINE((CLOSE > 0),50,50,0,0),LINETHICK0,colorFF00;
喜猫中线金叉:STICKLINE((CLOSE > 0),50,50,0,0),LINETHICK0,colorFF;
蓝精灵中线死叉:STICKLINE((CLOSE > 0),50,50,0,0),LINETHICK0,colorFF9900;
中线方框表示:STICKLINE((CLOSE > 0),50,50,0,0),LINETHICK0,colorCCFFFF;
短线箭头表示:STICKLINE((CLOSE > 0),50,50,0,0),LINETHICK0,colorFF00FF;
RSV:=(((CLOSE - LLV(LOW,72)) / (HHV(HIGH,72) - LLV(LOW,72))) * 100);
K:=SMA(RSV,5,1);
D:=SMA(K,5,1);
J:=((3 * K) - (2 * D));
STICKLINE(REFX((((SYSPARAM(1) = BARPOS) AND (J > D)) AND (REF(J,5) < REF(J,4))),4),50,90,50,1),colorFF;
STICKLINE(REFX((((SYSPARAM(1) = BARPOS) AND (J > D)) AND (REF(J,5) > REF(J,4))),4),50,90,50,1),color99FF;
STICKLINE(REFX((((SYSPARAM(1) = BARPOS) AND (J > D)) AND (REF(J,4) < REF(J,3))),3),50,90,50,1),colorFF;
STICKLINE(REFX((((SYSPARAM(1) = BARPOS) AND (J > D)) AND (REF(J,4) > REF(J,3))),3),50,90,50,1),color99FF;
STICKLINE(REFX((((SYSPARAM(1) = BARPOS) AND (J > D)) AND (REF(J,3) < REF(J,2))),2),50,90,50,1),colorFF;
STICKLINE(REFX((((SYSPARAM(1) = BARPOS) AND (J > D)) AND (REF(J,3) > REF(J,2))),2),50,90,50,1),color99FF;
STICKLINE(REFX((((SYSPARAM(1) = BARPOS) AND (J > D)) AND (REF(J,2) < REF(J,1))),1),50,90,50,1),colorFF;
STICKLINE(REFX((((SYSPARAM(1) = BARPOS) AND (J > D)) AND (REF(J,2) > REF(J,1))),1),50,90,50,1),color99FF;
STICKLINE((((SYSPARAM(1) = BARPOS) AND (J > D)) AND (REF(J,1) < J)),50,90,50,0),colorFF;
STICKLINE((((SYSPARAM(1) = BARPOS) AND (J > D)) AND (REF(J,1) > J)),50,90,50,0),color99FF;
STICKLINE(REFX((((SYSPARAM(1) = BARPOS) AND (J < D)) AND (REF(J,5) < REF(J,4))),4),50,10,50,1),colorFF00;
STICKLINE(REFX((((SYSPARAM(1) = BARPOS) AND (J < D)) AND (REF(J,5) > REF(J,4))),4),50,10,50,1),colorFFFF;
STICKLINE(REFX((((SYSPARAM(1) = BARPOS) AND (J < D)) AND (REF(J,4) < REF(J,3))),3),50,10,50,1),colorFF00;
STICKLINE(REFX((((SYSPARAM(1) = BARPOS) AND (J < D)) AND (REF(J,4) > REF(J,3))),3),50,10,50,1),colorFFFF;
STICKLINE(REFX((((SYSPARAM(1) = BARPOS) AND (J < D)) AND (REF(J,3) < REF(J,2))),2),50,10,50,1),colorFF00;
STICKLINE(REFX((((SYSPARAM(1) = BARPOS) AND (J < D)) AND (REF(J,3) > REF(J,2))),2),50,10,50,1),colorFFFF;
STICKLINE(REFX((((SYSPARAM(1) = BARPOS) AND (J < D)) AND (REF(J,2) < REF(J,1))),1),50,10,50,1),colorFF00;
STICKLINE(REFX((((SYSPARAM(1) = BARPOS) AND (J < D)) AND (REF(J,2) > REF(J,1))),1),50,10,50,1),colorFFFF;
STICKLINE((((SYSPARAM(1) = BARPOS) AND (J < D)) AND (REF(J,1) < J)),10,50,50,0),colorFF00;
STICKLINE((((SYSPARAM(1) = BARPOS) AND (J < D)) AND (REF(J,1) > J)),10,50,50,0),colorFFFF;
RSV1:=(((CLOSE - LLV(LOW,5)) / (HHV(HIGH,5) - LLV(LOW,5))) * 100);
K1:=SMA(RSV1,2,1);
D1:=SMA(K1,2,1);
J1:=((3 * K1) - (2 * D1));
DRAWICON(REFX((((SYSPARAM(1) = BARPOS) AND (K1 > D1)) AND (REF(K1,5) < REF(K1,4))),4),65,'');
DRAWICON(REFX((((SYSPARAM(1) = BARPOS) AND (K1 > D1)) AND (REF(K1,5) > REF(K1,4))),4),65,'');
DRAWICON(REFX((((SYSPARAM(1) = BARPOS) AND (K1 > D1)) AND (REF(K1,4) < REF(K1,3))),3),65,'');
DRAWICON(REFX((((SYSPARAM(1) = BARPOS) AND (K1 > D1)) AND (REF(K1,4) > REF(K1,3))),3),65,'');
DRAWICON(REFX((((SYSPARAM(1) = BARPOS) AND (K1 > D1)) AND (REF(K1,3) < REF(K1,2))),2),65,'');
DRAWICON(REFX((((SYSPARAM(1) = BARPOS) AND (K1 > D1)) AND (REF(K1,3) > REF(K1,2))),2),65,'');
DRAWICON(REFX((((SYSPARAM(1) = BARPOS) AND (K1 > D1)) AND (REF(K1,2) < REF(K1,1))),1),65,'');
DRAWICON(REFX((((SYSPARAM(1) = BARPOS) AND (K1 > D1)) AND (REF(K1,2) > REF(K1,1))),1),65,'');
DRAWICON((((SYSPARAM(1) = BARPOS) AND (K1 > D1)) AND (REF(K1,1) < K1)),65,'');
DRAWICON((((SYSPARAM(1) = BARPOS) AND (K1 > D1)) AND (REF(K1,1) > K1)),65,'');
DRAWICON(REFX((((SYSPARAM(1) = BARPOS) AND (K1 < D1)) AND (REF(K1,5) < REF(K1,4))),4),50,'');
DRAWICON(REFX((((SYSPARAM(1) = BARPOS) AND (K1 < D1)) AND (REF(K1,5) > REF(K1,4))),4),50,'');
DRAWICON(REFX((((SYSPARAM(1) = BARPOS) AND (K1 < D1)) AND (REF(K1,4) < REF(K1,3))),3),50,'');
DRAWICON(REFX((((SYSPARAM(1) = BARPOS) AND (K1 < D1)) AND (REF(K1,4) > REF(K1,3))),3),50,'');
DRAWICON(REFX((((SYSPARAM(1) = BARPOS) AND (K1 < D1)) AND (REF(K1,3) < REF(K1,2))),2),50,'');
DRAWICON(REFX((((SYSPARAM(1) = BARPOS) AND (K1 < D1)) AND (REF(K1,3) > REF(K1,2))),2),50,'');
DRAWICON(REFX((((SYSPARAM(1) = BARPOS) AND (K1 < D1)) AND (REF(K1,2) < REF(K1,1))),1),50,'');
DRAWICON(REFX((((SYSPARAM(1) = BARPOS) AND (K1 < D1)) AND (REF(K1,2) > REF(K1,1))),1),50,'');
DRAWICON((((SYSPARAM(1) = BARPOS) AND (K1 < D1)) AND (REF(K1,1) < K1)),50,'');
DRAWICON((((SYSPARAM(1) = BARPOS) AND (K1 < D1)) AND (REF(K1,1) > K1)),50,'');
DRAWICON(((SYSPARAM(1) = BARPOS) AND CROSS(J,D)),10,'');
DRAWICON(((SYSPARAM(1) = BARPOS) AND CROSS(D,J)),100,'');
DRAWNUMBER(((SYSPARAM(1) = BARPOS) AND (J > D)),10,J,2),colorCCFFFF;
DRAWNUMBER(((SYSPARAM(1) = BARPOS) AND (J > D)),0,D,2),colorCCFFFF;
DRAWNUMBER(((SYSPARAM(1) = BARPOS) AND (J < D)),10,J,2),colorCCFFFF;
DRAWNUMBER(((SYSPARAM(1) = BARPOS) AND (J < D)),0,D,2),colorCCFFFF;
DRAWNUMBER(((SYSPARAM(1) = BARPOS) AND (K1 > D1)),100,K1,2),colorCCFF00;
DRAWNUMBER(((SYSPARAM(1) = BARPOS) AND (K1 > D1)),90,D1,2),colorCCFF00;
DRAWNUMBER(((SYSPARAM(1) = BARPOS) AND (K1 < D1)),100,K1,2),colorCCFF00;
DRAWNUMBER(((SYSPARAM(1) = BARPOS) AND (K1 < D1)),90,D1,2),colorCCFF00;
DRAWICON(((CLOSE > 0) AND (SYSPARAM(2) = BARPOS)),0,''),ALIGN4,SHIFT1;
-------------------------------------------------------------------------
资金股价比
VAR1:=MA(((WINNER((CLOSE * 0.9)) * 100) * CLOSE),3);
VAR2:=(IF((VAR1 > 10),VAR1,0) / 2);
【资金比】:VAR2,LINETHICK0,colorFF;
【资金均量】:MA(VAR2,5),LINETHICK0,colorFF99FF;
FILLRGN(VAR2,VAR2,0),colorFF99FF;
FILLRGN((VAR2 > 【资金均量】),VAR2,【资金均量】),colorFF;
VAR01:=REF(CLOSE,1);
VAR02:=((SUM(IF((CLOSE > VAR01),VOL,0),26) / SUM(IF((CLOSE < VAR01),VOL,0),26)) * 100);
A1:=EMA(VAR02,5);
D1:=EMA(A1,13);
D2:=REF(D1,2);
【资金股价比】:D1,LINETHICK0,colorFF00;
【VR】:=A1;
【股价比】:A1;
PARTLINE((【VR】 < 40),【VR】),LINETHICK2,colorFF9900;
PARTLINE(((【VR】 >= 40) AND (【VR】 < 80)),【VR】),LINETHICK2,colorCCFF66;
PARTLINE(((【VR】 >= 80) AND (【VR】 < 160)),【VR】),LINETHICK2,colorFFFFFF;
PARTLINE((【VR】 >= 160),【VR】),LINETHICK2,colorFF;
STICKLINE((D1 >= REF(D1,1)),D1,D2,8,0),color55AA;
STICKLINE((D1 < REF(D1,1)),D1,D2,8,0),color6600;
STICKLINE((D1 >= REF(D1,1)),D1,D2,5,0),color77CC;
STICKLINE((D1 >= REF(D1,1)),D1,D2,3,0),color99DD;
STICKLINE((D1 < REF(D1,1)),D1,D2,5,0),color9900;
STICKLINE((D1 < REF(D1,1)),D1,D2,3,0),colorBB00;
DRAWTEXT(((【VR】 < 40) AND (ISLASTBAR = 1)),【VR】,'底部区'),SHIFT1,colorFF9900;
DRAWTEXT((((【VR】 >= 40) AND (【VR】 < 80)) AND (ISLASTBAR = 1)),【VR】,'低位区'),SHIFT1,colorCCFF66;
DRAWTEXT((((【VR】 >= 80) AND (【VR】 < 160)) AND (ISLASTBAR = 1)),【VR】,'盘整区'),SHIFT1,colorFFFFFF;
DRAWTEXT(((【VR】 >= 160) AND (ISLASTBAR = 1)),【VR】,'获利区'),SHIFT1,colorFF;
DRAWTEXT((((VAR2 > 10) AND (【资金比】 > 【资金均量】)) AND (ISLASTBAR = 1)),100,'有增量资金'),SHIFT1,colorFF00FF;
DRAWTEXT(((((VAR2 > 10) AND (【资金比】 < REF(【资金比】,1))) AND (【资金比】 < 【资金均量】)) AND (ISLASTBAR = 1)),100,'存量资金减量'),SHIFT1,colorFF99FF;
============================================================================
MACD和KDJ 二合一
{MACD和KDJ二合一}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:SMA(RSV,3,1),PRECISION2,linethick0,colorwhite;
D:SMA(K,3,1),PRECISION2,linethick0,coloryellow;
J:3*K-2*D,PRECISION2,linethick0,COLORMAGENTA;
分开:c>0,COLORBLACK;
DIFF:(EMA(CLOSE,12) - EMA(CLOSE,26)),linethick0,COLORCYAN;
DEA:EMA(DIFF,9),COLORBLUE,LINETHICK0;
MACD:2*(DIFF-DEA),linethick0,PRECISION3,COLORRED;
a:=SYSPARAM(3)-SYSPARAM(2)+1;
jh:=hhv(max(k,max(d,j)),a);
jl:=llv(min(k,min(d,j)),a);
diffh:=hhv(max(diff,max(dea,macd)),a);
diffl:=llv(min(diff,min(dea,macd)),a);
b1:=SYSPARAM(3)-barpos;
hlast:=refx(max(jh,diffh),b1);
llast:=refx(min(jl,diffl),b1);
hl:=hlast-llast;
jhl:=refx(jh,b1)-refx(jl,b1);
diffhl:=refx(diffh,b1)-refx(diffl,b1);
hl2:=hlast+llast;
jhl2:=refx(jh,b1)+refx(jl,b1);
diffhl2:=refx(diffh,b1)+refx(diffl,b1);
jp:=hl/jhl;
diffp:=hl/diffhl;
DIFF2:=(DIFF-diffhl2/2)*diffp+hl2/2-35;//DIFF k2:=(k-jhl2/2)*jp+hl2/2;//k 美如图 ----- 主力动向 根据 yukihimi 网友发的指标组合的。望大家能喜欢! {无未来无时限,安全使用,因系我费了不少心血(还待加些东东--发源码要看朋友们的喜欢程度啊),特加密。请朋友们谅解} 奇妙撑压--使用说明: 该公式的基本思路是让RSI与KDJ的关系在主图上反映出来...... 第一部分源码:------------RSI(我只是喜欢最原始的东西,希奇古怪的东东,可能连写公式的本人都不用,只是拿来卖钱........哈哈,这每个朋友都会用吧。 {主图RSI} 第三部分源码:------------KDJ(呵呵,也是最原始的东西。我想,也是大家都会的。 {区间操作源码:}
PARTLINE(C,DIFF2),COLORCYAN;
DEA2:=(DEA-diffhl2/2)*diffp+hl2/2-35;
PARTLINE(C,DEA2),COLORBLUE;//DEA
STICKLINE(DIFF2>DEA2,0,DIFF2-DEA2,0,0),COLORRED;//MACD
STICKLINE(DIFF2
PARTLINE(C,k2),colorwhite;
d2:=(d-jhl2/2)*jp+hl2/2;//d
PARTLINE(C,d2),coloryellow;
j2:=(j-jhl2/2)*jp+hl2/2;//j
PARTLINE(C,j2),COLORMAGENTA;
{ {可把这个括号去掉,效果如 图2}
k3:=hl/4;
k4:=jhl/4;
DRAWTEXT(islastbar,hlast-k3/3,' KD'+'n'+' J用'),coloryellow;
STICKLINE(islastbar,hlast,llast,2,0),colorwhite;
STICKLINE(islastbar,llast,llast,8,0),colorwhite;
STICKLINE(islastbar,k3+llast,k3+llast,8,0),colorwhite;
STICKLINE(islastbar,k3*2+llast,k3*2+llast,8,0),colorwhite;
STICKLINE(islastbar,k3*3+llast,k3*3+llast,8,0),colorwhite;
STICKLINE(islastbar,hlast,hlast,8,0),colorwhite;
DRAWNUMBER(islastbar,llast,jl,0),shift1,colorwhite;
DRAWNUMBER(islastbar,k3+llast,k4+jl,0),shift1,colorwhite;
DRAWNUMBER(islastbar,k3*2+llast,k4*2+jl,0),shift1,colorwhite;
DRAWNUMBER(islastbar,k3*3+llast,k4*3+jl,0),shift1,colorwhite;
DRAWNUMBER(islastbar,hlast,jh,0),shift1,colorwhite;
=============================================================
《美如图 ----- 主力动向》
《美如图 ----- 主力动向》
DRAWGBK(c>0,colorrgb(200,200,150),colorrgb(5,100,255),1);
input:N1(34,1,100), N2(9,1,100), N3(3,1,100);
{图}
Var1:=(EMA(C,12)-EMA(C,26))*55;
Var2:=EMA(Var1,9);
Var3:=2*(Var1-Var2);
FILLRGN(Var1>=0,0,Var1*0.8),COLOREEEEFF;
FILLRGN(Var1>=0,0,Var1*0.7),COLORDDDDFF;
FILLRGN(Var1>=0,0,Var1*0.6),COLORCCCCFF;
FILLRGN(Var1>=0,0,Var1*0.5),COLORBBBBFF;
FILLRGN(Var1>=0,0,Var1*0.4),COLORAAAAFF;
FILLRGN(Var1>=0,0,Var1*0.3),COLOR9999FF;
FILLRGN(Var1>=0,0,Var1*0.2),COLOR8888FF;
FILLRGN(Var1>=0,0,Var1*0.1),COLOR7777FF;
FILLRGN(Var1<0,0,Var1*0.8),COLORFFB0B0;
FILLRGN(Var1<0,0,Var1*0.7),COLORFF9D9D;
FILLRGN(Var1<0,0,Var1*0.6),COLORFF8E8E;
FILLRGN(Var1<0,0,Var1*0.5),COLORFF7D7D;
FILLRGN(Var1<0,0,Var1*0.4),COLORFF6A6A;
FILLRGN(Var1<0,0,Var1*0.3),COLORFF4D4D;
FILLRGN(Var1<0,0,Var1*0.2),COLORFF2D2D;
FILLRGN(Var1<0,0,Var1*0.1),COLORFF0000;
FILLRGN(Var2>=0,0,Var2*0.8),COLORD3FF60;
FILLRGN(Var2>=0,0,Var2*0.7),COLORC2FF24;
FILLRGN(Var2>=0,0,Var2*0.6),COLORBAFF02;
FILLRGN(Var2>=0,0,Var2*0.5),COLORAFF200;
FILLRGN(Var2>=0,0,Var2*0.4),COLORA4E100;
FILLRGN(Var2>=0,0,Var2*0.3),COLOR96CE00;
FILLRGN(Var2>=0,0,Var2*0.2),COLOR89BD00;
FILLRGN(Var2>=0,0,Var2*0.1),COLOR78A600;
FILLRGN(Var2<0,0,Var2*0.8),COLOR1EBE01;
FILLRGN(Var2<0,0,Var2*0.7),COLOR20CD01;
FILLRGN(Var2<0,0,Var2*0.6),COLOR22DC01;
FILLRGN(Var2<0,0,Var2*0.5),COLOR25F101;
FILLRGN(Var2<0,0,Var2*0.4),COLOR34FE10;
FILLRGN(Var2<0,0,Var2*0.3),COLOR49FE29;
FILLRGN(Var2<0,0,Var2*0.2),COLOR6BFE52;
FILLRGN(Var2<0,0,Var2*0.1),COLOR82FE6B;
{主力}
X1:=(HHV(H,N1)-C)/(HHV(H,N1)-LLV(L,N1))*11;
Var1:=(HHV(H,N2)-C)/(HHV(H,N2)-LLV(L,N2))*11;
Var2:=(HHV(H,N3)-C)/(HHV(H,N3)-LLV(L,N3))*11;
Var3:=Var1-X1;
Var4:=X1-Var1;
STICKLINE(X1>=0,0,Var2,2,0)colorred;
绿柱主力悄悄介入区:STICKLINE(Var3<0,0,Var4,2,0),colorgreen;
STICKLINE(X1>=0,0,Var1,2,0),COLORGRAY;
黄柱主力悄悄出货区: STICKLINE(Var4<0,0,-Var3,2,0),coloryellow;
========================================================================
抄底逃顶精品。简单到只用一条线进行判断。(使用日K线)
抄底逃顶精品。简单到只用一条线进行判断。(使用日K线)
此指标不仅适合大盘且适合个股,不用经常看盘,非常适合上班族炒股。
1.奇妙线上穿下沿(注意:可参考前下沿线的沿长线),可考虑进货(适用激进派买点)。
2.奇妙线下破上沿,可考虑出货(适用稳健派减仓)。
3.奇妙线上穿撑压,可考虑加仓(适用稳健派进货)。
4.奇妙线下破撑压,可考虑清仓(适用激进派卖点)。
5.密切关注股价在上沿与下沿之间震荡的位置及成交量的变化。
请朋友们注意第62楼(前三部分源码)
第65楼 (配套公式源码)
第102楼 (最后补齐)
谢谢朋友们的喜爱和支持。
1.RSI>20为超买;RSI<20为超卖。
2.RSI以50为中界线,大于50是椋∮?0为空头行情。
3.RSI在80以上形成M头或头肩顶形态时,视为向下反转信号。
4.RSI在20以下形成W底或头肩底形态时,视为向上反转信号。
5.RSI向上突破其高点连线时,买进;RSI跌破其低点连线时,卖出。)
x1:=REF(C,1);
x2:=SMA(MAX(C-x1,0),N,1)/SMA(ABS(C-x1),N,1)*100;
x3:=((3*SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5,1)-
2*SMA(SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5,1),3,1)-50)*
1.032+50);
x4:=(x2+x3)/2;
奇妙:c+(x4/50-1)*(ma(c,30)/20)*p,PRECISION2,Color0098FF;
第二部分源码:------------K线图(朋友们凡是到股市来,第一步就要看K线图,是基础。不神秘吧。这是南山友的东东,我稍稍的动了一下)
{K线图}
aa1:=wma(c,2);//短加权均线
bb1:=ema(aa1,2);//平滑
a:=ma(bb1,3);//平均
aa2:=wma((h+c+o)/3,18);//长加权均线
dd3:=a>=aa2 and c>aa2;//短>长,且收>长
dd4:=a
STICKLINE((dd4 or dd5) and o<=c ,h,l,0.5,0),Color00cc99;//跌势阳线
STICKLINE((dd4 or dd5) and o<=c ,c,o,7,0),Color00cc99;//跌势阳线
STICKLINE((dd4 or dd5) and o>=c ,h,l,0.5,0),Color3F8C3A;//跌势阴线
STICKLINE((dd4 or dd5) and o>=c ,c,o,7,0),Color3F8C3A;//跌势阴线
STICKLINE((dd3 or c>aa2) and o<=c,c,o,7,0),Colorred;//涨势阳线
STICKLINE((dd3 or c>aa2) and o<=c,h,l,0.5,0),Colorred;//涨势阳线
STICKLINE((dd3 or c>aa2) and o>=c,c,o,7,0),Colorff33ff;//涨势阴线
STICKLINE((dd3 or c>aa2) and o>=c,h,l,0.5,0),Colorff33ff;//涨势阴线
1. 指标>80 时,回档机率大;指标<20 时,反弹机率大。
2. K在20左右向上交叉D时,视为买 进信号。
3. K在80左右向下交叉D时,视为卖出信号。
4. J>100 时,股价易反转下跌;J<0 时,股价易反转上涨。
5. KDJ 波动于50左右的任何信号,其作用不大。)
{kdj}
RSV1:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
KK:=SMA(RSV1,3,1);
DD:=SMA(KK,3,1);
JJ:=3*KK-2*DD;
M:=BARSLAST(CROSS(DD,JJ));
G:=REF(H,M);
撑压:STICKLINE(G,G,G,10,1),COLORYELLOW,linethick2;
==================================================================
来个配套的吧
@克星@
(注意:费氏数:=ZIG(3, 10)>REF(ZIG(3,10),1);是未来涵数,仅用来计算前一高点至今的天数,不影响公式的其它性能。朋友们不要害怕........哈哈)
input:n(26,1,100),n1(12,1,30),n2(9,1,20);
DRAWGBK(DATE>900101,COLORRGB(0,150,130),COLORRGB(0,0,0),1);
x1:= (O+H+L+3*C)/6;
x2 := ((x1+c+h+o+l+(o+C)/2+(o+l)/2+(o+h)/2
+(c+l)/2+(c+h)/2+(l+h)/2
+(o+c+h)/3+(o+c+l)/3)+(o+h+l)/3+(c+h+l)/3)/15;
x3 := EMA(x1,13) - EMA(x1,21);
x4 := EMA(x3,3);
x5 := EMA(x3,10);
x6:=EMA(x2,7)-EMA(x2,21);
x7:=EMA((0.668*REF(x6,1)+0.333*x6),1);
x8:=MA(AMOUNT/(100*V),13);
x9:= (x1-x8)/x8*100;
Q1:=EMA(C,12)-EMA(C,26);{macd}
Q2:=EMA(Q1,9);
Q3:=Q1-Q2;
B1:=EMA(C,5)-EMA(C,13);
B2:=EMA(B1,3);
B3:=B1-B2;
B4:=Q1>0 and B3>0;{中线处于强势中的调整,短线强势}
B5:=B1>0 AND Q3>0 AND B3>0;{中短线强势,短线处于强势中的强势}
B6:=Q1>REF(Q1,1)AND B1>REF(B1,1)AND Q2>REF(Q2,1)AND B2>REF(B2,1);{四线同时向上}
B7:=Q3>0 AND B3>0;
B8:=B4 OR B5 OR B6 AND B7;
xx1:=10*B3; xx2:=10*Q3;
短关注:STICKLINE(B3>0 and Q1-Q2<0,10*B3,0,5,1),colorWHITE;
买区:STICKLINE(B8,xx1,0,5,1),ColorB2FFAB;
短加速:STICKLINE(cross(B1,0),10*B3,0,5,0),COLORFF9966;
中加速:STICKLINE(cross(Q1,0),10*Q3,0,5,0),COLOR0099ff;
强势:STICKLINE(Q3>0 and Q1>0,10*Q3,0,5,1),Color6268FF;{中线强势中的强势}
弱强:STICKLINE(Q3>0 and Q1<0,10*Q3,0,5,1),ColorB2A8FF;{中线弱势中的强势}
减仓:STICKLINE(B3>0 and Q1>0 and B3做多:IF(x6>=x7,x6+0.018,x7)*4,Color0098FF;
涨:IF(x4>=x5,x4+0.011,x5)*4,COLORMAGENTA;
做空:IF(x7-x6,x7,x6)*4,COLORGREEn;
跌:IF(x5-x4,x5,x4)*4,ColorFF5B00;
{费氏数}
yt:=0.25*MA(CLOSE,3);
cj:=0.58*REF(MA(CLOSE,31),1);
vma:=yt+cj;
费氏数:=ZIG(3, 10)>REF(ZIG(3,10),1);
成立距今:=BARSLAST(费氏数=1);
费氏神奇数:=0;
DRAWTEXT(成立距今=5,0,'5'),COLORYELLOW;
DRAWTEXT(成立距今=8,0,'8'),COLORYELLOW;
DRAWTEXT(成立距今=13,0,'13'),COLORYELLOW;
DRAWTEXT(成立距今=21,0,'21'),COLORYELLOW;
DRAWTEXT(成立距今=34,0,'34'),COLORYELLOW;
DRAWTEXT(成立距今=55,0,'55'),COLORYELLOW;
DRAWTEXT(成立距今=89,0,'89'),COLORYELLOW;
DRAWTEXT(成立距今=144,0,'144'),COLORYELLOW;
DRAWTEXT(成立距今=233,0,'233'),COLORYELLOW;
DRAWTEXT(成立距今=377,0,'377'),COLORYELLOW;
DRAWTEXT(成立距今=610,0,'610'),COLORYELLOW;
---------------------------------------------------------------------------
{第四部份---区间操作源码:---这一段是向南客老师学习的,(我也是刚用飞狐。)
学的不好,让朋友们见笑了}
hh:=h;ll:=l;
top:=h,COLORCYAN;
bot:=l,COLORBLUE;
xx[1]:=1;
kk:=1;
for i=1 to datacount do begin
if xx=1 then begin
top:=hh; end;
if xx[i-1]=1 then begin
if hh>top[i-1] then begin
top:=hh;
xx:=1;
end;else begin
top:=top[i-1];
xx:=2; end; end;
if xx[i-1]=2 then begin
if hh>top[i-1] then begin
top:=hh;
xx:=1;
end;else begin
top:=top[i-1];
bot:=ll;
xx:=3; end; end;
if xx[i-1]=3 then begin
top:=top[i-1];
if ll< bot [i-1] then begin
bot:=ll;
xx:=3;
end;else begin
bot:=bot[i-1];
xx:=4; end; end;
if xx[i-1]=4 then begin
top:=top[i-1];
if ll
xx:=3;
end;else begin
bot:=bot[i-1];
xx:=5; end; end;
if xx[i-1]=5 then begin
if ll
top:=hh;
bot:=hh;
xx:=1;
end;else begin
bot:=bot[i-1];
top:=top[i-1];
xx:=5; end; end; end;
for j=1 to datacount do begin
if xx[j]=5 and xx[j-1]=4 then begin
for k=j-1 downto j-kk do begin
top[k]:=top[j];
bot[k]:=bot[j]; end; end;
if xx[j-1]=5 and xx[j]=1 then kk:=0;
kk:=kk+1; end;
jj:=BARSLAST(top<>ref(top,1));
STICKLINE(top,top,top,10,1),COLORCYAN;
drawnumber(top<>ref(top,1),ref(top,jj)*1.015,top,2),COLORCYAN;
STICKLINE(bot,bot,bot,10,1),COLORBLUE;
drawnumber(top<>ref(top,1),ref(bot,jj)*0.99,bot,2),COLORBLUE;