相關標簽:

?

?

原理解析：
A賦值: 如果收盤價>126.32,返回成交額(元)/100000,否則返回成交量(手) 輸出主力: A的4日簡單移動平均,畫洋紅色,線寬為1 輸出游資: A的8日簡單移動平均,畫綠色,線寬為1 輸出大戶: A的16日簡單移動平均,COLOR1100FF,線寬為1 輸出散戶: A的32日簡單移動平均,COLOREE99CC,線寬為1 輸出主: (主力/(主力+游資+大戶+散戶)*100),畫洋紅色,線寬為1 輸出游: (游資/(主力+游資+大戶+散戶)*100),畫綠色,線寬為1 輸出大: (大戶/(主力+游資+大戶+散戶)*100),COLOR1100FF,線寬為1 輸出散: (散戶/(主力+游資+大戶+散戶)*100),COLOREE99CC,線寬為1 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,畫洋紅色 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為7.8,0不為0則畫空心柱.,畫洋紅色 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為7.5,0不為0則畫空心柱.,畫洋紅色 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為7.3,0不為0則畫空心柱.,畫洋紅色 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,畫洋紅色 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為6.8,0不為0則畫空心柱.,畫洋紅色 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為6.5,0不為0則畫空心柱.,畫洋紅色 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為6.3,0不為0則畫空心柱.,畫洋紅色 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,畫洋紅色 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為5.7,0不為0則畫空心柱.,畫洋紅色 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為5.5,0不為0則畫空心柱.,畫洋紅色 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為5.3,0不為0則畫空心柱.,畫洋紅色 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,畫洋紅色 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為4.5,0不為0則畫空心柱.,畫洋紅色 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為3.5,0不為0則畫空心柱.,COLOR009CFF 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫洋紅色 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為2.5,0不為0則畫空心柱.,畫洋紅色 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,畫洋紅色 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫洋紅色 當滿足條件主力>0時,在0和主力位置之間畫柱狀線,寬度為0.7,0不為0則畫空心柱.,畫洋紅色 當滿足條件游資>0時,在0和游資位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR006800 當滿足條件游資>0時,在0和游資位置之間畫柱狀線,寬度為7.8,0不為0則畫空心柱.,COLOR007F00 當滿足條件游資>0時,在0和游資位置之間畫柱狀線,寬度為7,5不為0則畫空心柱.,COLOR008B00 當滿足條件游資>0時,在0和游資位置之間畫柱狀線,寬度為7,3不為0則畫空心柱.,COLOR008B00 當滿足條件游資>0時,在0和游資位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLOR009000 當滿足條件游資>0時,在0和游資位置之間畫柱狀線,寬度為6.8,0不為0則畫空心柱.,COLOR009500 當滿足條件游資>0時,在0和游資位置之間畫柱狀線,寬度為6.5,0不為0則畫空心柱.,COLOR009C00 當滿足條件游資>0時,在0和游資位置之間畫柱狀線,寬度為6.3,0不為0則畫空心柱.,COLOR00A300 當滿足條件游資>0時,在0和游資位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR00AB00 當滿足條件游資>0時,在0和游資位置之間畫柱狀線,寬度為5.7,0不為0則畫空心柱.,COLOR00AF00 當滿足條件游資>0時,在0和游資位置之間畫柱狀線,寬度為5.5,0不為0則畫空心柱.,COLOR00B900 當滿足條件游資>0時,在0和游資位置之間畫柱狀線,寬度為5.3,0不為0則畫空心柱.,COLOR00C000 當滿足條件游資>0時,在0和游資位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR00C100 當滿足條件游資>0時,在0和游資位置之間畫柱狀線,寬度為4.5,0不為0則畫空心柱.,COLOR00CA00 當滿足條件游資>0時,在0和游資位置之間畫柱狀線,寬度為3.5,0不為0則畫空心柱.,COLOR00D300 當滿足條件游資>0時,在0和游資位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR00DB00 當滿足條件游資>0時,在0和游資位置之間畫柱狀線,寬度為2.5,0不為0則畫空心柱.,COLOR00EA00 當滿足條件游資>0時,在0和游資位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLOR00FF00 當滿足條件大戶>0時,在0和大戶位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR1100FF 當滿足條件大戶>0時,在0和大戶位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLOR1100FF 當滿足條件大戶>0時,在0和大戶位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR1100FF 當滿足條件大戶>0時,在0和大戶位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR1100FF 當滿足條件大戶>0時,在0和大戶位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR1100FF 當滿足條件大戶>0時,在0和大戶位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR1100FF 當滿足條件大戶>0時,在0和大戶位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR1100FF 當滿足條件大戶>0時,在0和大戶位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR1100FF 當滿足條件大戶>0時,在0和大戶位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR1100FF 當滿足條件大戶>0時,在0和大戶位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLOR1100FF 當滿足條件大戶>0時,在0和大戶位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR1100FF 當滿足條件大戶>0時,在0和大戶位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR1100FF 當滿足條件大戶>0時,在0和大戶位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR1100FF 當滿足條件大戶>0時,在0和大戶位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR1100FF 當滿足條件大戶>0時,在0和大戶位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR1100FF 當滿足條件大戶>0時,在0和大戶位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR1100FF 當滿足條件散戶>0時,在0和散戶位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,畫黑色 當滿足條件散戶>0時,在0和散戶位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,畫黑色 當滿足條件散戶>0時,在0和散戶位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,畫黑色 當滿足條件散戶>0時,在0和散戶位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,畫黑色 當滿足條件散戶>0時,在0和散戶位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,畫黑色 當滿足條件散戶>0時,在0和散戶位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫黑色 當滿足條件散戶>0時,在0和散戶位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫黑色 當滿足條件散戶>0時,在0和散戶位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫黑色 當滿足條件散戶>0時,在0和散戶位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,畫黑色 當滿足條件散戶>0時,在0和散戶位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,畫黑色 當滿足條件散戶>0時,在0和散戶位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,畫黑色 當滿足條件散戶>0時,在0和散戶位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,畫黑色 當滿足條件散戶>0時,在0和散戶位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,畫黑色 當滿足條件散戶>0時,在0和散戶位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫黑色 當滿足條件散戶>0時,在0和散戶位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫黑色 當滿足條件散戶>0時,在0和散戶位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫黑色 VUR0賦值:(((((2 * 開盤價) + 最高價) + 最低價) + (3 * 收盤價)) / 7) VUR1賦值:(當前流通股本(手) * VUR0) VUR2賦值:(成交額(元)的10日[1日權重]移動平均 / 1000) VUR3賦值:(收盤價*3)的5日簡單移動平均 VUR4賦值:((((VUR2 * (收盤價 * 3)) / VUR3) * 1) / 10) VUR5賦值:((((VUR2 * (開盤價 * 3)) / VUR3) * 1) / 10) VUR6賦值:((((VUR2 * (最高價 * 3)) / VUR3) * 1) / 10) VUR7賦值:((((VUR2 * (最低價 * 3)) / VUR3) * 1) / 10) VUR8賦值:(((((2 * VUR5) + VUR6) + VUR7) + (3 * VUR4)) / 7) VUR9賦值:以(成交量(手)的1日累和*VUR8)為權重VUR4的2日指數移動平均的動態移動平均的2日指數移動平均 VURA賦值:(VUR1-VUR9)的1日指數移動平均 VU1賦值:如果(VURA>1日前的VURA),返回((VURA-1日前的VURA)*15/1000),否則返回0 VU2賦值:如果(VURA<1日前的VURA),返回((VURA-1日前的VURA)*15/1000),否則返回0 VU3賦值:VU1的15日累和 VU4賦值:VU3的10日指數移動平均 VU5賦值:1日前的VU4 VU6賦值:收盤價的13日指數移動平均 VU7賦值:(VU6 < 1日前的VU6) VU8賦值:(VU7 AND (VU4 > VU5)) VU9賦值:(VU2的21日累和 * (0 - 1)) VUA賦值:VU9的5日指數移動平均的8日指數移動平均 VUB賦值:1日前的VUA VUC賦值:收盤價的3日指數移動平均 VUD賦值:(VUC > 1日前的VUC) VUE賦值:(VUC < 1日前的VUC) VUF賦值:((VU4 > VU5) AND VUD) VUG賦值:((VU4 > VU5) AND VUE) VUH賦值:((VU6 > 1日前的VU6) AND (VUA > VUB)) VUN賦值:如果VU8,返回VUR0,否則返回0 VUK賦值:如果VUH,返回((VUR0+最高價)/2),否則返回0 輸出吸籌:VU5,畫洋紅色 當滿足條件VU8時,在VU5和(VU4*1.3)位置之間畫柱狀線,寬度為6,1不為0則畫空心柱.,畫洋紅色 輸出吐籌:VUB,畫綠色 當滿足條件VUH時,在VUB和(VUA*1.2)位置之間畫柱狀線,寬度為6,1不為0則畫空心柱.,畫綠色 TIPTEXT(ISNULL(1日后的&收盤價),0,' www.weiqiv.net.cn '),畫紅色 TIPTEXT(ISNULL(1日前的收盤價),0,'同花順程序化交易')

?

?來源:程序化99（ www.weiqiv.net.cn ）

源碼：

?

?

?

A:= IF(CLOSE>126.32,AMOUNT/100000,VOL);
主力: MA(A,4),colormagenta,LINETHICK1;
游資: MA(A,8),colorgreen,LINETHICK1;
大戶: MA(A,16),color1100ff,LINETHICK1;
散戶: MA(A,32),coloree99cc,LINETHICK1;
主: (主力/(主力+游資+大戶+散戶)*100),colormagenta,linethick1;
游: (游資/(主力+游資+大戶+散戶)*100),colorgreen,linethick1;
大: (大戶/(主力+游資+大戶+散戶)*100),color1100ff,linethick1;
散: (散戶/(主力+游資+大戶+散戶)*100),coloree99cc,linethick1;
STICKLINE(主力>0,0,主力,8,0),colormagenta;
STICKLINE(主力>0,0,主力,7.8,0),colormagenta;
STICKLINE(主力>0,0,主力,7.5,0),colormagenta;
STICKLINE(主力>0,0,主力,7.3,0),colormagenta;
STICKLINE(主力>0,0,主力,7,0),colormagenta;
STICKLINE(主力>0,0,主力,6.8,0),colormagenta;
STICKLINE(主力>0,0,主力,6.5,0),colormagenta;
STICKLINE(主力>0,0,主力,6.3,0),colormagenta;
STICKLINE(主力>0,0,主力,6,0),colormagenta;
STICKLINE(主力>0,0,主力,5.7,0),colormagenta;
STICKLINE(主力>0,0,主力,5.5,0),colormagenta;
STICKLINE(主力>0,0,主力,5.3,0),colormagenta;
STICKLINE(主力>0,0,主力,5,0),colormagenta;
STICKLINE(主力>0,0,主力,4.5,0),colormagenta;
STICKLINE(主力>0,0,主力,3.5,0),Color009CFF;
STICKLINE(主力>0,0,主力,3,0),colormagenta;
STICKLINE(主力>0,0,主力,2.5,0),colormagenta;
STICKLINE(主力>0,0,主力,1.5,0),colormagenta;
STICKLINE(主力>0,0,主力,1,0),colormagenta;
STICKLINE(主力>0,0,主力,0.7,0),colormagenta;
STICKLINE(游資>0,0,游資,8,0),Color006800;
STICKLINE(游資>0,0,游資,7.8,0),Color007F00;
STICKLINE(游資>0,0,游資,7,5),Color008B00;
STICKLINE(游資>0,0,游資,7,3),Color008B00;
STICKLINE(游資>0,0,游資,7,0),Color009000;
STICKLINE(游資>0,0,游資,6.8,0),Color009500;
STICKLINE(游資>0,0,游資,6.5,0),Color009C00;
STICKLINE(游資>0,0,游資,6.3,0),Color00A300;
STICKLINE(游資>0,0,游資,6,0),Color00AB00;
STICKLINE(游資>0,0,游資,5.7,0),Color00AF00;
STICKLINE(游資>0,0,游資,5.5,0),Color00B900;
STICKLINE(游資>0,0,游資,5.3,0),Color00C000;
STICKLINE(游資>0,0,游資,5,0),Color00C100;
STICKLINE(游資>0,0,游資,4.5,0),Color00CA00;
STICKLINE(游資>0,0,游資,3.5,0),Color00D300;
STICKLINE(游資>0,0,游資,3,0),Color00DB00;
STICKLINE(游資>0,0,游資,2.5,0),Color00EA00;
STICKLINE(游資>0,0,游資,1.5,0),Color00FF00;
STICKLINE(大戶>0,0,大戶,8,0),color1100ff;
STICKLINE(大戶>0,0,大戶,7,0),color1100ff;
STICKLINE(大戶>0,0,大戶,6,0),color1100ff;
STICKLINE(大戶>0,0,大戶,5,0),color1100ff;
STICKLINE(大戶>0,0,大戶,4,0),color1100ff;
STICKLINE(大戶>0,0,大戶,3,0),color1100ff;
STICKLINE(大戶>0,0,大戶,2,0),color1100ff;
STICKLINE(大戶>0,0,大戶,1,0),color1100ff;
STICKLINE(大戶>0,0,大戶,8,0),color1100ff;
STICKLINE(大戶>0,0,大戶,7,0),color1100ff;
STICKLINE(大戶>0,0,大戶,6,0),color1100ff;
STICKLINE(大戶>0,0,大戶,5,0),color1100ff;
STICKLINE(大戶>0,0,大戶,4,0),color1100ff;
STICKLINE(大戶>0,0,大戶,3,0),color1100ff;
STICKLINE(大戶>0,0,大戶,2,0),color1100ff;
STICKLINE(大戶>0,0,大戶,1,0),color1100ff;
STICKLINE(散戶>0,0,散戶,8,0),colorblack;
STICKLINE(散戶>0,0,散戶,7,0),colorblack;
STICKLINE(散戶>0,0,散戶,6,0),colorblack;
STICKLINE(散戶>0,0,散戶,5,0),colorblack;
STICKLINE(散戶>0,0,散戶,4,0),colorblack;
STICKLINE(散戶>0,0,散戶,3,0),colorblack;
STICKLINE(散戶>0,0,散戶,2,0),colorblack;
STICKLINE(散戶>0,0,散戶,1,0),colorblack;
STICKLINE(散戶>0,0,散戶,8,0),colorblack;
STICKLINE(散戶>0,0,散戶,7,0),colorblack;
STICKLINE(散戶>0,0,散戶,6,0),colorblack;
STICKLINE(散戶>0,0,散戶,5,0),colorblack;
STICKLINE(散戶>0,0,散戶,4,0),colorblack;
STICKLINE(散戶>0,0,散戶,3,0),colorblack;
STICKLINE(散戶>0,0,散戶,2,0),colorblack;
STICKLINE(散戶>0,0,散戶,1,0),colorblack;
VUR0:=(((((2 * OPEN) + HIGH) + LOW) + (3 * CLOSE)) / 7);
VUR1:=(CAPITAL * VUR0);
VUR2:=(SMA(AMOUNT,10,1) / 1000);
VUR3:=MA((CLOSE * 3),5);
VUR4:=((((VUR2 * (CLOSE * 3)) / VUR3) * 1) / 10);
VUR5:=((((VUR2 * (OPEN * 3)) / VUR3) * 1) / 10);
VUR6:=((((VUR2 * (HIGH * 3)) / VUR3) * 1) / 10);
VUR7:=((((VUR2 * (LOW * 3)) / VUR3) * 1) / 10);
VUR8:=(((((2 * VUR5) + VUR6) + VUR7) + (3 * VUR4)) / 7);
VUR9:=EMA(DMA(EMA(VUR4,2),(SUM(VOL,1) * VUR8)),2);
VURA:=EMA((VUR1 - VUR9),1);
VU1:=IF((VURA > REF(VURA,1)),((VURA - REF(VURA,1)) * 15 / 1000),0);
VU2:=IF((VURA < REF(VURA,1)),((VURA - REF(VURA,1)) * 15 / 1000),0);
VU3:=SUM(VU1,15);
VU4:=EMA(VU3,10);
VU5:=REF(VU4,1);
VU6:=EMA(CLOSE,13);
VU7:=(VU6 < REF(VU6,1));
VU8:=(VU7 AND (VU4 > VU5));
VU9:=(SUM(VU2,21) * (0 - 1));
VUA:=EMA(EMA(VU9,5),8);
VUB:=REF(VUA,1);
VUC:=EMA(CLOSE,3);
VUD:=(VUC > REF(VUC,1));
VUE:=(VUC < REF(VUC,1));
VUF:=((VU4 > VU5) AND VUD);
VUG:=((VU4 > VU5) AND VUE);
VUH:=((VU6 > REF(VU6,1)) AND (VUA > VUB));
VUN:=IF(VU8,VUR0,0);
VUK:=IF(VUH,((VUR0 + HIGH) / 2),0);
吸籌:VU5,colormagenta;
STICKLINE(VU8,VU5,(VU4 * 1.3),6,1),colormagenta;
吐籌:VUB,colorgreen;
STICKLINE(VUH,VUB,(VUA * 1.2),6,1),colorgreen;TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.weiqiv.net.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

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

?