相關標簽:

?

天狼劍主圖 一般10%的收益天狼劍主圖，里邊的信號很多，但是箭頭一旦出現(xiàn)，往往有10%左右的空間。請高手改成選股公式，源碼：

?

?

原理解析：
B1賦值:收盤價的1日簡單移動平均 B2賦值:B1的2日[1日權重]移動平均的2日[1日權重]移動平均的2日[1日權重]移動平均 SMA2賦值:B2的3日簡單移動平均 輸出停損下限:如果3日內(nèi)B2的8日簡單移動平均的最低值<B2,返回3日內(nèi)B2的8日簡單移動平均的最低值,否則返回B2 如果B2>SMA2,返回B2,否則返回無效數(shù),畫紅色,線寬為4 如果B2<SMA2,返回B2,否則返回無效數(shù),畫綠色,線寬為4 輸出SNAKEA:13日內(nèi)B2的1日簡單移動平均的最高值,畫黃色 VAR1A賦值:(2*收盤價+最高價+最低價)/4 VAR2A賦值:VAR1A的7日簡單移動平均 VAR3A賦值:VAR2A-VAR1A的7/2日簡單移動平均<0 VAR4A賦值:VAR2A-VAR1A的7/2日簡單移動平均>0 VAR5A賦值:上次VAR3A距今天數(shù) VAR6A賦值:0-上次VAR4A距今天數(shù) VAR7A賦值:如果VAR3A<=0,返回VAR5A,否則返回VAR6A 當滿足條件SNAKEA>B2ANDB2>SMA2時,在SNAKEA和B2位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,畫藍色 當滿足條件SNAKEA>SMA2ANDB2<SMA2時,在SNAKEA和SMA2位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,畫藍色 VAR11A賦值:(收盤價*2+最高價+最低價)/4 VAR21A賦值:VAR11A的13日指數(shù)移動平均-VAR11A的34日指數(shù)移動平均 VAR31A賦值:VAR21A的5日指數(shù)移動平均 VAR2賦值:((收盤價 > 1日前的收盤價) AND (收盤價 > 2日前的收盤價)) VAR3賦值:((1日前的VAR2 AND (收盤價 <= 1日前的收盤價)) AND (收盤價 >= 2日前的收盤價)) VAR4賦值:((1日前的VAR3 AND (收盤價 >= 1日前的收盤價)) AND (收盤價 <= 2日前的收盤價)) VAR5賦值:((1日前的VAR4 AND (收盤價 <= 1日前的收盤價)) AND (收盤價 >= 2日前的收盤價)) VAR6賦值:((1日前的VAR5 AND (收盤價 >= 1日前的收盤價)) AND (收盤價 <= 2日前的收盤價)) VAR7賦值:((1日前的VAR6 AND (收盤價 <= 1日前的收盤價)) AND (收盤價 >= 2日前的收盤價)) VAR8賦值:((1日前的VAR7 AND (收盤價 >= 1日前的收盤價)) AND (收盤價 <= 2日前的收盤價)) VAR9賦值:((1日前的VAR8 AND (收盤價 <= 1日前的收盤價)) AND (收盤價 >= 2日前的收盤價)) VARA賦值:((1日前的VAR9 AND (收盤價 >= 1日前的收盤價)) AND (收盤價 <= 2日前的收盤價)) VARB賦值:((1日前的VARA AND (收盤價 <= 1日前的收盤價)) AND (收盤價 >= 2日前的收盤價)) VARC賦值:((1日前的VARB AND (收盤價 >= 1日前的收盤價)) AND (收盤價 <= 2日前的收盤價)) VARD賦值:((1日前的VARC AND (收盤價 <= 1日前的收盤價)) AND (收盤價 >= 2日前的收盤價)) VARE賦值:((收盤價 < 1日前的收盤價) AND (收盤價 < 2日前的收盤價)) VARF賦值:((1日前的VARE AND (收盤價 >= 1日前的收盤價)) AND (收盤價 <= 2日前的收盤價)) VAR10賦值:((1日前的VARF AND (收盤價 <= 1日前的收盤價)) AND (收盤價 >= 2日前的收盤價)) VAR11賦值:((1日前的VAR10 AND (收盤價 >= 1日前的收盤價)) AND (收盤價 <= 2日前的收盤價)) VAR12賦值:((1日前的VAR11 AND (收盤價 <= 1日前的收盤價)) AND (收盤價 >= 2日前的收盤價)) VAR13賦值:((1日前的VAR12 AND (收盤價 >= 1日前的收盤價)) AND (收盤價 <= 2日前的收盤價)) VAR14賦值:((1日前的VAR13 AND (收盤價 <= 1日前的收盤價)) AND (收盤價 >= 2日前的收盤價)) VAR15賦值:((1日前的VAR14 AND (收盤價 >= 1日前的收盤價)) AND (收盤價 <= 2日前的收盤價)) VAR16賦值:((1日前的VAR15 AND (收盤價 <= 1日前的收盤價)) AND (收盤價 >= 2日前的收盤價)) VAR17賦值:((1日前的VAR16 AND (收盤價 >= 1日前的收盤價)) AND (收盤價 <= 2日前的收盤價)) VAR18賦值:((1日前的VAR17 AND (收盤價 <= 1日前的收盤價)) AND (收盤價 >= 2日前的收盤價)) VAR19賦值:((1日前的VAR18 AND (收盤價 >= 1日前的收盤價)) AND (收盤價 <= 2日前的收盤價)) VAR1B賦值:(1日前的(((((((((((VAREORVARF)ORVAR10)ORVAR11)ORVAR12)ORVAR13)ORVAR14)ORVAR15)ORVAR16)ORVAR17)ORVAR18)ORVAR19) AND VAR2) 當滿足條件VAR1B時,在開盤價和開盤價+(收盤價-開盤價)/3位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR10FFFF 當滿足條件VAR1B時,在開盤價和開盤價+(收盤價-開盤價)/3位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR00FFFF AA賦值:(1日前的(((((((((((VAR2ORVAR3)ORVAR4)ORVAR5)ORVAR6)ORVAR7)ORVAR8)ORVAR9)ORVARA)ORVARB)ORVARC)ORVARD) AND VARE) 當滿足條件AA時,在開盤價和開盤價+(收盤價-開盤價)/3位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR00EE00 當滿足條件AA時,在開盤價和開盤價+(收盤價-開盤價)/3位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR00FF00 A13賦值:收盤價的55日指數(shù)移動平均 A14賦值:收盤價的75日簡單移動平均 A15賦值:A14的3日指數(shù)移動平均 A16賦值:A15的3日指數(shù)移動平均 A17賦值:(最高價 + 最低價) / 5 A18賦值:(A17的4日簡單移動平均) - (A17的34日簡單移動平均) A19賦值:A18上穿0 A20賦值:0上穿A18 A21賦值:上次A19距今天數(shù) A22賦值:上次A20距今天數(shù) A23賦值:1日前的A19 A24賦值:1日前的A20 A25賦值:上次A23距今天數(shù) A26賦值:上次A24距今天數(shù) A27賦值:如果(A25<A26),返回(A25日前的(2日內(nèi)最高價的最高值)),否則返回(A26日前的(2日內(nèi)最低價的最低值)) A28賦值:(((1日前的收盤價) <= (1日前的A27)) AND (收盤價 > A27)) AND (A21 < A22) A29賦值:(((1日前的收盤價) >= (1日前的A27)) AND (收盤價 < A27)) AND (A22 < A21) A30賦值:A28 AND ((統(tǒng)計A21日中滿足A28的天數(shù)) = 1) A31賦值:A29 AND ((統(tǒng)計A22日中滿足A29的天數(shù)) = 1) A32賦值:A30 AND ((1日前的上次A31距今天數(shù)) < (1日前的上次A30距今天數(shù))) A33賦值:A31 AND ((1日前的上次A31距今天數(shù)) > (1日前的上次A30距今天數(shù))) 當滿足條件A32時,在SMA2*0.99位置書寫文字,畫黃色 AC賦值:成交額(元)/(成交量(手)) YY賦值:AC的13日簡單移動平均 LLL賦值:(收盤價-YY)/YY*100 賦值:收盤價的22日簡單移動平均 UPPERC賦值: MIDC + 2*收盤價的22日估算標準差 LOWERC賦值: MIDC - 2*收盤價的22日估算標準差 BBA賦值:(收盤價-LOWERC)/(UPPERC-LOWERC) BBC賦值:BBA的3日線性回歸預測值 LIFENGCYC賦值:(1日前的LLL<-15 AND 1日前的BBA<0 AND LLL>1日前的LLL) 當滿足條件LIFENGCYC>0時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR10ABFF 當滿足條件LIFENGCYC>0時,在最低價*0.99位置書寫文字,COLORDD00DD 綽階C賦值:成交額(元)/(成交量(手)) YY賦值:AC的13日簡單移動平均 LLL賦值:(收盤價-YY)/YY*100 賦值:收盤價的22日簡單移動平均 UPPERC賦值: MIDC + 2*收盤價的22日估算標準差 LOWERC賦值: MIDC - 2*收盤價的22日估算標準差 BBA賦值:(收盤價-LOWERC)/(UPPERC-LOWERC) LIFENGCYC賦值:(1日前的LLL<-15 AND 1日前的BBA<0 AND LLL>1日前的LLL) 輸出狼來了:LIFENGCYC>0 輸出本主題僅僅提供源碼，主圖公式可以在本網(wǎng)找到，搜索:天狼劍選股公式！按些公式選出三個股票

?

?來源:程序化99（ www.kzuj.com.cn ）

源碼：

?

?

B1:=MA(C,1);
B2:=SMA(SMA(SMA(B1,2,1),2,1),2,1);
SMA2:=MA(B2,3);
停損下限:IF(LLV(MA(B2,8),3)<B2,LLV(MA(B2,8),3),B2);
IF(B2>SMA2,B2,DRAWNULL),COLORRED,LINETHICK4;
IF(B2<SMA2,B2,DRAWNULL),COLORGREEN,LINETHICK4;
SNAKEA:HHV(MA(B2,1),13),COLORYELLOW;
VAR1A:=(2*CLOSE+HIGH+LOW)/4;
VAR2A:=MA(VAR1A,7);
VAR3A:=VAR2A-MA(VAR1A,7/2)<0;
VAR4A:=VAR2A-MA(VAR1A,7/2)>0;
VAR5A:=BARSLAST(VAR3A);
VAR6A:=0-BARSLAST(VAR4A);
VAR7A:=IF(VAR3A<=0,VAR5A,VAR6A);
STICKLINE(SNAKEA>B2 AND B2>SMA2,SNAKEA,B2,0,0),COLORBLUE;
STICKLINE(SNAKEA>SMA2 AND B2<SMA2,SNAKEA,SMA2,0,0),COLORBLUE;
VAR11A:=(CLOSE*2+HIGH+LOW)/4;
VAR21A:=EMA(VAR11A,13)-EMA(VAR11A,34);
VAR31A:=EMA(VAR21A,5);
{STICKLINE((C>=O),OPEN,LOW,0,0),COLOR0726CA;
STICKLINE((C>=O),CLOSE,HIGH,0,0),COLOR0726CA;
STICKLINE((C<O),CLOSE,LOW,0,0),COLORDE9100;
STICKLINE((C<O),OPEN,HIGH,0,0),COLORDE9100;
STICKLINE((C<O),CLOSE,OPEN,2.5,0),COLORFFCC00;
STICKLINE((C<O),CLOSE,OPEN,1.5,0),COLORFFFF00;
STICKLINE((C>O),CLOSE,OPEN,2,0),COLOR0754E9;
STICKLINE((C>O),CLOSE,OPEN,1.5,0),COLOR076EF3;
STICKLINE((C>O),CLOSE,OPEN,1,0),COLOR077BF3;}
VAR2:=((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:=((REF(VARC,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
VARE:=((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)));
VAR19:=((REF(VAR18,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
VAR1B:=(REF((((((((((((VARE OR VARF) OR VAR10) OR VAR11) OR VAR12) OR VAR13) OR VAR14) OR VAR15) OR VAR16) OR VAR17) OR VAR18) OR VAR19),1) AND VAR2);
{STICKLINE(VAR1B,O,O+(C-O)/3,3,0),COLOR10D0FF;}
STICKLINE(VAR1B,O,O+(C-O)/3,2,0),COLOR10FFFF;
STICKLINE(VAR1B,O,O+(C-O)/3,1,0),COLOR00FFFF;
AA:=(REF((((((((((((VAR2 OR VAR3) OR VAR4) OR VAR5) OR VAR6) OR VAR7) OR VAR8) OR VAR9) OR VARA) OR VARB) OR VARC) OR VARD),1) AND VARE);

{STICKLINE(AA,O,O+(C-O)/3,3,0),COLOR00DD00;}
STICKLINE(AA,O,O+(C-O)/3,2,0),COLOR00EE00;
STICKLINE(AA,O,O+(C-O)/3,1,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 < A26),(REF((HHV(HIGH,2)),A25)),(REF((LLV(LOW,2)),A26)));
A28:=(((REF(CLOSE,1)) <= (REF(A27,1))) AND (CLOSE > A27)) AND (A21 < A22);
A29:=(((REF(CLOSE,1)) >= (REF(A27,1))) AND (CLOSE < A27)) AND (A22 < A21);
A30:=A28 AND ((COUNT(A28,A21)) = 1);
A31:=A29 AND ((COUNT(A29,A22)) = 1);
A32:=A30 AND ((REF(BARSLAST(A31),1)) < (REF(BARSLAST(A30),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);
BBC:=FORCAST(BBA,3);
LIFENGCYC:=(REF(LLL,1)<-15 AND REF(BBA,1)<0 AND LLL>REF(LLL,1));
{//STICKLINE(LIFENGCYC,BBC,0.5,6,0);}
{//BBD:(UPPER+LOWER)/2*(C-UPPER);}
STICKLINE(LIFENGCYC>0,C,O,2,0),COLOR10ABFF;
{STICKLINE(LIFENGCYC>0,C,O,1.5,0),COLOR10D0FF;
STICKLINE(LIFENGCYC>0,C,O,1,0),COLOR10FFFF;}
DRAWTEXT(LIFENGCYC>0,LOW*0.99,'☆'),COLORDD00DD;<!--++ plugin_code qcomic begin-->箭頭一旦出現(xiàn)，往往有10%左右的空間。請高手改成選股公式，公式源碼
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 REF(BBA,1)<0 AND LLL>REF(LLL,1));
狼來了:LIFENGCYC>0;
本主題僅僅提供源碼，主圖公式可以在本網(wǎng)找到，搜索:天狼劍選股公式！按些公式選出三個股票
{程序化交易 www.kzuj.com.cn }

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?