分析家公式网,提供指标公式,股票软件 用户登录  |  用户 注册
当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：撑压线模拟版 源码

软件名称：[B]撑压线模拟版 源码[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：8.00 KB
官方主页：Home Page
更新时间：2018-11-10 08:31:16
软件简介:

HJ_1:=STRCAT(HYBLOCK,14);
HJ_2:=STRCAT(HJ_1,DYBLOCK);
HJ_3:=STRCAT(HJ_2,13);
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(HJ_3,GNBLOCK)),COLOR00C0C0;
HJ_4:=EMA(CLOSE,12)-EMA(CLOSE,26);
HJ_5:=EMA(HJ_4,9);
HJ_6:=(HJ_4-HJ_5)*2;
HJ_7:=CLOSE>REF(CLOSE,4);
HJ_8:=BARSLASTCOUNT(HJ_7);
HJ_9:=HJ_8=9;{www.70822.com}
HJ_10:=ISLASTBAR AND BETWEEN(HJ_8,1,8);
HJ_11:=(BACKSET(HJ_9>0,9) OR BACKSET(HJ_10>0,HJ_8))*HJ_8;
DRAWTEXT(HJ_11>0,HIGH*1.05,VAR2STR(HJ_11,0)),COLORMAGENTA;
DRAWTEXT(HJ_8=9,HIGH*1.05,3),COLORGREEN;
HJ_12:=CLOSE<REF(CLOSE,4);
HJ_13:=BARSLASTCOUNT(HJ_12);
HJ_14:=HJ_13=9;{分析家公式网www.70822.com}
HJ_15:=ISLASTBAR AND BETWEEN(HJ_13,1,8);
HJ_16:=(BACKSET(HJ_14>0,9) OR BACKSET(HJ_15>0,HJ_13))*HJ_13;
DRAWTEXT(HJ_16>0,LOW*0.95,VAR2STR(HJ_16,0)),COLORMAGENTA;
DRAWTEXT(HJ_13=9,LOW*0.95,3),COLORRED;
HJ_17:=BACKSET(LLV(LOW,5)<REF(LLV(LOW,4),1),4);
HJ_18:=BACKSET(HJ_17=0 AND REF(HJ_17,1)=1,2);
HJ_19:=IF(HJ_18=1 AND REF(HJ_18,1)=0,(-1),0);
HJ_20:=BACKSET(HHV(HIGH,5)>REF(HHV(HIGH,4),1),4);
HJ_21:=BACKSET(HJ_20=0 AND REF(HJ_20,1)=1,2);
HJ_22:=IF(HJ_21=1 AND REF(HJ_21,1)=0,1,0);
HJ_23:=IF(LOW>REF(HIGH,1),1,IF(HIGH<REF(LOW,1),(-1),0));
HJ_24:=BARSLAST(HJ_22=1);
HJ_25:=BARSLAST(HJ_19=(-1));
HJ_26:=LOWRANGE(LOW);
HJ_27:=TOPRANGE(HIGH);
HJ_28:=IF(HJ_19=(-1) AND REF(HJ_24,1)>REF(HJ_25,1) AND LLV(LOW,HJ_24+1)<REF(LLV(LOW,HJ_24+1),1),(-1),0);
HJ_29:=IF(HJ_19=(-1) AND REF(HJ_24,1)<REF(HJ_25,1) AND (HJ_24>=4 OR LLV(HJ_23,HJ_24)=(-1) OR LOW<REF(LLV(LOW,HJ_25+1),1)),(-1),0);
HJ_30:=HJ_24<4 AND HHV(HJ_23,HJ_24)!=(-1);
HJ_31:=HJ_19=(-1) AND REF(HJ_24,1)<REF(HJ_25,1);
HJ_32:=HJ_26>REF(HJ_27,HJ_24+1) AND HJ_26>REF(HJ_27,HJ_24) AND HJ_26>REF(HJ_26,REF(BARSLAST(HJ_19=(-1)),HJ_25+1)+HJ_25+1);
HJ_33:=HJ_30 AND HJ_31 AND HJ_32;
HJ_34:=IF(HJ_28=(-1) OR HJ_29=(-1) OR HJ_33,(-1),0);
HJ_35:=IF(HJ_22=1 AND REF(HJ_25,1)>REF(HJ_24,1) AND HHV(HIGH,HJ_25+1)>REF(HHV(HIGH,HJ_25+1),1),1,0);
HJ_36:=IF(HJ_22=1 AND REF(HJ_25,1)<REF(HJ_24,1) AND (HJ_25>=4 OR HHV(HJ_23,HJ_25)=1),1,0);
HJ_37:=HJ_25<4 AND HHV(HJ_23,HJ_25)!=1 OR REF(HJ_34,HJ_25)=0;
HJ_38:=HJ_22=1 AND REF(HJ_25,1)<REF(HJ_24,1);
HJ_39:=HJ_27>REF(HJ_26,HJ_25+1) AND HJ_27>REF(HJ_26,HJ_25) AND HJ_27>REF(HJ_27,REF(BARSLAST(HJ_22=1),HJ_24+1)+HJ_24+1);
HJ_40:=HJ_37 AND HJ_38 AND HJ_39;
HJ_41:=IF(HJ_35=1 OR HJ_36=1 OR HJ_40,1,0);
HJ_42:=BARSLAST(HJ_41=1);
HJ_43:=BARSLAST(HJ_34=(-1));
HJ_44:=IF(HJ_34=(-1) AND REF(HJ_42,1)>REF(HJ_43,1) AND LLV(LOW,HJ_42+1)<REF(LLV(LOW,HJ_42+1),1),(-1),0);
HJ_45:=IF(HJ_34=(-1) AND REF(HJ_42,1)<REF(HJ_43,1) AND (HJ_42>=4 OR LLV(HJ_23,HJ_42)=(-1) OR LOW<REF(LLV(LOW,HJ_43+1),1)),(-1),0);
HJ_46:=HJ_42<4 AND HHV(HJ_23,HJ_42)!=(-1);
HJ_47:=HJ_34=(-1) AND REF(HJ_42,1)<REF(HJ_43,1);
HJ_48:=HJ_26>REF(HJ_27,HJ_42+1) AND HJ_26>REF(HJ_27,HJ_42) AND HJ_26>REF(HJ_26,REF(BARSLAST(HJ_34=(-1)),HJ_43+1)+HJ_43+1);
HJ_49:=HJ_46 AND HJ_47 AND HJ_48;
HJ_50:=IF(HJ_44=(-1) OR HJ_45=(-1) OR HJ_49,(-1),0);
HJ_51:=IF(HJ_41=1 AND REF(HJ_43,1)>REF(HJ_42,1) AND HHV(HIGH,HJ_43+1)>REF(HHV(HIGH,HJ_43+1),1),1,0);
HJ_52:=IF(HJ_41=1 AND REF(HJ_43,1)<REF(HJ_42,1) AND (HJ_43>=4 OR HHV(HJ_23,HJ_43)=1),1,0);
HJ_53:=HJ_43<4 AND HHV(HJ_23,HJ_43)!=1 OR REF(HJ_34,HJ_43)=0;
HJ_54:=HJ_41=1 AND REF(HJ_43,1)<REF(HJ_42,1);
HJ_55:=HJ_27>REF(HJ_26,HJ_43+1) AND HJ_27>REF(HJ_26,HJ_43) AND HJ_27>REF(HJ_27,REF(BARSLAST(HJ_41=1),HJ_42+1)+HJ_42+1);
HJ_56:=HJ_53 AND HJ_54 AND HJ_55;
HJ_57:=IF(HJ_51=1 OR HJ_52=1 OR HJ_56,1,0);
HJ_58:=BARSLAST(HJ_57=1);
HJ_59:=BARSLAST(HJ_50=(-1));
HJ_60:=IF(HJ_50=(-1) AND REF(HJ_58,1)>REF(HJ_59,1) AND LLV(LOW,HJ_58+1)<REF(LLV(LOW,HJ_58+1),1),(-1),0);
HJ_61:=IF(HJ_50=(-1) AND REF(HJ_58,1)<REF(HJ_59,1) AND (HJ_58>=4 OR LLV(HJ_23,HJ_58)=(-1) OR LOW<REF(LLV(LOW,HJ_59+1),1)),(-1),0);
HJ_62:=HJ_58<4 AND HHV(HJ_23,HJ_58)!=(-1);
HJ_63:=HJ_50=(-1) AND REF(HJ_58,1)<REF(HJ_59,1);
HJ_64:=HJ_26>REF(HJ_27,HJ_58+1) AND HJ_26>REF(HJ_27,HJ_58) AND HJ_26>REF(HJ_26,REF(BARSLAST(HJ_50=(-1)),HJ_59+1)+HJ_59+1);
HJ_65:=HJ_62 AND HJ_63 AND HJ_64;
HJ_66:=IF(HJ_60=(-1) OR HJ_61=(-1) OR HJ_65,(-1),0);
HJ_67:=IF(HJ_57=1 AND REF(HJ_59,1)>REF(HJ_58,1) AND HHV(HIGH,HJ_59+1)>REF(HHV(HIGH,HJ_59+1),1),1,0);
HJ_68:=IF(HJ_57=1 AND REF(HJ_59,1)<REF(HJ_58,1) AND (HJ_59>=4 OR HHV(HJ_23,HJ_59)=1),1,0);
HJ_69:=HJ_59<4 AND HHV(HJ_23,HJ_59)!=1 OR REF(HJ_50,HJ_59)=0;
HJ_70:=HJ_57=1 AND REF(HJ_59,1)<REF(HJ_58,1);
HJ_71:=HJ_27>REF(HJ_26,HJ_59+1) AND HJ_27>REF(HJ_26,HJ_59) AND HJ_27>REF(HJ_27,REF(BARSLAST(HJ_57=1),HJ_58+1)+HJ_58+1);
HJ_72:=HJ_69 AND HJ_70 AND HJ_71;
HJ_73:=IF(HJ_67=1 OR HJ_68=1 OR HJ_72,1,0);
HJ_74:=BARSLAST(HJ_73=1);
HJ_75:=BARSLAST(HJ_66=(-1));
HJ_76:=REF(BARSLAST(HJ_73=1),HJ_74+1)+HJ_74+1;
HJ_77:=REF(BARSLAST(HJ_66=(-1)),HJ_75+1)+HJ_75+1;
HJ_78:=BACKSET(HJ_66=(-1) AND REF(HJ_74,1)<REF(HJ_75,1),HJ_74+1);
HJ_79:=BACKSET(HJ_66=(-1) AND REF(HJ_74,1)>REF(HJ_75,1),HJ_77+1);
HJ_80:=BACKSET(HJ_73=1 AND REF(HJ_74,1)>REF(HJ_75,1),HJ_75+1);
HJ_81:=BACKSET(HJ_73=1 AND REF(HJ_74,1)<REF(HJ_75,1),HJ_76+1);
HJ_82:=BACKSET(NOT(HJ_66=(-1) OR HJ_73=1) AND HJ_74>HJ_75 AND HJ_75>=5 AND CLOSE>REF(LOW,HJ_75),HJ_75+1);
HJ_83:=BACKSET(NOT(HJ_66=(-1) OR HJ_73=1) AND HJ_74<HJ_75 AND HJ_74>=5 AND CLOSE<REF(LOW,HJ_74),HJ_74+1);
HJ_84:=IF(HJ_66=(-1) AND (HJ_78+HJ_80=2 OR HJ_79+HJ_80=2 OR HJ_78+HJ_81=2 OR HJ_82=1),(-1),0);
HJ_85:=IF(HJ_73=1 AND (HJ_78+HJ_80=2 OR HJ_79+HJ_80=2 OR HJ_78+HJ_81=2 OR HJ_83=1),1,0);
NOTEXT1A:DRAWLINE(HJ_85=1,HIGH,HJ_84=(-1),LOW,0),DOTLINE,COLORGRAY;
NOTEXT2A:DRAWLINE(HJ_84=(-1),LOW,HJ_85=1,HIGH,0),DOTLINE,COLORGRAY;
HJ_86:=IF(HJ_66=(-1) AND (HJ_78+HJ_80=2 OR HJ_79+HJ_80=2 OR HJ_78+HJ_81=2),(-1),0);
HJ_87:=IF(HJ_73=1 AND (HJ_78+HJ_80=2 OR HJ_79+HJ_80=2 OR HJ_78+HJ_81=2),1,0);
NOTEXT1:DRAWLINE(HJ_87=1,HIGH,HJ_86=(-1),LOW,0),COLORGRAY;
NOTEXT2:DRAWLINE(HJ_86=(-1),LOW,HJ_87=1,HIGH,0),COLORGRAY;
NOTEXT极点:IF(HJ_86=(-1),LOW,IF(HJ_87=1,HIGH,DRAWNULL)),CIRCLEDOT,COLOR00CCCC;
HJ_88:=REF(BARSLAST(HJ_86=(-1)),1)+1;
HJ_89:=REF(BARSLAST(HJ_86=(-1)),HJ_88+1)+HJ_88+1;
HJ_90:=REF(BARSLAST(HJ_87=1),1)+1;
HJ_91:=REF(BARSLAST(HJ_87=1),HJ_90+1)+HJ_90+1;
HJ_92:=ATAN((REF(LOW,HJ_88)-REF(LOW,HJ_89))/REF(LOW,HJ_89)/(HJ_89-HJ_88)*100)/3.141593*180;
HJ_93:=ATAN((REF(HIGH,HJ_90)-REF(HIGH,HJ_91))/REF(HIGH,HJ_91)/(HJ_91-HJ_90)*100)/3.141593*180;
HJ_94:=HJ_86=(-1) AND BACKSET(ISLASTBAR,HJ_89+1);
HJ_95:=HJ_86=(-1) AND BACKSET(ISLASTBAR,HJ_88+1);
HJ_96:=HJ_87=1 AND BACKSET(ISLASTBAR,HJ_91+1);
HJ_97:=HJ_87=1 AND BACKSET(ISLASTBAR,HJ_90+1);
支撑线:DRAWLINE(HJ_94,LOW,HJ_95,LOW,1),COLORRED;
压力线:DRAWLINE(HJ_96,HIGH,HJ_97,HIGH,1),COLORGREEN;
HJ_98:=HJ_92>=0 AND HJ_88<HJ_90 AND REF(HHV(CLOSE,HJ_90),1)<=REF(HIGH,HJ_90) AND CLOSE>REF(HIGH,HJ_90);
DRAWICON(BARSSINCEN(HJ_98,HJ_90)+1,LOW*0.97,28);
DRAWLINE(HJ_97,HIGH,BARSSINCEN(HJ_98,HJ_90)+1=1,REF(HIGH,HJ_90),0),DOTLINE,COLORGREEN;
HJ_99:=HJ_92>=0 AND HJ_93<0 AND 支撑线<压力线 AND CROSS(CLOSE,压力线);
DRAWICON(BARSSINCEN(HJ_99,HJ_90)+1,LOW*0.95,29);
HJ_100:=HJ_92<0 AND HJ_92>HJ_93 AND HJ_93<0 AND HJ_93>(-45) AND CROSS(CLOSE,压力线);
DRAWICON(BARSSINCEN(HJ_100,HJ_90)+1,LOW*0.93,30);

{--------------
[url=http://www.70822.com/soft/sort013/sort05/down-130383.html]撑压线模拟版 源码[/url]

关于本站 | 网站帮助 | 广告合作 | 声明 | 友情连接 | 网站地图 |
分析家公式网声明：本站所有股票公式软件资料均网上公开收集，如侵权请联系删帖。站内所有广告，均与本站无关！
Copyright © 2003-2024 70822.Com. All Rights Reserved .
页面执行时间：78.12500 毫秒