注意:本指标源码用于通达信、通达信金融终端和通达信期货通。
FENS1:=1; FENS2:=1; FENS3:=IF(DATE>FENS1,IF(CLOSE<80,1,0),0); FENS4:=IF(DATE>FENS2,1,FENS3); FENS5:=IF(FENS3=1,0,240); FENS6:=IF(H=HHV(H,FENS5),C,DRAWNULL); FENS7:=CONST(BARSLAST(FENS6=H))+1; FENS8:=CONST(IF(FENS7=1,C,REF(C,FENS7-1))); FENS9:=IF(L=LLV(L,FENS5),C,DRAWNULL); FENS10:=CONST(BARSLAST(FENS9=L))+1; FENS11:=CONST(IF(FENS10=1,C,REF(C,FENS10-1))); FENS12:=(IF(FENS7>FENS10,FENS7,FENS10)-IF(FENS7>FENS10,FENS10,FENS7)); FENS13:=FORCAST(C,FENS12+1); FENS14:=IF(CURRBARSCOUNT<=MAX(FENS10,FENS7),CONST(IF(MIN(FENS7,FENS10)=1,FENS13,REF(FENS13,MIN(FENS7,FENS10)-1))),DRAWNULL),POINTDOT,COLORLIGRAY; FENS15:=SLOPE(C,FENS12+1); FENS16:=CONST(IF(MIN(FENS7,FENS10)=1,FENS15,REF(FENS15,MIN(FENS7,FENS10)-1))); FENS17:=FENS14-FENS16*(FENS12),POINTDOT,COLORGRAY; FENS18:=(FENS14+FENS17)/2,POINTDOT,COLOR0000FF; FENS19:=ABS(FENS14-FENS17); FENS20:=BARSLAST(FENS9!=DRAWNULL)+1; FENS21:=BARSLAST(FENS6!=DRAWNULL)+1; FENS22:=IF(FENS10>FENS7,FENS20,FENS21)-1; FENS23:=IF(FENS14>FENS17,FENS17+FENS19/FENS12*FENS22,FENS17-FENS19/FENS12*FENS22); FENS24:=IF(BETWEEN(CURRBARSCOUNT,FENS10,FENS7) AND H>FENS23,H,FENS23); FENS25:=HHV(FENS24-FENS23,MAX(FENS10,FENS7)); FENS26:=CONST(BARSLAST(FENS24-FENS23=FENS25)); FENS27:=CONST(IF(FENS26=0,H,REF(H,FENS26))); FENS28:=CONST(IF(FENS26=0,FENS24-FENS23,REF(FENS24-FENS23,FENS26))); FENS29:=FENS23+FENS28; FENS30:=IF(BETWEEN(CURRBARSCOUNT,FENS10,FENS7) AND L<FENS23,L,FENS23); FENS31:=HHV(FENS23-FENS30,MAX(FENS10,FENS7)); FENS32:=CONST(BARSLAST(FENS23-FENS30=FENS31)); FENS33:=CONST(IF(FENS32=0,H,REF(H,FENS32))); FENS34:=CONST(IF(FENS32=0,FENS23-FENS30,REF(FENS23-FENS30,FENS32))); FENS35:=FENS23-FENS34; FENS36:=IF(CURRBARSCOUNT>=MIN(FENS10,FENS7)-10,FENS29,CONST(REF(FENS29,MIN(FENS10,FENS7)-11))); FENS37:=IF(CURRBARSCOUNT>=MIN(FENS10,FENS7)-10,FENS35,CONST(REF(FENS35,MIN(FENS10,FENS7)-11))); FENS38:=IF(FENS14>FENS17,IF(FENS23<=FENS36,FENS23,DRAWNULL),IF(FENS23>=FENS37,FENS23,DRAWNULL)),COLORBLUE,,DOTLINE; FENS39:=IF(FENS14>FENS17,IF(FENS29<=FENS36,FENS29,DRAWNULL),IF(FENS29>=FENS37,FENS29,DRAWNULL)),COLORMAGENTA,,DOTLINE; FENS40:=IF(FENS14>FENS17,IF(FENS35<=FENS36,FENS35,DRAWNULL),IF(FENS35>=FENS37,FENS35,DRAWNULL)),COLOR00EE00,,DOTLINE; FENS41:=IF(BARSSINCE(C>0)>=30,1,0); FENS42:=SUM(VOL*CLOSE,0)/SUM(VOL,0); FENS43:=EMA(FENS42,50)/0.97; FENS44:=(FENS42+FENS43)/2; FENS45:FENS43,COLORGREEN,LINETHICK2; FENS46:IF(FENS43>REF(FENS43,1),FENS43,DRAWNULL),COLORRED,LINETHICK2; FENS47:FENS44,COLORYELLOW; FENS48:FENS42,COLORBLUE; FENS49:CLOSE,COLORWHITE,LINETHICK2; FENS50:=CONST(REF(CLOSE,480)); FENS51:=CONST(HHV(HIGH,480)); FENS52:=CONST(LLV(LOW,480)); FENS53:=EMA(CLOSE,30); FENS54:=EMA(CLOSE,900); FENS55:=MAX(FENS50,FENS51); FENS56:=MIN(FENS50,FENS52); FENS57:=FENS55-FENS56; FENS58:=FENS56+FENS57*7/8; FENS59:=FENS56+FENS57*0.5/8; FENS60:=DRAWICON(LONGCROSS(FENS59,CLOSE,2),CLOSE*0.995,7); FENS61:=DRAWICON(LONGCROSS(CLOSE,FENS58,2),CLOSE*1.005,8); FENS62:=BARSCOUNT(CLOSE); FENS63:=CROSS(CLOSE,REF(HHV(HIGH,FENS62),1)) AND CLOSE/FENS42<1.09 AND FENS62>=1 AND FENS62<240; DRAWICON(FILTER(FENS63,1),FENS42,32); FENS64:=CONST(REF(CLOSE,480)); FENS65:=CONST(HHV(HIGH,480)); FENS66:=CONST(LLV(LOW,480)); FENS67:=MAX(FENS64,FENS65); FENS68:=MIN(FENS64,FENS66); FENS69:=FENS67-FENS68; FENS70:=SUM(CLOSE*VOL,BARSSINCE(VOL>0)+1)/SUM(VOL,BARSSINCE(VOL>0)+1)+(BARSSINCE(VOL>0)+1)*0; FENS71:EMA(EXPMA(CLOSE,20),13)COLORMAGENTA; FENS72:=FENS70,COLORYELLOW,LINETHICK2; FENS73:=FENS68+FENS69*7/8; FENS74:=FENS68+FENS69*1/8; FENS75:=STICKLINE(C<FENS74,C,FENS74*1.005,1,0),COLORRED; FENS76:=((HSL*0.50+REF(HSL,1)*0.33)+(REF(HSL,2)*0.17))*SUM(C,FROMOPEN)/FROMOPEN; FENS77:=SUM(IF(C>REF(C,1),FENS76*V,0),FROMOPEN); FENS78:=-SUM(IF(C<REF(C,1),FENS76*V,0),FROMOPEN); FENS79:=FENS77+FENS78; FENS80:=FENS79/SUM(V,FROMOPEN)*100; FENS81:=IF(FENS80>=0,(FENS80+50),100-ABS((FENS80-50))); FENS82:=SUM(IF(C>REF(C,1),V,0),FROMOPEN); FENS83:=-SUM(IF(C<REF(C,1),V,0),FROMOPEN); FENS84:=FENS82+FENS83; FENS85:=FENS84/SUM(V,FROMOPEN)*100; FENS86:=IF(FENS85>=0,(FENS85+100)/2,100-ABS((FENS85-100)/2)); DRAWTEXT_FIX(1,0.2,1,1,STRCAT(STRCAT(‘【FENS86】’,CON2STR(FENS86,2)),’%买’)); DRAWTEXT_FIX(1,0.2,0.93,1, STRCAT(STRCAT(‘【FENS81】’,CON2STR(FENS81,2)),’%买’)); FENS87:=HHV(H,480); FENS88:=STICKLINE(FILTER(CROSS(C,REF(FENS87,1)),10) AND C>REF(FENS87,1),C*0.99,C,8,0); FENS89:=DRAWTEXT(FILTER(CROSS(C,REF(FENS87,1)),10) AND C>REF(FENS87,1),C*0.99,’突破’); FENS90:=DATETODAY(DATE)-DATETODAY(REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT))+1; FENS91:=BARSLAST((FENS90-REF(FENS90,1))!=WEEKDAY-REF(WEEKDAY,1) OR TOTALBARSCOUNT-CURRBARSCOUNT=0)+1; FENS92:=REF(C,FENS91); FENS93:=REF(FENS92,FENS91); FENS94:=REF(FENS93,FENS91); FENS95:=REF(FENS94,FENS91); FENS96:=REF(FENS95,FENS91); FENS97:=REF(FENS96,FENS91); FENS98:=REF(FENS97,FENS91); FENS99:=REF(FENS98,FENS91); FENS100:=REF(FENS99,FENS91); FENS101:=REFDATE((C+FENS92+FENS93+FENS94+FENS95+FENS96+FENS97+FENS98+FENS99+FENS100)/10,DATE); FENS102:=DRAWTEXT(ISLASTBAR,FENS101,’ 参考线’); FENS103:=(EMA(CLOSE,12)-EMA(CLOSE,26))+DYNAINFO(3); FENS104:=EMA(FENS103,9); FENS105:=10*(FENS103-FENS104); FENS106:=EMA(FENS105,2); FENS107:=STICKLINE(FENS105>=FENS106 AND FENS105>=0,DYNAINFO(3),FENS105+DYNAINFO(3),0,0); FENS108:=STICKLINE(FENS105<FENS106 AND FENS105>0,DYNAINFO(3),FENS105+DYNAINFO(3),0,0); FENS109:=STICKLINE(FENS105>=FENS106 AND FENS105<0,DYNAINFO(3),FENS105+DYNAINFO(3),0,0); FENS110:=STICKLINE(FENS105<FENS106 AND FENS105<0,DYNAINFO(3),FENS105+DYNAINFO(3),0,0); FENS111:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE)); FENS112:=EXPMA(CLOSE/FENS111,20); FENS113:=EXPMA(CLOSE/FENS111,60); FENS114:=EXPMA(CLOSE/FENS111,120); DRAWTEXT(CROSS(FENS112,1.02),C*0.999,’突’); DRAWRECTREL(0,960,300,1000,RGB(0,250,50)); DRAWRECTREL(0,965,0+CONST(FENS81*300/100),995,RGB(200,50,0)); DRAWRECTREL(147,960,153,1000,RGB(0,75,200)); DRAWRECTREL(159,960,165,1000,RGB(20,50,20)); DRAWRECTREL(0,915,300,955,RGB(0,250,50)); DRAWRECTREL(0,920,0+CONST(FENS86*300/100),950,RGB(178,34,34)); DRAWRECTREL(147,915,153,955,RGB(0,75,200)); DRAWRECTREL(165,915,171,955,RGB(20,50,20)); FENS117:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1),-VOL/CAPITAL*100,0)),0); FENS118:=V*C/100,NODRAW; FENS119:=SUM((IF(((FENS118/8>20) AND (CLOSE>(REF(CLOSE,1)))),FENS118,0)),0); FENS120:=SUM((IF(((FENS118/8>20) AND (CLOSE<(REF(CLOSE,1)))),FENS118,0)),0); FENS121:=SUM((IF(((FENS118/8<20) AND (CLOSE>(REF(CLOSE,1)))),FENS118,0)),0); FENS122:=SUM((IF(((FENS118/8<20) AND (CLOSE<(REF(CLOSE,1)))),FENS118,0)),0); FENS123:=((FENS119+FENS120)+FENS121)+FENS122; FENS124:=IF((ISLASTBAR),((100*FENS119)/FENS123),0); FENS125:=IF((ISLASTBAR),((100*FENS120)/FENS123),0); FENS126:=IF((ISLASTBAR),((100*FENS121)/FENS123),0); FENS127:=IF((ISLASTBAR),((100*FENS122)/FENS123),0); FENS128:=(VOL/CLOSE)/3; FENS129:=SUM((IF(((FENS128>0.20) AND (CLOSE>(REF(CLOSE,1)))),FENS128,0)),0); FENS130:=SUM((IF(((FENS128>0.20) AND (CLOSE<(REF(CLOSE,1)))),FENS128,0)),0); FENS131:=FENS129+FENS130; FENS132:=1; FENS134:=FENS119; FENS135:=FENS120; FENS136:=FENS119-FENS120; FENS137:=FENS121; FENS138:=FENS122; FENS139:=FENS121-FENS122; FENS140:=FENS119+FENS120; FENS141:=FENS119/FENS140*100; FENS142:=STRCAT(STRCAT(‘机构买入’,CON2STR((100*FENS119)/FENS123,0)),’%’); FENS143:=STRCAT(STRCAT(‘机构卖出’,CON2STR((100*FENS120)/FENS123,0)),’%’); FENS144:=STRCAT(STRCAT(‘机构总买入’,CON2STR((100*(FENS119-FENS120))/FENS123,0)),’%’); FENS145:=STRCAT(STRCAT(‘散户买入’,CON2STR((100*FENS121)/FENS123,0)),’%’); FENS146:=STRCAT(STRCAT(‘散户卖出’,CON2STR((100*FENS122)/FENS123,0)),’%’); FENS147:=STRCAT(STRCAT(‘散户总买入’,CON2STR((100*(FENS121-FENS122))/FENS123,0)),’%’); DRAWTEXT_FIX(FENS132=1,0.18,0.93,0,FENS142),COLORBLACK; DRAWTEXT_FIX(FENS132=1,0.18,1,0,FENS143),COLORBLACK; DRAWTEXT_FIX(FENS132=1,0.24,0.93,0,FENS145),COLORRED; DRAWTEXT_FIX(FENS132=1,0.24,1,0,FENS146),COLORRED; DRAWRECTREL(0,870,300,910,RGB(0,250,50)); DRAWRECTREL(0,875,CONST(FENS141*300/100),905,RGB(200,50,0)); DRAWRECTREL(147,870,153,910,RGB(0,75,200)); FENS148:=COST(99),COLORCYAN,CROSSDOT; FENS149:=COST(1),COLORCYAN,CROSSDOT; FENS150:(SUM((VOL * CLOSE),FROMOPEN) / SUM(VOL,FROMOPEN)),COLORYELLOW; FENS151:=MAX(DYNAINFO(3),DYNAINFO(5)); FENS152:=MIN(DYNAINFO(3),DYNAINFO(6)); FENS153:=FENS151-FENS152; FENS154:FENS152+FENS153*7/8,COLORYELLOW,LINETHICK2; FENS155:FENS152+FENS153*0.5/8,COLORRED,LINETHICK2; FENS156:=CLOSE; DRAWICON(LONGCROSS(FENS155,FENS156,2),FENS155*0.998,1); DRAWICON(LONGCROSS(FENS156,FENS154,2),FENS156,2); FENS157:EMA(CLOSE,720),CROSSDOT,LINETHICK2,COLORRED; FENS158:=MAX(DYNAINFO(3),DYNAINFO(5)); FENS159:=MIN(DYNAINFO(3),DYNAINFO(6)); FENS160:=FENS158-FENS159; FENS161:=FENS159+FENS160*7/8,COLORMAGENTA; FENS162:=FENS159+FENS160*0.5/8,COLORMAGENTA; FENS163:=CLOSE; FENS164:=(CLOSE-REF(CLOSE,5))/REF(CLOSE,5); FENS165:=STICKLINE(FENS164>0,DYNAINFO(3),DYNAINFO(3)*(1+FENS164),0.1,0); FENS166:=STICKLINE(FENS164<0,DYNAINFO(3),DYNAINFO(3)*(1+FENS164),0.1,0); FENS167:=CLOSE/DYNAINFO(3); FENS168:=FILTER(FENS164>0.015 AND FENS164>REF(FENS164,1)*2 AND VOL>REF(VOL,1)*2 AND CLOSE>REF(CLOSE,1) OR FENS164>0.025,240); DRAWICON(FENS168 AND FENS167<1.06 AND CLOSE>DYNAINFO(3),C,23); DRAWICON(FENS168 AND FENS167<1.06 AND CLOSE>DYNAINFO(3),C,1); DRAWTEXT(FENS168 AND FENS167<1.06 AND CLOSE>DYNAINFO(3),C,’ 东风来了’)COLORYELLOW; FENS169:=REF(CLOSE,1); FENS170:=REF(MAX(HIGH,FENS169),1); FENS171:=REF(MIN(LOW,FENS169),1); FENS172:=(MA((((FENS170 – FENS171) / REF(CLOSE,2)) * 100),5) / 4); FENS173:=(EMA((((FENS170 – FENS171) / REF(CLOSE,2)) * 100),5) / 4); FENS174:=REF(CLOSE,1)NODRAW; FENS175:=BARSSINCE(CLOSE)NODRAW; FENS176:=MA(CLOSE,5); FENS177:=MA(CLOSE,10); FENS178:=MA(CLOSE,20); FENS179:=MA(CLOSE,60); FENS180:=REF(MA(CLOSE,5),1); FENS181:=REF(MA(CLOSE,10),1); FENS182:=REF(MA(CLOSE,20),1); FENS183:=REF(MA(CLOSE,60),1); FENS184:=INDEXC; FENS185:=REF(INDEXC,1); FENS186:=1000; FENS187:=(BARSLAST(((HOUR = 9) AND (MINUTE = 31))) + 1); FENS188:=((AMOUNT / VOL) / 100); FENS189:=(SUM((CLOSE * VOL),0) / SUM(VOL,0)); FENS190:=(((SETCODE = 0) OR (SETCODE = 1)) AND (CLOSE < 500)); FENS191:=IF(((SETCODE < 2) AND (CONST(BARSSINCE(CLOSE)) < 241)),CONST(IF((TIME < FENS186),HHV(CLOSE,0),SUM((IF((TIME = FENS186),1,0) * HHV(CLOSE,0)),0))),DRAWNULL),DOTLINE,COLORFF0000; FENS192:=IF(((SETCODE < 2) AND (CONST(BARSSINCE(CLOSE)) < 241)),CONST(IF((TIME < FENS186),HHV(CLOSE,0),SUM((IF((TIME = FENS186),1,0) * LLV(CLOSE,0)),0))),DRAWNULL),DOTLINE,COLORFF0000; FENS193:=IF(FENS190,FENS188,FENS189); FENS194:=CLOSE,LINETHICK4,COLORWHITE; FENS195:=FENS172#DAY; FENS196:=(FENS195 * 1.3); FENS197:=((CLOSE > REF(CLOSE,1)) AND ((CLOSE / FENS193) > (1 + (FENS195 / 100)))); FENS198:=((CLOSE < REF(CLOSE,1)) AND ((CLOSE / FENS193) < (1 – (FENS195 / 100)))); FENS199:=((REF(SUM(FENS197,0),1) = 0) AND (SUM(FENS197,0) = 1)); FENS200:=((REF(SUM(FENS198,0),1) = 0) AND (SUM(FENS198,0) = 1)); FENS201:=(SUM(FENS199,0) * CROSS(COUNT((CLOSE < REF(CLOSE,1)),BARSLAST(FENS199)),0.5)); FENS202:=(SUM(FENS200,0) * CROSS(COUNT((CLOSE > REF(CLOSE,1)),BARSLAST(FENS200)),0.5)); FENS203:=CONST(SUM(IF(FENS201,REF(CLOSE,1),DRAWNULL),0)),LINETHICK2,COLORGREEN; FENS204:=CONST(SUM(IF(FENS202,REF(CLOSE,1),DRAWNULL),0)),LINETHICK2,COLORMAGENTA; FENS205:=CROSS(SUM((FENS197 AND (CLOSE > (FENS203 * (1 + (FENS196 / 100))))),0),0.5); FENS206:=CROSS(SUM((FENS198 AND (CLOSE < (FENS204 * (1 – (FENS196 / 100))))),0),0.5); FENS207:=(SUM(FENS205,0) * CROSS(COUNT((CLOSE < REF(CLOSE,1)),BARSLAST(FENS205)),0.5)); FENS208:=(SUM(FENS206,0) * CROSS(COUNT((CLOSE > REF(CLOSE,1)),BARSLAST(FENS206)),0.5)); FENS209:=CONST(SUM(IF(FENS207,REF(CLOSE,1),DRAWNULL),0)),COLORGREEN; FENS210:=CONST(SUM(IF(FENS208,REF(CLOSE,1),DRAWNULL),0)),COLORMAGENTA; FENS211:=FENS199 OR FENS205 ; FENS212:=FENS200 OR FENS206 ; FENS213:=FENS202 OR FENS208 ; FENS214:=FENS201 OR FENS207 ; DRAWICON(FENS211,(CLOSE*1.005),8); DRAWICON(FENS214,CLOSE,39); DRAWICON(FENS212,(CLOSE*0.995),7); DRAWICON(FENS213,CLOSE,38); FENS215:=STICKLINE(C>FENS161,C,FENS161,1,0),COLORGREEN; FENS216:=STICKLINE(C<FENS162,C,FENS162*1.008,1,0),COLORRED; FENS217:=EMA(EMA(CLOSE,13),13); FENS218:=(FENS217-REF(FENS217,1))/REF(FENS217,1)*1000; FENS219:=AMOUNT/VOL/100; FENS220:=55; FENS221:=8; FENS222:=3; TTSC1:=(EMA(CLOSE,FENS221)-EMA(CLOSE,FENS220))*10; TTSC2:=EMA(TTSC1,FENS222); FENS225:=(CLOSE-FENS219)/FENS219<(-0.005); FENS226:=(CLOSE-FENS219)/FENS219<(-0.03); FENS227:=LAST(FENS219>=REF(FENS219,1),5,1) AND (CLOSE-FENS219)/FENS219<0.005; FENS228:=(CLOSE-FENS219)/FENS219>0.005; FENS229:=FENS218<REF(FENS218,1) AND FENS218>0.5; FENS230:=FENS218>0; FENS231:=FENS218>REF(FENS218,1) AND FENS218<(-0.2); FENS232:=FENS218>REF(FENS218,1) AND FENS218<0; FENS233:=CROSS(TTSC1,TTSC2) AND TTSC1<(-0.3); FENS234:=CROSS(TTSC1,TTSC2) AND TTSC1<(-0.1); FENS235:=CROSS(TTSC2,TTSC1); FENS236:=CROSS(TTSC2,TTSC1) AND TTSC1>1.618; FENS237:=FILTER(FENS225 AND FENS231 AND FENS233,13); FENS238:=FILTER(FENS227 AND FENS232 AND FENS234,13); FENS239:=IF(FENS237,1,0); FENS240:=FILTER(FENS228 AND FENS229 AND FENS235,13); FENS241:=(CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100; FENS242:=(CLOSE-LLV(LOW,43))/(HHV(HIGH,43)-LLV(LOW,43))*100; FENS243:=SMA(FENS242,2,1); FENS244:=SMA(FENS243,2,1); FENS245:=ABS(FENS241); FENS247:IF(CROSS(FENS244,FENS245),FENS45,FENS162)COLORYELLOW,LINETHICK2; FENS248:IF(FENS237,FENS45,FENS162)COLORYELLOW,LINETHICK2; FENS249:=3*SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1),3,1); FENS250:=EMA(FENS249,3)-10; FENS251:=(FENS250-REF(FENS250,1))/REF(FENS250,1)*100; FENS252:=FILTER(FENS250>=90 AND FENS251,10); FENS253:=IF(FENS252,5,0); FENS254:=IF(FENS240,3,0),COLORLICYAN; FENS255:=FILTER(FENS230 AND FENS236,13); FENS256:=FENS240 AND FENS255; FENS257:=IF(FENS256,4,0),COLORRED; DRAWICON(FENS247 ,FENS45,23); |
发布者:股市刺客,转载请注明出处:https://www.95sca.cn/archives/111210
站内所有文章皆来自网络转载或读者投稿,请勿用于商业用途。如有侵权、不妥之处,请联系站长并出示版权证明以便删除。敬请谅解!