以下是通达信高山主图指标
通达信高山主图指标
源码
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;
Y348:=IFF(CURRBARSCOUNT=1,J348,X348);
X349:=XMA(Y348,3);
J349:=(XMA(Y348,3)*3-(Y348+REF(Y348,1))/2+Y348)/3;
Y349:=IFF(CURRBARSCOUNT=1,J349,X349);
X350:=XMA(Y349,3);
J350:=(XMA(Y349,3)*3-(Y349+REF(Y349,1))/2+Y349)/3;
Y350:=IFF(CURRBARSCOUNT=1,J350,X350);
X351:=XMA(Y350,3);
J351:=(XMA(Y350,3)*3-(Y350+REF(Y350,1))/2+Y350)/3;
Y351:=IFF(CURRBARSCOUNT=1,J351,X351);
X352:=XMA(Y351,3);
J352:=(XMA(Y351,3)*3-(Y351+REF(Y351,1))/2+Y351)/3;
Y352:=IFF(CURRBARSCOUNT=1,J352,X352);
X353:=XMA(Y352,3);
J353:=(XMA(Y352,3)*3-(Y352+REF(Y352,1))/2+Y352)/3;
Y353:=IFF(CURRBARSCOUNT=1,J353,X353);
X354:=XMA(Y353,3);
J354:=(XMA(Y353,3)*3-(Y353+REF(Y353,1))/2+Y353)/3;
Y354:=IFF(CURRBARSCOUNT=1,J354,X354);
X355:=XMA(Y354,3);
J355:=(XMA(Y354,3)*3-(Y354+REF(Y354,1))/2+Y354)/3;
Y355:=IFF(CURRBARSCOUNT=1,J355,X355);
X356:=XMA(Y355,3);
J356:=(XMA(Y355,3)*3-(Y355+REF(Y355,1))/2+Y355)/3;
Y356:=IFF(CURRBARSCOUNT=1,J356,X356);
X357:=XMA(Y356,3);
J357:=(XMA(Y356,3)*3-(Y356+REF(Y356,1))/2+Y356)/3;
Y357:=IFF(CURRBARSCOUNT=1,J357,X357);
X358:=XMA(Y357,3);
J358:=(XMA(Y357,3)*3-(Y357+REF(Y357,1))/2+Y357)/3;
Y358:=IFF(CURRBARSCOUNT=1,J358,X358);
X359:=XMA(Y358,3);
J359:=(XMA(Y358,3)*3-(Y358+REF(Y358,1))/2+Y358)/3;
Y359:=IFF(CURRBARSCOUNT=1,J359,X359);
X360:=XMA(Y359,3);
J360:=(XMA(Y359,3)*3-(Y359+REF(Y359,1))/2+Y359)/3;
Y360:=IFF(CURRBARSCOUNT=1,J360,X360);
X361:=XMA(Y360,3);
J361:=(XMA(Y360,3)*3-(Y360+REF(Y360,1))/2+Y360)/3;
Y361:=IFF(CURRBARSCOUNT=1,J361,X361);
X362:=XMA(Y361,3);
J362:=(XMA(Y361,3)*3-(Y361+REF(Y361,1))/2+Y361)/3;
Y362:=IFF(CURRBARSCOUNT=1,J362,X362);
X363:=XMA(Y362,3);
J363:=(XMA(Y362,3)*3-(Y362+REF(Y362,1))/2+Y362)/3;
Y363:=IFF(CURRBARSCOUNT=1,J363,X363);
X364:=XMA(Y363,3);
J364:=(XMA(Y363,3)*3-(Y363+REF(Y363,1))/2+Y363)/3;
Y364:=IFF(CURRBARSCOUNT=1,J364,X364);
X365:=XMA(Y364,3);
J365:=(XMA(Y364,3)*3-(Y364+REF(Y364,1))/2+Y364)/3;
Y365:=IFF(CURRBARSCOUNT=1,J365,X365);
X366:=XMA(Y365,3);
J366:=(XMA(Y365,3)*3-(Y365+REF(Y365,1))/2+Y365)/3;
Y366:=IFF(CURRBARSCOUNT=1,J366,X366);
X367:=XMA(Y366,3);
J367:=(XMA(Y366,3)*3-(Y366+REF(Y366,1))/2+Y366)/3;
Y367:=IFF(CURRBARSCOUNT=1,J367,X367);
X368:=XMA(Y367,3);
J368:=(XMA(Y367,3)*3-(Y367+REF(Y367,1))/2+Y367)/3;
Y368:=IFF(CURRBARSCOUNT=1,J368,X368);
X369:=XMA(Y368,3);
J369:=(XMA(Y368,3)*3-(Y368+REF(Y368,1))/2+Y368)/3;
Y369:=IFF(CURRBARSCOUNT=1,J369,X369);
X370:=XMA(Y369,3);
J370:=(XMA(Y369,3)*3-(Y369+REF(Y369,1))/2+Y369)/3;
Y370:=IFF(CURRBARSCOUNT=1,J370,X370);
X371:=XMA(Y370,3);
J371:=(XMA(Y370,3)*3-(Y370+REF(Y370,1))/2+Y370)/3;
Y371:=IFF(CURRBARSCOUNT=1,J371,X371);
X372:=XMA(Y371,3);
J372:=(XMA(Y371,3)*3-(Y371+REF(Y371,1))/2+Y371)/3;
Y372:=IFF(CURRBARSCOUNT=1,J372,X372);
X373:=XMA(Y372,3);
J373:=(XMA(Y372,3)*3-(Y372+REF(Y372,1))/2+Y372)/3;
Y373:=IFF(CURRBARSCOUNT=1,J373,X373);
X374:=XMA(Y373,3);
J374:=(XMA(Y373,3)*3-(Y373+REF(Y373,1))/2+Y373)/3;
Y374:=IFF(CURRBARSCOUNT=1,J374,X374);
X375:=XMA(Y374,3);
J375:=(XMA(Y374,3)*3-(Y374+REF(Y374,1))/2+Y374)/3;
Y375:=IFF(CURRBARSCOUNT=1,J375,X375);
X376:=XMA(Y375,3);
J376:=(XMA(Y375,3)*3-(Y375+REF(Y375,1))/2+Y375)/3;
Y376:=IFF(CURRBARSCOUNT=1,J376,X376);
X377:=XMA(Y376,3);
J377:=(XMA(Y376,3)*3-(Y376+REF(Y376,1))/2+Y376)/3;
Y377:=IFF(CURRBARSCOUNT=1,J377,X377);
X378:=XMA(Y377,3);
J378:=(XMA(Y377,3)*3-(Y377+REF(Y377,1))/2+Y377)/3;
Y378:=IFF(CURRBARSCOUNT=1,J378,X378);
X379:=XMA(Y378,3);
J379:=(XMA(Y378,3)*3-(Y378+REF(Y378,1))/2+Y378)/3;
Y379:=IFF(CURRBARSCOUNT=1,J379,X379);
X380:=XMA(Y379,3);
J380:=(XMA(Y379,3)*3-(Y379+REF(Y379,1))/2+Y379)/3;
Y380:=IFF(CURRBARSCOUNT=1,J380,X380);
X381:=XMA(Y380,3);
J381:=(XMA(Y380,3)*3-(Y380+REF(Y380,1))/2+Y380)/3;
Y381:=IFF(CURRBARSCOUNT=1,J381,X381);
X382:=XMA(Y381,3);
J382:=(XMA(Y381,3)*3-(Y381+REF(Y381,1))/2+Y381)/3;
Y382:=IFF(CURRBARSCOUNT=1,J382,X382);
X383:=XMA(Y382,3);
J383:=(XMA(Y382,3)*3-(Y382+REF(Y382,1))/2+Y382)/3;
Y383:=IFF(CURRBARSCOUNT=1,J383,X383);
X384:=XMA(Y383,3);
J384:=(XMA(Y383,3)*3-(Y383+REF(Y383,1))/2+Y383)/3;
Y384:=IFF(CURRBARSCOUNT=1,J384,X384);
X385:=XMA(Y384,3);
J385:=(XMA(Y384,3)*3-(Y384+REF(Y384,1))/2+Y384)/3;
Y385:=IFF(CURRBARSCOUNT=1,J385,X385);
X386:=XMA(Y385,3);
J386:=(XMA(Y385,3)*3-(Y385+REF(Y385,1))/2+Y385)/3;
Y386:=IFF(CURRBARSCOUNT=1,J386,X386);
X387:=XMA(Y386,3);
J387:=(XMA(Y386,3)*3-(Y386+REF(Y386,1))/2+Y386)/3;
Y387:=IFF(CURRBARSCOUNT=1,J387,X387);
X388:=XMA(Y387,3);
J388:=(XMA(Y387,3)*3-(Y387+REF(Y387,1))/2+Y387)/3;
Y388:=IFF(CURRBARSCOUNT=1,J388,X388);
X389:=XMA(Y388,3);
J389:=(XMA(Y388,3)*3-(Y388+REF(Y388,1))/2+Y388)/3;
Y389:=IFF(CURRBARSCOUNT=1,J389,X389);
X390:=XMA(Y389,3);
J390:=(XMA(Y389,3)*3-(Y389+REF(Y389,1))/2+Y389)/3;
Y390:=IFF(CURRBARSCOUNT=1,J390,X390);
X391:=XMA(Y390,3);
J391:=(XMA(Y390,3)*3-(Y390+REF(Y390,1))/2+Y390)/3;
Y391:=IFF(CURRBARSCOUNT=1,J391,X391);
X392:=XMA(Y391,3);
J392:=(XMA(Y391,3)*3-(Y391+REF(Y391,1))/2+Y391)/3;
Y392:=IFF(CURRBARSCOUNT=1,J392,X392);
X393:=XMA(Y392,3);
J393:=(XMA(Y392,3)*3-(Y392+REF(Y392,1))/2+Y392)/3;
Y393:=IFF(CURRBARSCOUNT=1,J393,X393);
X394:=XMA(Y393,3);
J394:=(XMA(Y393,3)*3-(Y393+REF(Y393,1))/2+Y393)/3;
Y394:=IFF(CURRBARSCOUNT=1,J394,X394);
X395:=XMA(Y394,3);
J395:=(XMA(Y394,3)*3-(Y394+REF(Y394,1))/2+Y394)/3;
Y395:=IFF(CURRBARSCOUNT=1,J395,X395);
X396:=XMA(Y395,3);
J396:=(XMA(Y395,3)*3-(Y395+REF(Y395,1))/2+Y395)/3;
Y396:=IFF(CURRBARSCOUNT=1,J396,X396);
X397:=XMA(Y396,3);
J397:=(XMA(Y396,3)*3-(Y396+REF(Y396,1))/2+Y396)/3;
Y397:=IFF(CURRBARSCOUNT=1,J397,X397);
X398:=XMA(Y397,3);
J398:=(XMA(Y397,3)*3-(Y397+REF(Y397,1))/2+Y397)/3;
Y398:=IFF(CURRBARSCOUNT=1,J398,X398);
X399:=XMA(Y398,3);
J399:=(XMA(Y398,3)*3-(Y398+REF(Y398,1))/2+Y398)/3;
Y399:=IFF(CURRBARSCOUNT=1,J399,X399);
X400:=XMA(Y399,3);
J400:=(XMA(Y399,3)*3-(Y399+REF(Y399,1))/2+Y399)/3;
Y400:=IFF(CURRBARSCOUNT=1,J400,X400);
X401:=XMA(Y400,3);
J401:=(XMA(Y400,3)*3-(Y400+REF(Y400,1))/2+Y400)/3;
Y401:=IFF(CURRBARSCOUNT=1,J401,X401);
X402:=XMA(Y401,3);
J402:=(XMA(Y401,3)*3-(Y401+REF(Y401,1))/2+Y401)/3;
Y402:=IFF(CURRBARSCOUNT=1,J402,X402);
X403:=XMA(Y402,3);
J403:=(XMA(Y402,3)*3-(Y402+REF(Y402,1))/2+Y402)/3;
Y403:=IFF(CURRBARSCOUNT=1,J403,X403);
X404:=XMA(Y403,3);
J404:=(XMA(Y403,3)*3-(Y403+REF(Y403,1))/2+Y403)/3;
Y404:=IFF(CURRBARSCOUNT=1,J404,X404);
X405:=XMA(Y404,3);
J405:=(XMA(Y404,3)*3-(Y404+REF(Y404,1))/2+Y404)/3;
Y405:=IFF(CURRBARSCOUNT=1,J405,X405);
X406:=XMA(Y405,3);
J406:=(XMA(Y405,3)*3-(Y405+REF(Y405,1))/2+Y405)/3;
Y406:=IFF(CURRBARSCOUNT=1,J406,X406);
趋势:Y406,LINETHICK2,COLORRED;
高险1:趋势*1.1,COLOR00FF00;
高险2:趋势*1.125,COLOR00FF00;
高险3:趋势*1.15,COLOR00FF00;
良机1:趋势*0.9,COLORFF00FF;
良机2:趋势*0.875,COLORFF00FF;
良机3:趋势*0.85,COLORFF00FF;
T:=CLOSE/REF(CLOSE,1)*1000-1000;
QS2:=XMA(XMA(XMA(T,2),2),2);
QS4:=XMA(XMA(XMA(T,4),4),4);
QS6:=XMA(XMA(XMA(T,6),6),6);
DRAWICON(CROSS(QS2,QS4),L,1);
DRAWICON(QS2REF(QS4,1),H,2);
高风险:=((C-趋势)/趋势*100>10 AND C>通道3) OR ((H-趋势)/趋势*100>10 AND H>通道3 ) OR ((O-趋势)/趋势*100>10 AND O>通道3);
DRAWICON(FILTER(高风险,3),H,15);
良机:=((C-趋势)/趋势*100<-10 AND C<通道4) OR ((O-趋势)/趋势*100<-10 AND O<通道4 ) OR((L-趋势)/趋势*100<-10 AND L<通道4);
DRAWICON(FILTER(良机,3),L,23);
评论(0)