飞狐用的板块个股分析

合集下载

[飞狐] 缠论一买、三买选股公式(飞狐+悟多公式)+仿悟多三买公式

zd:="chzhshch@zd"(var3);
zswz:=barslast(zg>zd);
tj3:=count(abs(var3),barslast(var3=1))=0;
tj4:=l<ref(l,barslast(var2=-1));
tj5:=count(var2=1,zswz-1)>0;
zd:="chzhshch@zd"(var3);
var1:="="chzhshch@bi";
var4:=barslast(var001<>0);
tj1:=ref(var001,var2)=-1; //上级别是底
var5:=sum(abs(var2),var2);
if datatype=4 then var001:="fbase.var2#day";
var1:="chzhshch@kxian";
var2:="chzhshch@bi";{处理笔关系}
var3:="chzhshch@tongji"(minbi);{同级别分解}
zg:="chzhshch@zg"(var3);//一定要先调用ZG
tj6:=count(var2=1,zswz-1)=0;
zgg:=ref(zg,zswz);
tj7:=o>c&&count(if(o>c,1,0),barslast(var2=-1)-1)=1&&ref(h,1)>zgg&&l>zgg;
tj8:=o>c&&count(if(o>c,1,0),min(barslast(var2=-1)-1,barslast(l>zgg)))=1&&ref(h,1)>zgg&&l>zgg;

k线图例、飞狐划线

解消点”是一种辅助波浪理论、预估上涨或下跌幅度的工具。

一般被用来估算反弹、回档、下跌浪、上升浪结束后的涨跌目标。

通过股价涨跌比例对应关系，我们先选出一类高低点，做一个线段，又有说法叫找"阴阳中心线",然后以一边拉出45度角做切线，然后寻找能和另一个点相交的融会点(该点位的夹角要求为30度)，该点就是我们所得到的解消点。

股价就可能根据他们所组成的三角形范围内进行运动。

譬如：当反弹波结束时,选取反弹低点与反弹高点, 当回档波结束时,选取起跌高点与回档低点,“解消点”都会提示下一波涨幅目标位。

当一段下跌浪结束时,选取末跌浪的起跌高点与末跌浪低点, “解消点”会指出其下一波回升的涨幅目标。

当一段上升浪结束时,选取末升浪的起涨低点与末升浪高点,“解消点”也会指出其下一波回跌的跌幅目标。

飞狐的"解消点"是根据"解消点"要求的角度设置的画线工具,我们只要找好想用的高低连线位置就可以很快画出来.炒股要做好复盘一直想谈谈关于复盘的问题，开始自己也不知该如何下手，有时候有些东西做起来简单，系统总结出来就没那么简单了，刚好看到这篇文章，说得还是比较系统，比较实用，朋友们不必完全照搬但可以各取所需，因为每个人都有自己的习惯和侧重点，小小略作改动，发在这里和大家共同学习。

在炒股过程中，对于自己关注的股票，一定要主动去寻找股价得到支撑的原因，了解公司在经营过程中所发生的任何事情。

在目前这种行情中复盘对你做股票很有意义。

那么先做什么？一时有些不知如何入手。

没有关系，打开行情软件的当日排名，先看清楚当日涨幅榜上和跌幅榜上有哪些股票，它们之间有没有板块连动效应，然后检查一下自己的持仓和这些股票有没有关联，这样可以确定近期的热点和风险板块，把握住大方向。

有了方向，第二步要看看每天在2％～5％波动的有那些股票，如果有一些一直反复出现而又没有大幅飙升，量能也在逐步放大的个股就要注意了，说不定白马王子就在里面。

飞狐股票公式教程

设计公式『飞狐交易师』的公式系统是一套功能强大、使用简单的技术分析描述语言系统。

公式系统的作用是什么呢？公式系统其实就是对一系列随时间变化的原始数据组序列进行代数和逻辑计算。

为什么是数据组序列呢？因为每一个时间周期（即相邻两组数据间的时间间隔）都包含了一组原始数据，如开高低收量额，公式系统能对其中的任何原始数据进行操作。

使用者定义出如何对原始数据进行处理得到一个新的数据，公式系统读出原始数据并按要求计算出使用者定制的数据，并以曲线、图形、指示等形式显示出来。

公式系统可以编辑四种类型的公式，分别是技术指标、交易系统、条件选股和五彩K线公式。

技术指标公式是最基本的公式，它用于指标图形的绘制。

技术指标公式结合选股条件逻辑判断表达式，即得到条件选股公式，用于条件选股。

技术指标公式结合买卖逻辑判断表达式，得到交易系统公式，用于交易系统指示。

技术指标公式结合色彩逻辑判断表达式，即得到K线模式公式，用于描述特定的K线模式。

公式的编辑在公式编辑器中完成。

公式系统处理的原始数据的分析周期（即相邻两组数据间的时间间隔）可以从1分钟到1000天间的任意值，也可以是分笔成交数据，我们用鼠标把一个公式拖到某只证券的某个周期的图形分析窗口，则该公式处理这个周期的原始数据,如开高低收量额，改变分析窗口显示的分析周期，则公式处理新的分析周期的数据。

公式系统对数据的运算是基于一系列函数，函数中除ZIG之字转向函数类和BACKSET函数外，其余函数均满足时间不变性，即时间靠后的数据不对时间靠前的结果产生影响。

公式设定步骤1.设定公式名称：每个公式都有自己的名称，它由字母或数字组成，最多可以有9个字符。

请注意，公式名称在同类公式中不能重复。

2．描述公式：用于简单描述该公式的含义，若输入，则在公式列表中会显示这段文字。

3．注释公式：用于描述一个公式如何使用、计算方法等内容。

输入后，在有关窗口按“用法注释”按钮可以查看公式注释。

4. 设计技术指标公式语句:公式的形式由若干语句组成。

龙飞虎思路借鉴总结

龙飞虎思路借鉴总结大凡大牛板块，或者大牛连板股，一定都是换手上去的板{即天天有人接力]。

如600623.600599这样的，远一点的是600553.600818.000998...板块上攻时出现大批一字板的品种后，成本出现断层，换手接力盘面临缺失，极易出现衰竭。

一字板后因为接力盘缺少与板块内弱势品种不跟，交易所特停而衰竭。

而龙头品种马上迎来“寂寞特停”的挑战。

我的看法是----换手决定高度。

很多游资股票都是靠板板换手前进的。

一般起来时有充分换手的，后面走的远。

人气也足。

量能都达到15-30%区间{小盘股更高，中大盘的小些}，而且不缩量。

操作中只要量能不缩，但最好不要放暴量，一般可看成趋势继续。

一个巨牛股，里面的资金从来都不是从头吃到尾的。

都是接力上去的。

很多一字板个股，要么买不到，买到就死了。

而且这样的一字板，跌下来连反抽都难做，常常一路阴跌。

而换手充分的牛股，跌下来反抽机会多多，比如600623.600599这样的。

多观察几只这样的牛股就能体会到。

很多话，难以表达，我喜欢做这些股，我也非常想学习这些股票的操作思路与手法。

历史交易中，我参与了很多大牛股，但是鲜有漂亮战役。

交易中，过多的考虑分时，技术面，没有一颗执著的心。

很多牛股靠的不是技术面，而是对人性的考问。

我隐约感觉到这门学问在诗外，也许修身的道士其意在心... 围棋称手谈，做股票当称盘谈。

很多时候，只需要看一下对方的持仓，我想你就能清晰的感觉到我的心理变化与关注的股票池。

分仓的交易模式大概是难变了，我还是习惯于近乎机械的分配仓位，这样几个帐号用起来，也能轻松平衡。

另外我不能接受单一品种重仓的重大回档，理论上可以用仓位来解决这个问题，但是还是感觉目前没有这个能力。

有一种下跌令人窒息，有一种下跌叫人期盼，看着好多投机品种，从昨天的诱多，今天的杀跌，机会又在不远处等着我。

板块在高位盘整时，龙2或者龙3{特别是小盘的}突兀拉起，而原来的龙一转为跟随，这个现象出现，一般再追高危险性非常大了。

涨停后10天内不破收盘价的飞狐公式

涨停后10天内不破收盘价的飞狐公式【主题】涨停后10天内不破收盘价的飞狐公式一、概念解释在股票投资领域，涨停指的是当股价涨幅达到10%时，股票交易被暂停，不再进行涨跌交易。

涨停后10天内不破收盘价的飞狐公式是一种用来预测股票价格变动的技术指标，它表明了股价涨停后10个交易日内不跌破当日收盘价的概率。

这个公式的提出者据说是一位名叫“飞狐”的股民，并在实际操作中取得了不错的效果。

二、技术指标分析1. 飞狐公式的具体计算方法飞狐公式的具体计算公式并不是公开的，有些股民通过研究市场数据总结出了一些适用的方法。

一般而言，该公式需要结合股票的历史价格，涨跌幅等因素进行计算，以确定未来10个交易日内不破收盘价的概率。

2. 飞狐公式的应用场景飞狐公式主要应用于股票的短线交易，通过预测股价短期内的变动趋势，辅助投资者在涨停后进行操作。

但需要注意的是，任何技术指标都只是参考工具，并不能完全确定股票价格的变动。

三、实践案例分析通过对历史股票数据的回测，可以发现飞狐公式在一定程度上具有一定的预测能力。

在某些特定情况下，根据该公式进行操作可以取得一定的收益。

但也有许多时候，飞狐公式的预测结果与实际股价走势有较大差异。

在使用该公式时，需要对市场进行全面、深入的分析，而不是仅仅依赖一个指标。

四、对飞狐公式的个人观点对于飞狐公式，我认为它作为一种技术指标，在一定情况下可以作为辅助工具，帮助投资者进行决策。

但在实际操作中，应当结合其他因素，如基本面分析、行业政策等，进行综合考量。

市场行情瞬息万变，过度依赖单一指标容易导致风险的忽视。

投资者在运用飞狐公式时，务必谨慎行事，不可轻率行事。

五、总结回顾在本文中，我们探讨了涨停后10天内不破收盘价的飞狐公式的概念、技术指标分析、实践案例分析以及个人观点。

通过深入探讨这一主题，相信读者对此有了更清晰的认识。

在股票投资中，技术指标虽然重要，但更关键的是对市场的全面、深入了解和分析，只有如此，才能更加灵活地应对市场的变化。

帝纳波利八大经典指标飞狐解决方案

帝纳波利八大经典指标飞狐解决方案一、趋势三组合（判断趋势的三个指标组合：置换移动平均线、随机指标、MACD）：二、超买超买三组合（判断超买超卖的三个指标：摆动指标预测器、MACD 预测器、去势摆动指标）：三、 LPO（可自动显示的帝纳波利目标位）：四、黄金叠加（通过飞狐画线工具实现）：免费的帝纳波利全套指标解决方案首先，我们来看看判断趋势的两个先行指标：置换移动平均线和摆动指标预测器。

置换移动平均线很简单，就是3天、7天、25天普通移动平均线向前置换一定时间周期后的结果，很多有心的朋友都已经用上了，我改成了可以调节显示的线条数（图1：显示3X3、7X5、25X5三条置换移动平均线）（图2：调节参数后仅显示3X3一条置换移动平均线）摆动指标预测器是老帝发明的另一个非常有价值的先行指标，它可以提前一天预测超买超卖的价位，为股民提供了很好的抄底逃顶的参考，以为为本人自编的摆动指标预测器（图3：自编的摆动指标预测器，基本跟老帝的原指标结果一致）请参见我的另一博客（）有详细介绍）。

这个指标的破解费了我不少工夫，死了不少脑细胞，还掉了几斤肉，恕我不能随意公布源码。

其次，我们来看看判断趋势的另外两个滞后指标：随机指标和MACD指标的组合。

这两个指标其实是最经典和最常用的技术分析指标，任何分析软件里都有，老帝无非是将默认参数分别调整为（8,3,3)和（8,17,9）而已，至于为什么要用这个参数，老帝也说不清楚，他只是说是根据观察成千上万个图形后总结出来，其实我们更没有必要关心为什么要用这两个参数，只要好用就行：（图4：3X3置换移动平均线与随机指标和MACD组成的趋势研判组合）最后，让我们来看看帝纳波利最经典的也是最难破解的黄金叠加和目标点位指标。

它们的思想和原理其实很简单，就是黄金分割加上波浪理论的深入应用。

准确的说他们都没法做成指标在K线图上自动显示，就算大名鼎鼎的NextView软件里也只是做成两个内嵌的画线工具。

飞狐使用指南

三、数据接收系统打开接收系统。

点击菜单栏上的[管理]>[启动接收系统] 或点击工具栏上的按钮。

接收系统打开后，会在屏幕左下角的系统托盘里会显示图标。

设置/查看服务器信息。

打开接收系统后，点击菜单栏上的[管理]>[接收系统]或双击系统托盘里的图标，则可以弹出网络引擎进行设置或查看服务器信息或下载数据。

修改服务器设置右键点击要修改或查看的服务器，点击[修改]或选中要修改的服务器，点击按钮,弹出修改服务器资料对话框.在[服务器信息]选项卡中,填写或修改对应的项目.然后打开[连接设置]选项卡,设置[启动类型]。

将常用的且比较稳定的一个服务器设为自动，则在每次打开接收系后，系统会自动登录该服务。

如果是使用代理服务器上网的,则要在[使用代理服务器]前打钩,并作好相应代理服务器设置,具体参数请咨询你的网络管理员,修改完相应的设置项目后按[确定]保存.增加服务器点击按钮,或用鼠标右键任意点击任意一服务器,再点击[新增].具体设置过程同修改服务器设置相似删除服务器删除不再使用或已经撤销的服务器。

右键点击要删除的服务器,然后再点击删除. 或选中要删除的服务器,再点删除按钮.3.连接服务器右键点击要连接的服务器,点击[启动]或选中要连接的服务器.联接成功后,则会在对应状态栏里显示[已经登录]，如长时间显示“正在联接……”则可能服务器地址无效或网络不通。

若服务器登录设置为自动,则在打开接收系统后,会自动登录该服务器。

4.行情接收可以选择需要接收的数据,补分笔成交数据、F10资料等。

登录上服务器后,可以根自己需要接收具体的市场或品种,默认为全部接收。

[更新报价] 在盘中打开软件时，点击此按钮更新行情列表中的报价[补分笔成交] 盘中或盘后打开软件后，补当天的分笔成交数据[补F10资料] 从服务器中下载全部F10资料，下载完后可以在离线时查看F10资料。

5.盘后数据如需要补数据,在登录上服务器后,打开[盘后数据]选项卡,在要下载的数据种类前打钩 ,再[点击下载]安装.根据选择数种类、数量及网络情况，下载过程需要几分钟到几个小时。

飞狐软件功能

飞狐软件功能飞狐应用中快捷键一览表快捷键F1 帮助系统F2 切换到行情报价表（如果当前为行情报价表，则不起作用）F3 选择指标(只在图形窗口中起作用)F4 大盘指数切换(只在图形窗口中起作用)F5 分时线、日线切换(只在图形窗口中起作用)点数图中切换周期F6 指标排序(在列表窗口中起作用)F7 条件选股F8 周期切换(在图形窗口中起作用)板块切换(在列表窗口中起作用，用于切换市场报块和常用报块) 市场轮廓中切换周期F9 查看接收到的交易所公告及财经报道F10 基本资料F11 复权处理/取消复权(只在图形窗口中起作用)F12 第一套外挂自助委托ALT+F12 第二套外挂自助委托Tab 切换窗口Alt＋F4 退出『飞狐交易师』系统Ctrl＋F1 在线帮助Ctrl＋F4 关闭当前子窗口Ctrl＋F6 系统指示（只在图形窗口中起作用)Ctrl＋F8 交易系统探索最佳参数Ctrl＋F9 交易系统全局优选（只在图形窗口中起作用)Ctrl＋F10 个股备忘录Ctrl＋A 预警系统Ctrl＋B 调用[板块分析]Ctrl＋D 数据管理Ctrl＋H 黄金分割主图坐标（只在图形窗口中起作用)Ctrl＋I 显示／不显示股票信息栏（只在图形窗口中起作用)Ctrl＋J 投资计算器Ctrl＋K 调用[添加模拟K线]Ctrl＋L 对数主图坐标（只在图形窗口中起作用)Ctrl＋M 启动／停止多图同列(只在图形窗口中起作用)Ctrl＋N 标准主图坐标（只在图形窗口中起作用)Ctrl＋O 弹出选项对话框Ctrl＋P 百分比主图坐标（只在图形窗口中起作用)Ctrl＋Q 缺省主图坐标（只在图形窗口中起作用)Ctrl＋S 输出图形（类似屏幕截图，可直接存成bmp/gif文件）Ctrl＋T 投资管理Ctrl＋W 列表窗口行情/财务数据切换(只在列表窗口起作用)Ctrl＋Y 10%坐标的分时线（只在分时走势窗口起作用）Ctrl＋Delete 删除所有交易指示（只在图形窗口中起作用)Ctrl＋PgDn 自动换页/停止换页Insert 加入到自选股Delete 从板块中删除Shift＋I 显示／不显示移动成本分布（只在图形窗口起作用）Shift＋P 切换/取消鼠标在主图上平移画面功能（只在图形窗口起作用）Shift＋R 手工刷新（行情报价）Shift＋Q 切换窗口Shift＋S 选择证券Shift＋T 显示／不显示标准工具栏Shift＋U 全屏/窗口模式切换Shift＋W 显示／不显示公式/板块管理面板Shift＋X 显示／不显示画线工具栏Alt＋1 只显示主图(只在图形窗口中起作用)Alt＋2 显示主图和一个副图(只在图形窗口中起作用)Alt＋3 显示主图和两个副图(只在图形窗口中起作用)Alt＋4 显示主图和三个副图(只在图形窗口中起作用)Alt＋5 显示主图和四个副图(只在图形窗口中起作用)Alt＋6 显示主图和五个副图(只在图形窗口中起作用)Alt＋7 显示主图和六个副图(只在图形窗口中起作用)Alt＋8 显示主图和七个副图(只在图形窗口中起作用)Alt＋9 显示主图和八个副图(只在图形窗口中起作用)在图形分析窗口可用以下快捷键切换分析周期：0 分笔成交1 1 分钟线2 5 分钟线3 15分钟线4 30分钟线5 60分钟线6 日线7 周线8 月线9 年线D 多日线（用户自定周期）[nHOUR] 为多小时线，n为小时数[nMIN] 多分钟线（键盘精灵[nMIN]可切换到n分钟线）[S]、[Sn]、[nSEC]为切换到多秒周期，n为秒数选择主图K线模式可有以下几种快捷方式：K 蜡烛线BAR 美国线PRICE 价位线TWR 宝塔线GBL 鬼变脸CNDEQV 压缩线CNP 成交堆积LCNP 线性成交堆积WCNP 加权成交堆积OX 点线图[GANN] [江恩分析]TPO 市场轮廓图↑K线柱体放宽↓K线柱体缩窄←十字光标线向左移动→十字光标线向右移动图形窗口中无右信息栏时[+]、[-]分别为缩小、放大走势图；Home 十字光标线向左移动到当前画面的最左边一条K线End 十字光标线向右移动到当前画面的最右边一条K线Ctrl＋←K线向左移动Ctrl＋→K线向右移动Ctrl＋Home K线向左移动到最头Ctrl＋End K线向右移动到最尾Ctrl＋↑当前活动副图切换到上一个副图Ctrl＋↓当前活动副图切换到下一个副图PageUp 上一券种PageDown 下一券种直接键入代码如:600839回车，即切换到四川长虹直接键入技术指标名称如：MACD 即切换到MACD指标图形分析中[回车]键切换实时/历史走势（切换到上次显示的周期，不一定是日线）图形分析按[Backspace]可向前回溯曾经看过的股票，按[Shift+Backspace]则向后；支持“81-87”的快捷功能：81 沪A综合排名82 沪B综合排名83 深A综合排名84 深B综合排名85 A股综合排名86 B股综合排名87 基金综合排名支持“61-67”的快捷功能：61 沪A涨幅排名62 沪B涨幅排名63 深A涨幅排名64 深B涨幅排名65 A股涨幅排名66 B股涨幅排名67 基金涨幅排名支持“31-34”的快捷功能：31 涨速排名32 量比排名33 成交额排名34 换手率排名支持“01-06”及其他快捷功能：01 成交明细02 分价分量03 上证走势04 深证走势05 分时/日线切换06 自选股10 基本资料51～59 前九个常用板块的快速切换（在键盘精灵中可以查看到你所设定为常用的那些板块的按键对应）／对K线图窗口，可在常用指标间切换活动副图的指标。

1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。

这个公式是飞狐用的！！！{板块个股分析2}DRAWGBK((CLOSE > 0),COLORRGB(0,0,0),COLORRGB(0,0,0),1);RQ:=DATE;//取日期A:=BLKNAME;HY:=STRLEFT(A,STRFIND(A,',',1)-1);HYs:=STKCOUNT(HY);板块个股数:HYs,LINETHICK0;DYZB:=IF(c>0,'GGZJ.一日',IF(c<0,'GGZJ.VV','GGZJ.VV1'));DAS:=DATACOUNT;D0:=RQ[DAS];//取最后日期variable:DM[HYs]='',vcp[HYs]=0,vci[HYs]=0,TP=0;for k=1 to HYs do beginDDD:=STKFROMBLK(HY,k);DM[k]:=DDD;TMP:=STKINDI(DDD,DYZB,0,6);TMPD:=STKINDI(DDD,'GGZJ.DD',0,6);vcp[k]:=TMP[DAS];vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股TP:=TP+IF(vci[k]=-1000,1,0);end;PX1:=SORTPOS(vci,1,1,HYs);DRAWTEXTEX(islastbar,1,15,50,'当日攻击资金前五名'),Color1080FA;DRAWTEXTEX(islastbar,1,10,250,'①'+STKNAMEEX(DM[vci[1]])+':'+numtostr(vcp[vci[1]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,10,400,'②'+STKNAMEEX(DM[vci[2]])+':'+numtostr(vcp[vci[2]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,10,550,'③'+STKNAMEEX(DM[vci[3]])+':'+numtostr(vcp[vci[3]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,10,700,'④'+STKNAMEEX(DM[vci[4]])+':'+numtostr(vcp[vci[4]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,10,850,'⑤'+STKNAMEEX(DM[vci[5]])+':'+numtostr(vcp[vci[5]],2)),Color0000FF;DYZB1:=IF(c>0,'GGZJ.昨日',IF(c<0,'GGZJ.VV','GGZJ.VV1'));DAS:=DATACOUNT;D0:=RQ[DAS];//取最后日期variable:DM[HYs]='',vcp[HYs]=0,vci[HYs]=0,TP=0;for k=1 to HYs do beginDDD:=STKFROMBLK(HY,k);DM[k]:=DDD;TMP:=STKINDI(DDD,DYZB1,0,6);TMPD:=STKINDI(DDD,'GGZJ.DD',0,6);vcp[k]:=TMP[DAS];vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股TP:=TP+IF(vci[k]=-1000,1,0);end;PX1:=SORTPOS(vci,1,1,HYs);DRAWTEXTEX(islastbar,1,280,50,'昨日攻击资金前五名'),Color20FF20;DRAWTEXTEX(islastbar,1,275,250,'①'+STKNAMEEX(DM[vci[1]])+':'+numtostr(vcp[vci[1]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,275,400,'②'+STKNAMEEX(DM[vci[2]])+':'+numtostr(vcp[vci[2]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,275,550,'③'+STKNAMEEX(DM[vci[3]])+':'+numtostr(vcp[vci[3]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,275,700,'④'+STKNAMEEX(DM[vci[4]])+':'+numtostr(vcp[vci[4]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,275,850,'⑤'+STKNAMEEX(DM[vci[5]])+':'+numtostr(vcp[vci[5]],2)),Color0000FF;DYZB2:=IF(c>0,'GGZJ.前天',IF(c<0,'GGZJ.VV','GGZJ.VV1'));DAS:=DATACOUNT;D0:=RQ[DAS];//取最后日期variable:DM[HYs]='',vcp[HYs]=0,vci[HYs]=0,TP=0;for k=1 to HYs do beginDDD:=STKFROMBLK(HY,k);DM[k]:=DDD;TMP:=STKINDI(DDD,DYZB2,0,6);TMPD:=STKINDI(DDD,'GGZJ.DD',0,6);vcp[k]:=TMP[DAS];vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股TP:=TP+IF(vci[k]=-1000,1,0);end;PX1:=SORTPOS(vci,1,1,HYs);DRAWTEXTEX(islastbar,1,550,50,'前天攻击资金前五名'),ColorF7A700;DRAWTEXTEX(islastbar,1,545,250,'①'+STKNAMEEX(DM[vci[1]])+':'+numtostr(vcp[vci[1]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,545,400,'②'+STKNAMEEX(DM[vci[2]])+':'+numtostr(vcp[vci[2]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,545,550,'③'+STKNAMEEX(DM[vci[3]])+':'+numtostr(vcp[vci[3]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,545,700,'④'+STKNAMEEX(DM[vci[4]])+':'+numtostr(vcp[vci[4]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,545,850,'⑤'+STKNAMEEX(DM[vci[5]])+':'+numtostr(vcp[vci[5]],2)),Color0000FF;DYZB3:=IF(c>0,'GGZJ.一周',IF(c<0,'GGZJ.VV','GGZJ.VV1'));DAS:=DATACOUNT;D0:=RQ[DAS];//取最后日期variable:DM[HYs]='',vcp[HYs]=0,vci[HYs]=0,TP=0;for k=1 to HYs do beginDDD:=STKFROMBLK(HY,k);DM[k]:=DDD;TMP:=STKINDI(DDD,DYZB3,0,6);TMPD:=STKINDI(DDD,'GGZJ.DD',0,6);vcp[k]:=TMP[DAS];vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股TP:=TP+IF(vci[k]=-1000,1,0);end;PX1:=SORTPOS(vci,1,1,HYs);DRAWTEXTEX(islastbar,1,820,50,'一周攻击资金前五名'),Color0000FF;DRAWTEXTEX(islastbar,1,815,250,'①'+STKNAMEEX(DM[vci[1]])+':'+numtostr(vcp[vci[1]],2)),ColorF000F0;DRAWTEXTEX(islastbar,1,815,400,'②'+STKNAMEEX(DM[vci[2]])+':'+numtostr(vcp[vci[2]],2)),ColorF000F0;DRAWTEXTEX(islastbar,1,815,550,'③'+STKNAMEEX(DM[vci[3]])+':'+numtostr(vcp[vci[3]],2)),ColorF000F0;DRAWTEXTEX(islastbar,1,815,700,'④'+STKNAMEEX(DM[vci[4]])+':'+numtostr(vcp[vci[4]],2)),ColorF000F0;DRAWTEXTEX(islastbar,1,815,850,'⑤'+STKNAMEEX(DM[vci[5]])+':'+numtostr(vcp[vci[5]],2)),ColorF000F0;DYZB4:=IF(c>0,'GGZJ.日涨幅',IF(c<0,'GGZJ.VV','GGZJ.VV1'));DAS:=DATACOUNT;D0:=RQ[DAS];//取最后日期variable:DM[HYs]='',vcp[HYs]=0,vci[HYs]=0,TP=0;for k=1 to HYs do beginDDD:=STKFROMBLK(HY,k);DM[k]:=DDD;TMP:=STKINDI(DDD,DYZB4,0,6);TMPD:=STKINDI(DDD,'GGZJ.DD',0,6);vcp[k]:=TMP[DAS];vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股TP:=TP+IF(vci[k]=-1000,1,0);end;PX1:=SORTPOS(vci,1,1,HYs);//PX2:=SORTPOS(vcp,1,1,HYs);KHYS:=HYS-TP,LINETHICK;IF KHYS<2 THEN EXIT;EXPLAIN(ISLASTBAR,'日涨跌幅领先前五名'),Color01ACFE;EXPLAIN(ISLASTBAR,' ①'+STKNAMEEX(DM[vci[1]])+' '+numtostr(vcp[vci[1]],2)+'%'),Color0000F9;EXPLAIN(ISLASTBAR and KHYS>1,' ②'+STKNAMEEX(DM[vci[2]])+' '+numtostr(vcp[vci[2]],2)+'%'),Color0000F9;IF KHYS<3 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>2,' ③'+STKNAMEEX(DM[vci[3]])+''+numtostr(vcp[vci[3]],2)+'%'),Color0000F9;IF KHYS<4 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>3,' ④'+STKNAMEEX(DM[vci[4]])+' '+numtostr(vcp[vci[4]],2)+'%'),Color0000F9;IF KHYS<5 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>4,' ⑤'+STKNAMEEX(DM[vci[5]])+' '+numtostr(vcp[vci[5]],2)+'%'),Color0000F9;IF KHYS<6 THEN EXIT;EXPLAIN(ISLASTBAR,'\n日涨跌幅滞后前五名'),ColorFD9617;EXPLAIN(ISLASTBAR,' ①'+STKNAMEEX(DM[vci[KHYs]])+' '+numtostr(vcp[vci[KHYs]],2)+'%'+' \n ②'+STKNAMEEX(DM[vci[KHYs-1]])+' '+numtostr(vcp[vci[KHYs-1]],2)+'%'+' \n ③'+STKNAMEEX(DM[vci[KHYs-2]])+' '+numtostr(vcp[vci[KHYs-2]],2)+'%'+' \n ④'+STKNAMEEX(DM[vci[KHYs-3]])+' '+numtostr(vcp[vci[KHYs-3]],2)+'%'+' \n ⑤'+STKNAMEEX(DM[vci[KHYs-4]])+' '+numtostr(vcp[vci[KHYs-4]],2)+'%'),Color00A800;DYZB4:=IF(c>0,'GGZJ.周涨幅',IF(c<0,'GGZJ.VV','GGZJ.VV1'));DAS:=DATACOUNT;D0:=RQ[DAS];//取最后日期variable:DM[HYs]='',vcp[HYs]=0,vci[HYs]=0,TP=0;for k=1 to HYs do beginDDD:=STKFROMBLK(HY,k);DM[k]:=DDD;TMP:=STKINDI(DDD,DYZB4,0,6);TMPD:=STKINDI(DDD,'GGZJ.DD',0,6);vcp[k]:=TMP[DAS];vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股TP:=TP+IF(vci[k]=-1000,1,0);end;PX1:=SORTPOS(vci,1,1,HYs);//PX2:=SORTPOS(vcp,1,1,HYs);KHYS1:=HYS-TP,LINETHICK;IF KHYS<2 THEN EXIT;EXPLAIN(ISLASTBAR,'\n周涨跌幅领先前五名'),Color01ACFE;EXPLAIN(ISLASTBAR,' ①'+STKNAMEEX(DM[vci[1]])+' '+numtostr(vcp[vci[1]],2)+'%'),Color0000F9;EXPLAIN(ISLASTBAR and KHYS>1,' ②'+STKNAMEEX(DM[vci[2]])+' '+numtostr(vcp[vci[2]],2)+'%'),Color0000F9;IF KHYS<3 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>2,' ③'+STKNAMEEX(DM[vci[3]])+' '+numtostr(vcp[vci[3]],2)+'%'),Color0000F9;IF KHYS<4 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>3,' ④'+STKNAMEEX(DM[vci[4]])+' '+numtostr(vcp[vci[4]],2)+'%'),Color0000F9;IF KHYS<5 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>4,' ⑤'+STKNAMEEX(DM[vci[5]])+' '+numtostr(vcp[vci[5]],2)+'%'),Color0000F9;IF KHYS<6 THEN EXIT;EXPLAIN(ISLASTBAR,'\n周涨跌幅滞后前五名'),ColorFD9617;EXPLAIN(ISLASTBAR,' ①'+STKNAMEEX(DM[vci[KHYs]])+' '+numtostr(vcp[vci[KHYs]],2)+'%'+' \n ②'+STKNAMEEX(DM[vci[KHYs-1]])+' '+numtostr(vcp[vci[KHYs-1]],2)+'%'+' \n ③'+STKNAMEEX(DM[vci[KHYs-2]])+' '+numtostr(vcp[vci[KHYs-2]],2)+'%'+' \n ④'+STKNAMEEX(DM[vci[KHYs-3]])+' '+numtostr(vcp[vci[KHYs-3]],2)+'%'+' \n ⑤'+STKNAMEEX(DM[vci[KHYs-4]])+' '+numtostr(vcp[vci[KHYs-4]],2)+'%'),Color00A800;explain(islastbar,'\n\n\n '),Color36C7FE;{GGZJ}CC:=C;HH:=H;LL:=L;a1:=AMOUNT/(100*vol);a:=(CC-a1)/(H-L);AA:=sum(a*V,1);一日:aa/CAPITAL*10000;AA1:=REF(AA,1);昨日:aa1/CAPITAL*10000;AA2:=REF(AA,2);;前天:aa2/CAPITAL*10000;AA3:=sum(a*V,5);一周:aa3/CAPITAL*10000;VV:V/CAPITAL*100;VV1:1/2*V/CAPITAL*100;DD:DATE;日涨幅:(c/REF(c,1)-1)*100;周涨幅:(c/REF(c,5)-1)*100;{板块个股分析2}DRAWGBK((CLOSE > 0),COLORRGB(0,0,0),COLORRGB(0,0,0),1);RQ:=DATE;//取日期A:=BLKNAME;HY:=STRLEFT(A,STRFIND(A,',',1)-1);HYs:=STKCOUNT(HY);板块个股数:HYs,LINETHICK0;DYZB:=IF(c>0,'GGZJ.一日',IF(c<0,'GGZJ.VV','GGZJ.VV1'));DAS:=DATACOUNT;D0:=RQ[DAS];//取最后日期variable:DM[HYs]='',vcp[HYs]=0,vci[HYs]=0,TP=0;for k=1 to HYs do beginDDD:=STKFROMBLK(HY,k);DM[k]:=DDD;TMP:=STKINDI(DDD,DYZB,0,6);TMPD:=STKINDI(DDD,'GGZJ.DD',0,6);vcp[k]:=TMP[DAS];vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股TP:=TP+IF(vci[k]=-1000,1,0);end;PX1:=SORTPOS(vci,1,1,HYs);DRAWTEXTEX(islastbar,1,115,50,'[当日攻击资金前十名]'),Color1080FA; DRAWTEXTEX(islastbar,1,10,250,'1:'+STKNAMEEX(DM[vci[1]])+':'+numtostr(vcp[vci[1]],2)),Color0000FF; DRAWTEXTEX(islastbar,1,10,400,'2:'+STKNAMEEX(DM[vci[2]])+':'+numtostr(vcp[vci[2]],2)),Color0000FF; DRAWTEXTEX(islastbar,1,10,550,'3:'+STKNAMEEX(DM[vci[3]])+':'+numtostr(vcp[vci[3]],2)),Color0000FF; DRAWTEXTEX(islastbar,1,10,700,'4:'+STKNAMEEX(DM[vci[4]])+':'+numtostr(vcp[vci[4]],2)),Color0000FF; DRAWTEXTEX(islastbar,1,10,850,'5:'+STKNAMEEX(DM[vci[5]])+':'+numtostr(vcp[vci[5]],2)),Color0000FF; DRAWTEXTEX(islastbar,1,275,250,'6:'+STKNAMEEX(DM[vci[6]])+':'+numtostr(vcp[vci[6]],2)),Color0000FF; DRAWTEXTEX(islastbar,1,275,400,'7:'+STKNAMEEX(DM[vci[7]])+':'+numtostr(vcp[vci[7]],2)),Color0000FF; DRAWTEXTEX(islastbar,1,275,550,'8:'+STKNAMEEX(DM[vci[8]])+':'+numtostr(vcp[vci[8]],2)),Color0000FF; DRAWTEXTEX(islastbar,1,275,700,'9:'+STKNAMEEX(DM[vci[9]])+':'+numtostr(vcp[vci[9]],2)),Color0000FF; DRAWTEXTEX(islastbar,1,275,850,'10:'+STKNAMEEX(DM[vci[10]])+':'+numtostr(vcp[vci[10]],2)),Color0000FF;DYZB:=IF(c>0,'GGZJ.一日',IF(c<0,'GGZJ.VV','GGZJ.VV1'));DAS:=DATACOUNT;D0:=RQ[DAS];//取最后日期variable:DM[HYs]='',vcp[HYs]=0,vci[HYs]=0,TP=0;for k=1 to HYs do beginDDD:=STKFROMBLK(HY,k);DM[k]:=DDD;TMP:=STKINDI(DDD,DYZB,0,6);TMPD:=STKINDI(DDD,'GGZJ.DD',0,6);vcp[k]:=TMP[DAS];vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股TP:=TP+IF(vci[k]=-1000,1,0);end;PX1:=SORTPOS(vci,0,1,HYs);DRAWTEXTEX(islastbar,1,650,50,'[当日攻击资金后十名]'),Color00FF33; DRAWTEXTEX(islastbar,1,545,250,'1:'+STKNAMEEX(DM[vci[1]])+':'+numtostr(vcp[vci[1]],2)),Color00FF33; DRAWTEXTEX(islastbar,1,545,400,'2:'+STKNAMEEX(DM[vci[2]])+':'+numtostr(vcp[vci[2]],2)),Color00FF33; DRAWTEXTEX(islastbar,1,545,550,'3:'+STKNAMEEX(DM[vci[3]])+':'+numtostr(vcp[vci[3]],2)),Color00FF33; DRAWTEXTEX(islastbar,1,545,700,'4:'+STKNAMEEX(DM[vci[4]])+':'+numtostr(vcp[vci[4]],2)),Color00FF33; DRAWTEXTEX(islastbar,1,545,850,'5:'+STKNAMEEX(DM[vci[5]])+':'+numtostr(vcp[vci[5]],2)),Color00FF33; DRAWTEXTEX(islastbar,1,815,250,'6:'+STKNAMEEX(DM[vci[6]])+':'+numtostr(vcp[vci[6]],2)),Color00FF33; DRAWTEXTEX(islastbar,1,815,400,'7:'+STKNAMEEX(DM[vci[7]])+':'+numtostr(vcp[vci[7]],2)),Color00FF33; DRAWTEXTEX(islastbar,1,815,550,'8:'+STKNAMEEX(DM[vci[8]])+':'+numtostr(vcp[vci[8]],2)),Color00FF33; DRAWTEXTEX(islastbar,1,815,700,'9:'+STKNAMEEX(DM[vci[9]])+':'+numtostr(vcp[vci[9]],2)),Color00FF33; DRAWTEXTEX(islastbar,1,815,850,'10:'+STKNAMEEX(DM[vci[10]])+':'+numtostr(vcp[vci[10]],2)),Color00FF33;DYZB4:=IF(c>0,'GGZJ.日涨幅',IF(c<0,'GGZJ.VV','GGZJ.VV1'));DAS:=DATACOUNT;D0:=RQ[DAS];//取最后日期variable:DM[HYs]='',vcp[HYs]=0,vci[HYs]=0,TP=0;for k=1 to HYs do beginDDD:=STKFROMBLK(HY,k);DM[k]:=DDD;TMP:=STKINDI(DDD,DYZB4,0,6);TMPD:=STKINDI(DDD,'GGZJ.DD',0,6);vcp[k]:=TMP[DAS];vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股TP:=TP+IF(vci[k]=-1000,1,0);end;PX1:=SORTPOS(vci,1,1,HYs);//PX2:=SORTPOS(vcp,1,1,HYs);KHYS:=HYS-TP,LINETHICK;IF KHYS<2 THEN EXIT;EXPLAIN(ISLASTBAR,'[日涨跌幅领先前十五名]'),Color00FFFF;EXPLAIN(ISLASTBAR,' 1: '+STKNAMEEX(DM[vci[1]])+' '+numtostr(vcp[vci[1]],2)+'%'),Color0000F9;EXPLAIN(ISLASTBAR and KHYS>1,' 2: '+STKNAMEEX(DM[vci[2]])+' '+numtostr(vcp[vci[2]],2)+'%'),Color0000F9;IF KHYS<3 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>2,' 3: '+STKNAMEEX(DM[vci[3]])+' '+numtostr(vcp[vci[3]],2)+'%'),Color0000F9;IF KHYS<4 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>3,' 4: '+STKNAMEEX(DM[vci[4]])+' '+numtostr(vcp[vci[4]],2)+'%'),Color0000F9;IF KHYS<5 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>4,' 5: '+STKNAMEEX(DM[vci[5]])+' '+numtostr(vcp[vci[5]],2)+'%'),Color0000F9;IF KHYS<6 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>5,' 6: '+STKNAMEEX(DM[vci[6]])+' '+numtostr(vcp[vci[6]],2)+'%'),Color0000F9;IF KHYS<7 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>6,' 7: '+STKNAMEEX(DM[vci[7]])+' '+numtostr(vcp[vci[7]],2)+'%'),Color0000F9;IF KHYS<8 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>7,' 8: '+STKNAMEEX(DM[vci[8]])+' '+numtostr(vcp[vci[8]],2)+'%'),Color0000F9;IF KHYS<9 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>8,' 9: '+STKNAMEEX(DM[vci[9]])+' '+numtostr(vcp[vci[9]],2)+'%'),Color0000F9;IF KHYS<10 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>9,' 10: '+STKNAMEEX(DM[vci[10]])+' '+numtostr(vcp[vci[10]],2)+'%'),Color0000F9;IF KHYS<11 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>10,' 11: '+STKNAMEEX(DM[vci[11]])+' '+numtostr(vcp[vci[11]],2)+'%'),Color0000F9;IF KHYS<12 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>11,' 12: '+STKNAMEEX(DM[vci[12]])+' '+numtostr(vcp[vci[12]],2)+'%'),Color0000F9;IF KHYS<13 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>12,' 13: '+STKNAMEEX(DM[vci[13]])+' '+numtostr(vcp[vci[13]],2)+'%'),Color0000F9;IF KHYS<14 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>13,' 14: '+STKNAMEEX(DM[vci[14]])+' '+numtostr(vcp[vci[14]],2)+'%'),Color0000F9;IF KHYS<15 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>14,' 15: '+STKNAMEEX(DM[vci[15]])+''+numtostr(vcp[vci[15]],2)+'%'),Color0000F9;IF KHYS<16 THEN EXIT;EXPLAIN(ISLASTBAR,'\n[日涨跌幅滞后前十名]'),Color00CCFF;EXPLAIN(ISLASTBAR,' 1: '+STKNAMEEX(DM[vci[KHYs]])+' '+numtostr(vcp[vci[KHYs]],2)+'%'+' \n 2: '+STKNAMEEX(DM[vci[KHYs-1]])+' '+numtostr(vcp[vci[KHYs-1]],2)+'%'+' \n 3: '+STKNAMEEX(DM[vci[KHYs-2]])+' '+numtostr(vcp[vci[KHYs-2]],2)+'%'+' \n 4: '+STKNAMEEX(DM[vci[KHYs-3]])+' '+numtostr(vcp[vci[KHYs-3]],2)+'%'+' \n 5: '+STKNAMEEX(DM[vci[KHYs-4]])+' '+numtostr(vcp[vci[KHYs-4]],2)+'%'+' \n 6: '+STKNAMEEX(DM[vci[KHYs-5]])+' '+numtostr(vcp[vci[KHYs-5]],2)+'%'+' \n 7: '+ STKNAMEEX(DM[vci[KHYs-6]])+' '+numtostr(vcp[vci[KHYs-6]],2)+'%'+' \n 8: '+STKNAMEEX(DM[vci[KHYs-7]])+' '+numtostr(vcp[vci[KHYs-7]],2)+'%'+' \n 9: '+ STKNAMEEX(DM[vci[KHYs-8]])+' '+numtostr(vcp[vci[KHYs-8]],2)+'%'+' \n 10: '+ STKNAMEEX(DM[vci[KHYs-9]])+' '+numtostr(vcp[vci[KHYs-9]],2)+'%'),Color00A800;原文链接：/viewthread.php?tid=2922311先建立引用公式，再建立主公式板块个股分析（引用）{GGZJ}CC:=C;HH:=H;LL:=L;a1:=AMOUNT/(100*vol);a:=(CC-a1)/(H-L);AA:=sum(a*V,1);一日:aa/CAPITAL*10000;AA1:=REF(AA,1);昨日:aa1/CAPITAL*10000;AA2:=REF(AA,2);;前天:aa2/CAPITAL*10000;AA3:=sum(a*V,5);一周:aa3/CAPITAL*10000;VV:V/CAPITAL*100;VV1:1/2*V/CAPITAL*100;DD:DATE;日涨幅:(c/REF(c,1)-1)*100;周涨幅:(c/REF(c,5)-1)*100;{板块个股分析2}DRAWGBK((CLOSE > 0),COLORRGB(0,0,0),COLORRGB(0,0,0),1); RQ:=DATE;//取日期A:=BLKNAME;HY:=STRLEFT(A,STRFIND(A,,,1)-1);HYs:=STKCOUNT(HY);板块个股数:HYs,LINETHICK0;DYZB:=IF(c>0,GGZJ.一日,IF(c<0,GGZJ.VV,GGZJ.VV1));DAS:=DATACOUNT;D0:=RQ[DAS];//取最后日期variable:DM[HYs]=,vcp[HYs]=0,vci[HYs]=0,TP=0;for k=1 to HYs do beginDDD:=STKFROMBLK(HY,k);DM[k]:=DDD;TMP:=STKINDI(DDD,DYZB,0,6);TMPD:=STKINDI(DDD,GGZJ.DD,0,6);vcp[k]:=TMP[DAS];vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股TP:=TP+IF(vci[k]=-1000,1,0);end;PX1:=SORTPOS(vci,1,1,HYs);DRAWTEXTEX(islastbar,1,115,50,[当日攻击资金前十名]),Color1080FA;DRAWTEXTEX(islastbar,1,10,250,1:+STKNAMEEX(DM[vci[1]])+:+numtostr(vcp[vci[1]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,10,400,2:+STKNAMEEX(DM[vci[2]])+:+numtostr(vcp[vci[2]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,10,550,3:+STKNAMEEX(DM[vci[3]])+:+numtostr(vcp[vci[3]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,10,700,4:+STKNAMEEX(DM[vci[4]])+:+numtostr(vcp[vci[4]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,10,850,5:+STKNAMEEX(DM[vci[5]])+:+numtostr(vcp[vci[5]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,275,250,6:+STKNAMEEX(DM[vci[6]])+:+numtostr(vcp[vci[6]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,275,400,7:+STKNAMEEX(DM[vci[7]])+:+numtostr(vcp[vci[7]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,275,550,8:+STKNAMEEX(DM[vci[8]])+:+numtostr(vcp[vci[8]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,275,700,9:+STKNAMEEX(DM[vci[9]])+:+numtostr(vcp[vci[9]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,275,850,10:+STKNAMEEX(DM[vci[10]])+:+numtostr(vcp[vci[10]],2)),Color0000FF;DYZB:=IF(c>0,GGZJ.一日,IF(c<0,GGZJ.VV,GGZJ.VV1));DAS:=DATACOUNT;D0:=RQ[DAS];//取最后日期variable:DM[HYs]=,vcp[HYs]=0,vci[HYs]=0,TP=0;for k=1 to HYs do beginDDD:=STKFROMBLK(HY,k);DM[k]:=DDD;TMP:=STKINDI(DDD,DYZB,0,6);TMPD:=STKINDI(DDD,GGZJ.DD,0,6);vcp[k]:=TMP[DAS];vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股TP:=TP+IF(vci[k]=-1000,1,0);end;PX1:=SORTPOS(vci,0,1,HYs);DRAWTEXTEX(islastbar,1,650,50,[当日攻击资金后十名]),Color00FF33;DRAWTEXTEX(islastbar,1,545,250,1:+STKNAMEEX(DM[vci[1]])+:+numtostr(vcp[vci[1]],2)),Color00FF33;DRAWTEXTEX(islastbar,1,545,400,2:+STKNAMEEX(DM[vci[2]])+:+numtostr(vcp[vci[2]],2)),Color00FF33;DRAWTEXTEX(islastbar,1,545,550,3:+STKNAMEEX(DM[vci[3]])+:+numtostr(vcp[vci[3]],2)),Color00FF33;DRAWTEXTEX(islastbar,1,545,700,4:+STKNAMEEX(DM[vci[4]])+:+numtostr(vcp[vci[4]],2)),Color00FF33;DRAWTEXTEX(islastbar,1,545,850,5:+STKNAMEEX(DM[vci[5]])+:+numtostr(vcp[vci[5]],2)),Color00FF33;DRAWTEXTEX(islastbar,1,815,250,6:+STKNAMEEX(DM[vci[6]])+:+numtostr(vcp[vci[6]],2)),Color00FF33;DRAWTEXTEX(islastbar,1,815,400,7:+STKNAMEEX(DM[vci[7]])+:+numtostr(vcp[vci[7]],2)),Color00FF33;DRAWTEXTEX(islastbar,1,815,550,8:+STKNAMEEX(DM[vci[8]])+:+numtostr(vcp[vci[8]],2)),Color00FF33;DRAWTEXTEX(islastbar,1,815,700,9:+STKNAMEEX(DM[vci[9]])+:+numtostr(vcp[vci[9]],2)),Color00FF33;DRAWTEXTEX(islastbar,1,815,850,10:+STKNAMEEX(DM[vci[10]])+:+numtostr(vcp[vci[10]],2)),Color00FF33;DYZB4:=IF(c>0,GGZJ.日涨幅,IF(c<0,GGZJ.VV,GGZJ.VV1));DAS:=DATACOUNT;D0:=RQ[DAS];//取最后日期variable:DM[HYs]=,vcp[HYs]=0,vci[HYs]=0,TP=0;for k=1 to HYs do beginDDD:=STKFROMBLK(HY,k);DM[k]:=DDD;TMP:=STKINDI(DDD,DYZB4,0,6);TMPD:=STKINDI(DDD,GGZJ.DD,0,6);vcp[k]:=TMP[DAS];vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股TP:=TP+IF(vci[k]=-1000,1,0);end;PX1:=SORTPOS(vci,1,1,HYs);//PX2:=SORTPOS(vcp,1,1,HYs);KHYS:=HYS-TP,LINETHICK;IF KHYS<2 THEN EXIT;EXPLAIN(ISLASTBAR,[日涨跌幅领先前十五名]),Color00FFFF;EXPLAIN(ISLASTBAR, 1: +STKNAMEEX(DM[vci[1]])++numtostr(vcp[vci[1]],2)+%),Color0000F9;EXPLAIN(ISLASTBAR and KHYS>1, 2: +STKNAMEEX(DM[vci[2]])+ +numtostr(vcp[vci[2]],2)+%),Color0000F9;IF KHYS<3 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>2, 3: +STKNAMEEX(DM[vci[3]])+ +numtostr(vcp[vci[3]],2)+%),Color0000F9;IF KHYS<4 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>3, 4: +STKNAMEEX(DM[vci[4]])+ +numtostr(vcp[vci[4]],2)+%),Color0000F9;IF KHYS<5 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>4, 5: +STKNAMEEX(DM[vci[5]])+ +numtostr(vcp[vci[5]],2)+%),Color0000F9;IF KHYS<6 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>5, 6: +STKNAMEEX(DM[vci[6]])+ +numtostr(vcp[vci[6]],2)+%),Color0000F9;IF KHYS<7 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>6, 7: +STKNAMEEX(DM[vci[7]])+ +numtostr(vcp[vci[7]],2)+%),Color0000F9;IF KHYS<8 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>7, 8: +STKNAMEEX(DM[vci[8]])+ +numtostr(vcp[vci[8]],2)+%),Color0000F9;IF KHYS<9 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>8, 9: +STKNAMEEX(DM[vci[9]])++numtostr(vcp[vci[9]],2)+%),Color0000F9;IF KHYS<10 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>9, 10: +STKNAMEEX(DM[vci[10]])+ +numtostr(vcp[vci[10]],2)+%),Color0000F9;IF KHYS<11 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>10, 11: +STKNAMEEX(DM[vci[11]])+ +numtostr(vcp[vci[11]],2)+%),Color0000F9;IF KHYS<12 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>11, 12: +STKNAMEEX(DM[vci[12]])+ +numtostr(vcp[vci[12]],2)+%),Color0000F9;IF KHYS<13 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>12, 13: +STKNAMEEX(DM[vci[13]])+ +numtostr(vcp[vci[13]],2)+%),Color0000F9;IF KHYS<14 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>13, 14: +STKNAMEEX(DM[vci[14]])+ +numtostr(vcp[vci[14]],2)+%),Color0000F9;IF KHYS<15 THEN EXIT;EXPLAIN(ISLASTBAR and KHYS>14, 15: +STKNAMEEX(DM[vci[15]])+ +numtostr(vcp[vci[15]],2)+%),Color0000F9;IF KHYS<16 THEN EXIT;EXPLAIN(ISLASTBAR,\n[日涨跌幅滞后前十名]),Color00CCFF;EXPLAIN(ISLASTBAR, 1: +STKNAMEEX(DM[vci[KHYs]])++numtostr(vcp[vci[KHYs]],2)+%+ \n 2: +STKNAMEEX(DM[vci[KHYs-1]])+ +numtostr(vcp[vci[KHYs-1]],2)+%+ \n 3: +STKNAMEEX(DM[vci[KHYs-2]])+ +numtostr(vcp[vci[KHYs-2]],2)+%+ \n 4: +STKNAMEEX(DM[vci[KHYs-3]])+ +numtostr(vcp[vci[KHYs-3]],2)+%+\n 5: +STKNAMEEX(DM[vci[KHYs-4]])++numtostr(vcp[vci[KHYs-4]],2)+%+ \n 6: +STKNAMEEX(DM[vci[KHYs-5]])+ +numtostr(vcp[vci[KHYs-5]],2)+%+ \n 7: +STKNAMEEX(DM[vci[KHYs-6]])+ +numtostr(vcp[vci[KHYs-6]],2)+%+ \n 8: +STKNAMEEX(DM[vci[KHYs-7]])+ +numtostr(vcp[vci[KHYs-7]],2)+%+\n 9: + STKNAMEEX(DM[vci[KHYs-8]])++numtostr(vcp[vci[KHYs-8]],2)+%+ \n 10: +STKNAMEEX(DM[vci[KHYs-9]])++numtostr(vcp[vci[KHYs-9]],2)+%),Color00A800;{GGZJ}CC:=C;HH:=H;LL:=L;a1:=AMOUNT/(100*vol);a:=(CC-a1)/(H-L);AA:=sum(a*V,1);一日:aa/CAPITAL*10000;AA1:=REF(AA,1);昨日:aa1/CAPITAL*10000;AA2:=REF(AA,2);;前天:aa2/CAPITAL*10000;AA3:=sum(a*V,5);一周:aa3/CAPITAL*10000;VV:V/CAPITAL*100;VV1:1/2*V/CAPITAL*100;DD:DATE;日涨幅:(c/REF(c,1)-1)*100;周涨幅:(c/REF(c,5)-1)*100;{板块个股分析2}DRAWGBK((CLOSE > 0),COLORRGB(0,0,0),COLORRGB(0,0,0),1); RQ:=DATE;//取日期A:=BLKNAME;HY:=STRLEFT(A,STRFIND(A,',',1)-1);HYs:=STKCOUNT(HY);板块个股数:HYs,LINETHICK0;DYZB:=IF(c>0,'GGZJ.一日',IF(c<0,'GGZJ.VV','GGZJ.VV1'));DAS:=DATACOUNT;D0:=RQ[DAS];//取最后日期variable:DM[HYs]='',vcp[HYs]=0,vci[HYs]=0,TP=0;for k=1 to HYs do beginDDD:=STKFROMBLK(HY,k);DM[k]:=DDD;TMP:=STKINDI(DDD,DYZB,0,6);TMPD:=STKINDI(DDD,'GGZJ.DD',0,6);vcp[k]:=TMP[DAS];vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股TP:=TP+IF(vci[k]=-1000,1,0);end;PX1:=SORTPOS(vci,1,1,HYs);DRAWTEXTEX(islastbar,1,115,50,'[当日攻击资金前十名]'),Color1080FA; DRAWTEXTEX(islastbar,1,10,250,'1:'+STKNAMEEX(DM[vci[1]])+':'+numtostr(vcp[vci[1]],2)),Color0000FF; DRAWTEXTEX(islastbar,1,10,400,'2:'+STKNAMEEX(DM[vci[2]])+':'+numtostr(vcp[vci[2]],2)),Color0000FF; DRAWTEXTEX(islastbar,1,10,550,'3:'+STKNAMEEX(DM[vci[3]])+':'+numtostr(vcp[vci[3]],2)),Color0000FF; DRAWTEXTEX(islastbar,1,10,700,'4:'+STKNAMEEX(DM[vci[4]])+':'+numtostr(vcp[vci[4]],2)),Color0000FF; DRAWTEXTEX(islastbar,1,10,850,'5:'+STKNAMEEX(DM[vci[5]])+':'+numtostr(vcp[vci[5]],2)),Color0000FF; DRAWTEXTEX(islastbar,1,275,250,'6:'+STKNAMEEX(DM[vci[6]])+':'+numtostr(vcp[vci[6]],2)),Color0000FF; DRAWTEXTEX(islastbar,1,275,400,'7:'+STKNAMEEX(DM[vci[7]])+':'+numtostr(vcp[vci[7]],2)),Color0000FF; DRAWTEXTEX(islastbar,1,275,550,'8:'+STKNAMEEX(DM[vci[8]])+':'+numtostr(vcp[vci[8]],2)),Color0000FF; DRAWTEXTEX(islastbar,1,275,700,'9:'+STKNAMEEX(DM[vci[9]])+':'+numtostr(vcp[vci[9]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,275,850,'10:'+STKNAMEEX(DM[vci[10]])+':'+numtostr(vcp[vci[10]],2)),Color0000FF;DYZB:=IF(c>0,'GGZJ.一日',IF(c<0,'GGZJ.VV','GGZJ.VV1'));DAS:=DATACOUNT;D0:=RQ[DAS];//取最后日期variable:DM[HYs]='',vcp[HYs]=0,vci[HYs]=0,TP=0;for k=1 to HYs do beginDDD:=STKFROMBLK(HY,k);DM[k]:=DDD;TMP:=STKINDI(DDD,DYZB,0,6);TMPD:=STKINDI(DDD,'GGZJ.DD',0,6);vcp[k]:=TMP[DAS];vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股TP:=TP+IF(vci[k]=-1000,1,0);end;PX1:=SORTPOS(vci,0,1,HYs);DRAWTEXTEX(islastbar,1,650,50,'[当日攻击资金后十名]'),Color00FF33; DRAWTEXTEX(islastbar,1,545,250,'1:'+STKNAMEEX(DM[vci[1]])+':'+numtostr(vcp[vci[1]],2)),Color00FF33; DRAWTEXTEX(islastbar,1,545,400,'2:'+STKNAMEEX(DM[vci[2]])+':'+numtostr(vcp[vci[2]],2)),Color00FF33; DRAWTEXTEX(islastbar,1,545,550,'3:'+STKNAMEEX(DM[vci[3]])+':'+numtostr(vcp[vci[3]],2)),Color00FF33; DRAWTEXTEX(islastbar,1,545,700,'4:'+STKNAMEEX(DM[vci[4]])+':'+numtostr(vcp[vci[4]],2)),Color00FF33; DRAWTEXTEX(islastbar,1,545,850,'5:'+STKNAMEEX(DM[vci[5]])+':'+numtostr(vcp[vci[5]],2)),Color00FF33; DRAWTEXTEX(islastbar,1,815,250,'6:'+STKNAMEEX(DM[vci[6]])+':'+numtostr(vcp[vci[6]],2)),Color00FF33; DRAWTEXTEX(islastbar,1,815,400,'7:'+STKNAMEEX(DM[vci[7]])+':'+numtostr(vcp[vci[7]],2)),Color00FF33; DRAWTEXTEX(islastbar,1,815,550,'8:'+STKNAMEEX(DM[vci[8]])+':'+numtostr(vcp[vci[8]],2)),Color00FF33; DRAWTEXTEX(islastbar,1,815,700,'9:'+STKNAMEEX(DM[vci[9]])+':'+numtostr(vcp[vci[9]],2)),Color00FF33; DRAWTEXTEX(islastbar,1,815,850,'10:'+STKNAMEEX(DM[vci[10]])+':'+numtostr(vcp[vci[10]],2)),Color00FF33;DYZB4:=IF(c>0,'GGZJ.日涨幅',IF(c<0,'GGZJ.VV','GGZJ.VV1'));DAS:=DATACOUNT;D0:=RQ[DAS];//取最后日期variable:DM[HYs]='',vcp[HYs]=0,vci[HYs]=0,TP=0;for k=1 to HYs do begin。