通达信高山主图指标
通达信高山主图指标
源码
N:=55;
HR:=HHV(HIGH,N);
HRY:=LLV(LOW,N);
HRY11:=HR*HRY;
HRY33:SQRT(HRY11),COLORGREEN,LINETHICK2;
IF(C>HRY33 AND HRY33 >=REF(HRY33 ,1), HRY33 ,DRAWNULL),LINETHICK2,COLORRED;
AA:=MA((2*CLOSE+HIGH+LOW)/4,5);
通道1:=AA*102/100;
通道2:=AA*(200-102)/30;
CC:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
DD:=DMA(CLOSE,CC);
通道3:=(1+7/100)*DD;
通道4:=(1-7/100)*DD;
股价:=C;
股价运动:=股价,LINETHICK2,COLORBLUE;
X311:=XMA(C,3);
J311:=(XMA(C,3)*3-(C+REF(C,1))/2+C)/3;
Y311:=IFF(CURRBARSCOUNT=1,J311,XMA(C,3));
X312:=XMA(Y311,3);
J312:=(XMA(Y311,3)*3-(Y311+REF(Y311,1))/2+Y311)/3;
Y312:=IFF(CURRBARSCOUNT=1,J312,X312);
X313:=XMA(Y312,3);
J313:=(XMA(Y312,3)*3-(Y312+REF(Y312,1))/2+Y312)/3;
Y313:=IFF(CURRBARSCOUNT=1,J313,X313);
X314:=XMA(Y313,3);
J314:=(XMA(Y313,3)*3-(Y313+REF(Y313,1))/2+Y313)/3;
Y314:=IFF(CURRBARSCOUNT=1,J314,X314);
X315:=XMA(Y314,3);
J315:=(XMA(Y314,3)*3-(Y314+REF(Y314,1))/2+Y314)/3;
Y315:=IFF(CURRBARSCOUNT=1,J315,X315);
X316:=XMA(Y315,3);
J316:=(XMA(Y315,3)*3-(Y315+REF(Y315,1))/2+Y315)/3;
Y316:=IFF(CURRBARSCOUNT=1,J316,X316);
X317:=XMA(Y316,3);
J317:=(XMA(Y316,3)*3-(Y316+REF(Y316,1))/2+Y316)/3;
Y317:=IFF(CURRBARSCOUNT=1,J317,X317);
X318:=XMA(Y317,3);
J318:=(XMA(Y317,3)*3-(Y317+REF(Y317,1))/2+Y317)/3;
Y318:=IFF(CURRBARSCOUNT=1,J318,X318);
X319:=XMA(Y318,3);
J319:=(XMA(Y318,3)*3-(Y312+REF(Y318,1))/2+Y318)/3;
Y319:=IFF(CURRBARSCOUNT=1,J319,X319);
X320:=XMA(Y319,3);
J320:=(XMA(Y319,3)*3-(Y319+REF(Y319,1))/2+Y319)/3;
Y320:=IFF(CURRBARSCOUNT=1,J320,X320);
X321:=XMA(Y320,3);
J321:=(XMA(Y320,3)*3-(Y320+REF(Y320,1))/2+Y320)/3;
Y321:=IFF(CURRBARSCOUNT=1,J321,X321);
X322:=XMA(Y321,3);
J322:=(XMA(Y321,3)*3-(Y321+REF(Y321,1))/2+Y321)/3;
Y322:=IFF(CURRBARSCOUNT=1,J322,X322);
X323:=XMA(Y322,3);
J323:=(XMA(Y322,3)*3-(Y322+REF(Y322,1))/2+Y322)/3;
Y323:=IFF(CURRBARSCOUNT=1,J323,X323);
X324:=XMA(Y323,3);
J324:=(XMA(Y323,3)*3-(Y323+REF(Y323,1))/2+Y323)/3;
Y324:=IFF(CURRBARSCOUNT=1,J324,X324);
X325:=XMA(Y324,3);
J325:=(XMA(Y324,3)*3-(Y324+REF(Y324,1))/2+Y324)/3;
Y325:=IFF(CURRBARSCOUNT=1,J325,X325);
X326:=XMA(Y325,3);
J326:=(XMA(Y325,3)*3-(Y325+REF(Y325,1))/2+Y325)/3;
Y326:=IFF(CURRBARSCOUNT=1,J326,X326);
X327:=XMA(Y326,3);
J327:=(XMA(Y326,3)*3-(Y326+REF(Y326,1))/2+Y326)/3;
Y327:=IFF(CURRBARSCOUNT=1,J327,X327);
X328:=XMA(Y327,3);
J328:=(XMA(Y327,3)*3-(Y327+REF(Y327,1))/2+Y327)/3;
Y328:=IFF(CURRBARSCOUNT=1,J328,X328);
X329:=XMA(Y328,3);
J329:=(XMA(Y328,3)*3-(Y328+REF(Y328,1))/2+Y328)/3;
Y329:=IFF(CURRBARSCOUNT=1,J329,X329);
X330:=XMA(Y329,3);
J330:=(XMA(Y329,3)*3-(Y329+REF(Y329,1))/2+Y329)/3;
Y330:=IFF(CURRBARSCOUNT=1,J330,X330);
X331:=XMA(Y330,3);
J331:=(XMA(Y330,3)*3-(Y330+REF(Y330,1))/2+Y330)/3;
Y331:=IFF(CURRBARSCOUNT=1,J331,X331);
X332:=XMA(Y331,3);
J332:=(XMA(Y331,3)*3-(Y331+REF(Y331,1))/2+Y331)/3;
Y332:=IFF(CURRBARSCOUNT=1,J332,X332);
X333:=XMA(Y332,3);
J333:=(XMA(Y332,3)*3-(Y332+REF(Y332,1))/2+Y332)/3;
Y333:=IFF(CURRBARSCOUNT=1,J333,X333);
X334:=XMA(Y333,3);
J334:=(XMA(Y333,3)*3-(Y333+REF(Y333,1))/2+Y333)/3;
Y334:=IFF(CURRBARSCOUNT=1,J334,X334);
X335:=XMA(Y334,3);
J335:=(XMA(Y334,3)*3-(Y334+REF(Y334,1))/2+Y334)/3;
Y335:=IFF(CURRBARSCOUNT=1,J335,X335);
X336:=XMA(Y335,3);
J336:=(XMA(Y335,3)*3-(Y335+REF(Y335,1))/2+Y335)/3;
Y336:=IFF(CURRBARSCOUNT=1,J336,X336);
X337:=XMA(Y336,3);
J337:=(XMA(Y336,3)*3-(Y336+REF(Y336,1))/2+Y336)/3;
Y337:=IFF(CURRBARSCOUNT=1,J337,X337);
X338:=XMA(Y337,3);
J338:=(XMA(Y337,3)*3-(Y337+REF(Y337,1))/2+Y337)/3;
Y338:=IFF(CURRBARSCOUNT=1,J338,X338);
X339:=XMA(Y338,3);
J339:=(XMA(Y338,3)*3-(Y338+REF(Y338,1))/2+Y338)/3;
Y339:=IFF(CURRBARSCOUNT=1,J339,X339);
X340:=XMA(Y339,3);
J340:=(XMA(Y339,3)*3-(Y339+REF(Y339,1))/2+Y339)/3;
Y340:=IFF(CURRBARSCOUNT=1,J340,X340);
X341:=XMA(Y340,3);
J341:=(XMA(Y340,3)*3-(Y340+REF(Y340,1))/2+Y340)/3;
Y341:=IFF(CURRBARSCOUNT=1,J341,X341);
X342:=XMA(Y341,3);
J342:=(XMA(Y341,3)*3-(Y341+REF(Y341,1))/2+Y341)/3;
Y342:=IFF(CURRBARSCOUNT=1,J342,X342);
X343:=XMA(Y342,3);
J343:=(XMA(Y342,3)*3-(Y342+REF(Y342,1))/2+Y342)/3;
Y343:=IFF(CURRBARSCOUNT=1,J343,X343);
X344:=XMA(Y343,3);
J344:=(XMA(Y343,3)*3-(Y343+REF(Y343,1))/2+Y343)/3;
Y344:=IFF(CURRBARSCOUNT=1,J344,X344);
X345:=XMA(Y344,3);
J345:=(XMA(Y344,3)*3-(Y344+REF(Y344,1))/2+Y344)/3;
Y345:=IFF(CURRBARSCOUNT=1,J345,X345);
X346:=XMA(Y345,3);
J346:=(XMA(Y345,3)*3-(Y345+REF(Y345,1))/2+Y345)/3;
Y346:=IFF(CURRBARSCOUNT=1,J346,X346);
X347:=XMA(Y346,3);
J347:=(XMA(Y346,3)*3-(Y346+REF(Y346,1))/2+Y346)/3;
Y347:=IFF(CURRBARSCOUNT=1,J347,X347);
X348:=XMA(Y347,3);
J348:=(XMA(Y347,3)*3-(Y347+REF(Y347,1))/2+Y347)/3;