打印本文
關閉窗口
指標公式源碼分析及使用參考說明:
?
源碼：
DRAWRECTREL(0,0,285,999.2,IF(120,RGB(0,10,10),0));超B:=L2_AMO(0,2)/10000.0;大B:=L2_AMO(1,2)/10000.0;中B:=L2_AMO(2,2)/10000.0;小B:=L2_AMO(3,2)/10000.0;超S:=L2_AMO(0,3)/10000.0;大S:=L2_AMO(1,3)/10000.0;中S:=L2_AMO(2,3)/10000.0;小S:=L2_AMO(3,3)/10000.0;TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0);凈流入:(超B+大B+中B+小B)-(超S+大S+中S+小S),NODRAW;超大單:=(超B)-(超S);大單:=(大B)-(大S);中單:=(中B)-(中S);小單:=(小B)-(小S);DAZHI:=CONST(MAX(ABS(凈流入),MAX(ABS(超大單),MAX(ABS(大單),MAX(ABS(中單),ABS(小單)))))),NODRAW;DRAWRECTREL(0,CONST(880-(ABS(凈流入)*500/DAZHI)),50,930,IF(CONST(凈流入)>0,RGB(255,0,0),RGB(23,125,255)));DRAWRECTREL(58,CONST(880-(ABS(超大單)*500/DAZHI)),108,930,IF(CONST(超大單)>0,RGB(102,0,204),RGB(23,125,255)));DRAWRECTREL(116,CONST(880-(ABS(大單)*500/DAZHI)),166,930,IF(CONST(大單)>0,RGB(255,0,0),RGB(23,125,255)));DRAWRECTREL(174,CONST(880-(ABS(中單)*500/DAZHI)),224,930,IF(CONST(中單)>0,RGB(255,0,0),RGB(23,125,255)));DRAWRECTREL(232,CONST(880-(ABS(小單)*500/DAZHI)),282,930,IF(CONST(小單)>0,RGB(255,0,0),RGB(0,128,0)));DRAWTEXT_FIX(CURRBARSCOUNT=1,0.002,1,0,'凈流入'),COLORRED;DRAWTEXT_FIX(CURRBARSCOUNT=1,0.060,1,0,'超大單'),COLOR660099;DRAWTEXT_FIX(CURRBARSCOUNT=1,0.126,1,0,'大單'),COLORRED;DRAWTEXT_FIX(CURRBARSCOUNT=1,0.181,1,0,'中單'),COLORRED;DRAWTEXT_FIX(CURRBARSCOUNT=1,0.241,1,0,'小單'),COLORGREEN;{DRAWTEXT_FIX(CURRBARSCOUNT=1,0.0,0.001,0,'單位（萬元）'),COLORYELLOW;}DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0,0,'資金博弈今日分類持倉 單位(萬元)'),COLORYELLOW;{M:=0.53;M1:=0.33;}M:=0.58;M1:=0.39;{程序化久久公式網www.kzuj.com.cn}DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.001,0.790,0,CEILING(凈流入));DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.059,0.790,0,CEILING(超大單));DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.116,0.790,0,CEILING(大單));DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.175,0.790,0,CEILING(中單));DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.232,0.790,0,CEILING(小單));大宗進:=(超B)+(大B),NODRAW;大宗出:=(超S)+(大S),NODRAW;非大宗進:=(中B)+(小B),NODRAW;非大宗出:=(中S)+(小S),NODRAW;總流入比:=(超B+大B+中B+小B)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW;總流出比:=(超S+大S+中S+小S)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW;大宗進限制:=IF((超B+大B)=0,0,大宗進),NODRAW;大宗出限制:=IF((超S+大S)=0,0,大宗出),NODRAW;非大宗進限制:=IF(中B+小B=0,0,非大宗進),NODRAW;非大宗出限制:=IF(中S+小S=0,0,非大宗出),NODRAW;資金流向買:=大宗進限制+非大宗進限制;資金流向賣:=大宗出限制+非大宗出限制;流入比:=凈流入*1000000/AMOUNT,NODRAW;大宗凈流入:=(超B+大B)-(超S+大S),NODRAW;大宗流入比:=大宗凈流入*1000000/AMOUNT,NODRAW;DRAWRECTREL(50,110,285,55,RGB(0,100,0));DRAWRECTREL(50,110,160,55,RGB(0,250,50));DRAWRECTREL(50,110,50+CONST(總流入比*160/100),55,RGB(175,50,250));DRAWTEXT_FIX(1,0.00,0.06,0,STRCAT(STRCAT('資金流向圖 ',CON2STR(資金流向買,0)),' ')),COLORYELLOW;DRAWTEXT_FIX(1,0.24,0.06,0,STRCAT(STRCAT(' ',CON2STR(資金流向賣,0)),' ')),COLORYELLOW;大單流入:=(超B+大B)/(超B+大B+超S+大S)*100,NODRAW;大單流入限制:=IF((超B+大B+超S+大S)=0,0,大單流入);{大單流出比:=(超S+大S)/(超B+大B+超S+大S)*100,NODRAW;大單流出限制:=IF((超B+大B+超S+大S)=0,0,大單流出比);}大單買比:=LARGEINTRDVOL*100/(LARGEINTRDVOL+LARGEOUTTRDVOL),NODRAW;大單賣比:=LARGEOUTTRDVOL*100/(LARGEINTRDVOL+LARGEOUTTRDVOL),NODRAW;DRAWRECTREL(50,175,285,120,RGB(0,100,0));DRAWRECTREL(50,175,285,120,RGB(0,250,50));DRAWRECTREL(50,175,90+CONST(大單買比*160/100),120,RGB(200,0,50));DRAWTEXT_FIX(1,0.00,0.12,0,STRCAT(STRCAT('逐筆大單比 ',CON2STR(大單買比,0)),' ')),COLORYELLOW;DRAWTEXT_FIX(1,0.24,0.12,0,STRCAT(STRCAT(' ',CON2STR(大單賣比,0)),' ')),COLORYELLOW;成交總量:=(超B+大B+中B+小B+超S+大S+中S+小S),NODRAW;機構參與度:=(超B+超S+大B+大S)/成交總量*100,COLORYELLOW,NODRAW;DRAWRECTREL(50,240,285,191,RGB(0,250,50));DRAWRECTREL(50,240,285,191,RGB(200,0,50));DRAWRECTREL(50,240,50+CONST(大宗流入比*160/100),191,RGB(175,50,250));DRAWTEXT_FIX(1,0.27,0.19,1,STRCAT(STRCAT('機構介入度 ',CON2STR(大宗流入比,0)),' ')),COLORYELLOW;DRAWRECTREL(50,305,285,255,RGB(200,0,50));DRAWRECTREL(50,305,160,255,RGB(200,0,50));DRAWRECTREL(50,305,50+CONST(流入比*160/100),255,RGB(175,50,250));DRAWTEXT_FIX(1,0.27,0.25,1,STRCAT(STRCAT('資金介入度 ',CON2STR(流入比,0)),' ')),COLORYELLOW;
?
公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】
?