通达信红K量能平台主图指标公式

CMHB:=COST(99.9);
CMLB:=COST(0.1);
CMB3:=(CMHB-CMLB)/50;
CMB31:=CMHB-CMB3;
CMB32:=CMHB-2*CMB3;
CMB33:=CMHB-3*CMB3;
CMB34:=CMHB-4*CMB3;
CMB35:=CMHB-5*CMB3;
CMB36:=CMHB-6*CMB3;
CMB37:=CMHB-7*CMB3;
CMB38:=CMHB-8*CMB3;
CMB39:=CMHB-9*CMB3;
CMB310:=CMHB-10*CMB3;
CMB311:=CMHB-11*CMB3;
CMB312:=CMHB-12*CMB3;
CMB313:=CMHB-13*CMB3;
CMB314:=CMHB-14*CMB3;
CMB315:=CMHB-15*CMB3;
CMB316:=CMHB-16*CMB3;
CMB317:=CMHB-17*CMB3;
CMB318:=CMHB-18*CMB3;
CMB319:=CMHB-19*CMB3;
CMB320:=CMHB-20*CMB3;
CMB321:=CMHB-21*CMB3;
CMB322:=CMHB-22*CMB3;
CMB323:=CMHB-23*CMB3;
CMB324:=CMHB-24*CMB3;
CMB325:=CMHB-25*CMB3;
CMB326:=CMHB-26*CMB3;
CMB327:=CMHB-27*CMB3;
CMB328:=CMHB-28*CMB3;
CMB329:=CMHB-29*CMB3;
CMB330:=CMHB-30*CMB3;
CMB331:=CMHB-31*CMB3;
CMB332:=CMHB-32*CMB3;
CMB333:=CMHB-33*CMB3;
CMB334:=CMHB-34*CMB3;
CMB335:=CMHB-35*CMB3;
CMB336:=CMHB-36*CMB3;
CMB337:=CMHB-37*CMB3;
CMB338:=CMHB-38*CMB3;
CMB339:=CMHB-39*CMB3;
CMB340:=CMHB-40*CMB3;
CMB341:=CMHB-41*CMB3;
CMB342:=CMHB-42*CMB3;
CMB343:=CMHB-43*CMB3;
CMB344:=CMHB-44*CMB3;
CMB345:=CMHB-45*CMB3;
CMB346:=CMHB-46*CMB3;
CMB347:=CMHB-47*CMB3;
CMB348:=CMHB-48*CMB3;
CMB349:=CMHB-49*CMB3;
CMA1:=WINNER(CMHB)*100-WINNER(CMB31)*100;
CMA2:=WINNER(CMB31)*100-WINNER(CMB32)*100;
CMA3:=WINNER(CMB32)*100-WINNER(CMB33)*100;
CMA4:=WINNER(CMB33)*100-WINNER(CMB34)*100;
CMA5:=WINNER(CMB34)*100-WINNER(CMB35)*100;
CMA6:=WINNER(CMB35)*100-WINNER(CMB36)*100;
CMA7:=WINNER(CMB36)*100-WINNER(CMB37)*100;
CMA8:=WINNER(CMB37)*100-WINNER(CMB38)*100;
CMA9:=WINNER(CMB38)*100-WINNER(CMB39)*100;
CMA10:=WINNER(CMB39)*100-WINNER(CMB310)*100;
CMA11:=WINNER(CMB310)*100-WINNER(CMB311)*100;
CMA12:=WINNER(CMB311)*100-WINNER(CMB312)*100;
CMA13:=WINNER(CMB312)*100-WINNER(CMB313)*100;
CMA14:=WINNER(CMB313)*100-WINNER(CMB314)*100;
CMA15:=WINNER(CMB314)*100-WINNER(CMB315)*100;
CMA16:=WINNER(CMB315)*100-WINNER(CMB316)*100;
CMA17:=WINNER(CMB316)*100-WINNER(CMB317)*100;
CMA18:=WINNER(CMB317)*100-WINNER(CMB318)*100;
CMA19:=WINNER(CMB318)*100-WINNER(CMB319)*100;
CMA20:=WINNER(CMB319)*100-WINNER(CMB320)*100;
CMA21:=WINNER(CMB320)*100-WINNER(CMB321)*100;
CMA22:=WINNER(CMB321)*100-WINNER(CMB322)*100;
CMA23:=WINNER(CMB322)*100-WINNER(CMB323)*100;
CMA24:=WINNER(CMB323)*100-WINNER(CMB324)*100;
CMA25:=WINNER(CMB324)*100-WINNER(CMB325)*100;
CMA26:=WINNER(CMB325)*100-WINNER(CMB326)*100;
CMA27:=WINNER(CMB326)*100-WINNER(CMB327)*100;
CMA28:=WINNER(CMB327)*100-WINNER(CMB328)*100;
CMA29:=WINNER(CMB328)*100-WINNER(CMB329)*100;
CMA30:=WINNER(CMB329)*100-WINNER(CMB330)*100;
CMA31:=WINNER(CMB330)*100-WINNER(CMB331)*100;
CMA32:=WINNER(CMB331)*100-WINNER(CMB332)*100;
CMA33:=WINNER(CMB332)*100-WINNER(CMB333)*100;
CMA34:=WINNER(CMB333)*100-WINNER(CMB334)*100;
CMA35:=WINNER(CMB334)*100-WINNER(CMB335)*100;
CMA36:=WINNER(CMB335)*100-WINNER(CMB336)*100;
CMA37:=WINNER(CMB336)*100-WINNER(CMB337)*100;
CMA38:=WINNER(CMB337)*100-WINNER(CMB338)*100;
CMA39:=WINNER(CMB338)*100-WINNER(CMB339)*100;
CMA40:=WINNER(CMB339)*100-WINNER(CMB340)*100;
CMA41:=WINNER(CMB340)*100-WINNER(CMB341)*100;
CMA42:=WINNER(CMB341)*100-WINNER(CMB342)*100;
CMA43:=WINNER(CMB342)*100-WINNER(CMB343)*100;
CMA44:=WINNER(CMB343)*100-WINNER(CMB344)*100;
CMA45:=WINNER(CMB344)*100-WINNER(CMB345)*100;
CMA46:=WINNER(CMB345)*100-WINNER(CMB346)*100;
CMA47:=WINNER(CMB346)*100-WINNER(CMB347)*100;
CMA48:=WINNER(CMB347)*100-WINNER(CMB348)*100;
CMA49:=WINNER(CMB348)*100-WINNER(CMB349)*100;
CMA50:=WINNER(CMB349)*100-WINNER(CMLB)*100;
STICKLINE(BARSTATUS=2,CMHB ,CMHB ,CMA1*15 ,0 ),COLORCYAN;
STICKLINE(BARSTATUS=2,CMB31 ,CMB31 ,CMA1*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB32 ,CMB32 ,CMA2*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB33 ,CMB33 ,CMA3*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB34 ,CMB34 ,CMA4*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB35 ,CMB35 ,CMA5*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB36 ,CMB36 ,CMA6*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB37 ,CMB37 ,CMA7*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB38 ,CMB38 ,CMA8*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB39 ,CMB39 ,CMA9*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB310 ,CMB310 ,CMA10*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB311 ,CMB311 ,CMA11*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB312 ,CMB312 ,CMA12*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB313 ,CMB313 ,CMA13*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB314 ,CMB314 ,CMA14*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB315 ,CMB315 ,CMA15*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB316 ,CMB316 ,CMA16*15 ,0 ),COLORCYAN;
STICKLINE(BARSTATUS=2,CMB317 ,CMB317 ,CMA17*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB318 ,CMB318 ,CMA18*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB319 ,CMB319 ,CMA19*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB320 ,CMB320 ,CMA20*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB321 ,CMB321 ,CMA21*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB322 ,CMB322 ,CMA22*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB323 ,CMB323 ,CMA23*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB324 ,CMB324 ,CMA24*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB325 ,CMB325 ,CMA25*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB326 ,CMB326 ,CMA26*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB327 ,CMB327 ,CMA27*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB328 ,CMB328 ,CMA28*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB329 ,CMB329 ,CMA29*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB330 ,CMB330 ,CMA30*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB331 ,CMB331 ,CMA31*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB332 ,CMB332 ,CMA32*15 ,0 ),COLORCYAN;
STICKLINE(BARSTATUS=2,CMB333 ,CMB333 ,CMA33*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB334 ,CMB334 ,CMA34*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB335 ,CMB335 ,CMA35*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB336 ,CMB336 ,CMA36*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB337 ,CMB337 ,CMA37*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB338 ,CMB338 ,CMA38*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB339 ,CMB339 ,CMA39*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB340 ,CMB340 ,CMA40*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB341 ,CMB341 ,CMA41*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB342 ,CMB342 ,CMA42*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB343 ,CMB343 ,CMA43*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB344 ,CMB344 ,CMA44*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB345 ,CMB345 ,CMA45*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB346 ,CMB346 ,CMA46*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB347 ,CMB347 ,CMA47*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMB348 ,CMB348 ,CMA48*15 ,0 ),COLOR777777;
STICKLINE(BARSTATUS=2,CMLB ,CMLB ,CMA50*15 ,0 ),COLORCYAN;
HKLNPT:=COUNT(C/O>=1 OR C/REF(C,1)>=1,5)=5 AND ( C/O>REF(C/O,1) OR REF(C/O,1)> REF(C/O,2) ) AND C/O>1 AND COUNT(C/REF(C,1)>1.036,2)>=1 AND (V>REF(V,1) OR (V<REF(V,1) AND C/REF(C,1)>1.043)) AND (REF(V,1)>REF(V,2) OR C/REF(C,1)>1.095) AND COUNT(H/L>1.062 OR C/REF(C,1)>1.062,2)>=1 ;
DRAWICON(HKLNPT ,(H+L)/2,1);
DRAWTEXT(HKLNPT,(H*0.98),’红K量能平台’),COLORRED;