感謝這位讀者,為我們提供“啟明星”這個(gè)指標(biāo),并分享給大家。 (文中公式只能用在通達(dá)信軟件上,什么是通達(dá)信軟件,就是券商常用的交易軟件,沒(méi)的話,請(qǐng)找你開(kāi)戶(hù)的券商領(lǐng)取,我這里不賣(mài)軟件。) 指標(biāo)公式如下:(公式一) 注意了,這里是“指標(biāo)公式編輯器”,畫(huà)線方法那里要選“主圖疊加”,不要搞錯(cuò)了。 公式一: B1:=MA(C,1); B2:=SMA(SMA(SMA(B1,2,1),2,1),2,1); SMA2:=MA(B2,3); 三槍買(mǎi)入:IF(LLV(MA(B2,8),3)<>< p=''><> IF(B2>SMA2,B2,DRAWNULL),COLORRED,LINETHICK4; IF(B2<>< p=''><> 三槍賣(mài)出:HHV(MA(B2,1),13),COLORYELLOW; VAR1:=(2*CLOSE+HIGH+LOW)/4; VAR2:=MA(VAR1,7); VAR3:=VAR2-MA(VAR1,7/2)<> VAR4:=VAR2-MA(VAR1,7/2)>0; VAR5:=BARSLAST(VAR3); VAR6:=0-BARSLAST(VAR4); VAR7:=IF(VAR3<> STICKLINE(三槍賣(mài)出>B2 AND B2>SMA2,三槍賣(mài)出,B2,0,1),COLORLIBLUE; STICKLINE(三槍賣(mài)出>SMA2 AND B2<>< p=''><> VAR11:=(CLOSE*2+HIGH+LOW)/4; VAR21:=EMA(VAR11,13)-EMA(VAR11,34); VAR31:=EMA(VAR21,5); STICKLINE((C>=O),OPEN,LOW,0,0),COLOR0726CA; STICKLINE((C>=O),CLOSE,HIGH,0,0),COLOR0726CA; STICKLINE((C<>< p=''><> STICKLINE((C<>< p=''><> STICKLINE((C<>< p=''><> STICKLINE((C<>< p=''><> STICKLINE((C<>< p=''><> STICKLINE((C<>< p=''><> STICKLINE((C<>< p=''><> STICKLINE((C<>< p=''><> STICKLINE((C<>< p=''><> STICKLINE((C>O),CLOSE,OPEN,4,0),COLOR070084; STICKLINE((C>O),CLOSE,OPEN,3.4,0),COLOR0000A3; STICKLINE((C>O),CLOSE,OPEN,2.8,0),COLOR0000B7; STICKLINE((C>O),CLOSE,OPEN,2.2,0),COLOR0000CD; STICKLINE((C>O),CLOSE,OPEN,1.6,0),COLOR0000E9; STICKLINE((C>O),CLOSE,OPEN,1,0),COLOR0754E9; STICKLINE((C>O),CLOSE,OPEN,0.5,0),COLOR076EF3; STICKLINE((C>O),CLOSE,OPEN,0.2,0),COLOR077BF3; VAR2A:=((CLOSE > REF(CLOSE,1)) AND (CLOSE > REF(CLOSE,2))); VAR3A:=((REF(VAR2A,1) AND (CLOSE <= ref(close,1)))="" and="" (close="">= REF(CLOSE,2))); VAR4A:=((REF(VAR3A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <=>=> VAR5A:=((REF(VAR4A,1) AND (CLOSE <= ref(close,1)))="" and="" (close="">= REF(CLOSE,2))); VAR6A:=((REF(VAR5A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <=>=> VAR7A:=((REF(VAR6A,1) AND (CLOSE <= ref(close,1)))="" and="" (close="">= REF(CLOSE,2))); VAR8A:=((REF(VAR7A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <=>=> VAR9A:=((REF(VAR8A,1) AND (CLOSE <= ref(close,1)))="" and="" (close="">= REF(CLOSE,2))); VARAA:=((REF(VAR9A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <=>=> VARBA:=((REF(VARAA,1) AND (CLOSE <= ref(close,1)))="" and="" (close="">= REF(CLOSE,2))); VARCA:=((REF(VARBA,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <=>=> VARDA:=((REF(VARCA,1) AND (CLOSE <= ref(close,1)))="" and="" (close="">= REF(CLOSE,2))); VAREAA:=((CLOSE < ref(close,1))="" and="" (close=""><> VARFA:=((REF(VAREAA,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <=>=> VAR10A:=((REF(VARFA,1) AND (CLOSE <= ref(close,1)))="" and="" (close="">= REF(CLOSE,2))); VAR11A:=((REF(VAR10A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <=>=> VAR12A:=((REF(VAR11A,1) AND (CLOSE <= ref(close,1)))="" and="" (close="">= REF(CLOSE,2))); VAR13A:=((REF(VAR12A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <=>=> VAR14A:=((REF(VAR13A,1) AND (CLOSE <= ref(close,1)))="" and="" (close="">= REF(CLOSE,2))); VAR15A:=((REF(VAR14A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <=>=> VAR16A:=((REF(VAR15A,1) AND (CLOSE <= ref(close,1)))="" and="" (close="">= REF(CLOSE,2))); VAR17A:=((REF(VAR16A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <=>=> VAR18A:=((REF(VAR17A,1) AND (CLOSE <= ref(close,1)))="" and="" (close="">= REF(CLOSE,2))); VAR19A:=((REF(VAR18A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <=>=> VAR1A:=(REF((((((((((((VAREAA OR VARFA) OR VAR10A) OR VAR11A) OR VAR12A) ORVAR13A) OR VAR14A) OR VAR15A) OR VAR16A) OR VAR17A) OR VAR18A) OR VAR19A),1) ANDVAR2A); STICKLINE(VAR1A,O,O+(C-O)/3,4,0),COLOR1029FF; STICKLINE(VAR1A,O,O+(C-O)/3,3.4,0),COLOR1040FF; STICKLINE(VAR1A,O,O+(C-O)/3,2.8,0),COLOR1083FF; STICKLINE(VAR1A,O,O+(C-O)/3,2.2,0),COLOR10ABFF; STICKLINE(VAR1A,O,O+(C-O)/3,1.6,0),COLOR10D0FF; STICKLINE(VAR1A,O,O+(C-O)/3,1,0),COLOR10FFFF; STICKLINE(VAR1A,O,O+(C-O)/3,0.3,0),COLOR00FFFF; AA:=(REF((((((((((((VAR2A OR VAR3A) OR VAR4A) OR VAR5A) OR VAR6A) OR VAR7A) OR VAR8A) OR VAR9A)OR VARAA) OR VARBA) OR VARCA) OR VARDA),1) AND VAREAA); STICKLINE(AA,O,O+(C-O)/3,4.3,0),COLOR009900; STICKLINE(AA,O,O+(C-O)/3,3.2,0),COLOR00AA00; STICKLINE(AA,O,O+(C-O)/3,2.4,0),COLOR00BB00; STICKLINE(AA,O,O+(C-O)/3,1.7,0),COLOR00CC00; STICKLINE(AA,O,O+(C-O)/3,1.1,0),COLOR00DD00; STICKLINE(AA,O,O+(C-O)/3,0.5,0),COLOR00EE00; STICKLINE(AA,O,O+(C-O)/3,0.2,0),COLOR00FF00; A13:=EMA(CLOSE,55); A14:=MA(CLOSE,75); A15:=EMA(A14,3); A16:=EMA(A15,3); A17:=(HIGH + LOW) / 5; A18:=(MA(A17,4)) - (MA(A17,34)); A19:=CROSS(A18,0); A20:=CROSS(0,A18); A21:=BARSLAST(A19); A22:=BARSLAST(A20); A23:=REF(A19,1); A24:=REF(A20,1); A25:=BARSLAST(A23); A26:=BARSLAST(A24); A27:=IF((A25 <> A28:=(((REF(CLOSE,1)) <= (ref(a27,1)))="" and="" (close=""> A27)) AND (A21 <> A29:=(((REF(CLOSE,1)) >= (REF(A27,1))) AND (CLOSE < a27))="" and="" (a22=""><> A30:=A28 AND ((COUNT(A28,A21)) = 1); A31:=A29 AND ((COUNT(A29,A22)) = 1); A32:=A30 AND ((REF(BARSLAST(A31),1)) <> A33:=A31 AND ((REF(BARSLAST(A31),1)) > (REF(BARSLAST(A30),1))); DRAWTEXT(A32,SMA2*0.99,'←啟明星'),COLORYELLOW; AC:=AMOUNT/(VOL); YY:=MA(AC,13); LLL:=(C-YY)/YY*100; MIDC := MA(CLOSE,22); UPPERC:= MIDC + 2*STD(C,22); LOWERC:= MIDC - 2*STD(C,22); BBA:=(C-LOWERC)/(UPPERC-LOWERC); LIFENGCYC:=(REF(LLL,1)<-15 and="">-15><0 and="" lll="">REF(LLL,1)); STICKLINE(LIFENGCYC,LOW*0.93,LOW*0.95,6,0)COLORRED; STICKLINE(LIFENGCYC>0,C,O,4,0),COLORRED; STICKLINE(LIFENGCYC>0,C,O,3.4,0),COLOR1029FF; STICKLINE(LIFENGCYC>0,C,O,2.8,0),COLOR1040FF; STICKLINE(LIFENGCYC>0,C,O,2.2,0),COLOR1083FF; STICKLINE(LIFENGCYC>0,C,O,1.6,0),COLOR10ABFF; STICKLINE(LIFENGCYC>0,C,O,1,0),COLOR10D0FF; STICKLINE(LIFENGCYC>0,C,O,0.3,0),COLOR10FFFF; DRAWTEXT(LIFENGCYC>0,LOW*0.98,'$'),COLORFF00FF; DRAWTEXT(LIFENGCYC>0,LOW*0.92,'探頭'),COLORFF00FF; 出來(lái)的效果如下: 下面把出現(xiàn)“探頭”和出現(xiàn)“啟明星”時(shí),分別做條件選股公式。 “探頭”公式如下:(公式二) 公式二: AC:=AMOUNT/(VOL); YY:=MA(AC,13); LLL:=(C-YY)/YY*100; MIDC := MA(CLOSE,22); UPPERC:= MIDC + 2*STD(C,22); LOWERC:= MIDC - 2*STD(C,22); BBA:=(C-LOWERC)/(UPPERC-LOWERC); LIFENGCYC:=(REF(LLL,1)<-15 and="">-15><0 and="" lll="">REF(LLL,1)); LIFENGCYC>0; 效果如下: 找到了帶有“探頭”的股票
啟明星公式如下:(公式三) 公式三: A13:=EMA(CLOSE,55); A14:=MA(CLOSE,75); A15:=EMA(A14,3); A16:=EMA(A15,3); A17:=(HIGH + LOW) / 5; A18:=(MA(A17,4)) - (MA(A17,34)); A19:=CROSS(A18,0); A20:=CROSS(0,A18); A21:=BARSLAST(A19); A22:=BARSLAST(A20); A23:=REF(A19,1); A24:=REF(A20,1); A25:=BARSLAST(A23); A26:=BARSLAST(A24); A27:=IF((A25 <> A28:=(((REF(CLOSE,1)) <= (ref(a27,1)))="" and="" (close=""> A27)) AND (A21 <> A29:=(((REF(CLOSE,1)) >= (REF(A27,1))) AND (CLOSE < a27))="" and="" (a22=""><> A30:=A28 AND ((COUNT(A28,A21)) = 1); A31:=A29 AND ((COUNT(A29,A22)) = 1); A32:=A30 AND ((REF(BARSLAST(A31),1)) <> A33:=A31 AND ((REF(BARSLAST(A31),1)) > (REF(BARSLAST(A30),1))); A32; 效果如下: 找到了有“啟明星”的股票 文中出現(xiàn)的股票僅為展示所用,并非薦股,請(qǐng)留意了。 再次感謝分享指標(biāo)的讀者,謝謝。 |
|