|
以下是通达信压力主图源码（无源码的请下载附件导入）
HJ_1:=8;
HJ_2:=REF(HIGH,10)=HHV(HIGH,2*11);
HJ_3:=BACKSET(HJ_2,10+1);
HJ_4:=FILTER(HJ_3,10) AND HIGH=HHV(HIGH,11);
卖出:DRAWICON(HJ_4,HIGH*1.02,12);
HJ_5:=REF(LOW,10)=LLV(LOW,2*11);
HJ_6:=BACKSET(HJ_5,11);
HJ_7:=FILTER(HJ_6,10) AND LOW=LLV(LOW,11);
买入:DRAWICON(HJ_7,LOW*0.98,11);
HJ_8:=HHV(HIGH,60);
HJ_9:=CONST(HJ_8);
HJ_10:=LLV(LOW,60);
HJ_11:=CONST(HJ_10);
{分析家公式网www.88gs.com}
HJ_12:=(CLOSE+HIGH+LOW+OPEN)/4;
HJ_13:=LOW+(HJ_12-LOW)+(CLOSE-LOW);
HJ_14:=LOW+(CLOSE-HJ_12);
HJ_15:=LOW>REF(HIGH,1);
HJ_16:=HIGH<REF(LOW,1);
HJ_17:=LOW>REF(HIGH,BARSLAST(HJ_15)+1);
HJ_18:=LOW<=REF(HIGH,BARSLAST(HJ_15)+1);
HJ_19:=HIGH<REF(LOW,BARSLAST(HJ_16)+1);
HJ_20:=HIGH>=REF(LOW,BARSLAST(HJ_16)+1);
HJ_21:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
HJ_22:=SMA(HJ_21,3,1);
HJ_23:=SMA(HJ_22,3,1);
HJ_24:=3*HJ_22-2*HJ_23;
HJ_25:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
HJ_26:=SMA(HJ_25,3,1);
HJ_27:=SMA(HJ_26,3,1);
HJ_28:=3*HJ_26-2*HJ_27;
HJ_29:=IF(CROSS(HJ_28,HJ_24),HIGH,REF(HIGH,BARSLAST(CROSS(HJ_28,HJ_24))));
HJ_30:=LLV(HIGH,30);
HJ_31:=REF(HIGH,HJ_1)=HHV(HIGH,2*HJ_1+1);
HJ_32:=REF(LOW,HJ_1)=LLV(LOW,2*HJ_1+1);
HJ_33:=BACKSET(HJ_31,HJ_1+1);
HJ_34:=BACKSET(HJ_32,HJ_1+1);
HJ_35:=FILTER(HJ_33,HJ_1) AND HIGH=HHV(HIGH,HJ_1+1);
HJ_36:=FILTER(HJ_34,HJ_1) AND LOW=LLV(LOW,HJ_1+1);
HJ_37:=BARSLAST(HJ_35);
HJ_38:=BARSLAST(HJ_36);
HJ_39:=IF(HJ_35,CURRBARSCOUNT,0);
HJ_40:=IF(HJ_36,CURRBARSCOUNT,0);
HJ_41:=IF(HJ_37,REF(HJ_39,HJ_37),HJ_39);
HJ_42:=IF(HJ_38,REF(HJ_40,HJ_38),HJ_40);
HJ_43:=CONST(HJ_41);
HJ_44:=CONST(HJ_42);
HJ_45:=CONST(REF(HIGH,HJ_43-1));
HJ_46:=HJ_45;
HJ_47:=CONST(REF(LOW,HJ_44-1));
HJ_48:=REF(HJ_41,HJ_37+1);
HJ_49:=REF(HJ_42,HJ_38+1);
HJ_50:=CONST(HJ_48);
HJ_51:=CONST(HJ_49);
HJ_52:=CONST(REF(HIGH,HJ_48-1));
HJ_53:=HJ_52;
HJ_54:=CONST(REF(LOW,HJ_49-1));
HJ_55:=BACKSET(ISLASTBAR,HJ_43);
HJ_56:=BACKSET(ISLASTBAR,HJ_44);
HJ_57:=BACKSET(ISLASTBAR,HJ_48);
HJ_58:=BACKSET(ISLASTBAR,HJ_49);
HJ_59:=IF(HJ_47<=HJ_54,HJ_56,HJ_58);
HJ_60:=SUM(HJ_55,0);
HJ_61:=SUM(HJ_59,0);
HJ_62:=REF(HJ_13,1);
HJ_63:=REF(HJ_14,1);
HJ_64:=IF(ISLASTBAR,HJ_29,DRAWNULL);
HJ_65:=IF(ISLASTBAR,HJ_30,DRAWNULL);
高点压力:DRAWLINE(CURRBARSCOUNT=HJ_50,HIGH,CURRBARSCOUNT=HJ_43,HIGH,1),COLORGREEN,LINETHICK2;
低点支撑:DRAWLINE(CURRBARSCOUNT=HJ_51,LOW,CURRBARSCOUNT=HJ_44,LOW,1),COLORGREEN,LINETHICK2;
HJ_66:=CONST(MAX(MAX(MAX(HJ_9,高点压力),HJ_46),HJ_53));
HJ_67:=CONST(MIN(MIN(MIN(HJ_11,HJ_54),HJ_47),低点支撑));
HJ_68:=(高点压力+低点支撑)/2;
HJ_69:=CONST((高点压力+低点支撑)/2);
HJ_70:=IF(HJ_51<HJ_50,HJ_51,HJ_50);
HJ_71:=DRAWLINE(CURRBARSCOUNT=HJ_70,HJ_68,ISLASTBAR,HJ_69,1);
HJ_72:=INTPART(3*HJ_1/5);
HJ_73:=REF(HIGH,HJ_72)=HHV(HIGH,2*HJ_72+1);
HJ_74:=BACKSET(HJ_73,HJ_72+1);
HJ_75:=FILTER(HJ_74,HJ_72) AND HIGH=HHV(HIGH,HJ_72+1);
HJ_76:=BARSLAST(HJ_75);
HJ_77:=IF(HJ_75,CURRBARSCOUNT,0);
HJ_78:=IF(HJ_76,REF(HJ_77,HJ_76),HJ_77);
HJ_79:=CONST(HJ_78);
HJ_80:=REF(HJ_78,HJ_76+1);
HJ_81:=CONST(HJ_80);
高点压力M:DRAWLINE(CURRBARSCOUNT=HJ_81,HIGH,CURRBARSCOUNT=HJ_79,HIGH,1),COLORRED;
HJ_82:=REF(LOW,HJ_72)=LLV(LOW,2*HJ_72+1);
HJ_83:=BACKSET(HJ_82,HJ_72+1);
HJ_84:=FILTER(HJ_83,HJ_72) AND LOW=LLV(LOW,HJ_72+1);
HJ_85:=BARSLAST(HJ_84);
HJ_86:=IF(HJ_84,CURRBARSCOUNT,0);
HJ_87:=IF(HJ_85,REF(HJ_86,HJ_85),HJ_86);
HJ_88:=CONST(HJ_87);
HJ_89:=REF(HJ_87,HJ_85+1);
HJ_90:=CONST(HJ_89);
低点支撑M:DRAWLINE(CURRBARSCOUNT=HJ_90,LOW,CURRBARSCOUNT=HJ_88,LOW,1),COLORRED;
STICKLINE(HJ_57,HJ_53,HJ_53,2.5,1),COLORWHITE;
STICKLINE(HJ_55,HJ_46,HJ_46,2.3,1),COLORYELLOW;
STICKLINE(HJ_58,HJ_54,HJ_54,0.5,1),COLORMAGENTA;
STICKLINE(HJ_56,HJ_47,HJ_47,0.5,1),COLORCYAN;
STICKLINE(ISLASTBAR,HJ_64,HJ_64,120,0),COLORWHITE;
STICKLINE(ISLASTBAR,HJ_65,HJ_65,100,0),COLORGREEN;
HJ_91:=MA(EMA(WINNER(CLOSE),3),40);
HJ_92:=HJ_91>REF(HJ_91,4);
HJ_93:=VOL*5/SUM(REF(VOL,1),5)>1;
HJ_94:=VOL/CAPITAL*100>3;
HJ_95:=EMA(EMA(CLOSE,9),9);
HJ_96:=(HJ_95-REF(HJ_95,1))/REF(HJ_95,1);
HJ_97:=100*WINNER(CLOSE*0.95);
HJ_98:=HJ_92 AND HJ_93 AND HJ_94;
HJ_99:=HJ_98;
DRAWICON(CROSS(CLOSE,HJ_53) AND HJ_99,LOW-0.2,5);
DRAWICON(CROSS(CLOSE,HJ_46) AND HJ_99,LOW-0.8,5);
DRAWICON(CROSS(CLOSE,HJ_54) AND HJ_99,LOW-0.6,5);
{-----------------------------------}
718533661.jpg
|
