通达信红K量能平台主图指标公式源码
73 次查看
30 次复制
指标效果图
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;