当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：极品人气副图，具有一定的观赏性，显示五星
软件名称：[B]极品人气副图，具有一定的观赏性，显示五星[/B]
软件类型：国产软件
运行环境：Win2000/WinXP/Win2003/WinVista
软件语言：简体中文
授权方式：共享软件
软件大小：9.00 KB
官方主页：Home Page
更新时间：2024-06-09 07:22:48
软件简介:
极品人气副图
VAR0:=21;
VAR1:=IF((LOW = LLV(LOW,VAR0)),LOW,DRAWNULL);
VAR2:=CONST(BARSLAST((VAR1 != DRAWNULL)));
VAR3:=CONST(IF((VAR2 = 0),HIGH,REF(HIGH,VAR2)));
VAR4:=CONST(((REF(BARSLAST((HIGH > VAR3)),(VAR2 + 1)) + VAR2) + 1));
VAR5:=CONST(IF((VAR4 = 0),HIGH,REF(HIGH,VAR4)));
VAR6:=CONST(((REF(BARSLAST((HIGH > VAR5)),(VAR4 + 1)) + VAR4) + 1));
VAR7:=IF((CURRBARSCOUNT <= (VAR2 + 21)),CONST(IF((VAR6 = 0),HIGH,REF(HIGH,VAR6))),DRAWNULL);
VAR8:=IF((CURRBARSCOUNT <= (VAR2 + 1)),IF((LOW = LLV(LOW,VAR0)),LOW,DRAWNULL),DRAWNULL);
VAR9:=IF((CURRBARSCOUNT <= (VAR2 + 21)),CONST(IF((VAR4 = 0),HIGH,REF(HIGH,VAR4))),DRAWNULL);
VAR10:=IF((HIGH = HHV(HIGH,VAR0)),HIGH,DRAWNULL);
VAR11:=CONST(BARSLAST((VAR10 != DRAWNULL)));
VAR12:=CONST(IF((VAR11 = 0),LOW,REF(LOW,VAR11)));
VAR13:=CONST(((REF(BARSLAST((LOW < VAR12)),(VAR11 + 1)) + VAR11) + 1));
VAR14:=CONST(IF((VAR13 = 0),LOW,REF(LOW,VAR13)));
VAR15:=CONST(((REF(BARSLAST((LOW < VAR14)),(VAR13 + 1)) + VAR13) + 1));
VAR16:=IF((CURRBARSCOUNT <= (VAR11 + 21)),CONST(IF((VAR15 = 0),LOW,REF(LOW,VAR15))),DRAWNULL);
VAR17:=IF((CURRBARSCOUNT <= (VAR11 + 1)),IF((HIGH = HHV(HIGH,VAR0)),HIGH,DRAWNULL),DRAWNULL);
VAR18:=IF((CURRBARSCOUNT <= (VAR11 + 21)),CONST(IF((VAR13 = 0),LOW,REF(LOW,VAR13))),DRAWNULL);
DRAWICON((VAR8 > 0),(LOW - 0.5),37);
DRAWICON((VAR17 > 0),(HIGH + 0.5),38);
VAR21:=((SMA(MAX((CLOSE - REF(CLOSE,1)),0),6,1) / SMA(ABS((CLOSE - REF(CLOSE,1))),6,1)) * 100);
VAR22:=REF(CLOSE,1);
VAR23:=((SMA(MAX((CLOSE - VAR22),0),6,1) / SMA(ABS((CLOSE - VAR22)),6,1)) * 100);
VAR24:=((((CLOSE / REF(CLOSE,1)) >= 1.062) AND ((HIGH / CLOSE) < 1.005)) AND ((MA(CLOSE,90) / CLOSE) >= 1.15));
VAR25:=(VAR24 AND (COUNT(VAR24,20) = 1));
VAR26:=((INDEXC - REF(INDEXC,1)) / REF(INDEXC,1));
VAR27:=((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1));
VAR28:=(IF((VAR26 > 0.01),0.9,1) AND IF((VAR26 > -0.025),1,1.2));
VAR29:=((VAR28 * (VAR27 - VAR26)) * 100);
VAR30:=SUM(VAR29,10);
VAR31:=SMA(VAR30,40,1);
VAR32:=(VAR30 > 20);
VAR33:=(((CROSS(CLOSE,MA((CLOSE * 1.055),3)) AND (CLOSE > (OPEN * 1.06))) AND (VOL >= (REF(VOL,1) * 1.5))) AND (CLOSE >= MA(CLOSE,10)));
VAR34:=(VAR32 AND VAR33);
VAR35:=((-100 * (HHV(HIGH,3) - CLOSE)) / (HHV(HIGH,3) - LLV(LOW,3)));
VAR36:=(((CROSS(VAR35,-87) AND (OPEN = (1.09 * REF(CLOSE,1)))) AND (INDEXC > (0.98 * REF(INDEXC,1)))) AND (CLOSE <= (1.47 * LLV(CLOSE,58))));
VAR37:=(EMA(CLOSE,12) - EMA(CLOSE,26));
VAR38:=EMA(VAR37,9);
VAR39:=(2 * (VAR37 - VAR38));
VAR40:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100);
VAR41:=SMA(VAR40,3,1);
VAR42:=SMA(VAR41,3,1);
VAR43:=(EMA(IF((VAR38 > REF(VAR38,1)),1,-1),14) * 14);
VAR44:=((EMA(IF((VAR42 > REF(VAR42,1)),1,-1),14) * 14) * 2);
VAR45:=(((MA(CLOSE,5) / MA(CLOSE,70)) - 1) * 100);
VAR46:=(((VAR45 + VAR44) + VAR43) / 3);
VAR47:=(MA(CLOSE,80) - (MA(CLOSE,10) / 3));
VAR48:=IF((((CLOSE AND (MA(VOL,5) / 240)) AND (CLOSE > (REF(CLOSE,1) * 1))) AND CLOSE),88,0);
VAR49:=IF(((((((CLOSE / REF(CLOSE,1)) > 1.05) AND (((VOL / CAPITAL) * 100) < 10)) AND (CLOSE < 17)) AND ((HIGH / CLOSE) < 1.01)) AND (VAR48 > 0)),91,0);
VAR50:=IF((((((VAR46 > REF(VAR46,1)) AND (REF(VAR46,1) < REF(VAR46,2))) AND ((VAR25 OR VAR34) OR VAR36)) OR (VAR48 > 0)) OR (VAR49 > 0)),85,0);
VAR51:=IF((VAR49 > 0),95,0);
VAR52:=IF(((VAR48 > 0) OR (VAR49 > 0)),91,0);
VAR53:=IF((((VAR50 > 0) OR (VAR49 > 0)) OR (VAR48 > 0)),88,0);
VAR54:=((100 * (CLOSE - LLV(LOW,42))) / (HHV(HIGH,42) - LLV(LOW,42)));
VAR55:=(COUNT((MA(CLOSE,3) > REF(MA(CLOSE,3),1)),1) = 1);
VAR56:=((((VAR54 < 93) AND VAR55) AND MAX(MAX(VAR51,VAR52),VAR53)) * 100);
DJ:REF(LOW,BARSLAST((VAR8 = LOW)));
VAR58:=(DJ * 2);
VAR59:=BARSLAST((VAR8 = LOW));
ZJ:IF((CLOSE > (DJ * 2)),((DJ * 2) * 2),DRAWNULL);
VAR61:=IF(((VAR59 >= 0) AND ((DJ * (1 + (VAR59 / 100))) < VAR58)),(DJ * (1 + (VAR59 / 100))),DRAWNULL);
VAR62:=IF(((VAR59 >= 0) AND ((DJ * (1 + ((VAR59 * 0.819) / 100))) < VAR58)),(DJ * (1 + ((VAR59 * 0.819) / 100))),DRAWNULL);
VAR63:=IF(((VAR59 >= 0) AND ((DJ * (1 + ((VAR59 * 0.5) / 100))) < VAR58)),(DJ * (1 + ((VAR59 * 0.5) / 100))),DRAWNULL);
VAR64:=IF(((VAR59 >= 0) AND ((DJ * (1 + ((VAR59 * 2) / 100))) < VAR58)),(DJ * (1 + ((VAR59 * 2) / 100))),DRAWNULL);
DJH:REF(HIGH,BARSLAST((VAR17 = HIGH))),COLORWHITE;
VAR66:=(DJH * 0.5);
VAR67:=BARSLAST((VAR17 = HIGH));
VAR68:=IF(((VAR67 >= 0) AND ((DJH * (1 - (VAR67 / 100))) > VAR66)),(DJH * (1 - (VAR67 / 100))),DRAWNULL);
VAR69:=IF(((VAR67 >= 0) AND ((DJH * (1 - ((VAR67 * 0.819) / 100))) > VAR66)),(DJH * (1 - ((VAR67 * 0.819) / 100))),DRAWNULL);
VAR70:=IF(((VAR67 >= 0) AND ((DJH * (1 - ((VAR67 * 0.5) / 100))) > VAR66)),(DJH * (1 - ((VAR67 * 0.5) / 100))),DRAWNULL);
VAR71:=IF(((VAR67 >= 0) AND ((DJH * (1 - ((VAR67 * 2) / 100))) > VAR66)),(DJH * (1 - ((VAR67 * 2) / 100))),DRAWNULL);
目标1:IF((CLOSE > (DJ * 1.5)),(DJ * 2),DRAWNULL);
Z1:IF(((VAR61 < (DJH * 1.01)) OR (DJH = DRAWNULL)),VAR61,DRAWNULL),COLORMAGENTA;
Z2:IF(((VAR62 < (DJH * 1.01)) OR (DJH = DRAWNULL)),VAR62,DRAWNULL),COLORC0C000;
Z3:IF(((VAR63 < (DJH * 1.01)) OR (DJH = DRAWNULL)),VAR63,DRAWNULL),COLOR40C040;
Z4:IF(((VAR64 < (DJH * 1.01)) OR (DJH = DRAWNULL)),VAR64,DRAWNULL),COLORRED;
Y1:IF(((VAR68 > (DJ * 0.99)) OR (DJ = DRAWNULL)),VAR68,DRAWNULL),COLORMAGENTA;
Y2:IF(((VAR69 > (DJ * 0.99)) OR (DJ = DRAWNULL)),VAR69,DRAWNULL),COLORC0C000;
Y3:IF(((VAR70 > (DJ * 0.99)) OR (DJ = DRAWNULL)),VAR70,DRAWNULL),COLOR40C040;
Y4:IF(((VAR71 > (DJ * 0.99)) OR (DJ = DRAWNULL)),VAR71,DRAWNULL),COLORRED;
VAR81:=CONST(MAX(BARSLAST((VAR17 = HIGH)),BARSLAST((VAR8 = LOW))));
VAR82:=CONST(DYNAINFO(7));
VAR83:=CONST(DJH);
VAR84:=(VAR70 + (2 * STD(VAR70,20)));
VAR85:=(VAR70 - (2 * STD(VAR70,20)));
STICKLINE(((CURRBARSCOUNT < (VAR81 + 2)) AND (CLOSE >= OPEN)),HIGH,LOW,0.001,0),COLORRED;
STICKLINE(((CURRBARSCOUNT < (VAR81 + 2)) AND (CLOSE >= OPEN)),CLOSE,OPEN,3,1),COLORRED;
STICKLINE(((CURRBARSCOUNT < (VAR81 + 2)) AND (CLOSE < OPEN)),HIGH,LOW,0.001,0),COLORC0C000;
STICKLINE(((CURRBARSCOUNT < (VAR81 + 2)) AND (CLOSE < OPEN)),CLOSE,OPEN,3,0),COLORC0C000;
VAR90:=(DJ * (1 + ((1 * 3) / 100)));
VAR91:=(CLOSE > CONST(VAR90));
VAR92:=((REF(VAR91,1) = 0) OR (REF(DJ,1) = DRAWNULL));
DRAWNUMBER(((VAR91 = 1) AND VAR92),(DJ * 1.03),(DJ * 1.03)),COLORRED;
VAR94:=IF(((DJ * 1.191) <= DJH),(DJ * 1.191),DRAWNULL);
VAR95:=IF(((DJ * 1.382) <= DJH),(DJ * 1.382),DRAWNULL);
VAR96:=IF(((DJ * 1.5) <= DJH),(DJ * 1.5),DRAWNULL);
VAR97:=IF(((DJ * 1.809) <= DJH),(DJ * 1.809),DRAWNULL);
STICKLINE((((OPEN > REF(((CLOSE + OPEN) / 2),1)) OR (CLOSE > REF(((CLOSE + OPEN) / 2),1))) AND (DJ > 0)),REF(((CLOSE + OPEN) / 2),1),REF(((CLOSE + OPEN) / 2),1),7,0),COLORYELLOW;
VAR99:=COST(90);
VAR100:=COST(70);
VAR101:=COST(50);
VAR102:=COST(20);
VAR103:=COST(1);
VAR104:=CONST((20 / (VAR99 - VAR100)));
VAR105:=CONST((20 / (VAR100 - VAR101)));
VAR106:=CONST((30 / (VAR101 - VAR102)));
VAR107:=((VAR104 + VAR105) + VAR106);
VAR108:=(VAR104 / VAR107);
VAR109:=(VAR105 / VAR107);
VAR110:=(VAR106 / VAR107);
VAR111:=CONST(DJ);
STICKLINE((CURRBARSCOUNT = (VAR81 + 21)),VAR83,VAR111,17,1),COLORWHITE;
VAR113:=ABS((VAR83 - VAR111));
VAR114:=(VAR108 * VAR113);
VAR115:=(VAR109 * VAR113);
VAR116:=(VAR110 * VAR113);
VAR117:=MIN(VAR83,VAR111);
VAR118:=(VAR117 + VAR114);
VAR119:=((VAR117 + VAR114) + VAR115);
VAR120:=(((VAR117 + VAR114) + VAR115) + VAR116);
STICKLINE((CURRBARSCOUNT = (VAR81 + 21)),VAR117,VAR118,7,0),COLORC0C000;
STICKLINE((CURRBARSCOUNT = (VAR81 + 21)),VAR119,VAR118,7,0),COLORYELLOW;
STICKLINE((CURRBARSCOUNT = (VAR81 + 21)),VAR119,VAR120,7,0),COLORRED;
VAR124:=(VAR104 + VAR106);
VAR125:=(VAR104 / VAR124);
VAR126:=(VAR106 / VAR124);
VAR127:=(VAR125 * VAR113);
VAR128:=(VAR126 * VAR113);
VAR129:=(VAR117 + VAR127);
VAR130:=(VAR117 + VAR128);
STICKLINE((CURRBARSCOUNT = (VAR81 + 25)),VAR117,VAR129,7,0),COLORGREEN;
STICKLINE((CURRBARSCOUNT = (VAR81 + 29)),VAR117,VAR130,7,0),COLOR8000FF;
VAR133:=(1 * VAR113);
VAR134:=(0.618 * VAR113);
VAR135:=(VAR117 + VAR133);
VAR136:=(VAR117 + VAR134);
VAR137:=VAR117;
STICKLINE(((CURRBARSCOUNT <= (VAR81 + 89)) AND (CURRBARSCOUNT >= (VAR81 + 47))),VAR136,VAR136,7,0),COLOR8000FF;
VAR139:=((CURRBARSCOUNT <= (VAR81 + 89)) AND (CURRBARSCOUNT > (VAR81 + 55)));
VAR140:=BARSLAST(NOT(VAR139));
STICKLINE(((CURRBARSCOUNT <= (VAR81 + 89)) AND (CURRBARSCOUNT > (VAR81 + 55))),(VAR136 - ((VAR140 * (VAR136 - VAR137)) / 34)),(VAR136 - ((VAR140 * (VAR136 - VAR137)) / 34)),7,0),COLOR8000FF;
VAR142:=((CURRBARSCOUNT <= (VAR81 + 81)) AND (CURRBARSCOUNT > (VAR81 + 68)));
VAR143:=BARSLAST(NOT(VAR142));
STICKLINE(((CURRBARSCOUNT <= (VAR81 + 81)) AND (CURRBARSCOUNT > (VAR81 + 68))),(VAR137 + ((VAR143 * (VAR135 - VAR137)) / 13)),(VAR137 + ((VAR143 * (VAR135 - VAR137)) / 13)),7,0),COLOR8000FF;
VAR145:=((CURRBARSCOUNT <= (VAR81 + 81)) AND (CURRBARSCOUNT > (VAR81 + 47)));
VAR146:=BARSLAST(NOT(VAR145));
STICKLINE(((CURRBARSCOUNT <= (VAR81 + 81)) AND (CURRBARSCOUNT > (VAR81 + 47))),(VAR137 + ((VAR146 * (VAR136 - VAR137)) / 34)),(VAR137 + ((VAR146 * (VAR136 - VAR137)) / 34)),7,0),COLOR8000FF;
VAR148:=((CURRBARSCOUNT <= (VAR81 + 68)) AND (CURRBARSCOUNT > (VAR81 + 55)));
VAR149:=BARSLAST(NOT(VAR148));
STICKLINE(((CURRBARSCOUNT <= (VAR81 + 68)) AND (CURRBARSCOUNT > (VAR81 + 55))),(VAR135 - ((VAR149 * (VAR135 - VAR137)) / 13)),(VAR135 - ((VAR149 * (VAR135 - VAR137)) / 13)),7,0),COLOR8000FF;
VAR151:=IF(((CURRBARSCOUNT = 1) AND (PERIOD = 5)),((VOL * 240) / FROMOPEN),VOL);
VAR152:=((VAR151 * 100) / CAPITAL);
VAR153:=MA(VAR152,4);
VAR154:=MA(VAR152,9);
VAR155:=MA(VAR152,17);
VAR156:=MA(VAR152,34);
VAR157:=((((VAR153 + VAR154) + VAR155) + VAR156) / 4);
VAR158:=(VAR153 - VAR157);
VAR159:=(VAR154 - VAR157);
VAR160:=(VAR155 - VAR157);
VAR161:=(VAR156 - VAR157);
DRAWTEXT((CURRBARSCOUNT = (VAR81 + 55)),VAR137,IF(CONST((VAR158 > 0)),56,'人气')),COLORRED;
VAR163:=IF(CONST((VAR158 > 0)),(VAR137 * 1.05),VAR137);
DRAWTEXT((CURRBARSCOUNT = (VAR81 + 47)),VAR136,IF(CONST((VAR159 > 0)),58,'人气')),COLORYELLOW;
VAR165:=IF(CONST((VAR159 > 0)),(VAR136 * 1.05),VAR136);
DRAWTEXT((CURRBARSCOUNT = (VAR81 + 70)),VAR135,IF(CONST((VAR160 > 0)),59,'人气')),COLORC0C000;
VAR167:=IF(CONST((VAR160 > 0)),(VAR135 * 0.97),VAR135);
DRAWTEXT((CURRBARSCOUNT = (VAR81 + 92)),VAR136,IF(CONST((VAR161 > 0)),60,'人气')),COLORC0C0C0;
VAR169:=IF(CONST((VAR161 > 0)),(VAR136 * 0.97),VAR136);
DRAWTEXT((CURRBARSCOUNT = (VAR81 + 83)),VAR137,IF(CONST((VAR158 <= 0)),61,'人气')),COLORGREEN;
[url=http://www.70822.com/soft/sort013/sort05/down-172923.html]极品人气副图，具有一定的观赏性，显示五星[/url]