|
[分享] PXL主圖
iftoday:=(dynainfo(7)=c and dynainfo(10)=amount);
vol1:=dynainfo(8)*240/openminutes(currenttime);
vol2:=if(vol1>capital,capital,vol1);
prevol:=if(openminutes(currenttime)=1,vol,vol2);
預測量:if(iftoday,round(prevol)*1.1,0),linethick0;
drawtext(iftoday and 預測量<ma(v,13),c,'↓量')COLORWHITE,ALIGN5;
drawtext(iftoday and 預測量>ma(v,13),c,'↑量')COLORred,ALIGN5;
漲跌:(DYNAINFO(7)-C)/C*100,COLORYELLOW,LINETHICK0;
sj:=datacount-sysparam(1),align5;;
tt:=drawnumber(barpos+3=sysparam(1),llv(l,20),sj,0),COLORgreen,align5;//交易日
aj:=DATEDIFF(date,CURRENTDATE);drawnumber(sysparam(1)=barpos,llv(l,20),aj,0),shift1,COLORYELLOW,align5;//自然日
日換手率:V/CAPITAL*100/1.318 ,linethick0;
fc:=v;
for i=sj to datacount do
begin
a:=0;
for j=0 to sj do a:=a+fc[i-j];
man[i] := a,linethick0;
end;
hs:=100*a/CAPITAL,linethick0;
換手率:hs,linethick0;
DRAWNUMBER(sysparam(1)=BARPOS and c>0,llv(l,20),hs,3),SHIFT18,COLORgreen,ALIGN5;
DRAWTEXT(sysparam(1)=BARPOS,llv(l,20),'天換手率：')SHIFT4,COLOR00ffff,ALIGN5;
EXPLAINEX(sysparam(1)=BARPOS and c>0,'漲跌:',漲跌,3,1)colorcyan;
EXPLAINEX(sysparam(1)=BARPOS and c>0,'日換手率:',日換手率,3,2)colorgreen;
EXPLAINEX(sysparam(1)=BARPOS and c>0,'換手率:',hs,3,1)colorred;
Var4:=(LOW+HIGH+CLOSE)/3;
操作: MA(Var4,5)colorFFCC99,linethick1;
拉升買:HHV(操作,13)coloryellow,linethick1;
壓力:HHV(操作,60)colormagenta;
買賣:LLV(操作,13)colorgreen,linethick1;
底部支撐: ref(LLV(LOW,60)/1.00382,1),colorwhite;
頂部: ref(HHV(HIGH,60)*1.00618,1),colorblue;
STICKLINE(操作>ref(操作,1),c,o,5,0),color3300CC;
a:=if((ref(操作,5)=ref(買賣,5)) and ref(操作,4)=ref(買賣,4) and ref(操作,3)=ref(買賣,3) and ref(操作,2)=ref(買賣,2) and ref(操作,1)=ref(買賣,1) and 操作>買賣 and c>買賣,1,0);
DRAWICON(操作=拉升買,操作*0.98,12),ALIGN0;
DRAWICON(操作=買賣 and 買賣<ref(買賣,1),操作*1.02,10),ALIGN0;
DRAWICON(a=1,l*0.98,1),ALIGN0;
EXPLAINICON(操作=拉升買 and c>ma(c,30),3);
EXPLAINICON(買賣>=ref(買賣,1) and c>買賣 and 底部支撐=ref(底部支撐,1),2);
EXPLAINICON(操作=拉升買 and ma(c,30)>ref(ma(c,30),1) and 底部支撐=ref(底部支撐,1),4);
EXPLAINICON(操作<ref(操作,1),1);
{分水岭:FORCAST(CLOSE,34)pointdot;
PARTLINE(分水岭>ref(分水岭,1),分水岭)pointdot,colorred,linethick2;
PARTLINE(分水岭<ref(分水岭,1),分水岭)pointdot,colorwhite,linethick2;}
 附件: PXL主圖.ALG
此文件已被下載 354 次。
|
2005-05-20 15:58
