分析家公式网,提供指标公式,股票软件 用户登录  |  用户 注册

软件名称:[B]得一主图福矣!喜欢的请支持!如大家热情支持还有精品相送!(源码、贴图)[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/
软件语言:简体中文
授权方式:免费版
软件大小:6.00 KB
官方主页:Home Page
更新时间:2011-06-13 04:17:42
软件简介:

FO:=OPEN;
FH:=HIGH;
FL:=LOW;
FC:=CLOSE;
<%
vo=ffl.vardata("fo")
vh=ffl.vardata("fh")
vl=ffl.vardata("fl")
vc=ffl.vardata("fc")
last=ubound(vc)

vc(0)=(vh(0)+vl(0)+2*vc(0))/4
for i=1 to last
  vo(i)=(vo(i-1)+vc(i-1))/2
  if vo(i)>vh(i) then vh(i)=vo(i) else vh(i)=vh(i)
  if vo(i)<vl(i) then vl(i)=vo(i) else vl(i)=vl(i)
  vc(i)=(2*vc(i)+vh(i)+vl(i))/4
next

ffl.vardata("fo")=vo
ffl.vardata("fh")=vh
ffl.vardata("fl")=vl
ffl.vardata("fc")=vc

%>
KK:=IF(FC>=FO AND (FC>=REF(FC,1) OR REF(FC,1)>=REF(FO,1)),1,IF(FC<FO AND (FC<REF(FO,1) OR REF(FC,1)<REF(FO,1)),-1,0));
STICKLINE(FC>FO,FH,FL,4,0),colorAA;
STICKLINE(FC>FO,FH,FL,3.5,0),color11BB;
STICKLINE(FC>FO,FH,FL,2.5,0),color22CC;
STICKLINE(FC>FO,FH,FL,1.5,0),color33DD;
STICKLINE(FC>FO,FH,FL,1,0),color44EE;
STICKLINE(FC>FO,FH,FL,0.5,0),color55FF;
STICKLINE(FO>FC,FH,FL,4,0),colorAA0000;
STICKLINE(FO>FC,FH,FL,3.5,0),colorBB0000;
STICKLINE(FO>FC,FH,FL,2.5,0),colorCC0000;
STICKLINE(FO>FC,FH,FL,1.5,0),colorDD0000;
STICKLINE(FO>FC,FH,FL,1,0),colorEE0000;
STICKLINE(FO>FC,FH,FL,0.5,0),colorFF0000;
STICKLINE(KK=1 AND FC>=FO,FO,FC,8,0),colorAA;
STICKLINE(KK=1 AND FC>=FO,FO,FC,7.5,0),color11BB;
STICKLINE(KK=1 AND FC>=FO,FO,FC,6.5,0),color22CC;
STICKLINE(KK=1 AND FC>=FO,FO,FC,5.5,0),color33DD;
STICKLINE(KK=1 AND FC>=FO,FO,FC,4,0),color44EE;
STICKLINE(KK=1 AND FC>=FO,FO,FC,3.5,0),color55FF;
STICKLINE(KK=1 AND FC<FO,FO,FC,8,0),colorAA;
STICKLINE(KK=1 AND FC<FO,FO,FC,7.5,0),color11BB;
STICKLINE(KK=1 AND FC<FO,FO,FC,6.5,0),color22CC;
STICKLINE(KK=1 AND FC<FO,FO,FC,5.5,0),color33DD;
STICKLINE(KK=1 AND FC<FO,FO,FC,4,0),color44EE;
STICKLINE(KK=1 AND FC<FO,FO,FC,3.5,0),color55FF;
STICKLINE(KK=-1 AND FC>=FO,FO,FC,8,0),colorAA0000;
STICKLINE(KK=-1 AND FC>=FO,FO,FC,7.5,0),colorBB0000;
STICKLINE(KK=-1 AND FC>=FO,FO,FC,6.5,0),colorCC0000;
STICKLINE(KK=-1 AND FC>=FO,FO,FC,5.5,0),colorDD0000;
STICKLINE(KK=-1 AND FC>=FO,FO,FC,4,0),colorEE0000;
STICKLINE(KK=-1 AND FC>=FO,FO,FC,3.5,0),colorFF0000;
STICKLINE(KK=-1 AND FC<FO,FO,FC,8,0),colorAA0000;
STICKLINE(KK=-1 AND FC<FO,FO,FC,7.5,0),colorBB0000;
STICKLINE(KK=-1 AND FC<FO,FO,FC,6.5,0),colorCC0000;
STICKLINE(KK=-1 AND FC<FO,FO,FC,5.5,0),colorDD0000;
STICKLINE(KK=-1 AND FC<FO,FO,FC,4,0),colorEE0000;
STICKLINE(KK=-1 AND FC<FO,FO,FC,3.5,0),colorFF0000;
STICKLINE(KK=0 AND FC>=FO,FO,FC,8,0),colorAA;
STICKLINE(KK=0 AND FC>=FO,FO,FC,7.5,0),color11BB;
STICKLINE(KK=0 AND FC>=FO,FO,FC,6.5,0),color22CC;
STICKLINE(KK=0 AND FC>=FO,FO,FC,5.5,0),color33DD;
STICKLINE(KK=0 AND FC>=FO,FO,FC,4,0),color44EE;
STICKLINE(KK=0 AND FC>=FO,FO,FC,3.5,0),color55FF;
STICKLINE(KK=0 AND FC<FO,FO,FC,8,0),colorAA;
STICKLINE(KK=0 AND FC<FO,FO,FC,7.5,0),color11BB;
STICKLINE(KK=0 AND FC<FO,FO,FC,6.5,0),color22CC;
STICKLINE(KK=0 AND FC<FO,FO,FC,5.5,0),color33DD;
STICKLINE(KK=0 AND FC<FO,FO,FC,4,0),color44EE;
STICKLINE(KK=0 AND FC<FO,FO,FC,3.5,0),color55FF;
多空趋势线:(MA(CLOSE,5)+MA(CLOSE,10)+MA(CLOSE,15)+MA(CLOSE,20))/4,colorFF;
PARTLINE(多空趋势线>=REF(多空趋势线,1),多空趋势线),LINETHICK3,colorFF;
PARTLINE(多空趋势线<REF(多空趋势线,1),多空趋势线),LINETHICK3,colorFF00;
A1:=BARSLAST(CROSS(FC,多空趋势线) AND 多空趋势线>=REF(多空趋势线,1) OR FC>多空趋势线 AND 多空趋势线>=REF(多空趋势线,1) AND REF(多空趋势线,1)<REF(多空趋势线,2));
A2:=BARSLAST(CROSS(多空趋势线,FC) AND 多空趋势线<REF(多空趋势线,1) OR FC<多空趋势线 AND 多空趋势线<REF(多空趋势线,1) AND REF(多空趋势线,1)>=REF(多空趋势线,2));
DRAWTEXT(CROSS(A2,A1),FL,'▲'),ALIGN0,PXDN20,colorFF;
DRAWTEXT(CROSS(A2,A1),FL,'买进讯号'),ALIGN0,PXDN60,colorFF;
DRAWTEXT(CROSS(A1,A2),FH,'▼'),ALIGN0,PXUP20,colorFF0000;
DRAWTEXT(CROSS(A1,A2),FH,'卖出讯号'),ALIGN0,PXUP60,colorFF0000;
EXPLAINICON(CLOSE,'xnkl'),ALIGN0;
EXPLAIN(CLOSE,STKNAME),colorFFFF;
EXPLAIN(REF(KK,1)<>1 AND KK=1,'多头加码讯号〔蓝K转红K〕'),colorFF;
EXPLAIN(REF(KK,1)<>-1 AND KK=-1,'空头加码讯号〔红K转蓝K〕'),colorFF00;
A01:=MA(CLOSE,20);
A02:=CLOSE>MA(CLOSE,5);
A03:=MA(CLOSE,5)>MA(CLOSE,10);
A04:=CLOSE>MA(CLOSE,10);
A05:=MA(CLOSE,5)>MA(CLOSE,20);
A06:=CLOSE>MA(CLOSE,20);
A07:=REF(A01,1);
A08:=A01>A07;
AVX:=IF(A02,10,-10)+IF(A03,10,-10)+IF(A04,10,-10)+IF(A05,10,-10)+IF(A06,10,-10)+IF(A08,10,-10);
DSLX:=CLOSE/INDEXC;
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);
阻力位:=IF(CLOSE>200,CLOSE*1.01,CLOSE*1.07);
阻力位1:=IF(CLOSE<10,CLOSE*1.05,阻力位);
止损位:=IF(CLOSE>200,CLOSE*0.99,CLOSE*0.93);
止损位1:=IF(CLOSE<10,CLOSE*0.95,止损位);
情况1:=CROSS(AVX,1) AND V1>=V2 AND DSLX>=DSLX1;
情况2:=CROSS(AVX,1) AND V1<V2 AND DSLX>=DSLX1;
情况3:=CROSS(AVX,1) AND V1>V2 AND DSLX<DSLX1;
情况4:=CROSS(AVX,1) AND V1<=V2 AND DSLX<DSLX1;
情况5:=CROSS(1,AVX) AND V1>=V2 AND DSLX>=DSLX1;
情况6:=CROSS(1,AVX) AND V1<V2 AND DSLX>=DSLX1;
情况7:=CROSS(1,AVX) AND V1>=V2 AND DSLX<DSLX1;
情况8:=CROSS(1,AVX) AND V1<V2 AND DSLX<DSLX1;
情况9:=AVX>=1 AND REF(AVX,1)>0 AND V1>=V2 AND DSLX>=DSLX1;
情况10:=AVX>=1 AND REF(AVX,1)>0 AND V1<V2 AND DSLX>=DSLX1;
情况11:=AVX>=1 AND REF(AVX,1)>0 AND V1>=V2 AND DSLX<DSLX1;
情况12:=AVX>=1 AND REF(AVX,1)>0 AND V1<V2 AND DSLX<DSLX1;
情况13:=AVX<1 AND REF(AVX,1)<0 AND V1>=V2 AND DSLX>=DSLX1;
情况14:=AVX<1 AND REF(AVX,1)<0 AND V1<V2 AND DSLX>=DSLX1;
情况15:=AVX<1 AND REF(AVX,1)<0 AND V1>=V2 AND DSLX<DSLX1;
情况16:=AVX<1 AND REF(AVX,1)<0 AND V1<V2 AND DSLX<DSLX1;
大盘1:=CROSS(AVX,1) AND V1>=V2;
大盘2:=CROSS(AVX,1) AND V1<V2;
大盘3:=CROSS(1,AVX) AND V1>=V2;
大盘4:=CROSS(1,AVX) AND V1<V2;
大盘5:=AVX>=1 AND REF(AVX,1)>0 AND V1>=V2;
大盘6:=AVX>=1 AND REF(AVX,1)>0 AND V1<V2;
大盘7:=AVX<1 AND REF(AVX,1)<0 AND V1>=V2;
大盘8:=AVX<1 AND REF(AVX,1)<0 AND V1<V2;
EXPLAINICON(情况1 AND CLOSE<200,'q001'),ALIGN0;
EXPLAINEX(情况1 AND CLOSE<200,'阻力位:',阻力位1,2,1),colorFF;
EXPLAINEX(情况1 AND CLOSE<200,'止损位:',止损位1,2,1),colorFF;
EXPLAINICON(情况2 AND CLOSE<200,'q002'),ALIGN0;
EXPLAINEX(情况2 AND CLOSE<200,'阻力位:',阻力位1,2,1),colorFF;
EXPLAINEX(情况2 AND CLOSE<200,'止损位:',止损位1,2,1),colorFF;
EXPLAINICON(情况3 AND CLOSE<200,'q003'),ALIGN0;
EXPLAINEX(情况3 AND CLOSE<200,'阻力位:',阻力位1,2,1),colorFF;
EXPLAINEX(情况3 AND CLOSE<200,'止损位:',止损位1,2,1),colorFF;
EXPLAINICON(情况4 AND CLOSE<200,'q004'),ALIGN0;
EXPLAINEX(情况4 AND CLOSE<200,'阻力位:',阻力位1,2,1),colorFF;
EXPLAINEX(情况4 AND CLOSE<200,'止损位:',止损位1,2,1),colorFF;
EXPLAINICON(情况5 AND CLOSE<200,'q005'),ALIGN0;
EXPLAINEX(情况5 AND CLOSE<200,'阻力位:',阻力位1,2,1),colorFF00;
EXPLAINEX(情况5 AND CLOSE<200,'止损位:',止损位1,2,1),colorFF00;
EXPLAINICON
[url=http://www.70822.com/soft/sort013/sort02/down-34858.html]得一主图福矣!喜欢的请支持!如大家热情支持还有精品相送!(源码、贴图)[/url]

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