?

原理解析：
成交賦值:成交量(手),COLORFFFF00,線寬為0 BB賦值:當前流通股本(手) 輸出換手:成交*100/BB,線寬為0 輸出今日換手:換手,線寬為0 輸出HS:成交量(手)的歷史累和/當前流通股本(手),線寬為0 輸出換手次數:HS的向下舍入,線寬為0 BBB賦值:如果換手次數>0,返回換手次數,否則返回0 BBB2賦值:如果BBB-1日前的BBB>0,返回BBB,否則返回0 距上次完全換手賦值:上次BBB2距今天數,線寬為0,畫綠色 平均換手天賦值:(收盤價的有效數據周期數-距上次完全換手)/換手次數的向下舍入,畫青色,線寬為0 A2賦值:成交/當前流通股本(手)*100 A3賦值:A2>3 AND A2<=5 A4賦值:A2>5 AND A2<=7 A5賦值:A2>7 AND A2<=10 A6賦值:A2>10 當滿足條件A2<3ANDC>開盤價時,在0和A2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFFFF00 當滿足條件A2<3ANDC<開盤價時,在0和A2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR00FF00 輸出換手積極:當滿足條件A3時,在0和A2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFF8800 輸出換手活躍:當滿足條件A4時,在0和A2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫黃色 輸出換手頻繁:當滿足條件A5時,在0和A2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫綠色 輸出巨幅換手:當滿足條件A6時,在0和A2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR0000FF AA賦值:A2>1 AND A2<=3 當滿足條件AA時,在0和A2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORDD7700 BBB3賦值:距上次完全換手日前的BBB的歷史取值轉為字符串 當滿足條件BBB2時,在A2位置書寫文字,COLORFFFFFF 當滿足條件換手>1日前的換手*2時,在換手*0.8位置書寫文字,畫白色 輸出MA5:換手的5日簡單移動平均,畫紅色,線寬為2 輸出MA10:換手的10日簡單移動平均,畫黃色,線寬為2 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色

?

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

源碼：

?

成交:=VOL,COLORFFFF00,LINETHICK0;
BB:=CAPITAL;
換手:成交*100/BB,LINETHICK0;
今日換手:換手,LINETHICK0;
HS:SUM(VOL,0)/CAPITAL,LINETHICK0;
換手次數:FLOOR(HS),LINETHICK0;
BBB:=IF(換手次數>0,換手次數,0);
BBB2:=IF(BBB-REF(BBB,1)>0,BBB,0);
距上次完全換手:=BARSLAST(BBB2),LINETHICK0,COLORGREEN;
平均換手天:=FLOOR((BARSCOUNT(CLOSE)-距上次完全換手)/換手次數),COLORCYAN,LINETHICK0;
A2:=成交/CAPITAL*100;
A3:=A2>3 AND A2<=5;
A4:=A2>5 AND A2<=7;
A5:=A2>7 AND A2<=10;
A6:=A2>10;
{STICKLINE(A2<3 AND C>O,0,A2,6,0),COLOR555500;
STICKLINE(A2<3 AND C>O,0,A2,5,0),COLOR777700;
STICKLINE(A2<3 AND C>O,0,A2,4,0),COLOR999900;
STICKLINE(A2<3 AND C>O,0,A2,3,0),COLORBBBB00;
STICKLINE(A2<3 AND C>O,0,A2,2,0),COLORDDDD00;
STICKLINE(A2<3 AND C>O,0,A2,1,0),COLORFFFF00;}
STICKLINE(A2<3 AND C>O,0,A2,3,0),COLORFFFF00;{STICKLINE(A2<3 AND C<O,0,A2,6,0),COLOR005500;
STICKLINE(A2<3 AND C<O,0,A2,5,0),COLOR007700;
STICKLINE(A2<3 AND C<O,0,A2,4,0),COLOR009900;
STICKLINE(A2<3 AND C<O,0,A2,3,0),COLOR00BB00;
STICKLINE(A2<3 AND C<O,0,A2,2,0),COLOR00DD00;
STICKLINE(A2<3 AND C<O,0,A2,1,0),COLOR00FF00;}
STICKLINE(A2<3 AND C<O,0,A2,3,0),COLOR00FF00;{STICKLINE(A3,0,A2,6,0),COLOR553300;
STICKLINE(A3,0,A2,5,0),COLOR774400;
STICKLINE(A3,0,A2,4,0),COLOR995500;
STICKLINE(A3,0,A2,3,0),COLORBB6600;
STICKLINE(A3,0,A2,2,0),COLORDD7700;
換手積極:STICKLINE(A3,0,A2,1,0),COLORFF8800;}
換手積極:STICKLINE(A3,0,A2,3,0),COLORFF8800;{STICKLINE(A4,0,A2,6,0),COLOR555555;
STICKLINE(A4,0,A2,5,0),COLOR777777;
STICKLINE(A4,0,A2,4,0),COLOR999999;
STICKLINE(A4,0,A2,3,0),COLORBBBBBB;
STICKLINE(A4,0,A2,2,0),COLORDDDDDD;
換手活躍:STICKLINE(A4,0,A2,1,0),COLORYELLOW;}
換手活躍:STICKLINE(A4,0,A2,3,0),COLORYELLOW;{STICKLINE(A5,0,A2,6,0),COLOR550000;
STICKLINE(A5,0,A2,5,0),COLOR770000;
STICKLINE(A5,0,A2,4,0),COLOR990000;
STICKLINE(A5,0,A2,3,0),COLORBB0000;
STICKLINE(A5,0,A2,2,0),COLORDD0000;
換手頻繁:STICKLINE(A5,0,A2,1,0),COLORGREEN;}
換手頻繁:STICKLINE(A5,0,A2,3,0),COLORGREEN;{STICKLINE(A6,0,A2,6,0),COLOR000055;
STICKLINE(A6,0,A2,5,0),COLOR000077;
STICKLINE(A6,0,A2,4,0),COLOR000099;
STICKLINE(A6,0,A2,3,0),COLOR0000BB;
STICKLINE(A6,0,A2,2,0),COLOR0000DD;
巨幅換手:STICKLINE(A6,0,A2,1,0),COLOR0000FF;}
巨幅換手:STICKLINE(A6,0,A2,3,0),COLOR0000FF;
AA:=A2>1 AND A2<=3;
{STICKLINE(AA,0,A2,6,0),COLOR553300;
STICKLINE(AA,0,A2,5,0),COLOR773300;
STICKLINE(AA,0,A2,4,0),COLOR993300;
STICKLINE(AA,0,A2,3,0),COLORBB6600;
STICKLINE(AA,0,A2,2,0),COLORDD7700;}
STICKLINE(AA,0,A2,3,0),COLORDD7700;BBB3:=CON2STR(REF(BBB,距上次完全換手),0);
DRAWTEXT(BBB2,A2,'次換手'),COLORFFFFFF;
DRAWTEXT(換手>REF(換手,1)*2,換手*0.8,'黑馬'),COLORWHITE;
MA5:MA(換手,5),COLORRED,LINETHICK2;
MA10:MA(換手,10),COLORYELLOW,LINETHICK2;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?