- UID
- 2
- 积分
- 2892817
- 威望
- 1396440 布
- 龙e币
- 1496377 刀
- 在线时间
- 13326 小时
- 注册时间
- 2009-12-3
- 最后登录
- 2024-12-26
|
神獒炎律公式源码:
- input:N(5,1,100);
- 幅度:=ABS((C-ref(C,1))/ref(C,1));
- 转折:=IF(C>=O,幅度,0-幅度);
- 变异速度:=转折*1000000/INDEXC;
- 神獒:SUM(变异速度,n),LINETHICK2,COLORRED;
- 定律:SUM(0-变异速度,n),LINETHICK2,coloryelLOW;
- LC:=ref(CLOSE,1);
- DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26);
- DEA:= EMA(DIFF,9);
- MACD:= 2*(DIFF-DEA);
- 容量比率:=SUM(IF(CLOSE>LC,VOL,0),26)*100/SUM(IF(CLOSE<=LC,VOL,0),26);
- 审判:(容量比率<70 OR CROSS(DIFF,DEA)) AND CROSS(神獒,定律) AND C/L>1.02,LINETHICK2,colorwhite;
- DRAWICON(审判,0,7);
- Var1:=EMA(HHV(HIGH,500),21);
- Var2:=EMA(HHV(HIGH,250),21);
- Var3:=EMA(HHV(HIGH,90),21);
- Var4:=EMA(LLV(LOW,500),21);
- Var5:=EMA(LLV(LOW,250),21);
- Var6:=EMA(LLV(LOW,90),21);
- Var7:=EMA((Var4*0.96+Var5*0.96+Var6*0.96+Var1*0.558+Var2*0.558+Var3*0.558)/6,21);
- Var8:=EMA((Var4*1.25+Var5*1.23+Var6*1.2+Var1*0.55+Var2*0.55+Var3*0.65)/6,21);
- Var9:=EMA((Var4*1.3+Var5*1.3+Var6*1.3+Var1*0.68+Var2*0.68+Var3*0.68)/6,21);
- VarA:=EMA((Var7*3+Var8*2+Var9)/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(CLOSE*1.35<=VarA,VarC*10,VarC/10),3);
- VarE:=LLV(LOW,30);
- VarF:=HHV(VarD,30);
- Var10:=IF(MA(CLOSE,58),1,0);
- 神炎:EMA(IF(LOW<=VarE,(VarD+VarF*2)/2,0),3)/618*Var10,coloryelLOW;
- 邪炎:=STICKLINE(神炎>0 ,0 ,神炎 ,4 ,1);
- ㊣:神炎,colorred;
- STICKLINE(神炎>0,0 ,㊣*1.2,8,0 ),COLOR00EEff;
- STICKLINE(神炎>0,0 ,㊣*0.8,8,0 ),COLOR00BBff;
- STICKLINE(神炎>0,0 ,㊣*0.6,8,0 ),COLOR0099ff;
- STICKLINE(神炎>0,0 ,㊣*0.4,8,0 ),COLOR0066ff;
- STICKLINE(神炎>0,0 ,㊣*0.2,8,0 ),COLOR0000ff;
- M5:=EMA(C,43);
- M6:=EMA(C,55);
- M7:=MA(C,78);
- M8:=EMA(M7,3);
- M9:=EMA(M8,3);
- M11:=EMA(M9,3);
- MA47:=EMA(CLOSE,46);
- MA60:=EMA(CLOSE,60);
- Y:=(H+L)/2;
- AO:=MA(Y,5)-MA(Y,34 );
- DU0:=CROSS(AO,0);
- UD0:=CROSS(0,AO);
- TDU0:=BARSLAST(DU0);
- TUD0:=BARSLAST(UD0);
- DU3:=ref(DU0,1);
- UD3:=ref(UD0,1);
- TDU3:=BARSLAST(DU3);
- TUD3:=BARSLAST(UD3);
- UDGLINE:=IF(TDU3<TUD3,ref(HHV(H,2),TDU3),ref(LLV(L,2),TUD3));
- JDU0:=ref(C,1)<=ref(UDGLINE,1) AND C>UDGLINE AND TDU0<TUD0;
- JUD0:=ref(C,1)>=ref(UDGLINE,1) AND C<UDGLINE AND TUD0<TDU0;
- JDU1:=JDU0 AND COUNT(JDU0,TDU0)=1;
- JUD1:=JUD0 AND COUNT(JUD0,TUD0)=1;
- JDU2:=JDU1 AND ref(BARSLAST(JUD1),1)<ref(BARSLAST(JDU1),1);
- JUD2:=JUD1 AND ref(BARSLAST(JUD1),1)>ref(BARSLAST(JDU1),1);
- JDU3:=JDU1 AND ref(BARSLAST(JUD1),1)>ref(BARSLAST(JDU1),1);
- JUD3:=JUD1 AND ref(BARSLAST(JUD1),1)<ref(BARSLAST(JDU1),1);
- ㊣神:JDU2 AND M9*0.90,colorwhite;
- DRAWTEXT(㊣神,(LOW * 0.98),'㊣'),LINETHICK2,ALIGN1,coloryelLOW;
- DRAWTEXTREL(10,800,'㊣十二星座*神獒赢富㊣'),LINETHICK1,COLOR00EEff;
- DRAWGBK((CLOSE > 0),STRIP(RGB(4,1,28),RGB(4,1,35),0));
-
- {㊣神獒掌控公式源码㊣}
- input:N(88,1,1111),N1(888,1,1111);
- DRAWGBK((CLOSE > 0),STRIP(RGB(4,1,28),RGB(4,1,35),0));
- a1:=IF((CLOSE < 800),((AMOUNT / VOL) / 100),((((CLOSE * 2) + HIGH) + LOW) / 4));
- a2:=((HHV(HIGH,15)) + (LLV(LOW,30))) / 2;
- a3:=EMA((MA(a1,5)),10);
- a4:=EMA((MA(a1,15)),10);
- a5:=EMA((MA(a1,13)),21);
- a6:=((a3 + a4) + a5) / 3;
- 决策线:EMA((MA(CLOSE,5)),3),colorGreen;
- PARTLINE(决策线,决策线 > (ref(决策线,3)),RGB(255,0,0)),LINETHICK1,colorRed;
- 多空带:((((ref(a6,1)) + a6) + (ref(a6,2))) / 3),LINETHICK0;
- a7:=(((ref(a6,1)) + a6) + (ref(a6,2))) / 3 * 1.191;
- a8:=(((ref(a6,1)) + a6) + (ref(a6,2))) / 3 * 1.236;
- a9:=(((ref(a6,1)) + a6) + (ref(a6,2))) / 3 * 0.809;
- a10:=(((ref(a6,1)) + a6) + (ref(a6,2))) / 3 * 0.764;
- a11:=(((ref(a6,1)) + a6) + (ref(a6,2))) / 3 * 0.618;
- 地线:(a9),LINETHICK1,ColoryelLOW;
- 天线:(a7),LINETHICK1,ColorFF0000;
- 支撑线:(a10),LINETHICK2,Color73740F;
- 阻力线:(a8),LINETHICK2,Color509046;
- a12:=((EMA((MA(a1,3)),3)) + (WMA(a1,5))) / 2;
- a13:=ref(a12,1);
- a14:=BARSCOUNT(CLOSE);
- a15:=IF((a14 = 1),0,(((a12 - a13) / a13) * 100));
- a16:=ref(CLOSE,1);
- a17:=IF((a14 = 1),0,(((CLOSE - a16) / a16) * 100));
- a18:=IF((a14 = 1),((CLOSE + OPEN) / 2),a13);
- a19:=ref(a12,2);
- a20:=((a12 + a13) + a19) / 3;
- a21:=((ABS((a12 - a20)) + ABS((a13 - a20))) + ABS((a19 - a20))) / 3;
- a22:=IF((a14 < 3),0,((a21 / a12) * 100));
- a23:=IF((((a15 > 0.5) AND ((a22 > 0.215) OR (LOW > a18))) AND (CLOSE >= OPEN)),1,0);
- a24:=IF((((a15 < (0 - 0.3)) AND ((a22 > 0.2) OR (HIGH < a18))) AND ((OPEN >= CLOSE) OR (a17 < -1))),1,0);
- FILLRGN((((ref(a6,1)) + a6) + (ref(a6,2))) / 3,(((ref(a6,1)) + a6) + (ref(a6,2))) / 3 * 0.985,CLOSE > a2,RGB(250,0,0),CLOSE < a2,RGB(101,0,185));
- B:((COUNT(a23,BARSLAST(a24))) = 1) AND a23,LINETHICK0;
- D:((COUNT(a24,BARSLAST(a23))) = 1) AND a24,LINETHICK0;
- DRAWTEXT(B,(LOW * 0.98),'㊣'),LINETHICK3,ALIGN1,colorWhite;
- DRAWTEXT(D,(HIGH * 1.035),'S'),LINETHICK3,ALIGN1,colorGreen;
- STICKLINE(((B > 0) OR (D > 0)),a1,(a1 * 0.998),8,0),ColorFF0000;
- a25:=(EMA(CLOSE,12)) - (EMA(CLOSE,26));
- a26:=EMA(a25,9);
- a27:=2 * (a25 - a26);
- a28:=IF((((((((ref(a27,1)) < (ref(a27,2))) AND ((ref(a27,2)) < (ref(a27,3)))) AND (a27 > (ref(a27,1)))) AND (a27 >= 0)) AND ((LLV(a27,4)) > 0)) AND (COUNT((a27 < 0.18),5))),(a27 * 2),0);
- a29:=IF(((COUNT((CROSS(a26,a25)),8)) AND (CROSS(a25,a26))),(a27 * 4),0);
- a30:=(a28 > 0) AND (CLOSE >= (((ref(a6,1)) + a6) + (ref(a6,2))) / 3);
- DRAWICON(a30,LOW,12),ALIGN1;
- a31:=(((CLOSE / a16) - 1) * 100) >= 7;
- a32:=HIGH - ((HIGH - LOW) / 3);
- a33:=LOW + ((HIGH - LOW) / 3);
- a34:=(CLOSE > 0) AND a31;
- a35:=((HIGH - LOW) * 0.618) + LOW;
- a36:=((HIGH - LOW) * 0.382) + LOW; {文章来至程序化交易网 cxh99.com}
- STICKLINE(a34,a32,a33,8,0),colorYelLOW;
- STICKLINE(a34,((HIGH + LOW) / 2),((HIGH + LOW) / 2),8,0);
- STICKLINE(a34,CLOSE,a35,8,0),colorRed;
- STICKLINE(a34,CLOSE,a35,7,0),Color1414FF;
- STICKLINE(a34,CLOSE,a35,6,0),Color2828FF;
- STICKLINE(a34,CLOSE,a35,5,0),Color3D3DFF;
- STICKLINE(a34,CLOSE,a35,4,0),Color5151FF;
- STICKLINE(a34,CLOSE,a35,3,0),Color6565FF;
- STICKLINE(a34,CLOSE,a35,2,0),Color7A7AFF;
- STICKLINE(a34,CLOSE,a35,1,0),Color8E8EFF;
- STICKLINE(a34,a36,OPEN,8,0),colorGreen;
- STICKLINE(a34,a36,OPEN,7,0),Color28FF28;
- STICKLINE(a34,a36,OPEN,6,0),Color3DFF3D;
- STICKLINE(a34,a36,OPEN,5,0),Color51FF51;
- STICKLINE(a34,a36,OPEN,4,0),Color65FF65;
- STICKLINE(a34,a36,OPEN,3,0),Color7AFF7A;
- STICKLINE(a34,a36,OPEN,2,0),Color8EFF8E;
- STICKLINE(a34,a36,OPEN,1,0),ColorA2FFA2;
- a37:=((CLOSE - (EMA(a1,25))) / (EMA(a1,25))) * 100;
- DRAWTEXT(((a37 > 12) AND (CROSS(决策线,CLOSE))),HIGH,'卖出');
- a38:=BIGORDER(1,2);
- a39:=BIGORDER(2,2);
- a40:=(((a38 - a39) * VOL) / CAPITAL) * 500;
- DRAWTEXT(((a40 > 0.5) OR (LAST((a40 > 0)) > 1)),((((ref(a6,1)) + a6) + (ref(a6,2))) / 3 * 1.002),'● '),colorYelLOW;
- DRAWTEXT((a40 > 1),((((ref(a6,1)) + a6) + (ref(a6,2))) / 3 * 1.002),'★'),ColorFF0087;
- DRAWTEXT((a40 > 2),((((ref(a6,1)) + a6) + (ref(a6,2))) / 3 * 1.002),'★'),colorBlack;
- DRAWTEXT((((((ref(a40,1)) >= (HHV(a40,20))) AND (a40 >= (LLV(a40,20)))) AND ((ref(a40,1)) > 2.5)) AND (a40 < -2.5)),(HIGH * 1.02),'◤反转'),colorGreen;
- DRAWTEXT(((((OPEN / a16) > 1.03) AND (CLOSE < OPEN)) AND (a40 < 0)),HIGH,'出货'),colorMAgenta;
- a41:=LOW < a11;
- DRAWICON(a41,LOW,1);
- DRAWICON((((CROSS(CLOSE,(ref(a9,1)))) AND (a15 < -3)) OR (((LOW < 支撑线) AND (CLOSE > 支撑线)) AND (a15 < -3.5))),LOW,7),ALIGN1;
- DRAWICON(((CROSS((ref(a7,1)),CLOSE)) AND (a40 < 0)),(HIGH * 1.015),8),ALIGN1;
- DRAWTEXT(((CROSS(CLOSE,(ref(a9,1)))) AND (a40 > 0)),LOW,'1/3仓'),colorMAgenta;
- DRAWTEXT(((CROSS((ref(a7,1)),CLOSE)) AND (a40 < 0)),(HIGH * 1.05),'1/3仓出'),Color00DB00;
- DRAWTEXT((CROSS(CLOSE,(ref(a10,1)))),(LOW * 0.96),'仓1/2'),colorYelLOW;
- DRAWTEXT((CROSS(CLOSE,(ref(((((ref(a6,1)) + a6) + (ref(a6,2))) / 3 * 0.681),1)))),(LOW * 0.98),'1/2仓'),Color005EFF;
- STICKLINE(((CLOSE > 0) AND (DISPSTATUS = 2)),((((ref(a6,1)) + a6) + (ref(a6,2))) / 3 * 1.15),((((ref(a6,1)) + a6) + (ref(a6,2))) / 3 * 1.15),20,0),colorWhite;
- STICKLINE(((CLOSE > 0) AND (DISPSTATUS = 2)),((((ref(a6,1)) + a6) + (ref(a6,2))) / 3 * 0.85),((((ref(a6,1)) + a6) + (ref(a6,2))) / 3 * 0.85),20,0);
- DRAWTEXT(a41,HIGH,'满仓出击');
- a42:=(CYC(8) - (ref(CYC(8),1))) / (ref(CYC(8),1));
- a43:=((SMA((MAX((CLOSE - a16),0)),5,1)) / (SMA(ABS((CLOSE - a16)),5,1))) * 100;
- DRAWTEXT(((((CROSS(90,a43)) AND (a40 < 0)) AND ((CLOSE / OPEN) <= 0.985)) OR (((a43 > 90) AND (a40 < 0)) AND ((CLOSE / OPEN) <= 0.985))),(HIGH * 1.04),'▼'),ALIGN1,colorGreen;
- DRAWTEXT(((((CROSS(a43,10)) AND (a40 > 0)) OR ((a43 < 10) AND (a40 > 0))) OR (((LOW < 支撑线) AND (CLOSE > 支撑线)) AND (a40 > 0))),(LOW * 0.97),'▲'),ALIGN1,colorRed;
- DRAWTEXT(((CROSS(a43,10)) AND (a15 < -4)),(LOW * 0.92),'◢◣'),ALIGN1,colorRed;
- DRAWTEXT((((a15 < -5) AND (a37 < -24)) AND (a43 < 12)),(LOW * 0.95),'▲'),ALIGN1,colorMAgenta;
- DRAWTEXT(((((a15 < -3) AND (a40 > 0)) AND (LOW <= 地线)) AND (CLOSE > 地线)),(LOW * 0.94),'◆'),ALIGN1,colorYelLOW;
- DRAWTEXT(((CLOSE > 0) AND (DISPSTATUS = 2)),(决策线 * 0.9),'多空价:'+ref(a6,1)),MOVE10,ALIGN2,colorYelLOW;
- DRAWTEXT(((CLOSE > 0) AND (DISPSTATUS = 2)),(a7 * 1.05),'天线:'+a7),MOVE10,ALIGN2,ColorFF8748;
- DRAWTEXT(((CLOSE > 0) AND (DISPSTATUS = 2)),(a9 * 0.96),'地线:'+a9),MOVE10,ALIGN2,Color766A6C;
- DRAWTEXT(((CLOSE > 0) AND (DISPSTATUS = 2)),(决策线 * 0.95),'决策价:'+决策线),MOVE10,ALIGN2,colorRed;
- PARTLINE(支撑线,(MA(a1,10)) > (MA(a1,240)),RGB(255,0,255)),LINETHICK2,colorMAgenta;
- a44:=LOW > (ref(HIGH,1));
- a45:=HIGH < (ref(LOW,1));
- PARTLINE(地线,(MA(a1,10)) > (MA(a1,72)),RGB(255,255,0)),LINETHICK1,colorYelLOW;
- DRAWTEXT(a44,((ref(HIGH,1)) * 1.003),'─'),ALIGN1,colorWhite;
- DRAWTEXT(a44,(LOW * 1.003),'─'),ALIGN1,colorWhite;
- DRAWTEXT(a45,((ref(LOW,1)) * 1.003),'─'),ALIGN1,colorGreen;
- DRAWTEXT(a45,(HIGH * 1.003),'─'),ALIGN1,colorGreen;
- DRAWTEXTREL(0,0,'评级:'+Extrastring('评级')),colorCyan;
- DRAWTEXTABS(1,15,'所属板块:'+BKNAME),ColorAFFF00;
- DRAWTEXTREL(0,130,'每股收益:'+NUMTOSTRN(FINANCE2(3),3)+'元'+' 市盈率:'+NUMTOSTRN(DYNAINFO(39),2)+'元'+' 市净率:'+NUMTOSTRN((CLOSE / FINANCE2(4)),2)+'元'+' 净资产:'+NUMTOSTRN(FINANCE2(4),2)+'元'),Color00C0FF;
-
-
-
-
- {赢富排序公式源码}{副图}{大智慧L2新一代公式}
-
- input:N(1,1,60);
- a1:=(BIGORDER(1,2)) - (BIGORDER(2,2));
- a2:=(BIGORDER(1,3)) - (BIGORDER(2,3));
- a3:=((BIGORDER(1,2)) - (BIGORDER(1,3))) * VOL;
- a4:=((BIGORDER(2,2)) - (BIGORDER(2,3))) * VOL;
- a5:=a2 * VOL;
- a6:=a3 - a4;
- a7:=a1 * VOL;
- a8:=(1 - (BIGORDER(1,1))) - (1 - (BIGORDER(2,1)));
- a9:=(BIGORDER(1,1)) - (BIGORDER(1,2));
- a10:=(BIGORDER(2,1)) - (BIGORDER(2,2));
- a11:=a9 - a10;
- a12:=a11 * VOL;
- a13:=a8 * VOL; {本文来至CXH99.COM}
- a14:=((a13 * 9) + a12) / 10;
- a15:=(100 * a14) / CAPITAL;
- a16:=SUM(a15,0);
- a17:=(100 * a5) / CAPITAL;
- a18:=SUM(a17,0);
- a19:=(100 * a6) / CAPITAL;
- a20:=SUM(a19,0);
- a21:=((a6 * 4) + (a5 * 6)) / 10;
- a22:=(100 * a21) / CAPITAL;
- a23:=SUM(a22,0);
- 主力排序:PERCENTBAR(a23,(ref(a23,N)));
- 机构排序:PERCENTBAR(a18,(ref(a18,N)));
- 大户排序:PERCENTBAR(a20,(ref(a20,N)));
- 散户排序:PERCENTBAR(a16,(ref(a16,N)));
- {机构买盘}{副图}{大智慧L2新一代公式}
- a1:=(BIGORDER(1,3)) * VOL;
- a2:=(BIGORDER(2,3)) * VOL;
- a3:=((BIGORDER(1,2)) - (BIGORDER(1,3))) * VOL;
- a4:=((BIGORDER(2,2)) - (BIGORDER(2,3))) * VOL;
- a5:=(BIGORDER(1,2)) * VOL;
- a6:=(BIGORDER(2,2)) * VOL;
- a7:=((a3 * 4) + (a1 * 11)) / 15;
- a8:=(100 * a7) / CAPITAL;
- a9:=(100 * a5) / (a5 + a6);
- a10:=IF((a9 >= 50),a8,0);
- 机构买盘:PERCENTBAR(a10,(a10 * 0.96));
复制代码
|
|