大智慧天潭筹码主图公式

牛线:MA(REF(HHV(C,89),1),2),COLORBLUE,LINETHICK4;
上轨:MA(REF(HHV(C,30),1),2),COLORYELLOW,LINETHICK4;
cm1:ema(cost(90),20),color000000,POINTDOT,LINETHICK3;
cm2:ema(cost(50),20),color000000,POINTDOT,LINETHICK3;
cm3:ema(cost(10),20),color000000,POINTDOT,LINETHICK3;
cm4:ema(cost(70),20),color000000,POINTDOT,LINETHICK2;
cm5:ema(cost(30),20),color000000,POINTDOT,LINETHICK2;
hb:=cost(99.9);lb:=cost(0.1);b3:=(hb-lb)/50;b31:=hb-b3;b32:=hb-2*b3;b33:=hb-3*b3;b34:=hb-4*b3;b35:=hb-5*b3;
b36:=hb-6*b3;b37:=hb-7*b3;b38:=hb-8*b3;b39:=hb-9*b3;b310:=hb-10*b3;
b311:=hb-11*b3;b312:=hb-12*b3;b313:=hb-13*b3;b314:=hb-14*b3;b315:=hb-15*b3;b316:=hb-16*b3;
b317:=hb-17*b3;b318:=hb-18*b3;b319:=hb-19*b3;b320:=hb-20*b3;b321:=hb-21*b3;b322:=hb-22*b3;
b323:=hb-23*b3;b324:=hb-24*b3;b325:=hb-25*b3;b326:=hb-26*b3;b327:=hb-27*b3;
b328:=hb-28*b3;b329:=hb-29*b3;b330:=hb-30*b3;b331:=hb-31*b3;b332:=hb-32*b3;
b333:=hb-33*b3;b334:=hb-34*b3;b335:=hb-35*b3;b336:=hb-36*b3;b337:=hb-37*b3;
b338:=hb-38*b3;b339:=hb-39*b3;b340:=hb-40*b3;b341:=hb-41*b3;b342:=hb-42*b3;
b343:=hb-43*b3;b344:=hb-44*b3;b345:=hb-45*b3;b346:=hb-46*b3;b347:=hb-47*b3;
b348:=hb-48*b3;b349:=hb-49*b3;
a1:=winner(hb)*100-winner(b31)*100;a2:=winner(b31)*100-winner(b32)*100;
a3:=winner(b32)*100-winner(b33)*100;a4:=winner(b33)*100-winner(b34)*100;
a5:=winner(b34)*100-winner(b35)*100;a6:=winner(b35)*100-winner(b36)*100;a7:=winner(b36)*100-winner(b37)*100;
a8:=winner(b37)*100-winner(b38)*100;a9:=winner(b38)*100-winner(b39)*100;
a10:=winner(b39)*100-winner(b310)*100;a11:=winner(b310)*100-winner(b311)*100;
a12:=winner(b311)*100-winner(b312)*100;a13:=winner(b312)*100-winner(b313)*100;
a14:=winner(b313)*100-winner(b314)*100;a15:=winner(b314)*100-winner(b315)*100;
a16:=winner(b315)*100-winner(b316)*100;a17:=winner(b316)*100-winner(b317)*100;a18:=winner(b317)*100-winner(b318)*100;
a19:=winner(b318)*100-winner(b319)*100;a20:=winner(b319)*100-winner(b320)*100;
a21:=winner(b320)*100-winner(b321)*100;a22:=winner(b321)*100-winner(b322)*100;
a23:=winner(b322)*100-winner(b323)*100;a24:=winner(b323)*100-winner(b324)*100;
a25:=winner(b324)*100-winner(b325)*100;a26:=winner(b325)*100-winner(b326)*100;
a27:=winner(b326)*100-winner(b327)*100;a28:=winner(b327)*100-winner(b328)*100;
a29:=winner(b328)*100-winner(b329)*100;a30:=winner(b329)*100-winner(b330)*100;
a31:=winner(b330)*100-winner(b331)*100;a32:=winner(b331)*100-winner(b332)*100;
a33:=winner(b332)*100-winner(b333)*100;a34:=winner(b333)*100-winner(b334)*100;
a35:=winner(b334)*100-winner(b335)*100;a36:=winner(b335)*100-winner(b336)*100;
a37:=winner(b336)*100-winner(b337)*100;a38:=winner(b337)*100-winner(b338)*100;
a39:=winner(b338)*100-winner(b339)*100;a40:=winner(b339)*100-winner(b340)*100;
a41:=winner(b340)*100-winner(b341)*100;a42:=winner(b341)*100-winner(b342)*100;
a43:=winner(b342)*100-winner(b343)*100;a44:=winner(b343)*100-winner(b344)*100;
a45:=winner(b344)*100-winner(b345)*100;a46:=winner(b345)*100-winner(b346)*100;
a47:=winner(b346)*100-winner(b347)*100;a48:=winner(b347)*100-winner(b348)*100;
a49:=winner(b348)*100-winner(b349)*100;a50:=winner(b349)*100-winner(lb)*100;
STICKLINE( DISPSTATUS=2,hb ,b31,a1*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b31 ,b32 ,a2*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b32 ,b33 ,a3*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b33 ,b34 ,a4*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b34 ,b35 ,a5*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b35 ,b36 ,a6*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b36 ,b37 ,a7*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b37 ,b38 ,a8*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b38 ,b39 ,a9*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b39 ,b310 ,a10*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b310 ,b311 ,a11*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b311 ,b312 ,a12*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b312 ,b313 ,a13*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b313 ,b314 ,a14*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b314 ,b315 ,a15*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b315 ,b316 ,a16*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b316 ,b317 ,a17*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b317 ,b318 ,a18*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b318 ,b319 ,a19*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b319 ,b320 ,a20*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b320 ,b321 ,a21*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b321 ,b322 ,a22*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b322 ,b323 ,a23*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b323 ,b324 ,a24*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b324 ,b325 ,a25*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b325 ,b326 ,a26*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b326 ,b327 ,a27*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b327 ,b328 ,a28*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b328 ,b329 ,a29*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b329 ,b330 ,a30*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b330 ,b331 ,a31*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b331 ,b332 ,a32*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b332 ,b333 ,a33*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b333 ,b334 ,a34*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b334 ,b335 ,a35*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b335 ,b336 ,a36*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b336 ,b337 ,a37*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b337 ,b338 ,a38*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b338 ,b339 ,a39*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b339 ,b340 ,a40*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b340 ,b341 ,a41*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b341 ,b342 ,a42*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b342 ,b343 ,a43*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b343 ,b344 ,a44*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b344 ,b345 ,a45*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b345 ,b346 ,a46*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b346 ,b347 ,a47*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b347 ,b348 ,a48*50 ,0 ),LAYER7,colorcccccc;
STICKLINE( DISPSTATUS=2,b348 ,b349 ,a49*50 ,0 ),LAYER7,colorcccccc;STICKLINE( DISPSTATUS=2,b349 ,lb ,a50*50 ,0 ),LAYER7,colorcccccc;
max1:=max(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10);
max2:=max(a11,a12,a13,a14,a15,a16,a17,a18,a19,a20);
max3:=max(a21,a22,a23,a24,a25,a26,a27,a28,a29,a30);
max4:=max(a31,a32,a33,a34,a35,a36,a37,a38,a39,a40);
max5:=max(a41,a42,a43,a44,a45,a46,a47,a48,a49,a50);
max6:=max(max1,max2,max3,max4,max5);
fff:=if(max6=a1,hb,if(max6=a2,b31,if(max6=a3,b32,if(max6=a4,b33,if(max6=a5,b34,if(max6=a6,b35,if(max6=a7,b36,if(max6=a8,b37,if(max6=a9,b38,if(max6=a10,b39,
if(max6=a11,b310,if(max6=a12,b311,if(max6=a13,b312,if(max6=a14,b313,if(max6=a15,b314,if(max6=a16,b315,if(max6=a17,b316,if(max6=a18,b317,if(max6=a19,b318,if(max6=a20,b319,
if(max6=a21,b320,if(max6=a22,b321,if(max6=a23,b322,if(max6=a24,b323,if(max6=a25,b324,if(max6=a26,b325,if(max6=a27,b326,if(max6=a28,b327,if(max6=a29,b328,if(max6=a30,b329,
if(max6=a31,b330,if(max6=a32,b331,if(max6=a33,b332,if(max6=a34,b333,if(max6=a35,b334,if(max6=a36,b335,if(max6=a37,b336,if(max6=a38,b337,if(max6=a39,b338,if(max6=a40,b339,
if(max6=a41,b340,if(max6=a42,b341,if(max6=a43,b342,if(max6=a44,b343,if(max6=a45,b344,if(max6=a46,b345,if(max6=a47,b346,if(max6=a48,b347,if(max6=a49,b348,if(max6=a50,b349,lb))))))))))))))))))))))))))))))))))))))))))))))))));
fff2:=if(max6=a1,b31,if(max6=a2,b32,if(max6=a3,b33,if(max6=a4,b34,if(max6=a5,b35,if(max6=a6,b36,if(max6=a7,b37,if(max6=a8,b38,if(max6=a9,b39,if(max6=a10,b310,
if(max6=a11,b311,if(max6=a12,b312,if(max6=a13,b313,if(max6=a14,b314,if(max6=a15,b315,if(max6=a16,b316,if(max6=a17,b317,if(max6=a18,b318,if(max6=a19,b319,if(max6=a20,b320,
if(max6=a21,b321,if(max6=a22,b322,if(max6=a23,b323,if(max6=a24,b324,if(max6=a25,b325,if(max6=a26,b326,if(max6=a27,b327,if(max6=a28,b328,if(max6=a29,b329,if(max6=a30,b330,
if(max6=a31,b331,if(max6=a32,b332,if(max6=a33,b333,if(max6=a34,b334,if(max6=a35,b335,if(max6=a36,b336,if(max6=a37,b337,if(max6=a38,b338,if(max6=a39,b339,if(max6=a40,b340,
if(max6=a41,b341,if(max6=a42,b342,if(max6=a43,b343,if(max6=a44,b344,if(max6=a45,b345,if(max6=a46,b346,if(max6=a47,b347,if(max6=a48,b348,if(max6=a49,b349,if(max6=a50,lb,lb))))))))))))))))))))))))))))))))))))))))))))))))));
FILLRGN(fff,fff2),colorwhite,LAYER7;
AaaC:=C;AaaH:=H;AaaL:=L;AaaO:=O;
STICKLINE(AaaC>=AaaO,AaaH,AaaC,1,0),color0000cc;STICKLINE(AaaC>=AaaO,AaaH,AaaC,0,0),color6633ff;
STICKLINE(AaaC>=AaaO,AaaO,AaaL,1,0),color0000cc;STICKLINE(AaaC>=AaaO,AaaO,AaaL,0,0),color6633ff;
STICKLINE(AaaC>AaaO,AaaC,AaaO,8,0),COLOR0000cc;STICKLINE(AaaC>AaaO,AaaC,AaaO,7,0),COLOR3300cc;
STICKLINE(AaaC>AaaO,AaaC,AaaO,6,0),COLOR0033cc;STICKLINE(AaaC>AaaO,AaaC,AaaO,5,0),COLOR3333cc;
STICKLINE(AaaC>AaaO,AaaC,AaaO,4,0),COLOR0000ff;STICKLINE(AaaC>AaaO,AaaC,AaaO,3,0),COLOR3300ff;
STICKLINE(AaaC>AaaO,AaaC,AaaO,2,0),COLOR6600ff;STICKLINE(AaaC>AaaO,AaaC,AaaO,1,0),COLOR6633ff;
STICKLINE(AaaC<=AaaO,AaaH,AaaC,1,0),color888800;STICKLINE(AaaC<=AaaO,AaaH,AaaC,0,0),colorffff00;
STICKLINE(AaaC<=AaaO,AaaO,AaaL,1,0),color888800;STICKLINE(AaaC<=AaaO,AaaO,AaaL,0,0),colorffff00;
STICKLINE(AaaC<=AaaO,AaaC,AaaO,8,0),COLOR888800;STICKLINE(AaaC<=AaaO,AaaC,AaaO,7,0),COLOR999900;
STICKLINE(AaaC<=AaaO,AaaC,AaaO,6,0),COLORaaaa00;STICKLINE(AaaC<=aaAO,AaaC,AaaO,5,0),COLORbbbb00;
STICKLINE(AaaC<=AaaO,AaaC,AaaO,4,0),COLORcccc00;STICKLINE(AaaC<=AaaO,AaaC,AaaO,3,0),COLORdddd00;
STICKLINE(AaaC<=AaaO,AaaC,AaaO,2,0),COLOReeee00;STICKLINE(AaaC<=AaaO,AaaC,AaaO,1,0),COLORffff00;

{以下设置短支压}
ST:=(CLOSE/OPEN-1)*100;ZF:=(C/REF(C,1)-1)*100;SX1:=ST>3 AND ST=HHV(ST,6);SX2:=ZF>3 AND ZF=HHV(ZF,6);SX3:=ZF>=9 AND CLOSE=HIGH;
烧香:=IF(SX1 OR SX2 OR SX3,1,0);DYSJ:=BARSLAST(烧香);跟踪:=IF(DYSJ<=13 AND COUNT(C>REF(L,DYSJ),DYSJ)>=DYSJ-1,DYSJ,0);
关注:=IF(DYSJ>=4 AND COUNT(C>REF(C,DYSJ),3)>=3,REF(C,DYSJ),REF(L,DYSJ));
②:=IF(关注=REF(L,DYSJ),REF(C,DYSJ),REF(L,DYSJ));
PUU:=BACKSET(DISPSTATUS=2,跟踪);压力:STICKLINE(跟踪,②,关注,10,0),COLOR666666,LAYER7;
支撑:STICKLINE(跟踪,关注,②,10,0),COLOR666666,LAYER7;{压力:STICKLINE(PUU AND 跟踪,②,关注,10,0),COLOR666666,LAYER7;
支撑:STICKLINE(PUU AND 跟踪,关注,②,10,0),COLOR666666,LAYER7;}DRAWTEXT(烧香,L,'买'),COLOR0000FF,ALIGN1;

 

DRAWTEXT(CROSS(C,REF(IF(BARSLAST(C=HHV(C,89))>0,REF(C,BARSLAST(C=HHV(C,89))),REF(C, BARSLAST(HHV(C,89)))),1)) AND COUNT(CROSS(C,REF(IF(BARSLAST(C=HHV(C,89))>0,REF(C,BARSLAST(C=HHV(C,89))),REF(C,BARSLAST(C=HHV(C,89)))),1)),5)=1,L-0.6,'彩旗'),COLORRED;
TYX3:=MA(REF(HHV((C+L+O+H)/4,40),1),3);
STICKLINE(REF(count(C<TYX3,5)=5,1) AND C>TYX3 AND C>O,C,O,5,0),COLORYELLOW;
TYX2:=MA(REF(HHV((C+L+O+H)/4,10),1),3);
MA1:MA(CLOSE,1);
MA2:MA(CLOSE,2);
FILLRGN(ma1,ma2,ma1>ma2,RGB(255,0,0),MA1<MA2,RGB(0,0,255));

 

DRAWTEXTREL(600,975,'证券代码: '+STKLABEL+' 证券名称: '+STKNAME+''),ColorFFAA00;
DRAWTEXTABS(30,0,'《宋福斌-天潭原创》'),COLOR0000FF;
总股本:=FINANCE2(35) ;流通股:=FINANCE2(37); 限售A股:=FINANCE2(41);每股收益:=FINANCE2(3);
市盈率:=DYNAINFO(39);每股公积金:=FINANCE2(7);所属板块:=BKNAME;
DRAWTEXTABS(0,14, '所属板块： '+所属板块),Color888888{,COLORYELLOW};
DRAWTEXTABS(0,27,'每股收益： '+NUMTOSTRN(每股收益,3)+'元   利润增长：'+FINANCE2(10)+'%   市盈率：'+NUMTOSTRN(市盈率,1)+'倍 '+' 每股公积金：'+NUMTOSTRN(每股公积金,2)+'元'),Color888888{,COLORYELLOW};
DRAWTEXTABS(0,40,'总 股 本： '+NUMTOSTRN(总股本,2)+'万股'+'  流通A股：'+NUMTOSTRN(流通股,2)+'万股'+'  限售A股：'+NUMTOSTRN(限售A股,2)+'万股'),Color888888{,COLORYELLOW};
DRAWTEXTREL(30,255,'■主题投资：'+SELFSTRING('主题投资')),Color006EFF;