input:n(100),p(20); DRAWGBKLAST(CLOSE>0, STRIP(RGB(100,00,00), RGB(0,15,10),0)); 成交:=INDEXA/100000000>n; aa:count(成交,p); bb:REVERSE(count(成交,p)); ts:BARSLAST(aa),Color40FF00,linethick0; STICKLINE(aa=1,0,aa,6,0), COLORYELLOW; STICKLINE(aa=2,0,aa,6,0),COLORCYAN; STICKLINE(aa=3,0,aa,6,0), colorred; STICKLINE(aa=4,0,aa,6,0),COLORGREEN; STICKLINE(aa=5,0,aa,6,0),ColorFF00FF; STICKLINE(aa=6,0,aa,6,0),ColorFF0000; STICKLINE(aa=7,0,aa,6,0),ColorFF0000; STICKLINE(aa=8,0,aa,6,0),ColorFF0000; STICKLINE(aa=9,0,aa,6,0),ColorFF0000; STICKLINE(aa>=10,0,aa,6,0),ColorFF0000; STICKLINE(bb=-1,0,bb,6,0), COLORYELLOW; STICKLINE(bb=-2,0,bb,6,0),COLORCYAN; STICKLINE(bb=-3,0,bb,6,0), colorred; STICKLINE(bb=-4,0,bb,6,0),COLORGREEN; STICKLINE(bb=-5,0,bb,6,0),ColorFF00FF; STICKLINE(bb=-6,0,bb,6,0),ColorFF0000; STICKLINE(bb=-7,0,bb,6,0),ColorFF0000; STICKLINE(bb=-8,0,bb,6,0),ColorFF0000; STICKLINE(bb=-9,0,bb,6,0),ColorFF0000; STICKLINE(bb<=-10,0,bb,6,0),ColorFF0000; ts1:BARSLAST(aa=0),linethick0;; ZF:=(c-ref(c,1))/ref(c,1)*100; 漲幅:if(ts1=1,ZF,if(ts1>1,sum(ZF,barslast(ts1=1)+1),0)),colorred, LINETHICK2; PARTLINE(aa>ref(aa,1),aa), LINETHICK6,ColorFF00FF; 0; 5; [ 本帖最后由 理想小號 于 2006-1-10 13:03 編輯 ]股票論壇 www. 附件:
|
|