九毛八公式指标
{K线} STICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),LOW,HIGH,0.1,0),colorred; STICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),OPEN,CLOSE,7,0),colorred; STICKLINE(CLOSE
公式模块:
{k线} STICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),LOW,HIGH,0.1,0),colorred; STICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),OPEN,CLOSE,7,0),colorred; STICKLINE(CLOSE<OPEN or CLOSE=OPEN and CLOSE<=REF(CLOSE,1),LOW,HIGH,0.1,0),colorcyan; STICKLINE(CLOSE<OPEN or CLOSE=OPEN and CLOSE<=REF(CLOSE,1),OPEN,CLOSE,7,0),colorcyan; STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR00FF00; STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR008800; STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLOR009900; STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLOR00AA00; STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00BB00; STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLOR00CC00; STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00DD00; STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLOR00EE00; STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00FF00; STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLORFFBBFF; STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLORFF00FF; STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLORFF22FF; STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLORFF44FF; STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLORFF66FF; STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLORFF88FF; STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLORFF99FF; STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLORFFAAFF; STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLORFFBBFF; pl5:=zig(3,5); en1:=zig(3,5)>ref(zig(3,5),1) and ref(zig(3,5),1)<=ref(zig(3,5),2) and ref(zig(3,5),2)<=ref(zig(3,5),3); ex1:=zig(3,5)<ref(zig(3,5),1) and ref(zig(3,5),1)>=ref(zig(3,5),2) and ref(zig(3,5),2)>=ref(zig(3,5),3); pl10:=zig(3,13); en2:=zig(3,10)>ref(zig(3,10),1) and ref(zig(3,10),1)<=ref(zig(3,10),2) and ref(zig(3,10),2)<=ref(zig(3,10),3); ex2:=zig(3,10)<ref(zig(3,10),1) and ref(zig(3,10),1)>=ref(zig(3,10),2) and ref(zig(3,10),2)>=ref(zig(3,10),3); pL20:=zig(3,26); en3:=zig(3,20)>ref(zig(3,20),1) and ref(zig(3,20),1)<=ref(zig(3,20),2) and ref(zig(3,20),2)<=ref(zig(3,20),3); ex3:=zig(3,20)<ref(zig(3,20),1) and ref(zig(3,20),1)>=ref(zig(3,20),2) and ref(zig(3,20),2)>=ref(zig(3,20),3); pl40:=zig(3,55); { pl5:=HHV(H,5); pl10:=HHV(H,13); pl20:=HHV(H,26); pl40:=HHV(H,55); en1:=pl5>ref(pl5,1) and ref(pl5,1)<=ref(pl5,2) and ref(pl5,2)<=ref(pl5,3); ex1:=pl5<ref(pl5,1) and ref(pl5,1)>=ref(pl5,2) and ref(pl5,2)>=ref(pl5,3); en2:=pl10>ref(pl10,1) and ref(pl10,1)<=ref(pl10,2) and ref(pl10,2)<=ref(pl10,3); ex2:=pl10<ref(pl10,1) and ref(pl10,1)>=ref(pl10,2) and ref(pl10,2)>=ref(pl10,3); en3:=pl20>ref(pl20,1) and ref(pl20,1)<=ref(pl20,2) and ref(pl20,2)<=ref(pl20,3); ex3:=pl20<ref(pl20,1) and ref(pl20,1)>=ref(pl20,2) and ref(pl20,2)>=ref(pl20,3); } 走强1:=barslast(pl5<ref(pl5,1)); 走弱1:=barslast(pl5>ref(pl5,1)); 走强2:=barslast(pl10<ref(pl10,1)); 走弱2:=barslast(pl10>ref(pl10,1)); 走强3:=barslast(pl20<ref(pl20,1)); 走弱3:=barslast(pl20>ref(pl20,1)); ztjz5:=if(pl10>ref(pl10,1),count(en1,走强2),0); ztjd5:=if(pl10>ref(pl10,1),count(ex1,走强2),0); dtjz5:=if(pl10<ref(pl10,1),count(en1,走弱2),0); dtjd5:=if(pl10<ref(pl10,1),count(ex1,走弱2),0); ztjz10:=if(pl20>ref(pl20,1),count(en2,走强3),0); ztjd10:=if(pl20>ref(pl20,1),count(ex2,走强3),0); dtjz10:=if(pl20<ref(pl20,1),count(en2,走弱3),0); dtjd10:=if(pl20<ref(pl20,1),count(ex2,走弱3),0); drawtext(en1 and dtjz5=1,l*0.98,'(Ⅰ)'),colorffff00; drawtext(ex1 and dtjd5=2,h*1.02,'(Ⅱ)'),colorffff00; drawtext(en2 and ztjz5=1,l*0.98,'(Ⅲ)'),colorffff00; drawtext(ex1 and pl10>ref(pl10,1) and ztjd5=1,h*1.02,'⑴'),color0000ff; drawtext(en1 and pl10>ref(pl10,1) and ztjz5=2,l*0.98,'⑵'),color0000ff; drawtext(ex1 and pl10>ref(pl10,1) and ztjz5=2,h*1.02,'⑶'),color0000ff; drawtext(en1 and pl10>ref(pl10,1) and ztjz5=3,l*0.98,'⑷'),color0000ff; drawtext(ex2 and pl20>ref(pl20,1) and ztjd10=1,h*1.02,'⑸'),color0000ff; drawtext(en2 and dtjz10=1,l*0.94,'【A】'),color00ff00; drawtext(ex2 and dtjd10=2,h*1.03,'【B】'),color00ff00; drawtext(en3 and ztjz10=1,l*0.94,'【C】'),color00ff00; drawtext(ex2 and pl20>ref(pl20,1) and ztjd10=1,h*1.04,'①'),Linethick3,colorffff00; drawtext(en2 and pl20>ref(pl20,1) and ztjz10=2,l*0.94,'②'),Linethick3,colorffff00; drawtext(ex2 and pl20>ref(pl20,1) and ztjd10=2 or (ztjd10=0 or ztjd10=2) and ex2,h*1.04,'③'),Linethick3,colorffff00; drawtext(en2 and pl20>ref(pl20,1) and ztjz10=3,l*0.94,'④'),Linethick3,colorffff00; DMLJ:=HHV(H,120); DMLK:=HHV(H,10); LM:=LLV(L,120); LG:=LLV(L,10); PL100:=IF(C>1000,LM,LG); DL100:=IF(C>1000,DMLJ,DMLK); qj1:=pl100*1.382;qj2:=pl100*1.500;qj3:=pl100*1.618;qj4:=pl100*1.809;xh5:=pl100*1.3820*1.3820; dj1:=Dl100/1.382;dj2:=Dl100/1.500;dj3:=Dl100/1.618;dj4:=Dl100/1.809;dj5:=Dl100/1.3820/1.3820; {dj1:=Dl100/1.382;dj2:=Dl100/1.500;dj3:=Dl100/1.618;dj4:=Dl100/1.809;} 地心引力线:(MA(C,30)+MA(C,72))/2,LINETHICK1; D2大盘用高10:地心引力线*1.1,COLORWHITE,LINETHICK1; D3大盘用低7:地心引力线*0.93,COLORWHITE,LINETHICK1; MA10:MA(C,10),COLORRED,LINETHICK2; MA20:MA(C,20),COLORYELLOW,LINETHICK2; MA144:MA(C,144),LINETHICK1;