复制内容到剪贴板
代码:
均线与筹码单峰密集分布新解
{均线与筹码单峰密集分布新解}
sx100:=SUMBARS(100*VOL/CAPITAL,100);
p100:MA(CLOSE,sx100),LINETHICK1,color0000ff;
ba100:=BACKSET(BARSTATUS=2,sx100);
VERTLINE(REF(ba100,1)=0 and ba100=1),POINTDOT,color0000ff;
sx200:=SUMBARS(100*VOL/CAPITAL,200);
p200:MA(CLOSE,sx200),LINETHICK1,colorff00ff;
ba200:=BACKSET(BARSTATUS=2,sx200);
VERTLINE(REF(ba200,1)=0 and ba200=1),POINTDOT,colorff00ff;
sx300:=SUMBARS(100*VOL/CAPITAL,300);
p300:MA(CLOSE,sx300),LINETHICK1,colorff6600;
ba300:=BACKSET(BARSTATUS=2,sx300);
VERTLINE(REF(ba300,1)=0 and ba300=1),POINTDOT,colorff6600;
sx400:=SUMBARS(100*VOL/CAPITAL,400);
p400:MA(CLOSE,sx400),LINETHICK1,color0099ff;
ba400:=BACKSET(BARSTATUS=2,sx400);
VERTLINE(REF(ba400,1)=0 and ba400=1),POINTDOT,color0099ff;
sx500:=SUMBARS(100*VOL/CAPITAL,500);
...00:MA(CLOSE,sx500),LINETHICK1,colorgray;
ba500:=BACKSET(BARSTATUS=2,sx500);
VERTLINE(REF(ba500,1)=0 and ba500=1),POINTDOT,colorgray;
b[1]:=p100[datacount]; POLYLINE(ba100,b[1]),color0000ff,POINTDOT;
b[2]:=p200[datacount]; POLYLINE(ba200,b[2]),colorff00ff,POINTDOT;
b[3]:=p300[datacount]; POLYLINE(ba300,b[3]),colorff6600,POINTDOT;
b[4]:=p400[datacount]; POLYLINE(ba400,b[4]),color0099ff,POINTDOT;
b[5]:=...00[datacount]; POLYLINE(ba500,b[5]),colorgray,POINTDOT;
