相關標簽:

?

?

原理解析：
輸出輸出DRAWTEXTREL(50,10,' 代碼: '+STKLABEL+' '+品種名稱+' 日期: '+年份+'年'+月份+'月 '+日+'日 '),線寬為2,COLORFFFF80 DRAWTEXTREL(650,10,'㊣十二星座*神獒贏富㊣'),線寬為1,COLOR00EEFF A1賦值:(ORDERVOL(1,3))的歷史累和 A2賦值:(ORDERVOL(2,3))的歷史累和 A3賦值:((ORDERVOL(1,2))的歷史累和) - A1 A4賦值:((ORDERVOL(2,2))的歷史累和) - A2 A5賦值:((ORDERVOL(1,1))的歷史累和) - ((ORDERVOL(1,2))的歷史累和) A6賦值:((ORDERVOL(2,1))的歷史累和) - ((ORDERVOL(2,2))的歷史累和) A7賦值:((ORDERVOL(1,0))的歷史累和) - ((ORDERVOL(1,1))的歷史累和) A8賦值:((ORDERVOL(2,0))的歷史累和) - ((ORDERVOL(2,1))的歷史累和) A9賦值:((ORDERVOL(1,0))的歷史累和) + ((ORDERVOL(2,0))的歷史累和) A10賦值:A7 - A8 A11賦值:A5 - A6 A12賦值:A3 - A4 A13賦值:A1 - A2 A14賦值:((ORDERVOL(1,2))的歷史累和) - ((ORDERVOL(2,2))的歷史累和) A15賦值:(100 * A7) / A9 A16賦值:(100 * A8) / A9 A17賦值:(100 * A5) / A9 A18賦值:(100 * A6) / A9 A19賦值:(100 * A3) / A9 A20賦值:(100 * A4) / A9 A21賦值:(100 * A1) / A9 輸出中戶籌碼:A11,線寬為1,畫綠色 輸出大戶籌碼:A12,線寬為1,畫黃色 輸出機構籌碼:A13,線寬為1,COLORFF0000 輸出主力籌碼:A14,線寬為2,畫紅色 A22賦值:(100 * A2) / A9 A23賦值:(100 * ((ORDERVOL(1,2))的歷史累和)) / A9 A24賦值:(100 * ((ORDERVOL(2,2))的歷史累和)) / A9 A25賦值:(100 * A10) / A9 A26賦值:(100 * A11) / A9 A27賦值:(100 * A12) / A9 A28賦值:(100 * A13) / A9 A29賦值:(100 * A14) / A9 A30賦值:(A1) A31賦值:(A2) A32賦值:(A3) A33賦值:(A4) A34賦值:(A5) A35賦值:(A6) A36賦值:(A7) A37賦值:(A8) A38賦值:(((ORDERVOL(1,2))的歷史累和)) A39賦值:(((ORDERVOL(2,2))的歷史累和)) A40賦值:(A10) A41賦值:500 / (A30和A31的較大值中戶籌碼,大戶籌碼,機構籌碼)) A42賦值:550 / (A38和A39的較大值) A43賦值:600 - (A30 * A41) A44賦值:600 - (A31 * A41) A45賦值:600 - (A32 * A41) A46賦值:600 - (A33 * A41) A47賦值:600 - (A34 * A41) A48賦值:600 - (A35 * A41) A49賦值:600 - (A36 * A41) A50賦值:600 - (A37 * A41) A51賦值:600 - (A38 * A42) A52賦值:600 - (A39 * A42) A53賦值:600 - (A40 * A41) A54賦值:600 - (中戶籌碼 * A41) A55賦值:600 - (大戶籌碼 * A41) A56賦值:600 - (機構籌碼 * A41) A57賦值:600 - (主力籌碼 * A42) 相對位置上畫矩形,畫黃色 相對位置上畫矩形,畫黃色 相對位置上畫矩形,畫黃色 相對位置上畫矩形,畫黃色 相對位置上畫矩形,畫黃色 相對位置上畫矩形,畫黃色 相對位置上畫矩形,畫黃色 相對位置上畫矩形,畫黃色 相對位置上畫矩形,畫黃色 相對位置上畫矩形,畫黃色 相對位置上畫矩形,畫黃色 相對位置上畫矩形,畫黃色 相對位置上畫矩形,畫黃色 相對位置上畫矩形,畫黃色 相對位置上畫矩形,畫黃色 相對位置上畫矩形,畫白色 DRAWTEXTREL(18,450,'散戶'),COLORDDFFFF DRAWTEXTREL(125,450,'中戶'),COLORDDFFFF DRAWTEXTREL(235,450,'大戶'),COLORDDFFFF DRAWTEXTREL(345,450,'機構'),COLORDDFFFF DRAWTEXTREL(888,450,'主力'),COLORDDFFFF 輸出輸出輸出輸出DRAWTEXTREL(2,720,'機構買:'+NUMTOSTR(A21)+'%'+' 大戶買:'+NUMTOSTR(A19)+'%'+' 中戶買:'+NUMTOSTR(A17)+'%'+' 散戶買:'+NUMTOSTR(A15)+'%'),畫紅色 輸出輸出輸出輸出DRAWTEXTREL(2,790,'機構賣:'+NUMTOSTR(A22)+'%'+' 大戶賣:'+NUMTOSTR(A20)+'%'+' 中戶賣:'+NUMTOSTR(A18)+'%'+' 散戶賣:'+NUMTOSTR(A16)+'%'),畫綠色 輸出輸出輸出輸出DRAWTEXTREL(2,860,'機構差:'+NUMTOSTR(A28)+'%'+' 大戶差:'+NUMTOSTR(A27)+'%'+' 中戶差:'+NUMTOSTR(A26)+'%'+' 散戶差:'+NUMTOSTR(A25)+'%'),畫白色 輸出DRAWTEXTREL(2,930,'主力差:'+NUMTOSTR(A29)+'%'),畫白色

?

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

源碼：

?

DRAWTEXTREL(50,10,' 代碼: '+STKLABEL+' '+STKNAME+' 日期: '+YEAR+'年'+MONTH+'月 '+DAY+'日 '),linethick2,ColorFFFF80;
DRAWTEXTREL(650,10,'㊣十二星座*神獒贏富㊣{股票公式www..com}'),linethick1,COLOR00EEff;
a1:=SUM((ORDERVOL(1,3)),0);
a2:=SUM((ORDERVOL(2,3)),0);
a3:=(SUM((ORDERVOL(1,2)),0)) - a1;
a4:=(SUM((ORDERVOL(2,2)),0)) - a2;
a5:=(SUM((ORDERVOL(1,1)),0)) - (SUM((ORDERVOL(1,2)),0));
a6:=(SUM((ORDERVOL(2,1)),0)) - (SUM((ORDERVOL(2,2)),0));
a7:=(SUM((ORDERVOL(1,0)),0)) - (SUM((ORDERVOL(1,1)),0));
a8:=(SUM((ORDERVOL(2,0)),0)) - (SUM((ORDERVOL(2,1)),0));
a9:=(SUM((ORDERVOL(1,0)),0)) + (SUM((ORDERVOL(2,0)),0));
a10:=a7 - a8;{股票公式www..com}
a11:=a5 - a6;
a12:=a3 - a4;
a13:=a1 - a2;
a14:=(SUM((ORDERVOL(1,2)),0)) - (SUM((ORDERVOL(2,2)),0));
a15:=(100 * a7) / a9;
a16:=(100 * a8) / a9;
a17:=(100 * a5) / a9;
a18:=(100 * a6) / a9;
a19:=(100 * a3) / a9;
a20:=(100 * a4) / a9;
a21:=(100 * a1) / a9;
中戶籌碼:A11,linethick1,colorGreen;
大戶籌碼:A12,linethick1,colorYellow;
機構籌碼:A13,linethick1,ColorFF0000;
主力籌碼:A14,linethick2,colorRed;
a22:=(100 * a2) / a9;
a23:=(100 * (SUM((ORDERVOL(1,2)),0))) / a9;
a24:=(100 * (SUM((ORDERVOL(2,2)),0))) / a9;
a25:=(100 * a10) / a9;
a26:=(100 * a11) / a9;
a27:=(100 * a12) / a9;
a28:=(100 * a13) / a9;
a29:=(100 * a14) / a9;
a30:=(a1);
a31:=(a2);
a32:=(a3);
a33:=(a4);
a34:=(a5);
a35:=(a6);
a36:=(a7);
a37:=(a8);
a38:=((SUM((ORDERVOL(1,2)),0)));
a39:=((SUM((ORDERVOL(2,2)),0)));
a40:=(a10);
a41:=500 / (MAX(a30,a31,a32,a33,a34,a35,a36,a37,a40,中戶籌碼,大戶籌碼,機構籌碼));
a42:=550 / (MAX(a38,a39,主力籌碼));
a43:=600 - (a30 * a41);
a44:=600 - (a31 * a41);
a45:=600 - (a32 * a41);
a46:=600 - (a33 * a41);
a47:=600 - (a34 * a41);
a48:=600 - (a35 * a41);
a49:=600 - (a36 * a41);
a50:=600 - (a37 * a41);
a51:=600 - (a38 * a42);
a52:=600 - (a39 * a42);
a53:=600 - (a40 * a41);
a54:=600 - (中戶籌碼 * a41);
a55:=600 - (大戶籌碼 * a41);
a56:=600 - (機構籌碼 * a41);
a57:=600 - (主力籌碼 * a42);
DRAWRECTREL(50,a49,70,600,250),colorYellow;
DRAWRECTREL(70,a50,90,600,9213440),colorYellow;
DRAWRECTREL(90,a53,110,600,(IF((a10 >= 0),3289855,8584960))),colorYellow;
DRAWRECTREL(160,a47,180,600,250),colorYellow;
DRAWRECTREL(180,a48,200,600,9213440),colorYellow;
DRAWRECTREL(200,a54,220,600,(IF((a11 >= 0),3289855,8584960))),colorYellow;
DRAWRECTREL(270,a45,290,600,250),colorYellow;
DRAWRECTREL(290,a46,310,600,9213440),colorYellow;
DRAWRECTREL(310,a55,330,600,(IF((a12 >= 0),3289855,8584960))),colorYellow;
DRAWRECTREL(380,a43,400,600,250),colorYellow;
DRAWRECTREL(400,a44,420,600,9213440),colorYellow;
DRAWRECTREL(420,a56,440,600,(IF((a13 >= 0),3289855,8584960))),colorYellow;
DRAWRECTREL(925,a51,945,600,255),colorYellow;
DRAWRECTREL(945,a52,965,600,9213440),colorYellow;
DRAWRECTREL(965,a57,985,600,(IF((a14 >= 0),3289855,8584960))),colorYellow;
DRAWRECTREL(0,600,445,604,255),colorWhite;
DRAWTEXTREL(18,450,'散戶'),ColorDDFFFF;
DRAWTEXTREL(125,450,'中戶'),ColorDDFFFF;
DRAWTEXTREL(235,450,'大戶'),ColorDDFFFF;
DRAWTEXTREL(345,450,'機構'),ColorDDFFFF;
DRAWTEXTREL(888,450,'主力'),ColorDDFFFF;
DRAWTEXTREL(2,720,'機構買:'+NUMTOSTR(a21)+'%'+' 大戶買:'+NUMTOSTR(a19)+'%'+' 中戶買:'+NUMTOSTR(a17)+'%'+' 散戶買:'+NUMTOSTR(a15)+'%'),colorRed;
DRAWTEXTREL(2,790,'機構賣:'+NUMTOSTR(a22)+'%'+' 大戶賣:'+NUMTOSTR(a20)+'%'+' 中戶賣:'+NUMTOSTR(a18)+'%'+' 散戶賣:'+NUMTOSTR(a16)+'%'),colorGreen;
DRAWTEXTREL(2,860,'機構差:'+NUMTOSTR(a28)+'%'+' 大戶差:'+NUMTOSTR(a27)+'%'+' 中戶差:'+NUMTOSTR(a26)+'%'+' 散戶差:'+NUMTOSTR(a25)+'%'),colorWhite;
DRAWTEXTREL(2,930,'主力差:'+NUMTOSTR(a29)+'%'),colorWhite;

?

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

?