您現(xiàn)在的位置：程序化交易>> 股票公式>> 大智慧>> 大智慧公式>>正文內容

大智慧模擬成交量源碼分時主圖[大智慧公式]

作者：大智慧來源：CXH99.COM 發(fā)布時間：2012年06月19日點擊數(shù)：　【收藏到本網(wǎng)的會員中心】

標簽: 大智慧模擬成交量源碼分時主圖昨日今日分時總量公式

副圖源碼（模擬成交量）：
{xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx} 昨日總量:="分時K引.昨總差#day"; 昨日主力:="分時K引.昨主差#day"; 昨日散戶:="分時K引.昨散差#day"; 昨日總和:="分時K引.昨總量#day"; 昨量:="分時K引.昨成交量#day"; BS:=ABS(660/昨量)*0.15; if 昨收>昨開 then begin DRAWRECTABS(990,490,1040,490-昨量*BS,RGB(0,0,0)),colorred; END ELSE DRAWRECTABS(990,490,1040,490-ABS(昨量)*BS,RGB(0,0,0)),colorGREEN; if 昨日總量>0 then begin DRAWRECTABS(990,490,1040,490-昨日總量*BS,RGB(255,0,0)),colorred; END ELSE DRAWRECTABS(990,490,1040,490-ABS(昨日總量)*BS,RGB(0,255,0)),colorGREEN; if 昨日主力>0 then begin DRAWRECTABS(1000,490,1030,490-昨日主力*BS,RGB(125,0,0)),colorbrown; end else DRAWRECTABS(1000,490,1030,490-ABS(昨日主力)*BS,RGB(0,125,0)),color006900; if 昨日散戶<=0 then begin DRAWRECTABS(1010,490,1020,490-ABS(昨日散戶)*BS,RGB(0,255,0)),colorGREEN; END ELSE DRAWRECTABS(1010,490,1020,490-昨日散戶*BS,RGB(99,0,255)),colorff0063; {xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx} 今日總量:="分時K引.總差#day"; 今日主力:="分時K引.主差#day"; 今日散戶:="分時K引.散差#day"; 今日總和:="分時K引.總量#day"; 今量:="分時K引.成交量#day"; By:=ABS(660/今量)*0.15; DRAWTEXTREL(10,880,'www.kzuj.com.cn'),coloryellow; if 今收>今開 then begin DRAWRECTABS(1050,490,1100,490-今量*BS,RGB(0,0,0)),colorred; END ELSE DRAWRECTABS(1050,490,1100,490-今量*BS,RGB(0,0,0)),colorGREEN; if 今日總量>0 then begin DRAWRECTABS(1050,490,1100,490-今日總量*Bs,RGB(255,0,0)),colorred; END ELSE DRAWRECTABS(1050,490,1100,490-ABS(今日總量)*Bs,RGB(0,255,0)),colorGREEN; if 今日主力>0 then begin DRAWRECTABS(1060,490,1090,490-今日主力*Bs,RGB(125,0,0)),colorbrown; end else DRAWRECTABS(1060,490,1090,490-ABS(今日主力)*Bs,RGB(0,125,0)),color006900; if 今日散戶<=0 then begin DRAWRECTABS(1070,490,1080,490-ABS(今日散戶)*Bs,RGB(0,255,0)),colorGREEN; END ELSE DRAWRECTABS(1070,490,1080,490-今日散戶*Bs,RGB(99,0,255)),colorff0063; DRAWTEXTREL(999,999,'<span style="display:none;"><a data-cke-saved-href=" http://www.kzuj.com.cn" href=" http://www.kzuj.com.cn" title="程序化交易模型">程序化交易模型</a></span>');

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

引用公式源碼：公式名稱定為：分時K引 前七收:REF(C,7); 前七開:ref(o,7); 前七低:ref(l,7); 前七高:ref(h,7); 前六收:REF(C,6); 前六開:ref(o,6); 前六低:ref(l,6); 前六高:ref(h,6); 前五收:REF(C,5); 前五開:ref(o,5); 前五低:ref(l,5); 前五高:ref(h,5); 前四收:REF(C,4); 前四開:ref(o,4); 前四低:ref(l,4); 前四高:ref(h,4); 大前收:REF(C,3); 大前開:ref(o,3); 大前低:ref(l,3); 大前高:ref(h,3); 前收:REF(C,2); 前開:ref(o,2); 前低:ref(l,2); 前高:ref(h,2); 昨低:ref(l,1); 昨高:ref(h,1); 昨開:ref(o,1); 昨收:ref(c,1); 今開:o; 今收:c; 今高:h; 今低:l; ma5:ema(c,5); ma10:ema(c,10); ma14:ema(c,14); ma30:ema(c,30); ma60:ema(c,60); ma120:ema(c,120); ma250:ema(c,250); OO:O; HH:H; LL:L; CC:C; VV:V; 額:AMOUNT; 首日:REF(DATE,BARPOS-1); E:=(HIGH+LOW+OPEN+2*CLOSE)/5; 明日阻力:=2*E-LOW; 明日支撐:=2*E-HIGH; 明日突破:=E+(HIGH-LOW); 明日反轉:=E-(HIGH-LOW); 阻力:REF(明日阻力 , 1); 支撐:REF(明日支撐 , 1); 突破:REF(明日突破,1); 反轉:REF(明日反轉,1); M1:MA(C,P1); M2:MA(C,P2); 昨日阻力:REF(阻力,1); 昨日支撐:REF(支撐,1); 昨日突破:REF(突破,1); 昨日反轉:REF(反轉,1); 昨日M1:REF(M1,1); 昨日M2:REF(M2,1); ye:=(high+low+close)/3; ye1:=if(high=low,1,HIGH-Max(OPEN,CLOSE)); ye2:=if(high=low,1,max(CLOSE,OPEN)-ye); ye3:=if(high=low,1,Min(OPEN,CLOSE)-LOW); ye4:=if(high=low,1,ye-min(close,open)); ye5:=vol/if(high=low,4,HIGH-LOW); YE6:=sum((ye1*ye5),1);{散戶賣出} YE7:=sum((ye2*ye5),1);{主力賣出} YE8:=sum((ye3*ye5),1);{散戶買入} YE9:=sum((ye4*ye5),1);{主力買入}; 總差:(YE9+YE8)-(YE7+YE6); 總量:(YE9+YE8)+(YE7+YE6); 主差:YE9-YE7; 散差:YE8-YE6; 成交量:vol; 昨總差:ref((YE9+YE8)-(YE7+YE6),1); 昨總量:ref((YE9+YE8)+(YE7+YE6),1); 昨主差:ref(YE9-YE7,1); 昨散差:ref(YE8-YE6,1); 昨成交量:ref(vol,1);