很准的价量主副图-(源码)

[复制链接]
查看49 | 回复0 | 2022-7-11 12:58:53 | 显示全部楼层 |阅读模式
心爱赛狮会源码如下;
VAR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);
VAR2222:=CROSS(VAR1111,0.9);
VAR3333:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);
VAR4444:=CROSS(VAR3333,0.9);
压力:= REF(HIGH,BARSLAST(VAR2222));
STICKLINE(CLOSE,REF(HIGH,BARSLAST(VAR2222))*1.0005,REF(HIGH,BARSLAST(VAR2222))*0.9995,2,0),COLOREA91B5,LINETHICK3;
支撑:= REF(LOW,BARSLAST(VAR4444));
STICKLINE(CLOSE,REF(LOW,BARSLAST(VAR4444))*1.0005,REF(LOW,BARSLAST(VAR4444))*0.9995,2,0),COLOR00B4FF,LINETHICK3;
GJ:=(C+H+L+O)/4;
明日阻力:=L+(GJ-L)+(C-L),LINETHICK0;
明日支撑:=L+(C-GJ),LINETHICK0;
今日阻力:REF(明日阻力 , 1),LINETHICK0;
今日支撑:REF(明日支撑 , 1),LINETHICK0;
STICKLINE(ISLASTBAR AND C>=今日阻力,今日阻力*1.001,今日阻力*0.999,10,0),LINETHICK2,COLOR0000FF;
STICKLINE(ISLASTBAR AND C<今日阻力,今日阻力*1.001,今日阻力*0.999,10,0),LINETHICK2,COLOR00FF00;
STICKLINE(ISLASTBAR AND C>=今日支撑,今日支撑*1.001,今日支撑*0.999,10,0),LINETHICK2,COLORFF00FF;
STICKLINE(ISLASTBAR AND C<今日支撑,今日支撑*1.001,今日支撑*0.999,10,0),LINETHICK2,COLORFF8800;
CLOSE3:=REF(CLOSE,3);
CLOSE5:=REF(CLOSE,5);
CLOSE7:=REF(CLOSE,7);
CLOSE8:=REF(CLOSE,8);
CLOSE13:=REF(CLOSE,13);
CLOSE21:=REF(CLOSE,21);
JC:=(REF(C,3)+REF(C,5)+REF(C,7)+REF(C,8)+REF(C,13)+REF(C,21))/6;
参考价:SMA(JC,5,1), CIRCLEDOT,COLORGREEN;
价:IF(C>=参考价,参考价,参考价*0.98 ), CIRCLEDOT,COLOR0000FF;
AA:=IF(C>=REF(C,3),1,0);
BB:=IF(C>=REF(C,5),1,0);
CC:=IF(C>=REF(C,7),1,0);
DD:=IF(C>=REF(C,8),1,0);
EE:=IF(C>=REF(C,13),1,0);
FF:=IF(C>=REF(C,21),1,0);
GZ2:=AA+BB+CC+DD+EE+FF;
KK:=0;
KK1:=KK+REF(GZ2,1)+REF(GZ2,2)+REF(GZ2,3)+REF(GZ2,4);
KKK:=KK1/4;
今日保护价:(REF(C,1)+REF(C,2)+O)/3,COLOR0099FF;
CV:=CLOSE;
牛熊分界:(MA(CV,3)+MA(CV,6)+MA(CV,12)+MA(CV,24))/4;
次日心理价:(REF(C,1)+C*2+(C-(H+L+O)/3))/3,LINETHICK0;
了结:EMA(EMA(EMA(HIGH,5),5),5)*1.15,LINETHICK0;
风险: EMA(EMA(EMA(HIGH,5),5),5)*1.1,LINETHICK0;
反弹: EMA(EMA(EMA(HIGH,5),5),5)*0.95,LINETHICK0;
AAF:LLV(LOW,34),LINETHICK1,COLORFFFFCC;
BBF:MA(AAF,4),LINETHICK1,COLORYELLOW;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),4.1,1)/SMA(ABS(CLOSE-LC),4.1,1)*100;
VARA:=((AMOUNT)/(VOL))/(100);
VARB:=((3)*(HIGH)+LOW+OPEN+(2)*(CLOSE))/(7);
VARC:=((SUM(AMOUNT,7))/(VARA))/(100);
VARD:=DMA(VARB,(VOL)/(VARC));
VARE:=((CLOSE-VARD)/(VARD))*(100);
VARF:=((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)))*(100);
VARJ:=MA(VARE,20)+STD(VARE,20);
SJ:=BARSCOUNT(C)+1;
AA1:=SMA(VARF,3,1);
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=V<MA(V,5)*1.5;
FF1:=BB1 AND CC1 AND DD1 AND EE1;
DRAWTEXT(FF1,(LOW* 0.97),'老鼠仓'),COLOR4080FF;
DATA:=5;
{多头买入} DRAWICON(ZIG(3,DATA)>REF(ZIG(3,DATA),1)
AND REF(ZIG(3,DATA),1)<=REF(ZIG(3,DATA),2)
AND REF(ZIG(3,DATA),2)<=REF(ZIG(3,DATA),3),L*0.98,1);
{多头卖出} DRAWICON(ZIG(3,DATA)<REF(ZIG(3,DATA),1)
AND REF(ZIG(3,DATA),1)>=REF(ZIG(3,DATA),2)
AND REF(ZIG(3,DATA),2)>=REF(ZIG(3,DATA),3),H*1.02,2);
{预测明天}
XXS:=MA(LOW,5)*(1-5/100);
XXS1:=MA(HIGH,5)*(1+5/100);
均线:=C,COLORGREEN;
BBAA:=CROSS(XXS1,C);
DRAWTEXT(CROSS(XXS1,C),H,'开盘逃'),COLORWHITE;
VAR11:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
VAR21:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
VAR31:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
DRAWICON(CROSS(VAR21,MA(VAR31,6)),(LOW - (LOW*0.04)),7);
DRAWICON(CROSS(MA(VAR31,6),VAR11),(HIGH+(HIGH*0.03)),8);
附图不知是那位前辈的公式,非常感谢前辈老师!附图也是添加了大中小量能买卖提示及5日量能买卖提示。希望能对初学者有所辅助作用,依据有买卖的提示为主获利会更大些。请老师们多指教。
心爱量能解盘源码如下;
万手:VOL/10000,LINETHICK0,NODRAW;
AA:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL);
预测:AA/10000;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,0,3,1),COLORYELLOW;
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,NODRAW;
主动卖:=IF(CLOSE>OPEN,0-BB*((HIGH-CLOSE)+(OPEN-LOW)),
IF(CLOSE<OPEN,0-BB*(HIGH-LOW),0-VOL/2));
主卖:-主动卖/10000,COLORGREEN,NODRAW;
差额:(主动买+主动卖)/10000,NODRAW;
CC:=(2*C+H+L)/4;
STICKLINE(CC>REF(CC,1),0,VOL,2,DRAWNULL),COLORRED;
STICKLINE(CC<REF(CC,1),0,VOL,2,DRAWNULL),COLORCYAN;
STICKLINE(CC=REF(CC,1),0,VOL,2,DRAWNULL),COLORWHITE;
{STICKLINE(C>-1,0,VOL,3,1),COLORRED;
STICKLINE(C<O ,0,VOL,3,1),COLORFFFF00;
STICKLINE(C=O AND C<REF(C,1),0,VOL,2,1),COLORFFFF00;
STICKLINE(C=O AND C>REF(C,1),0,VOL,2,1),COLORRED;}
STICKLINE(主动买>0,0,主动买,1,0),COLOR0000FF;
STICKLINE(主动卖<0,VOL,主动买,1,0),COLOR00FF00;
持币:IF(SAR(10,2,20)>=H,SAR(10,2,20),DRAWNULL),CIRCLEDOT,COLORGREEN;
持股:IF(SAR(10,2,20)<=L,SAR(10,2,20),DRAWNULL),CIRCLEDOT,COLORMAGENTA;
五日: MA(V,5) COLORFFFFFF LINETHICK2;
三十四日: MA(V,34) COLORFF80FF LINETHICK2;
一百四十四日: MA(V,144) COLOR00FFFF LINETHICK1;
B:=ZIG(3,50/5)*1;
G:=MA(B,2);
D:=CROSS(B,G)*10;
W:=CROSS(G,B)*10;
DRAWTEXT(W=10,4,'卖' ),COLORWHITE;
DRAWTEXT(D=10,4,'买'),COLORCYAN;DATA:=5;
{多头买入} DRAWICON(ZIG(3,DATA)>REF(ZIG(3,DATA),1)
AND REF(ZIG(3,DATA),1)<=REF(ZIG(3,DATA),2)
AND REF(ZIG(3,DATA),2)<=REF(ZIG(3,DATA),3),L*0.98,1);
{多头卖出} DRAWICON(ZIG(3,DATA)<REF(ZIG(3,DATA),1)
AND REF(ZIG(3,DATA),1)>=REF(ZIG(3,DATA),2)
AND REF(ZIG(3,DATA),2)>=REF(ZIG(3,DATA),3),H*1.02,2);

2010712936120038.jpg

2010712936120038.jpg

20107129361936515.rar

8 KB, 下载次数: 0

售价: 1 金钱  [记录]  [购买]

20107129361936515.rar

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则