|
通達信免費資金流向指標公式股票軟件源碼如下:
總額:=AMOUNT; 買:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L)); 買%:=買/AMOUNT*100; 流入:=AMOUNT*買%/10000000000; 流出:=AMOUNT/100000000-流入; 凈流:=流入-流出; 總額3:=SUM(AMOUNT,3); 流入3:=SUM(流入,3); 流出3:=SUM(流出,3); 凈流3:=SUM(流入-流出,3); 總額5:=SUM(AMOUNT,5); 流入5:=SUM(流入,5); 流出5:=SUM(流出,5); 凈流5:=SUM(流入-流出,5); 總額10:=SUM(AMOUNT,10); 流入10:=SUM(流入,10); 流出10:=SUM(流出,10); 凈流10:=SUM(流入-流出,10); 畫:=CONST(FINDHIGH(總額10,0,190,1)); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,30,0),ABS(畫),DRAWNULL),RGB(0,30,50),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,27,26),CONST(總額),DRAWNULL),RGB(150,10,0),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,26,25),CONST(流入*100000000),DRAWNULL),RGB(250,0,250),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,25,24),CONST(流出*100000000),DRAWNULL),RGB(0,255,255),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,20,19),CONST(總額3),DRAWNULL),RGB(150,10,0),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,19,18),CONST(流入3*100000000),DRAWNULL),RGB(250,0,250),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,18,17),CONST(流出3*100000000),DRAWNULL),RGB(0,255,255),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,13,12),CONST(總額5),DRAWNULL),RGB(150,10,0),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,12,11),CONST(流入5*100000000),DRAWNULL),RGB(250,0,250),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,11,10),CONST(流出5*100000000),DRAWNULL),RGB(0,255,255),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,6,5),CONST(總額10),DRAWNULL),RGB(150,10,0),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,5,4),CONST(流入10*100000000),DRAWNULL),RGB(250,0,250),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,4,3),CONST(流出10*100000000),DRAWNULL),RGB(0,255,255),0,DRAWNULL); DRAWTEXT(CURRBARSCOUNT=30,畫*0.89,'總額億'),COLORRED; DRAWTEXT(CURRBARSCOUNT=30,畫*0.78,'流入億'),COLORMAGENTA; DRAWTEXT(CURRBARSCOUNT=30,畫*0.67,'流出億'),COLORCYAN; DRAWTEXT(CURRBARSCOUNT=30,畫*0.57,'凈流億'),COLOR0099FF; DRAWTEXT(CURRBARSCOUNT=24,畫*0.95,'1日'),COLORMAGENTA; DRAWTEXT(CURRBARSCOUNT=18,畫*0.95,'3日'),COLORMAGENTA; DRAWTEXT(CURRBARSCOUNT=12,畫*0.95,'5日'),COLORMAGENTA; DRAWTEXT(CURRBARSCOUNT=6,畫*0.95,'10日'),COLORMAGENTA; {www.gupang.com 股旁網(wǎng)_股票DRAWNUMBER(CURRBARSCOUNT=25,畫*0.89,CONST(總額/100000000)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=25,畫*0.78,CONST(流入)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=25,畫*0.67,CONST(流出)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=25,畫*0.56,CONST(凈流)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=19,畫*0.89,CONST(總額3/100000000)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=19,畫*0.78,CONST(流入3)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=19,畫*0.67,CONST(流出3)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=19,畫*0.56,CONST(凈流3)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=13,畫*0.89,CONST(總額5/100000000)), COLORDDFFFF; DRAWNUMBER(CURRBARSCOUNT=13,畫*0.78,CONST(流入5)), COLORDDFFFF; DRAWNUMBER(CURRBARSCOUNT=13,畫*0.67,CONST(流出5)), COLORDDFFFF; DRAWNUMBER(CURRBARSCOUNT=13,畫*0.56,CONST(凈流5)), COLORDDFFFF; DRAWNUMBER(CURRBARSCOUNT=7,畫*0.89,CONST(總額10/100000000)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=7,畫*0.78,CONST(流入10)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=7,畫*0.67,CONST(流出10)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=7,畫*0.56,CONST(凈流10)),COLORYELLOW;

|