通达信角度线组合主图指标公式主图源码

VAR13:=REF(CLOSE,1);
VAR14:=(HIGH+LOW+OPEN+2*CLOSE)/5;
VAR15:=2*VAR14-LOW;
VAR16:=2*VAR14-HIGH;
VAR17:=VAR14+(HIGH-LOW);
VAR18:=VAR14-(HIGH-LOW);
VAR19:=REF(VAR15 , 1);
VAR20:=REF(VAR16 , 1);
DRAWTEXT_FIX(C!=0,0.8,0.05,0,STRCAT('今日阻力： ',STRCAT(CON2STR(VAR19,2),' 元'))),COLORFFFF00;
DRAWTEXT_FIX(C!=0,0.8,0.1,0,STRCAT('今日支撑： ',STRCAT(CON2STR(VAR20,2),' 元'))),COLORRED;
DRAWTEXT_FIX(C!=0,0.8,0.15,0,STRCAT('明日突破： ',STRCAT(CON2STR(VAR17,2),' 元'))),COLORFF00FF;
DRAWTEXT_FIX(C!=0,0.8,0.2,0,STRCAT('明日阻力： ',STRCAT(CON2STR(VAR15,2),' 元'))),COLORFFFF00;
DRAWTEXT_FIX(C!=0,0.8,0.25,0,STRCAT('明日支撑： ',STRCAT(CON2STR(VAR16,2),' 元'))),COLORRED;
DRAWTEXT_FIX(C!=0,0.8,0.3,0,STRCAT('明日反转： ',STRCAT(CON2STR(VAR18,2),' 元'))),COLORYELLOW;
VAR21:=HHV(HIGH,13)=HIGH AND HIGH>REF(HIGH,1);
VAR22:=FILTER(VAR21,12);
VAR23:=LLV(LOW,13)=LOW AND LOW< REF(LOW,1);
VAR24:=FILTER(VAR23,12);
VAR25:=BARSLAST(VAR22);
VAR26:REF(HIGH,VAR25),COLORFF00FF,NODRAW;
STICKLINE(1,VAR26,VAR26,1.5,0),COLORFF00FF;
VAR27:=BARSLAST(VAR24);
VAR28:REF(LOW,VAR27),COLORFFBB80,NODRAW;
STICKLINE(1,VAR28,VAR28,1.5,0),COLORFFBB80;
X_1:=180;
X_2:=5;
DRAWKLINE(H,O,L,C);
X_3:=REF(HHV(H,X_1),X_2);
X_4:=REF(LLV(L,X_1),X_2);
X_5:=X_3-(X_3-X_4)*0.191;
X_6:=X_3-(X_3-X_4)*0.382;
X_7:=X_3-(X_3-X_4)*0.5;
X_8:=X_3-(X_3-X_4)*0.618;
X_9:=X_3-(X_3-X_4)*0.764;
X_10:=X_3-(X_3-X_4)*0.809;
X_11:=X_3-(X_3-X_4)*0.236;
X_12:=X_3+(X_3-X_4)*0.191;
X_13:=X_3+(X_3-X_4)*0.382;
X_14:=X_3+(X_3-X_4)*0.618;
X_15:=IF((X_3-X_4)< X_4,X_4-(X_3-X_4)*0.191,X_4-X_4*0.191);
X_16:=IF((X_3-X_4)< X_4,X_4-(X_3-X_4)*0.382,X_4-X_4*0.382);
X_17:=IF((X_3-X_4)< X_4,X_4-(X_3-X_4)*0.618,X_4-X_4*0.618);
X_18:=IF(CURRBARSCOUNT<=X_1+X_2 AND CURRBARSCOUNT>X_2,REFDATE(X_3,DATE),DRAWNULL);
X_19:=IF(CURRBARSCOUNT<=X_1+X_2,REFDATE(X_5,DATE),DRAWNULL);
X_20:=IF(CURRBARSCOUNT<=X_1+X_2,REFDATE(X_6,DATE),DRAWNULL);
X_21:=IF(CURRBARSCOUNT<=X_1+X_2,REFDATE(X_7,DATE),DRAWNULL);
X_22:=IF(CURRBARSCOUNT<=X_1+X_2,REFDATE(X_8,DATE),DRAWNULL);
X_23:=IF(CURRBARSCOUNT<=X_1+X_2,REFDATE(X_9,DATE),DRAWNULL);
X_24:=IF(CURRBARSCOUNT<=X_1+X_2,REFDATE(X_10,DATE),DRAWNULL);
X_25:=IF(CURRBARSCOUNT<=X_1+X_2,REFDATE(X_11,DATE),DRAWNULL);
X_26:=IF(CURRBARSCOUNT<=X_1+X_2 AND CURRBARSCOUNT>X_2,REFDATE(X_4,DATE),DRAWNULL);
X_27:X_18,COLOR007799;
X_28:REFDATE(X_19,DATE),DOTLINE,COLOR555555;
X_29:REFDATE(X_20,DATE),DOTLINE,COLOR005858;
X_30:REFDATE(X_21,DATE),DOTLINE,COLOR777777;
X_31:REFDATE(X_22,DATE),DOTLINE,COLOR005858;
X_32:REFDATE(X_23,DATE),DOTLINE,COLOR555555;
X_33:REFDATE(X_24,DATE),DOTLINE,COLOR555555;
X_34:REFDATE(X_25,DATE),DOTLINE,COLOR555555;
X_35:X_26,COLOR668800;
X_36:=INTPART(X_1*0.5)+X_2;
X_37:=(CURRBARSCOUNT=X_36);
X_38:=(CURRBARSCOUNT=X_36-32);
X_39:=(CURRBARSCOUNT=X_36-40);
DRAWTEXT(X_37 AND X_18,X_18-(X_18-X_26)*0.025,STRCAT(' 【高点】:',CON2STR(X_3,2))),COLOR007799;
DRAWTEXT(X_37 AND X_19,X_19+(X_18-X_26)*0.020,STRCAT('191 (809):',CON2STR(X_5,2))),COLOR888888;
DRAWTEXT(X_37 AND X_20,X_20+(X_18-X_26)*0.020,STRCAT('382 (618):',CON2STR(X_6,2))),COLOR008888;
DRAWTEXT(X_37 AND X_21,X_21+(X_18-X_26)*0.020,STRCAT(' 【中点】:',CON2STR(X_7,2))),COLOR000088;
DRAWTEXT(X_37 AND X_22,X_22+(X_18-X_26)*0.020,STRCAT('618 (382):',CON2STR(X_8,2))),COLOR008888;
DRAWTEXT(X_37 AND X_23,X_23+(X_18-X_26)*0.020,STRCAT('764 (236):',CON2STR(X_9,2))),COLOR888888;
DRAWTEXT(X_37 AND X_24,X_24+(X_18-X_26)*0.020,STRCAT('809 (191):',CON2STR(X_10,2))),COLOR888888;
DRAWTEXT(X_37 AND X_25,X_25+(X_18-X_26)*0.020,STRCAT('236 (764):',CON2STR(X_11,2))),COLOR888888;
DRAWTEXT(X_37 AND X_26,X_26+(X_18-X_26)*0.020,STRCAT(' 【低点】:',CON2STR(X_4,2))),COLOR668800;
DRAWTEXT(X_39 AND X_18,X_18+(X_18-X_26)*0.040,''),COLOR007799;
X_49:=CONST(FINDHIGH(H,0,800*10,1));
X_50:=CONST(BARSLAST(X_49=H))+1;
X_51:=CONST(IF(X_50=1,H,REF(H,X_50-1)));
X_52:=CONST(FINDLOW(L,0,800*10,1));
X_53:=CONST(BARSLAST(X_52=L))+1;
X_54:=CONST(IF(X_53=1,L,REF(L,X_53-1)));
X_55:=1=2 OR 1=2;
X_56:=1=1 OR 1=1;
X_57:=1=1 OR 1=1 OR 1=1;
X_58:=IF(X_55,ROUND(IF(X_50>X_53,X_50,X_53)-Abs(X_50-X_53)*0.809),DRAWNULL);
X_59:=IF(X_57,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*0.5),DRAWNULL);
X_60:=IF(X_55,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*0.618),DRAWNULL);
X_61:=IF(X_55,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*0.382),DRAWNULL);
X_62:=IF(X_55,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*0.236),DRAWNULL);
X_63:=IF(X_57,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*1),DRAWNULL);
X_64:=IF(X_55,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*1.809),DRAWNULL);
X_65:=IF(X_57,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*1.5),DRAWNULL);
X_66:=IF(X_55,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*1.618),DRAWNULL);
X_67:=IF(X_55,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*1.382),DRAWNULL);
X_68:=IF(X_55,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*1.236),DRAWNULL);
X_69:=IF(X_57,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*2),DRAWNULL);
X_70:=IF(X_55,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*2.236),DRAWNULL);
X_71:=IF(X_55,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*2.382),DRAWNULL);
X_72:=IF(X_57,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*2.5),DRAWNULL);
X_73:=IF(X_55,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*2.618),DRAWNULL);
X_74:=IF(X_55,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*2.809),DRAWNULL);
X_75:=IF(X_57,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*3),DRAWNULL);
X_76:=IF(X_57,ROUND(IF(X_50>X_53,X_50,X_53)),DRAWNULL);
X_77:=CURRBARSCOUNT=X_58 OR CURRBARSCOUNT=X_59 OR CURRBARSCOUNT=X_60 OR CURRBARSCOUNT=X_61 OR CURRBARSCOUNT=X_62 OR CURRBARSCOUNT=X_63 OR CURRBARSCOUNT=X_64 OR CURRBARSCOUNT=X_65 OR CURRBARSCOUNT=X_66 OR CURRBARSCOUNT=X_67 OR CURRBARSCOUNT=X_68 OR CURRBARSCOUNT=X_69 OR CURRBARSCOUNT=X_70 OR CURRBARSCOUNT=X_71 OR CURRBARSCOUNT=X_72 OR CURRBARSCOUNT=X_73 OR CURRBARSCOUNT=X_74 OR CURRBARSCOUNT=X_75 OR CURRBARSCOUNT=X_76;
X_78:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*1/8),DRAWNULL);
X_79:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*2/8),DRAWNULL);
X_80:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*3/8),DRAWNULL);
X_81:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*4/3),DRAWNULL);
X_82:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*5/8),DRAWNULL);
X_83:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*6/8),DRAWNULL);
X_84:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*7/8),DRAWNULL);
X_85:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*9/8),DRAWNULL);
X_86:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*1/3),DRAWNULL);
X_87:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*2/3),DRAWNULL);
X_88:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*10/8),DRAWNULL);
X_89:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*11/8),DRAWNULL);
X_90:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*5/3),DRAWNULL);
X_91:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*13/8),DRAWNULL);
X_92:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*14/8),DRAWNULL);
X_93:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*15/8),DRAWNULL);
X_94:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*17/8),DRAWNULL);
X_95:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*18/8),DRAWNULL);
X_96:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X_53)*19/8),DRAWNULL);
X_97:=IF(X_56,ROUND(IF(X_50>X_53,X_50,X_53)-ABS(X_50-X