v1:=(C*2+H+L+o)/5; {均價}
V2:=EMA(V1,13)-EMA(V1,34);{macd.diff}
V3:=EMA(V2,5); {macd.dea}
V4:=(V2-V3)*100; {macd.macd}
主力撤:=IF(V4<=0,V4,0){,colorblue個股};
主力進:=IF(V4>=0,V4,0){,colorff00ff個股};
V8:=(INDEXC*2+INDEXH+INDEXL+indexo)/5;{大盤均價}
V9:=EMA(V8,13)-EMA(V8,34); {index.diff}
VA:=EMA(V9,5); {index.dea}
VB:=(V9-VA)/2; {index.macd}
V11:=3*SMA((C-LLV(L,13))/(HHV(H,13)-LLV(L,13))*100,5,1)-2*SMA(SMA((C-LLV(L,13))/(HHV(H,13)-LLV(L,13))*100,5,1),3,1);{引用個股”kdj.j”}
V12:=3*SMA((C-LLV(L,60))/(HHV(H,60)-LLV(L,60))*100,5,1)-2*SMA(SMA((C-LLV(L,60))/(HHV(H,60)-LLV(L,60))*100,5,1),3,1);{引用個股”kdj.j”}
V13:=3*SMA((C-LLV(L,120))/(HHV(H,120)-LLV(L,120))*100,5,1)-2*SMA(SMA((C-LLV(L,120))/(HHV(H,120)-LLV(L,120))*100,5,1),3,1);{引用個股”kdj.j”}
陽光:EMA(V11,3),coloryellow,linethick2;
空氣:ema(v12,3),colorDD00FF;
雨露:EMA(V13,3),COLORblue;
dv11:=3*SMA((indexC-LLV(indexL,60))/(HHV(indexH,60)-LLV(indexL,60))*100,5,1)-2*SMA(SMA((indexC-LLV(indexL,60))/(HHV(indexH,60)-LLV(indexL,60))*100,5,1),3,1);
自然環(huán)境:ema(dv11,13),colorcyan,linethick2;
稻草人:空氣<=10,linethick0,coloreecc99;
STICKLINE(空氣<=10,0,15,5,0),coloreecc99;
麥田:空氣<=10 AND (陽光<=10 or 自然環(huán)境<=10),linethick0,color00eeaa;
STICKLINE(空氣<=10 AND (陽光<=10 or 自然環(huán)境<=10),0,20,4,0),COLOR00eeaa;
早熟:空氣<=10 AND (陽光<=10 or 自然環(huán)境<=10) AND 雨露<=10,LINETHICK0,COLORMAGENTA;
STICKLINE(空氣<=10 AND (陽光<=10 or 自然環(huán)境<=10) AND 雨露<=10,0,25,3,0),COLORMAGENTA;
光合作用:陽光<=10 and 空氣<=10 AND 自然環(huán)境<=10 AND 雨露<=10,linethick0,colorred;
stickline(陽光<=10 and 空氣<=10 AND 自然環(huán)境<=10 AND 雨露<=10,0,30,2,0),colorred;
aa:=filter((空氣<=10),15);
XX:=filter(空氣<=10 AND 自然環(huán)境<=10,15);
{drawtext (aa,30,’稻草人’),colorcc9900;
drawtext (xx,40,’麥田’),color00aaaa; }
bb:= (空氣<=10 AND V12>10) and filter((空氣<=10 AND V12>10),10);
烏鴉:空氣>=90 and 空氣>ref(空氣,1),colorffff00,linethick0;
STICKLINE(烏鴉,100,95,15,1),COLORFFFF00;
暴風(fēng)雨:空氣>=90 AND 自然環(huán)境>=90,colorgreen,linethick0;
STICKLINE(暴風(fēng)雨,100,95,10,0),COLORgreen;
收割:filter(空氣>90 and 空氣 DRAWTEXT( 收割,90,’收割’),coloryellow;
partline(陽光<=10,陽光),colorred,LINETHICK3;partline(陽光>=90,陽光),colorgreen,LINETHICK3;
STICKLINE(自然環(huán)境<=10,100,95,10,0),COLORred;
drawtext(filter(自然環(huán)境<=10,8),90,'農(nóng)耕?'),colorred;