0801-月营收公式 飞狐指标 源码

指标公式详细说明

{0801-月营收}
input:ph_to(1,1,10);
股票代号:=stklabeln(stkname);
第一天?子:=barssince(close)=0;
年_i:=vol;
月_i:=vol;
月营收_i:=vol;
日期_年:=year;
日期_月:=month;
<%
'开档宣告设定----------------------------------------------->
dim fso '开档宣告
dim sn_txt '档案路径档名
dim path_to '读?磁碟
path_to = chr(66 + ffl.vardata("ph_to")) '读?磁碟
'开档设定
set fso = createobject("scripting.filesystemobject")
'设定资料档表路径
'sn_txt="c:\0000.txt"
sn_txt = path_to + ":\鸟汤股市资料库\月营收\" + ffl.vardata("股票代号") + ".txt"

'开档宣告设定-----------------------------------------------^
'变数宣告设定----------------------------------------------->
dim load_fox_inc_i '月营收_回圈
dim load_fox_date_i '月营收日期_回圈
dim load_fox_no1 '替代第一天?子
dim load_fox_inc0 '年
dim load_fox_inc1 '月
dim load_fox_inc2 '月营收
dim load_fox_date_str() '日期_年月
'清空资料
redim load_fox_date_str(0)
dim load_fox_inc_year '月营收_年
dim load_fox_inc_month '月营收_月
dim load_fox_date_year '日期_年
dim load_fox_date_month '日期_月
dim load_fox_index '日期?子阵列寻找
dim load_fox_split '日期寻找码分割
dim w_1read
dim w_split
load_fox_no1 = array(0) '必须要?设定一值?阵列?子0,这样才不会有错误讯,应该是确认资料型态吧
load_fox_no1 = ffl.vardata("第一天?子") '转入第一天?子
load_fox_inc0 = ffl.vardata("年_i") '转入年
load_fox_inc1 = ffl.vardata("月_i") '转入月
load_fox_inc2 = ffl.vardata("月营收_i") '转入月营收
load_fox_date_year = ffl.vardata("日期_年") '转入日期_年
load_fox_date_month = ffl.vardata("日期_月") '转入日期_月
w_1read = ""
'清除资料----------------------->
for load_fox_inc_i = 0 to ubound(load_fox_inc2)
load_fox_inc0(load_fox_inc_i) = 0 '清除年
load_fox_inc1(load_fox_inc_i) = 0 '清除月
load_fox_inc2(load_fox_inc_i) = 0 '清除月营收
next 'load_fox_inc_i
'清除资料-----------------------^
'转入月营收日期资料------------------->
for load_fox_inc_i = 0 to ubound(load_fox_date_year)
'日期_年月_?子 + "@" + 日期_年 + "/" + 日期_月 + "@"
redim preserve load_fox_date_str(load_fox_inc_i)
'日缺0值时补0值---->
if load_fox_date_month(load_fox_inc_i) <= 9 then 'load_fox_date_month(load_fox_inc_i)<=9
load_fox_date_str(load_fox_inc_i) = trim(load_fox_inc_i) + "@" + trim(load_fox_date_year(load_fox_inc_i)) + "/" + "0" + trim(load_fox_date_month(load_fox_inc_i)) + "@"
else 'load_fox_date_month(load_fox_inc_i)<=9
load_fox_date_str(load_fox_inc_i) = trim(load_fox_inc_i) + "@" + trim(load_fox_date_year(load_fox_inc_i)) + "/" + trim(load_fox_date_month(load_fox_inc_i)) + "@"
end if 'load_fox_date_month(load_fox_inc_i)<=9
'日缺0值时补0值----^

next 'load_fox_inc_i
'转入月营收日期资料-------------------^
'将清空月营收变数?行转出,以免vbs出错时变成原v值
ffl.vardata("月营收_i") = load_fox_inc2
'变数宣告设定-----------------------------------------------^
'第一根k线即才载入------->
if load_fox_no1(0) = 1 then
'判断资料档是否存在
if fso.fileexists(sn_txt) <> 0 then 'fso.fileexists(sn_txt)<>0
'开档
set myfile = fso.opentextfile(sn_txt, 1)

'判断资料档是否读完---------->
while myfile.atendofstream <> -1
'读?资料
w_1read = trim(myfile.readline)
'不是空字串资料才载入------->
if w_1read <> "" then 'w_1read<>""
w_split = split(w_1read, ",") '分割读入资料
'要有2项资料才载入---------->
if ubound(w_split) >= 1 then 'ubound(w_split)>=1
'?日期年值
load_fox_inc_year = trim(year(trim(w_split(0)) + "/01"))
'?日期月值
load_fox_inc_month = trim(month(trim(w_split(0)) + "/01"))
'日缺0值时补0值---->
if month(trim(w_split(0)) + "/01") <= 9 then 'month(trim(w_split(0))+"/01")<=9
load_fox_inc_month = "0" + load_fox_inc_month
end if 'month(trim(w_split(0))+"/01")<=9
'日缺0值时补0值----^
load_fox_index = filter(load_fox_date_str, "@" + load_fox_inc_year + "/" + load_fox_inc_month + "@")
if ubound(load_fox_index) <> -1 then 'ubound(load_fox_index) <> -1
for load_fox_inc_i = 0 to ubound(load_fox_index)
load_fox_split = split(load_fox_index(load_fox_inc_i), "@")
if ubound(load_fox_split) >= 0 then
'存入转出月营收值?飞狐中
load_fox_inc0(clng(load_fox_split(0))) = csng(load_fox_inc_year) '年
load_fox_inc1(clng(load_fox_split(0))) = csng(load_fox_inc_month) '月
load_fox_inc2(clng(load_fox_split(0))) = csng(trim(w_split(1))) '月营收
end if
next 'load_fox_inc_i


end if 'ubound(load_fox_index) <> -1

end if 'ubound(w_split)>=1
'要有2项资料才载入----------^
end if 'w_1read<>""
'不是空字串资料才载入-------^
wend 'myfile.atendofstream<>-1
'判断资料档是否读完----------^

'关档
myfile.close
end if 'fso.fileexists(sn_txt)<>0
end if 'load_fox_no1(0) = 1
'第一根k线即才载入-------^
'将资料从vbs转出?飞狐
ffl.vardata("年_i") = load_fox_inc0
ffl.vardata("月_i") = load_fox_inc1
ffl.vardata("月营收_i") = load_fox_inc2
%>
年:ref(年_i,barslast(年_i)),linethick0,color808080;
月:ref(月_i,barslast(月_i)),linethick0,color808080;
stickline(datatype=6 and mod(month,2)=0 and ref(day,1)<day,0,月营收_i,10,0),colorffff;
stickline(datatype=6 and mod(month,2)=1 and ref(day,1)<day,0,月营收_i,10,0),colorff;
stickline(datatype=7 and mod(month,2)=0 and ref(day,1)<day,0,月营收_i,10,0),colorffff;
stickline(datatype=7 and mod(month,2)=1 and ref(day,1)<day,0,月营收_i,10,0),colorff;
stickline(datatype=8 and mod(month,2)=0,0,月营收_i,8,0),colorffff;
stickline(datatype=8 and mod(month,2)=1,0,月营收_i,8,0),colorff;
前1月_月:=ref(月营收_i,0+barslast(月营收_i));
前2月_月:=ref(月营收_i,1+barslast(月营收_i));
前3月_月:=ref(月营收_i,2+barslast(月营收_i));
前4月_月:=ref(月营收_i,3+barslast(月营收_i));
前5月_月:=ref(月营收_i,4+barslast(月营收_i));
前6月_月:=ref(月营收_i,5+barslast(月营收_i));
前7月_月:=ref(月营收_i,6+barslast(月营收_i));
前8月_月:=ref(月营收_i,7+barslast(月营收_i));
前9月_月:=ref(月营收_i,8+barslast(月营收_i));
前10月_月:=ref(月营收_i,9+barslast(月营收_i));
前11月_月:=ref(月营收_i,10+barslast(月营收_i));
前12月_月:=ref(月营收_i,11+barslast(月营收_i));
前13月_月:=ref(月营收_i,12+barslast(月营收_i));
前14月_月:=ref(月营收_i,13+barslast(月营收_i));
前15月_月:=ref(月营收_i,14+barslast(月营收_i));
前16月_月:=ref(月营收_i,15+barslast(月营收_i));
前17月_月:=ref(月营收_i,16+barslast(月营收_i));
前18月_月:=ref(月营收_i,17+barslast(月营收_i));
前19月_月:=ref(月营收_i,18+barslast(月营收_i));
前20月_月:=ref(月营收_i,19+barslast(月营收_i));
前21月_月:=ref(月营收_i,20+barslast(月营收_i));
前22月_月:=ref(月营收_i,21+barslast(月营收_i));
前23月_月:=ref(月营收_i,22+barslast(月营收_i));
前24月_月:=ref(月营收_i,23+barslast(月营收_i));
前25月_月:=ref(月营收_i,24+barslast(月营收_i));
前26月_月:=ref(月营收_i,25+barslast(月营收_i));
前27月_月:=ref(月营收_i,26+barslast(月营收_i));
前28月_月:=ref(月营收_i,27+barslast(月营收_i));
前29月_月:=ref(月营收_i,28+barslast(月营收_i));
前30月_月:=ref(月营收_i,29+barslast(月营收_i));
前31月_月:=ref(月营收_i,30+barslast(月营收_i));
前32月_月:=ref(月营收_i,31+barslast(月营收_i));
前33月_月:=ref(月营收_i,32+barslast(月营收_i));
前34月_月:=ref(月营收_i,33+barslast(月营收_i));
前35月_月:=ref(月营收_i,34+barslast(月营收_i));
前36月_月:=ref(月营收_i,35+barslast(月营收_i));
前37月_月:=ref(月营收_i,36+barslast(月营收_i));
前38月_月:=ref(月营收_i,37+barslast(月营收_i));
前39月_月:=ref(月营收_i,38+barslast(月营收_i));
前40月_月:=ref(月营收_i,39+barslast(月营收_i));
前41月_月:=ref(月营收_i,40+barslast(月营收_i));
前42月_月:=ref(月营收_i,41+barslast(月营收_i));
副加值:=if(月营收_i=0,1,0);
加:=if(ref(月营收_i,troughbars(ref(day,1)<day,1,1)+副加值)=0,1,0);
前1月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,1)+副加值);
前2月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,2)+副加值);
前3月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,3)+副加值);
前4月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,4)+副加值);
前5月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,5)+副加值);
前6月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,6)+副加值);
前7月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,7)+副加值);
前8月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,8)+副加值);
前9月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,9)+副加值);
前10月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,10)+副加值);
前11月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,11)+副加值);
前12月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,12)+副加值);
前13月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,13)+副加值);
前14月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,14)+副加值);
前15月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,15)+副加值);
前16月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,16)+副加值);
前17月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,17)+副加值);
前18月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,18)+副加值);
前19月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,19)+副加值);
前20月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,20)+副加值);
前21月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,21)+副加值);
前22月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,22)+副加值);
前23月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,23)+副加值);
前24月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,24)+副加值);
前25月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,25)+副加值);
前26月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,26)+副加值);
前27月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,27)+副加值);
前28月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,28)+副加值);
前29月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,29)+副加值);
前30月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,30)+副加值);
前31月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,31)+副加值);
前32月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,32)+副加值);
前33月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,33)+副加值);
前34月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,34)+副加值);
前35月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,35)+副加值);
前36月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,36)+副加值);
前37月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,37)+副加值);
前38月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,38)+副加值);
前39月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,39)+副加值);
前40月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,40)+副加值);
前41月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,41)+副加值);
前42月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,42)+副加值);
前43月_1:=ref(月营收_i,troughbars(ref(day,1)<day,1,43)+副加值);
前1月_日:=if(加=0,前1月_1,前2月_1);
前2月_日:=if(加=0,前2月_1,前3月_1);
前3月_日:=if(加=0,前3月_1,前4月_1);
前4月_日:=if(加=0,前4月_1,前5月_1);
前5月_日:=if(加=0,前5月_1,前6月_1);
前6月_日:=if(加=0,前6月_1,前7月_1);
前7月_日:=if(加=0,前7月_1,前8月_1);
前8月_日:=if(加=0,前8月_1,前9月_1);
前9月_日:=if(加=0,前9月_1,前10月_1);
前10月_日:=if(加=0,前10月_1,前11月_1);
前11月_日:=if(加=0,前11月_1,前12月_1);
前12月_日:=if(加=0,前12月_1,前13月_1);
前13月_日:=if(加=0,前13月_1,前14月_1);
前14月_日:=if(加=0,前14月_1,前15月_1);
前15月_日:=if(加=0,前15月_1,前16月_1);
前16月_日:=if(加=0,前16月_1,前17月_1);
前17月_日:=if(加=0,前17月_1,前18月_1);
前18月_日:=if(加=0,前18月_1,前19月_1);
前19月_日:=if(加=0,前19月_1,前20月_1);
前20月_日:=if(加=0,前20月_1,前21月_1);
前21月_日:=if(加=0,前21月_1,前22月_1);
前22月_日:=if(加=0,前22月_1,前23月_1);
前23月_日:=if(加=0,前23月_1,前24月_1);
前24月_日:=if(加=0,前24月_1,前25月_1);
前25月_日:=if(加=0,前25月_1,前26月_1);
前26月_日:=if(加=0,前26月_1,前27月_1);
前27月_日:=if(加=0,前27月_1,前28月_1);
前28月_日:=if(加=0,前28月_1,前29月_1);
前29月_日:=if(加=0,前29月_1,前30月_1);
前30月_日:=if(加=0,前30月_1,前31月_1);
前31月_日:=if(加=0,前31月_1,前32月_1);
前32月_日:=if(加=0,前32月_1,前33月_1);
前33月_日:=if(加=0,前33月_1,前34月_1);
前34月_日:=if(加=0,前34月_1,前35月_1);
前35月_日:=if(加=0,前35月_1,前36月_1);
前36月_日:=if(加=0,前36月_1,前37月_1);
前37月_日:=if(加=0,前37月_1,前38月_1);
前38月_日:=if(加=0,前38月_1,前39月_1);
前39月_日:=if(加=0,前39月_1,前40月_1);
前40月_日:=if(加=0,前40月_1,前41月_1);
前41月_日:=if(加=0,前41月_1,前42月_1);
前42月_日:=if(加=0,前42月_1,前43月_1);
判断显示周期:=datatype=6 or datatype=7 or datatype=8;
前1月:if(判断显示周期=1,if(datatype=8,前1月_月,前1月_日),0),linethick0;
前2月:if(判断显示周期=1,if(datatype=8,前2月_月,前2月_日),0),linethick0;
前3月:if(判断显示周期=1,if(datatype=8,前3月_月,前3月_日),0),linethick0;
前4月:if(判断显示周期=1,if(datatype=8,前4月_月,前4月_日),0),linethick0;
前5月:if(判断显示周期=1,if(datatype=8,前5月_月,前5月_日),0),linethick0;
前6月:if(判断显示周期=1,if(datatype=8,前6月_月,前6月_日),0),linethick0;
前7月:if(判断显示周期=1,if(datatype=8,前7月_月,前7月_日),0),linethick0;
前8月:if(判断显示周期=1,if(datatype=8,前8月_月,前8月_日),0),linethick0;
前9月:if(判断显示周期=1,if(datatype=8,前9月_月,前9月_日),0),linethick0;
前10月:if(判断显示周期=1,if(datatype=8,前10月_月,前10月_日),0),linethick0;
前11月:if(判断显示周期=1,if(datatype=8,前11月_月,前11月_日),0),linethick0;
前12月:if(判断显示周期=1,if(datatype=8,前12月_月,前12月_日),0),linethick0;
前13月:if(判断显示周期=1,if(datatype=8,前13月_月,前13月_日),0),linethick0;
前14月:if(判断显示周期=1,if(datatype=8,前14月_月,前14月_日),0),linethick0;
前15月:if(判断显示周期=1,if(datatype=8,前15月_月,前15月_日),0),linethick0;
前16月:if(判断显示周期=1,if(datatype=8,前16月_月,前16月_日),0),linethick0;
前17月:if(判断显示周期=1,if(datatype=8,前17月_月,前17月_日),0),linethick0;
前18月:if(判断显示周期=1,if(datatype=8,前18月_月,前18月_日),0),linethick0;
前19月:if(判断显示周期=1,if(datatype=8,前19月_月,前19月_日),0),linethick0;
前20月:if(判断显示周期=1,if(datatype=8,前20月_月,前20月_日),0),linethick0;
前21月:if(判断显示周期=1,if(datatype=8,前21月_月,前21月_日),0),linethick0;
前22月:if(判断显示周期=1,if(datatype=8,前22月_月,前22月_日),0),linethick0;
前23月:if(判断显示周期=1,if(datatype=8,前23月_月,前23月_日),0),linethick0;
前24月:if(判断显示周期=1,if(datatype=8,前24月_月,前24月_日),0),linethick0;
前25月:if(判断显示周期=1,if(datatype=8,前25月_月,前25月_日),0),linethick0;
前26月:if(判断显示周期=1,if(datatype=8,前26月_月,前26月_日),0),linethick0;
前27月:if(判断显示周期=1,if(datatype=8,前27月_月,前27月_日),0),linethick0;
前28月:if(判断显示周期=1,if(datatype=8,前28月_月,前28月_日),0),linethick0;
前29月:if(判断显示周期=1,if(datatype=8,前29月_月,前29月_日),0),linethick0;
前30月:if(判断显示周期=1,if(datatype=8,前30月_月,前30月_日),0),linethick0;
前41月:if(判断显示周期=1,if(datatype=8,前41月_月,前41月_日),0),linethick0;
前42月:if(判断显示周期=1,if(datatype=8,前42月_月,前42月_日),0),linethick0;

指标公式下载地址

好公式网提供全网最全的指标公式软件，感谢您的支持！鼠标双击图片可看大图！
下载请点击右侧“立即下载”，如只有源码，请点击本页面右侧的导入方法按图导入！
本站指标基于网友分享，仅供研究自学，勿作他用，本站对下载使用不承担任何责任！

上一指标公式：魅力操盘王试用版改成公式 飞狐操盘指标 源码

下一指标公式：新主图—成交密集区定压力均价差看买盘强弱公式 飞狐强弱均价指标 源码

相关飞狐公式推荐

指标公式下载注意

☉ 好公式网发布的指标公式主要用于软件技术面分析，仅供参考，勿用于实际操作，据此操作风险自负！

☉ 解压密码：www.goodgongshi.com 就是好公式网域名，希望大家看清楚，切勿输错。

☉ tnc和tni格式指标公式，仅可以用通达信软件引入使用，例如可以用通达信软件引入使用指标公式；

☉ tne格式指标公式，仅可以用通达信软件公式编辑器5.0版导入，高版本兼容低版本；

☉ fnc格式指标公式，可以用大智慧软件新一代高速行情分析系统股票软件使用，少部分可以用分析家软件引入使用；

☉ alg格式指标公式，仅仅可以用飞狐交易师软件引入使用；exp格式指标公式，仅可以用大智慧经典版软件引入使用；

☉ hxf格式指标公式，仅可以用同花顺软件引入使用。

☉ 如果您发现下载软件链接错误，请联系管理员报告错误。

☉ 好公式网欢迎各位网友帮忙宣传转发本站网址，有您的支持，我们会做得更好！

☉ 本文0801-月营收公式 飞狐指标 源码仅供学习研究。