locking 2008-4-19 10:11
大智慧、分析家、飞狐、倚天2006股票公式加密方法
[align=center][align=center][b][font=宋体][size=15pt]大智慧、分析家、飞狐、倚天2006股票公式加密方法[/size][/font][/b][/align][/align][align=center][align=center][font=仿宋_GB2312][size=3]（注：正式版加密方法与该演示版加密方法稍微不同）[/size][/font][/align][/align][align=center][align=center][font=仿宋_GB2312][size=3] [/size][/font][/align][/align][b][font=宋体][size=12pt]一、
[/size][/font][/b][b][font=宋体][size=12pt]简单例子[/size][/font][/b]
[b][font=宋体][size=12pt] [/size][/font][/b]
[font=宋体][size=3]假设您原来公式为：[/size][/font]
[color=green][font=宋体][size=3]A1:= (2*C+H+L)/4;[/size][/font][/color]
[color=green][font=宋体][size=3]A2:= LLV(L,34);[/size][/font][/color]
[color=green][font=宋体][size=3]A3:= HHV(H,34);[/size][/font][/color]
[color=green][font=宋体][size=3]80,pointdot,linethick3,coloryellow;[/size][/font][/color]
[color=green][font=宋体][size=3]50,pointdot,linethick3,colorred;[/size][/font][/color]
[color=green][font=宋体][size=3]20,pointdot,linethick3;[/size][/font][/color]
[color=green][font=宋体][size=3]安全买入:EMA((A1-A2)/(A3-A2)*100,13),COLORRED; [/size][/font][/color]
[color=green][font=宋体][size=3]安全卖出:EMA(0.667*REF(安全买入,1)+0.333*安全买入,2),COLORgreen; [/size][/font][/color]
[color=green][font=宋体][size=3]STICKLINE(安全买入-安全卖出>0,安全买入,安全卖出,8,0),COLORRED; [/size][/font][/color]
[color=green][font=宋体][size=3]STICKLINE(安全买入-安全卖出<0,安全买入,安全卖出,8,0),COLORgreen;[/size][/font][/color]
[font=宋体][size=3] [/size][/font]
[font=宋体][size=3]则加密后公式为：（[color=red]红色[/color]为应增加部分；[color=fuchsia]水红色[/color]和[color=blue]蓝色[/color]可增加，可不要；[color=blue]蓝色[/color]部分在不同股票中可能不同）[/size][/font]
[font=宋体][size=3] [/size][/font]
[align=left][align=left][color=red][font=宋体][size=3]RETNUM:="FHFXJDZH@DZHFXJFH"(1);[/size][/font][/color][/align][/align][align=left][align=left][size=3][color=red][font=宋体]TAISHAN:=INTPART(MOD(RETNUM, 10))-5;[/font][/color][color=green][font=宋体][/font][/color][/size][/align][/align][align=left][align=left][color=green][font=宋体][size=3] [/size][/font][/color][/align][/align][align=left][align=left][color=fuchsia][font=宋体][size=3]Nian:=2000+INTPART(RETNUM/1000);[/size][/font][/color][/align][/align][align=left][align=left][color=fuchsia][font=宋体][size=3]Yue:=INTPART((MOD(RETNUM, 1000))/10);[/size][/font][/color][/align][/align][align=left][align=left][size=3][color=fuchsia][font=宋体]Ri:=INTPART(FRACPART(RETNUM)*100+0.4);[/font][/color][color=green][font=宋体][/font][/color][/size][/align][/align][align=left][align=left][color=fuchsia][font=宋体][size=3]Lsoft:=INTPART(FRACPART(RETNUM*100)*10+0.4);[/size][/font][/color][/align][/align][align=left][align=left][color=fuchsia][font=宋体][size=3] [/size][/font][/color][/align][/align][align=left][align=left][color=blue][font=宋体][size=3]TiShi:= ifs(Lsoft<2, '公式可试用到: ', ifs(Lsoft<3, '公式可租用到: ', '当前日期: '));[/size][/font][/color][/align][/align][align=left][align=left][color=blue][font=宋体][size=3]QiXian:=TiShi+NUMTOSTRN(Nian,0)+'年'+NUMTOSTRN(Yue,0)+'月'+NUMTOSTRN(Ri,0)+'日';[/size][/font][/color][/align][/align][align=left][align=left][color=blue][font=宋体][size=3]DRAWTEXTABS(0, 0, QiXian);[/size][/font][/color][/align][/align][align=left][align=left][color=green][font=宋体][size=3] [/size][/font][/color][/align][/align][size=3][color=blue][font=宋体]IF not(TAISHAN) THEN BEGIN
{在分析家 中，可以加入该句}[/font][/color][color=fuchsia][font=宋体][/font][/color][/size]
[align=left][align=left][color=green][font=宋体][size=3] [/size][/font][/color][/align][/align][align=left][align=left][size=3][color=green][font=宋体]A1:=[/font][/color][color=red][font=宋体] if(TAISHAN, 0, [/font][/color][color=green][font=宋体](2*C+H+L)/4[/font][/color][color=red][font=宋体])[/font][/color][color=green][font=宋体];[/font][/color][/size][/align][/align][align=left][align=left][size=3][color=green][font=宋体]A2:= [/font][/color][color=red][font=宋体]if(TAISHAN, 0, [/font][/color][color=green][font=宋体]LLV(L,34)[/font][/color][color=red][font=宋体])[/font][/color][color=green][font=宋体];[/font][/color][/size][/align][/align][align=left][align=left][size=3][color=green][font=宋体]A3:= [/font][/color][color=red][font=宋体]if(TAISHAN, 0, [/font][/color][color=green][font=宋体]HHV(H,34)[/font][/color][color=red][font=宋体])[/font][/color][color=green][font=宋体];[/font][/color][/size][/align][/align][align=left][align=left][color=green][font=宋体][size=3]80,pointdot,linethick3,coloryellow;[/size][/font][/color][/align][/align][align=left][align=left][color=green][font=宋体][size=3]50,pointdot,linethick3,colorred;[/size][/font][/color][/align][/align][align=left][align=left][color=green][font=宋体][size=3]20,pointdot,linethick3;[/size][/font][/color][/align][/align][align=left][align=left][size=3][color=green][font=宋体]安全买入:[/font][/color][color=red][font=宋体]if(TAISHAN, 0, [/font][/color][color=green][font=宋体]EMA((A1-A2)/(A3-A2)*100,13)[/font][/color][color=red][font=宋体])[/font][/color][color=green][font=宋体],COLORRED; [/font][/color][/size][/align][/align][align=left][align=left][size=3][color=green][font=宋体]安全卖出:[/font][/color][color=red][font=宋体]if(TAISHAN,[/font][/color]
[color=red][font=宋体]0,[/font][/color][color=green][font=宋体] EMA(0.667*REF(安全买入,1)+0.333*安全买入,2)[/font][/color][color=red][font=宋体])[/font][/color][color=green][font=宋体],COLORgreen; [/font][/color][/size][/align][/align][align=left][align=left][size=3][color=green][font=宋体]STICKLINE([/font][/color][color=red][font=宋体]not(TAISHAN) and [/font][/color][color=green][font=宋体]安全买入-安全卖出>0,安全买入,安全卖出,8,0),COLORRED; [/font][/color][/size][/align][/align][align=left][align=left][size=3][color=green][font=宋体]STICKLINE([/font][/color][color=red][font=宋体]not(TAISHAN) and [/font][/color][color=green][font=宋体]安全买入-安全卖出<0,安全买入,安全卖出,8,0),COLORgreen;[/font][/color][/size][/align][/align][align=left][align=left][color=green][font=宋体][size=3] [/size][/font][/color][/align][/align][color=blue][font=宋体][size=3]END;
{在分析家 中，可以加入该句}[/size][/font][/color]
[color=blue][font=宋体][size=3] [/size][/font][/color]
[b][font=宋体][size=12pt]二、必填加密语句：[/size][/font][/b]
[b][font=宋体][size=3] [/size][/font][/b]
[font=宋体][size=3]1、[/size]
[/font][font=宋体][size=3]下两行一定要添加到您的公式中的前面。[/size][/font]
[color=red][font=宋体][size=3]RETNUM:="FHFXJDZH@DZHFXJFH"(1);[/size][/font][/color]
[size=3][color=red][font=宋体]TAISHAN:=INTPART(MOD(RETNUM, 10))-5;[/font][/color][color=green][font=宋体][/font][/color][/size]
[font=宋体][size=3]2、[/size]
[/font][font=宋体][size=3]在公式中的赋值语句：A:=XXX; 应修改为 A:=[color=red] if(TAISHAN,[/color]
[color=red]0,[/color]
XXX[color=red])[/color];如：[/size][/font]
[size=3][color=green][font=宋体]年:[/font][/color][color=red][font=宋体]if(TAISHAN, 0,[/font][/color][color=green][font=宋体] MA(CLOSE,26)[/font][/color][color=red][font=宋体])[/font][/color][color=green][font=宋体],color00ff00;[/font][/color][/size]
[size=3][color=green][font=宋体]Var5:=[/font][/color][color=red][font=宋体]if(TAISHAN, 0,[/font][/color][color=green][font=宋体]EMA(C,30)[/font][/color][color=red][font=宋体])[/font][/color][color=green][font=宋体];[/font][/color][font=宋体][/font][/size]
[size=10pt][font=Times New Roman]3、
[/font][/size][font=宋体][size=10pt]在逻辑判断处，可加入：[/size][/font][size=10pt][font=Times New Roman]not(TAISHAN) and [/font][/size][font=宋体][size=10pt]，如：[/size][/font][size=10pt][/size]
[font=宋体][size=12pt]
[/size][/font][size=3][color=green][font=宋体]DRAWICON([/font][/color][color=red][font=宋体]not(TAISHAN) and [/font][/color][color=green][font=宋体]cp=1,l*0.95,4),ALIGN1;[/font][/color][size=10pt][/size][/size]
[align=left][align=left][size=10pt][font=Times New Roman] [/font][/size][color=green][font=宋体][size=3]STICKLINE([/size][/font][/color][font=Times New Roman][size=10pt]not(TAISHAN) and[/size]
[/font][color=green][font=宋体][size=3]安全买入-安全卖出>0,安全买入,安全卖出,8,0),COLORRED;[/size][/font][/color][/align][/align][color=green][font=宋体]
[size=3]STICKLINE([/size][/font][/color][size=3][color=red][font=宋体]not(TAISHAN) and [/font][/color][color=green][font=宋体] DISPSTATUS=2 and dp=1 and c>=今日阻力,今日阻力,今日阻力,30,0),Color0000FF;[/font][/color][size=10pt][/size][/size]
[color=green][font=宋体][size=3] [/size][/font][/color]
[b][font=宋体][size=12pt]三、另可选加密语句：[/size][/font][/b][b][font=宋体][/font][/b]
[color=red][font=宋体][size=3] [/size][/font][/color]
[font=宋体][size=3]1、在[b]分析家 或 大智慧 [/b]中，可以在 [color=red]TAISHAN:=INTPART(MOD(RETNUM, 10))-5; [/color]后面、公式前面加上一句： [/size][/font]
[color=red][font=宋体][size=3]IF [/size][/font][/color][size=10pt][font=Times New Roman]not(TAISHAN)[/font][/size][color=red][font=宋体][size=3] THEN BEGIN[/size][/font][/color]
[font=宋体][size=3]然后写您的公式， [/size][/font]
[font=宋体][size=3]在您公式最后，要加上下面这一行：[/size][/font]
[color=red][font=宋体][size=3]END;[/size][/font][/color]
[b][color=purple][font=宋体][size=3]但注意：在大智慧中加入上述语句，有时会影响指标图！！！建议在大智慧中不加！[/size][/font][/color][/b]
[size=3][size=10.0pt][font=Times New Roman]2[/font][/size][font=宋体][size=10.0pt]、在[/size][/font][size=10.0pt][font=Times New Roman] [/font][/size][b][font=宋体][size=10.0pt]分析家[/size][/font][/b][b][size=10.0pt][font=Times New Roman] [/font][/size][/b][font=宋体][size=10.0pt]中，可以在每句语句前都可加：[/size][/font][font=Times New Roman][color=red][size=10.0pt]if not(TAISHAN) then[/size][/color]
[/font][font=宋体][size=10.0pt]，如：[/size][/font][size=10.0pt][/size][/size]
[size=3][color=red][font=宋体]if not(TAISHAN) then [/font][/color][color=green][font=宋体]80,pointdot,linethick3,coloryellow;[/font][/color][/size]
[size=3][color=red][font=宋体]if not(TAISHAN) then [/font][/color][color=green][font=宋体]DRAWTEXTREL(10,230,var100),color00ffff;[/font][/color][/size]
[size=3][color=red][font=宋体]if not(TAISHAN) then [/font][/color][color=green][font=宋体]市场成本:DMA(AMOUNT/V/100,V/CAPITAL),COLORRED;[/font][/color][/size]
[font=宋体][size=3]在其它股票中加入该句会造成错误！[/size][/font]
[font=宋体][size=3] [/size][/font]
[b][font=宋体][size=12pt]四、限制日期的显示：[/size][/font][/b]
[font=宋体][size=3] [/size][/font]
[font=宋体][size=3]1、如果您想显示股票公式可使用的期限，可添加下列代码：[b][/b][/size][/font]
[align=left][align=left][color=fuchsia][font=宋体][size=3]Nian:=2000+INTPART(RETNUM/1000);[/size][/font][/color][/align][/align][align=left][align=left][color=fuchsia][font=宋体][size=3]Yue:=INTPART((MOD(RETNUM, 1000))/10);[/size][/font][/color][/align][/align][align=left][align=left][color=fuchsia][font=宋体][size=3]Ri:=INTPART(FRACPART(RETNUM)*100+0.4);[/size][/font][/color][/align][/align][align=left][align=left][color=fuchsia][font=宋体][size=3]Lsoft:=INTPART(FRACPART(RETNUM*100)*10+0.4);[/size][/font][/color][/align][/align][font=宋体][size=3]上面三行，分别得到限制使用日期的：年、月、日。[/size][/font]
[font=宋体][size=3]最后一行的值代表软件在试用期内、或在租用期内、或无日期限制。[/size][/font]
[font=宋体][size=3] [/size][/font]
[font=宋体][size=3]2、若要显示上述日期，在不同股票公式中，加入的代码可能不同！！ [/size][/font]
[font=宋体][size=3] [/size][/font]
[font=宋体][size=3]如在[color=fuchsia]大智慧[/color]中：[/size][/font]
[align=left][align=left][color=green][font=宋体][size=3]TiShi:= ifs(Lsoft<2, '公式可试用到: ', ifs(Lsoft<3, '公式可租用到: ', '当前日期: '));[/size][/font][/color][/align][/align][align=left][align=left][color=green][font=宋体][size=3]QiXian:=TiShi+NUMTOSTRN(Nian,0)+'年'+NUMTOSTRN(Yue,0)+'月'+NUMTOSTRN(Ri,0)+'日';[/size][/font][/color][/align][/align][align=left][align=left][color=green][font=宋体][size=3]DRAWTEXTABS(0, 0, QiXian);[/size][/font][/color][/align][/align][font=宋体][size=3] [/size][/font]
[font=宋体][size=3]在[color=blue]分析家[/color]中：[/size][/font]
[align=left][align=left][color=green][font=宋体][size=3]TiShi:=
STRMID('公式可试用到：公式可租用到：系统当前日期：',(Lsoft-1)*14,14);[/size][/font][/color][/align][/align][align=left][align=left][color=green][font=宋体][size=3]QiXian:=TiShi+NUMTOSTRN(Nian,0)+'年'+NUMTOSTRN(Yue,0)+'月'+NUMTOSTRN(Ri,0)+'日';[/size][/font][/color][/align][/align][align=left][align=left][size=3][color=green][font=宋体]DRAWTEXTABS(0, 0, QiXian);[/font][/color][font=Fixedsys][size=12pt][/size][/font][/size][/align][/align][font=宋体][size=3] [/size][/font]
[font=宋体][size=3]在[color=purple]飞
狐[/color]中：[/size][/font]
[align=left][align=left][color=green][font=宋体][size=3]QiXian:='账户使用期限: '+NUMTOSTR(Nian,0)+'年'+NUMTOSTR(Yue,0)+'月'+NUMTOSTR(Ri,0)+'日';[/size][/font][/color][/align][/align][align=left][align=left][size=3][color=green][font=宋体]DRAWTEXTEX(1,0,0,0,QiXian);[/font][/color][font=宋体][/font][/size][/align][/align][align=left][align=left][color=green][font=宋体][size=3] [/size][/font][/color][/align][/align][font=宋体][size=3] [/size][/font]
[align=left][align=left][b][font=宋体][size=12pt]具体例子，参见 $gongsi 下各目录下面的“翔宇加密.FNC”等。[/size][/font][/b][font=宋体][size=12pt][/size][/font][/align][/align][align=left][align=left][font=宋体][url=http://www.zlocksoft.com/download.htm][size=3][color=#800080]下载演示版[/color][/size][/url][size=3]。[/size][/font][/align][/align][font=宋体][size=3] [/size][/font]
[align=right][align=right][size=3][font=宋体]
[/font][font=仿宋_GB2312]泰山翔宇电脑工作室
山东泰山医学院 271000
张裕飞[/font][/size][/align][/align][align=right][align=right][font=仿宋_GB2312][size=3]
[/size][url=http://www.zlocksoft.com/][size=3][color=#800080]http://www.Zlocksoft.com[/color][/size][/url][/font][/align][/align][align=right][align=right][font=仿宋_GB2312][size=3]
e-mail: [/size][email=Zlocksoft@Zlocksoft.com][size=3][color=#0000ff]Zlocksoft@Zlocksoft.com[/color][/size][/email][size=3] [/size][email=zlocksoft@163.com][size=3][color=#0000ff]zlocksoft@163.com[/color][/size][/email][/font][font=宋体][/font][/align][/align][align=right][align=right][size=3][font=宋体]
[/font][font=仿宋_GB2312]电话：0538-6222485
5389485（小灵通）
13001773563（手机）[/font][font=宋体][/font][/size][/align][/align][font=宋体][size=3] [/size][/font]