| 1、单阳不破主图 {单阳不破主图} 阳涨幅:=3.5; 阳倍量:=1.9; 单阳收:=C; 单阳开:=O; 单阳:=单阳收>=REF(C,1)*(1+阳涨幅/100)AND VOL>REF(VOL,1)*阳倍量; DRAWTEXT(CURRBARSCOUNT<100 AND 单阳,L*0.98,'阳'),COLOR00FFFF; 高不破价:=REF(C,BARSLAST(单阳)); 低不破价:=REF(L,BARSLAST(单阳)); 单阳不破:=CURRBARSCOUNT<100 AND BARSLAST(单阳)<11 AND (LLV(L,BARSLAST(单阳))>低不破价 OR LLV(L,BARSLAST(单阳))=低不破价); STICKLINE(C<=O,C,O,3,0),COLORBLUE; STICKLINE(C<=O,H,L,0.1,0),COLORBLUE; STICKLINE(C>=O,C,O,3,0),COLORMAGENTA; STICKLINE(C>=O,H,L,0.1,0),COLORMAGENTA; STICKLINE(单阳不破,低不破价-低不破价*0.0005,低不破价,4,0),COLORGREEN; STICKLINE(单阳不破,高不破价,高不破价,4,0),COLORRED; STICKLINE(单阳,单阳开,单阳收,3,0),COLORYELLOW; DRAWTEXT(BARSLAST(单阳)=1 AND 单阳不破,低不破价*0.98,'1'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=2 AND 单阳不破,低不破价*0.98,'2'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=3 AND 单阳不破,低不破价*0.98,'3'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=4 AND 单阳不破,低不破价*0.98,'4'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=5 AND 单阳不破,低不破价*0.98,'5'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=6 AND 单阳不破,低不破价*0.98,'6'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=7 AND 单阳不破,低不破价*0.98,'7'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=8 AND 单阳不破,低不破价*0.98,'8'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=9 AND 单阳不破,低不破价*0.98,'9'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=10 AND 单阳不破,低不破价*0.98,'10'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=11 AND 单阳不破,低不破价*0.98,'11'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=12 AND 单阳不破,低不破价*0.98,'12'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=13 AND 单阳不破,低不破价*0.98,'13'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=14 AND 单阳不破,低不破价*0.98,'14'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=15 AND 单阳不破,低不破价*0.98,'15'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=16 AND 单阳不破,低不破价*0.98,'16'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=17 AND 单阳不破,低不破价*0.98,'17'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=18 AND 单阳不破,低不破价*0.98,'18'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=19 AND 单阳不破,低不破价*0.98,'19'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=20 AND 单阳不破,低不破价*0.98,'20'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=21 AND 单阳不破,低不破价*0.98,'21'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=22 AND 单阳不破,低不破价*0.98,'22'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=23 AND 单阳不破,低不破价*0.98,'23'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=24 AND 单阳不破,低不破价*0.98,'24'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=25 AND 单阳不破,低不破价*0.98,'25'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=26 AND 单阳不破,低不破价*0.98,'26'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=27 AND 单阳不破,低不破价*0.98,'27'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=28 AND 单阳不破,低不破价*0.98,'28'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=29 AND 单阳不破,低不破价*0.98,'29'),COLORGREEN; DRAWTEXT(BARSLAST(单阳)=30 AND 单阳不破,低不破价*0.98,'30'),COLORGREEN; 2、全息黄金分割 {全息黄金分割} 高1:=REF(HHV(H,0),0); 低1:=REF(LLV(L,0),0); 最高位置:REFDATE(高1,DATE),COLORLIGRAY; 最低位置:REFDATE(低1,DATE),COLORWHITE; H0:=高1-(高1-低1)*0.000; H1:=高1-(高1-低1)*0.191; H2:=高1-(高1-低1)*0.382; H3:=高1-(高1-低1)*0.500; H4:=高1-(高1-低1)*0.618; H5:=高1-(高1-低1)*0.809; H10:=高1-(高1-低1)*1.000; %0.000位置:REFDATE(H1,DATE),COLORWHITE; %0.191位置:REFDATE(H1,DATE),COLORLIBLUE; %0.382位置:REFDATE(H2,DATE),COLORLIGREEN; %0.500位置:REFDATE(H3,DATE),COLORLIRED; %0.618位置:REFDATE(H4,DATE),COLORLIMAGENTA; %0.809位置:REFDATE(H5,DATE),COLORYELLOW; %1.000位置:REFDATE(H10,DATE),COLORLIBLUE; H11:=高1-(高1-低1)*1.191; H12:=高1-(高1-低1)*1.382; H13:=高1-(高1-低1)*1.500; H14:=高1-(高1-低1)*1.618; H15:=高1-(高1-低1)*1.809; H20:=高1-(高1-低1)*2.000; %1.191位置:REFDATE(H11,DATE),COLORLIBLUE; %1.382位置:REFDATE(H12,DATE),COLORLIGREEN; %1.500位置:REFDATE(H13,DATE),COLORLIRED; %1.618位置:REFDATE(H14,DATE),COLORLIMAGENTA; %1.809位置:REFDATE(H15,DATE),COLORYELLOW; %2.000位置:REFDATE(H20,DATE),COLORLIBLUE; H21:=高1-(高1-低1)*2.191; H22:=高1-(高1-低1)*2.382; H23:=高1-(高1-低1)*2.500; H24:=高1-(高1-低1)*2.618; H25:=高1-(高1-低1)*2.809; H26:=高1-(高1-低1)*3.000; %2.191位置:REFDATE(H21,DATE),COLORLIBLUE; %2.382位置:REFDATE(H22,DATE),COLORLIGREEN; %2.500位置:REFDATE(H23,DATE),COLORLIRED; %2.618位置:REFDATE(H24,DATE),COLORLIMAGENTA; %2.809位置:REFDATE(H25,DATE),COLORYELLOW; %3.000位置:REFDATE(H26,DATE),COLORYELLOW; LLP:=L=CONST(LLV(L,0)); TTP:=BARSLAST(LLP)+1; STICKLINE((TTP=1),HHV(H,0),LLV(L,0),4,1),COLORMAGENTA; LLP1:=L=CONST(LLV(L,250)); TTP1:=BARSLAST(LLP1)+1; STICKLINE((TTP1=1),HHV(H,0),LLV(L,0),4,1),COLORMAGENTA; LLP2:=L=CONST(LLV(L,150)); TTP2:=BARSLAST(LLP2)+1; STICKLINE((TTP2=1),HHV(H,0),LLV(L,0),4,1),COLORMAGENTA; LLP3:=L=CONST(LLV(L,100)); TTP3:=BARSLAST(LLP3)+1; STICKLINE((TTP3=1),HHV(H,0),LLV(L,0),4,1),COLORMAGENTA; LLP4:=L=CONST(LLV(L,50)); TTP4:=BARSLAST(LLP4)+1; STICKLINE((TTP4=1),HHV(H,0),LLV(L,0),4,1),COLORMAGENTA; LLP5:=L=CONST(LLV(L,25)); TTP5:=BARSLAST(LLP5)+1; STICKLINE((TTP5=1),HHV(H,0),LLV(L,0),4,1),COLORMAGENTA; LLP6:=L=CONST(LLV(L,10)); TTP6:=BARSLAST(LLP6)+1; STICKLINE((TTP6=1),HHV(H,0),LLV(L,0),4,1),COLORMAGENTA; {年月日星期} DA:=YEAR AND MONTH AND DAY; AA1:=STRCAT(CON2STR(YEAR,0),'年'); AA2:=STRCAT(CON2STR(MONTH,0),'月'); AA3:=STRCAT(CON2STR(DAY,0),'日'); AA4:=STRCAT('【',IF(WEEKDAY=1,'星期一',IF(WEEKDAY=2,'星期二', IF(WEEKDAY=3,'星期三',IF(WEEKDAY=4,'星期四',IF (WEEKDAY=5,'星期五',IF(WEEKDAY=6,'星期六','星期日'))))))); AA:=STRCAT(STRCAT(STRCAT(AA1,AA2),STRCAT(AA3,AA4)),'】'); DRAWTEXT_FIX(DA,0.84,0.01,0,AA),COLORWHITE; DRAWKLINE(H,O,L,C); B111:=MONTH!=REF(MONTH,1); Y111:=VARCAT(VAR2STR(MONTH,0),' 月 '); DRAWTEXT(B111,LOW,Y111),COLORYELLOW; STICKLINE(B111=1,CONST(HHV(H,0)),CONST(LLV(L,0)),0,-1),COLORWHITE; 3、邱之分时，早盘强弱立判分时，支撑线、突破线买入提示 邱之系统的包含分时主图指标分享出来 该分时主图指标仅供看盘参考，据些进行买卖股票的风险自担！ 牛股猎人早盘强弱立判分时，支撑线、突破线买入提示( 股民学院: http://www.58188.com ) 已经修改了源码，可以显示。正常使用 {引用库} 昨高:REF(H,1); 昨低:REF(L,1); 昨中:(昨高+昨低)/2; {邱之分时} {牛股猎人早盘强弱立判分时，支撑线、突破线买入提示} 昨高:"引用库.昨高#DAY",COLORRED,LINETHICK2; 昨低:"引用库.昨低#DAY",NODRAW; 昨中:"引用库.昨中#DAY",NODRAW; M34:EMA(C,34),COLORMAGENTA; {M34+2*STD(C,34),COLORFF8000,DOTLINE; M34-2*STD(C,34),COLORFF8000,DOTLINE;} M40:EMA(C,40),COLORBLUE,DOTLINE; M45:EMA(C,45),COLORBLUE,DOTLINE; M50:EMA(C,50),COLORBLUE,DOTLINE; M55:EMA(C,55),COLORBLUE,DOTLINE; 分界线:EMA(C,60),COLORRED; AF1:=1; TT:=BARSLAST(HOUR=9 AND MINUTE=(30+AF1))+1; 均价:=AMOUNT/VOL/100,COLORYELLOW; 价位:=C,COLORWHITE,LINETHICK4; 盘整:=IF(HOUR>9 AND RANGE(HHV(C,60)/LLV(C,60),1,1.02),C,DRAWNULL),COLORRED,LINETHICK2; V1:=V; HH:=C>REF(C,1) AND C/均价>(1+0.03); LL:=C<REF(C,1) AND C/均价<(1-0.03); HH1:=CROSS(SUM(HH,0),0.5); LL1:=CROSS(SUM(LL,0),0.5); SS1:=SUM(HH1,0)*CROSS(COUNT(C<REF(C,1),BARSLAST(HH1)),0.5); BB1:=SUM(LL1,0)*CROSS(COUNT(C>REF(C,1),BARSLAST(LL1)),0.5); XS1:CONST(SUM(IF(SS1,REF(C,1),DRAWNULL),0)),COLORGREEN,LINETHICK2; CB1:CONST(SUM(IF(BB1,REF(C,1),DRAWNULL),0)),COLORMAGENTA,LINETHICK2; HH2:=CROSS(SUM(HH AND C>XS1*1.03,0),0.5); LL2:=CROSS(SUM(LL AND C<CB1*0.97,0),0.5); SS2:=SUM(HH2,0)*CROSS(COUNT(C<REF(C,1),BARSLAST(HH2)),0.5); BB2:=SUM(LL2,0)*CROSS(COUNT(C>REF(C,1),BARSLAST(LL2)),0.5); XS2:CONST(SUM(IF(SS2,REF(C,1),DRAWNULL),0)),COLORGREEN,LINETHICK1; XB2:CONST(SUM(IF(BB2,REF(C,1),DRAWNULL),0)),COLORMAGENTA,LINETHICK1; STICKLINE(TIME2=94100 AND REF(C,BARSLAST(TIME2=94100))>=REF(C,BARSLAST(TIME2=93100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,0.5,-1),COLORRED; STICKLINE(TIME2=94100 AND REF(C,BARSLAST(TIME2=94100))<REF(C,BARSLAST(TIME2=93100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,0.5,-1),COLORGREEN; STICKLINE(TIME2=95100 AND REF(C,BARSLAST(TIME2=95100))>=REF(C,BARSLAST(TIME2=94100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,0.5,-1),COLORRED; STICKLINE(TIME2=95100 AND REF(C,BARSLAST(TIME2=95100))<REF(C,BARSLAST(TIME2=94100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,0.5,-1),COLORGREEN; STICKLINE(TIME2=100100 AND REF(C,BARSLAST(TIME2=100100))>=REF(C,BARSLAST(TIME2=95100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,0.5,-1),COLORRED; STICKLINE(TIME2=100100 AND REF(C,BARSLAST(TIME2=100100))<REF(C,BARSLAST(TIME2=95100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,0.5,-1),COLORGREEN; SJ1:=TIME2=93100;T1:=BARSLAST(SJ1);SJ2:=TIME2=94100; SJ4:=TIME2=95100;T2:=BARSLAST(SJ2);T4:=BARSLAST(SJ4); HS1:=IF(TIME2=94100,REF(C,T2),DRAWNULL)=C; H2:=IF(TIME2=95100,REF(C,T4),DRAWNULL)=C; CS2:=CONST(REF(C,T2)); CS4:=CONST(REF(C,T4)); GL2:=FILTERX(HS1,T2); GL4:=FILTERX(H2,T4); LS1:=IF(TIME2=93100,REF(C,T1),DRAWNULL)=C; CS1:=CONST(REF(C,T1)); GL1:=FILTERX(LS1,T1); DA:=CONST(IF(REF(GL2,BARSLAST(GL2)),REF(BARSLAST(GL1),BARSLAST(GL2)),DRAWNULL)); DA1:=CONST(IF(REF(GL4,BARSLAST(GL4)),REF(BARSLAST(GL2),BARSLAST(GL4)),DRAWNULL)); A:=IF(BARSLAST(GL1)>=0 AND BARSLAST(GL1)<=DA,((CS2-CS1)/DA)*BARSLAST(GL1)+CS1,DRAWNULL); B:=IF(BARSLAST(GL2)>=0 AND BARSLAST(GL2)<=DA1,((CS4-CS2)/DA1)*BARSLAST(GL2)+CS2,DRAWNULL); {IF(A>=REF(A,1),A,DRAWNULL)COLORLIMAGENTA,LINETHICK3; IF(A<REF(A,1),A,DRAWNULL)COLORGREEN,LINETHICK5; IF(B>=REF(B,1),B,DRAWNULL)COLORLIMAGENTA,LINETHICK3; IF(B<REF(B,1),B,DRAWNULL)COLORGREEN,LINETHICK3;} XSJ1:=TIME2=95100; XT1:=BARSLAST(XSJ1); XSJ2:=TIME2=100100; XT2:=BARSLAST(XSJ2); XCS2:=CONST(REF(C,XT2)); XL1:=IF(TIME2=95100,REF(C,XT1),DRAWNULL)=C; XH1:=IF(TIME2=100100,REF(C,XT2),DRAWNULL)=C; XCS1:=CONST(REF(C,XT1)); XGL1:=FILTERX(XL1,XT1); XGL2:=FILTERX(XH1,XT2); XDA:=CONST(IF(REF(XGL2,BARSLAST(XGL2)),REF(BARSLAST(XGL1),BARSLAST(XGL2)),DRAWNULL)); XA:=IF(BARSLAST(XGL1)>=0 AND BARSLAST(XGL1)<=XDA,((XCS2-XCS1)/XDA)*BARSLAST(XGL1)+XCS1,DRAWNULL); {IF(XA>=REF(XA,1),XA,DRAWNULL)COLORLIMAGENTA,LINETHICK3; IF(XA<REF(XA,1),XA,DRAWNULL)COLORGREEN,LINETHICK3;} 时间:=TIME2=100100; N:=BARSLAST(时间); C1:CONST(IF(N,MAX(REF(HHV(H,0),N+1),DYNAINFO(4)),HHV(H,0))),DOTLINE,COLORRED; C2:CONST(IF(N,MIN(REF(LLV(L,0),N+1),DYNAINFO(4)),LLV(L,0))),DOTLINE,COLORGREEN; C3:(C1+C2)/2,DOTLINE,COLORYELLOW; VV:=HHV(V,0); ZF:=(C1/C2-1)*100; DRAWTEXT(CURRBARSCOUNT=2,C1,VARCAT(VARCAT(VARCAT(VARCAT('天:',VAR2STR(C1,2)),'元,'),VARCAT('振幅:',VAR2STR(ZF,2))),'%')),COLORRED; DRAWTEXT(CURRBARSCOUNT=2,C3,VARCAT(VARCAT('人:',VAR2STR(C3,2)),'元')),COLORYELLOW; DRAWTEXT(CURRBARSCOUNT=2,C2,VARCAT(VARCAT('地:',VAR2STR(C2,2)),'元')),COLORGREEN; DRAWTEXT(C1/C2<=1.03 AND CROSS(C,C1) AND V>=VV,C1*1.005,'★买入')COLORRED; DRAWTEXT(C1/C2<=1.03 AND CROSS(C2,C) AND V>=VV,C2*0.998,'★卖出')COLORGREEN; {STICKLINE(C1/C2<1.03 AND CROSS(C,C1) AND V>=VV,DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,0,0),COLORRED;} 市值Z:=STRCAT(STRCAT(' 市值Z: ',CON2STR(FINANCE(46)/100000000*C,2)),'亿'); DRAWTEXT_FIX(ISLASTBAR,0.2,1,0,市值Z),COLOR0080FF; DRAWTEXT_FIX(ISLASTBAR,0.4,1,0,HYBLOCK),COLORRED; DRAWTEXT_FIX(ISLASTBAR,0.05,1,0,DYBLOCK),COLORCYAN; DRAWTEXT_FIX(ISLASTBAR,0.55,1,0,GNBLOCK),COLORYELLOW;{在屏幕左上角显示所属地域板块}; {竞价情况} JJCJL:=DYNAINFO(15)/DYNAINFO(4)/100; JJJEDW:=IF(DYNAINFO(15)>10000,'万元','元'); JJJE:=IF(DYNAINFO(15)>10000,CON2STR(DYNAINFO(15)/10000,1),CON2STR(DYNAINFO(15),1)); JJJE1:=STRCAT(JJJE,JJJEDW); JJ:=STRCAT('竞价量额：',STRCAT(CON2STR(JJCJL/10000,2),'万手')); JJ1:=STRCAT(JJ,' = '); DRAWTEXT_FIX(1,0.7,0.65,0,STRCAT(JJ1,JJJE1))COLORMAGENTA;{竞价量额位置} {DRAWTEXT_FIX(1,0.95,0.50,0,STRCAT('占昨成交：',STRCAT(CON2STR(DYNAINFO(15)/分时引用.昨日额#DAY*100,2),'%')))COLORYELLOW;} 今日竞价股数:=DYNAINFO(15)/DYNAINFO(4); {ZSPJ:=分时引用JIN.ZSP#DAY; AA:=今日竞价股数/FINANCE(46)*10000*(O-ZSPJ)/ZSPJ;}; |