仅供参考改编时用,内容丰富,信号杂乱,有待优化。希望大家各取所需。 {强龙买点参考F}装: DRAWGBK(1,RGB(36,38,40),RGB(24,16,51),0,1,0); VAR1B := (100 * (EMA(EMA(C - REF(C,1),6),6))) / (EMA(EMA(ABS(C - REF(C,1)),6),6)); 抄底红箭 := ((LLV(VAR1B,2) = LLV(VAR1B,7)) AND (COUNT(VAR1B < 0,2))) AND CROSS(VAR1B,MA(VAR1B,2)); 量能 := IF((MA((VOL - REF(VOL,1)) / REF(VOL,1),10)) = DRAWNULL,EMA((VOL - REF(VOL,1)) / REF(VOL,1),10),MA((VOL - REF(VOL,1)) / REF(VOL,1),10)); 股价 := IF(((CLOSE - MA(CLOSE,22)) / MA(CLOSE,22)) = DRAWNULL,(CLOSE - EMA(CLOSE,22)) / EMA(CLOSE,22),(CLOSE - MA(CLOSE,22)) / MA(CLOSE,22)); 主力量能 := IF(((股价 * (100 + 量能)) - (MA(股价 * (100 + 量能),7))) = DRAWNULL,(股价 * (100 + 量能)) - (EMA(股价 * (100 + 量能),7)),(股价 * (100 + 量能)) - (MA(股价 * (100 + 量能),7))); 量能金叉 := CROSS(主力量能,0); TYP := ((HIGH + LOW) + CLOSE) / 3; CCI := (TYP - MA(TYP,14)) / (0.015 * AVEDEV(TYP,14)); CCI金叉 := CROSS(CCI,-100); A1 := EMA(C,14); A1X := ((A1 - REF(A1,1)) / REF(A1,1)) * 100; 出击A := IF(A1X >= 0,REF(EMA(C,14),BARSLAST(CROSS(A1X,0)) + 1),DRAWNULL); 出击A金叉 := CROSS(A1X,0); DIFF := EMA(CLOSE,12) - EMA(CLOSE,26); DEA := EMA(DIFF,9); MACD金叉 := CROSS(DIFF,DEA); MTR := EXPMEMA(MAX(MAX(HIGH - LOW,ABS(HIGH - REF(CLOSE,1))),ABS(REF(CLOSE,1) - LOW)),14); HD := HIGH - REF(HIGH,1); LD := REF(LOW,1) - LOW; DMP := EXPMEMA(IF((HD > 0) AND (HD > LD),HD,0),14); DMM := EXPMEMA(IF((LD > 0) AND (LD > HD),LD,0),14); PDI := (DMP * 100) / MTR; MDI := (DMM * 100) / MTR; ADX := EXPMEMA(((ABS(MDI - PDI)) / (MDI + PDI)) * 100,6); ADXR := EXPMEMA(ADX,6); X1 := MAX(C,O); X2 := MIN(C,O); X := ((REF(C > O,2)) AND (REF(X1,2) >= HHV(X1,2))) AND (REF(X2,2) <= LLV(X2,2)); B := BARSLAST(X) + 2; A := ((REF(X1,B) >= HHV(X1,B)) AND (REF(X2,B) <= LLV(X2,B))) AND (EVERY(V <= REF(V,1),B)); 肉夹馍 := (((REF(A,1) AND (C > O)) AND (C > REF(HHV(H,B),1))) AND (V > REF(HHV(V,B),1))) AND (EVERY(MA(C,5) > MA(C,10),B + 1)); 评台起飞 : IF(((LAST(((H - L) / REF(C,1)) < 0.1,5,0)) AND (VOL > (REF(VOL,1) * 2))) AND (C > (REF(C,1) * 1.05)),1,DRAWNULL),NODRAW,COLOR6060A0; NH := 18; LOWV := LLV(LOW,NH); HIGHV := HHV(HIGH,NH); MAV := MA(V,3); 横盘 := ((HIGHV - LOWV) / NH) < 0.15; 放量1 := V >= (1.8 * MAV); 今天大阳 := ((C - REF(C,1)) / REF(C,1)) >= 0.05; 启动 : IF((横盘 AND 放量1) AND 今天大阳,1,DRAWNULL),NODRAW,COLOR4080FF; A☆ := DMA(((H + L) + (C * 2)) / 4,0.9); B☆ := VOL / (((H - L) * 2) - (ABS(C - O))); C☆☆ := (IF(C > O,B☆ * (H - L),IF(C < O,B☆ * ((H - O) + (C - L)),VOL / 2))) + (IF(C > O,0 - (B☆ * ((H - C) + (O - L))),IF(C < O,0 - (B☆ * (H - L)),0 - (VOL / 2)))); A☆☆ := (C☆☆ / 20) / 1.15; 攻击流量 := ((A☆☆ * 0.618) + (REF(A☆☆,1) * 0.382)) + (REF(HSL.HSL,2) * 0.168); B☆☆ := EMA(攻击流量,3); 流量 := IF(B☆☆ > REF(B☆☆,1),1,0); AA☆ := ((MAX(C,O) - MIN(C,O)) / MIN(C,O)) < 0.00618; BB☆ := ((H - MAX(C,O)) / MAX(C,O)) > 0.00382; DD☆ := ((MIN(C,O) - L) / L) > 0.00382; EE☆ := ((ABS(BB☆ - DD☆)) / C) < 0.00618; 星☆星 := ((AA☆ AND BB☆) AND DD☆) AND EE☆; 星线选 := ((((星☆星 = 1) AND (流量 = 1)) AND (C > O)) AND ((ABS((C - MA(C,20)) / MA(C,20))) > 0.0382)) AND ((H - MAX(C,O)) <= (MIN(C,O) - L)); 星线确认 : IF(((IF((REF(星线选,1) = 1) AND (C >= REF(C,1)),1,0)) AND (C > O)) AND (((C - REF(C,1)) / REF(C,1)) > 0.00618),1,DRAWNULL),NODRAW,COLORFF3399; 一阳穿三线 : IF(((((CROSS(PDI,MDI) AND CROSS(PDI,ADX)) AND CROSS(PDI,ADXR)) AND (CLOSE > OPEN)) AND ((C / REF(C,1)) > 0.5)) AND (VOL > (MA(VOL,5) * 1.5)),1,DRAWNULL),NODRAW,COLOR800080; T31 := (REF(C,1) / REF(C,2)) >= 1.095; T32 := (O > REF(C,1)) AND (C > O); T33 := ((H > C) AND (O > L)) AND (L >= REF(C,1)); T34 := V > REF(V,1); 涨停螺旋 : IF(((T31 AND T32) AND T33) AND T34,1,DRAWNULL),NODRAW,COLOR002080; RSV := ((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100; K := SMA(RSV,3,1); D := SMA(K,3,1); J := (3 * K) - (2 * D); KD金叉 := CROSS(K,D); A1B := EMA(((L + H) + (C * 2)) / 4,14); A1XB := ((A1B - REF(A1B,1)) / REF(A1B,1)) * 100; 出击B := IF((A1XB >= 0) AND (BARSLAST(CROSS(A1XB,0)) > 0),REF((C + O) / 2,BARSLAST(CROSS(A1XB,0))),DRAWNULL); 出击B金叉 := CROSS(出击B,0); WMTM := CLOSE - REF(CLOSE,12); 动量金叉 := CROSS(WMTM,0); VAR1 := (CLOSE > REF(CLOSE,1)) AND (CLOSE > REF(CLOSE,2)); VAR2 := (REF(VAR1,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)); VAR3 := (REF(VAR2,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)); VAR4 := (REF(VAR3,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)); VAR5 := (REF(VAR4,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)); VAR6 := (REF(VAR5,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)); VAR7 := (REF(VAR6,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)); VAR8 := (REF(VAR7,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)); VAR9 := (REF(VAR8,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)); VARA := (REF(VAR9,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)); VARB := (REF(VARA,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)); VARC := (REF(VARB,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)); VARD := (CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,2)); VARE := (REF(VARD,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)); VARF := (REF(VARE,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)); VAR10 := (REF(VARF,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)); VAR11 := (REF(VAR10,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)); VAR12 := (REF(VAR11,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)); VAR13 := (REF(VAR12,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)); VAR14 := (REF(VAR13,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)); VAR15 := (REF(VAR14,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)); VAR16 := (REF(VAR15,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)); VAR17 := (REF(VAR16,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)); VAR18 := (REF(VAR17,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)); K线金底 := (REF(((((((((((VARD OR VARE) OR VARF) OR VAR10) OR VAR11) OR VAR12) OR VAR13) OR VAR14) OR VAR15) OR VAR16) OR VAR17) OR VAR18,1)) AND VAR1; 下跌 := ((((((((((VARD OR VARE) OR VARF) OR VAR10) OR VAR11) OR VAR12) OR VAR13) OR VAR14) OR VAR15) OR VAR16) OR VAR17) OR VAR18; K线银底 := (下跌 AND (C > O)) AND (C > REF(C,1)); 金银K线 := REF(K线银底,1) AND K线金底; HLC := REF(MA(((HIGH + LOW) + CLOSE) / 3,10),1); HV := EMA(HHV(HIGH,10),3); LV := EMA(LLV(LOW,10),3); 麦克支撑压力 := EMA((HLC * 2) - LV,3); 短线突击 := EMA((C + REF(C,1)) / 2,3); PSY := ((COUNT(CLOSE > REF(CLOSE,1),12)) / 12) * 100; PSYMA := MA(PSY,6); 预选安全区域 := (C <= 麦克支撑压力) AND (C >= 短线突击); 做空衰歇 := CROSS(ADX,MDI); 做多金叉 := CROSS(PDI,MDI); 拉升金叉 := CROSS(ADX,ADXR) AND (PDI > MDI); 初选量能金叉 := 量能金叉 AND (金银K线 OR 抄底红箭); 初选基础池 := (预选安全区域 AND (((金银K线 OR 抄底红箭) OR 动量金叉) OR (做空衰歇 OR 做多金叉))) AND ((初选量能金叉 OR CCI金叉) OR 出击A金叉); 动量金叉确认 := (动量金叉 OR (REF(动量金叉,1) AND (拉升金叉 OR 做多金叉))) OR (做多金叉 AND 做空衰歇); 出击B金叉确认 := 出击B金叉 AND ((REF(CCI金叉 OR KD金叉,1)) OR 做空衰歇); 做多金叉确认 := 做多金叉 OR (做空衰歇 AND 拉升金叉); MACD金叉确认 := MACD金叉 AND REF(量能金叉,1); KD金叉确认 := KD金叉 AND (REF((金银K线 OR 抄底红箭) OR 做空衰歇,1)); 稳操胜券 : IF((REF(初选基础池,1) AND ((动量金叉确认 OR 出击B金叉确认) OR 启动)) AND ((做多金叉确认 OR MACD金叉确认) OR KD金叉确认),1,DRAWNULL),COLORA000FF; 追涨 : IF(((((肉夹馍 OR 评台起飞) OR 启动) OR 一阳穿三线) OR 星线确认) OR 涨停 |
评论内容只代表网友观点,与本站立场无关!
本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!
* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。
* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程
* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!