首页 > 其他 > 详细

在Lu脚本中绘制分层视图

时间:2014-02-13 15:34:48      阅读:478      评论:0      收藏:0      [点我收藏+]

欢迎访问 Lu程序设计

在Lu脚本中绘制分层视图

目  录

1 基础知识 绘制分层视图的基础知识。
2 基本绘图方式 分层视图基本绘图方式。
3 设置属性 给分层视图设置属性。虽然可以通过右键菜单设置属性,但这里是通过脚本函数设置属性。
4 让某一个子图动起来 在分层视图的某一个子图中动态显示图形。

1 基础知识

    绘制分层视图的程序结构如下:

!!!using("win","math");   //使用命名空间win和math。win是必须的,而math是多数情况下要用到的。
init(... ...) =           //定义初始化函数init,函数参数根据需要设置。
{
  cwAttach(typeLayered),  //函数cwAttach用于设置图像类型,typeLayered表示分层视图。
  cwResizePlots(... ...), //设置视图图层数量,见下面的说明。
  ... ...                 //添加初始化数据或属性。
};
ChartWnd[@init];          //显示窗口并调用函数init进行初始化。


    函数 cwResizePlots(...):设置子图数量或图层数量。

    用法:cwResizePlots(nLayers) //设置图层数量,用于分层视图、共享X轴视图,nLayers为大于0的整数。

    返回值:逻辑值,true表示成功。

2 基本绘图方式

!!!using("win","math");
init(x) =
{
  cwAttach[typeLayered], cwResizePlots(3),  //分层视图为3层
  x=linspace[-8.0, 8.0, 0.2],
  cwAddCurve{x, sin(x),    len(x), 0},
  x=linspace[-5.0, 5.0, 0.2],
  cwAddCurve{x, x-sin(x),  len(x), 1},
  x=linspace[ 1.0, 6.0, 0.2],
  cwAddCurve{x, x.*sin(x), len(x), 2}
};
ChartWnd[@init];


bubuko.com,布布扣

3 设置属性

!!!using("win","math");
init(a,b,c,k1,k2,k3,k4)=
{
  cwAttach[typeLayered], cwResizePlots(3), //分层视图为3层
  a=linspace[-8.0, 8.0, 100], b=linspace[-2.0, 5.0, 100], c=linspace[-10.0, -2.0, 100],
  k1=cwAddCurve{a, sin[a], 100,   0},     //给0子图添加曲线k1
  k2=cwAddCurve{a, a-sin[a], 100, 0},     //给0子图添加曲线k2
  k3=cwAddCurve{b, b-sin[b], 100, 1},     //给1子图添加曲线k3
  k4=cwAddCurve{c, c.*sin[c], 100,2},     //给2子图添加曲线k4
  cwSetAxisTitle("0子图X轴", 1, 0),        //给0子图设置坐标轴标题
  cwSetAxisTitle("0子图Y轴", 0, 0),        //给0子图设置坐标轴标题
  cwSetAxisTitle("1子图X轴", 1, 1),        //给1子图设置坐标轴标题
  cwSetAxisTitle("1子图Y轴", 0, 1),        //给1子图设置坐标轴标题
  cwSetAxisTitle("2子图X轴", 1, 2),        //给2子图设置坐标轴标题
  cwSetAxisTitle("2子图Y轴", 0, 2),        //给2子图设置坐标轴标题
  cwSetTitle["0子图曲线属性",0],           //设置主标题
  cwSetTitle["1子图曲线属性",1],           //设置主标题
  cwSetTitle["2子图曲线属性",2],           //设置主标题
  cwSetUseLegend(true,0),                 //设置使用图例
  cwSetUseLegend(true,1),                 //设置使用图例
  cwSetUseLegend(true,2),                 //设置使用图例
  cwSetDataTitle["曲线1",cwGetIndex(k1),0],//设置k1曲线的图例
  cwSetDataTitle["曲线2",cwGetIndex(k2),0],//设置k2曲线的图例
  cwSetDataTitle["曲线3",cwGetIndex(k3),1],//设置k3曲线的图例
  cwSetDataTitle["曲线4",cwGetIndex(k4),2] //设置k4曲线的图例
};
ChartWnd[@init];


bubuko.com,布布扣

4 让某一个子图动起来

!!!using("win","math");
f(x : max, static, k : nDataID, nPlot)= //关键字static指出后面的k是一个静态变量,静态变量总是初始化为0。模块变量nDataID, nPlot记住所操作的曲线。
{
  max=500,
  x=linspace[-9.0, 9.0, max],
  cwUpdateCurveByID[nDataID, x.*sin(x), x.*cos(x).^2.0, ++k%(max+1), nPlot] //++k%(max+1)中的运算符%表示求模
};
init(b,c :: nDataID, nPlot)=           //模块变量nDataID, nPlot记住所操作的曲线。
{
  cwAttach[typeLayered], cwResizePlots(3), //分层视图为3层
  b=linspace[-2.0, 5.0, 100], c=linspace[-10.0, -2.0, 100],
  nPlot=0,                             //模块变量nPlot赋值为0
  nDataID=cwAddCurve(nPlot),           //模块变量nDataID赋值为给0子图添加的空曲线
  cwAddCurve{b, b-sin[b], 100, 1},     //给1子图添加曲线
  cwAddCurve{c, c.*sin[c], 100, 2},    //给2子图添加曲线
  cwSetTimer[@f, 100, true]            //设置通过计时器触发调用的函数f;每隔100毫秒调用一次;true表示立即启动定时器。
};
ChartWnd[@init];


bubuko.com,布布扣


版权所有? Lu程序设计 2002-2014,保留所有权利
E-mail: forcal@sina.com
  QQ:630715621
最近更新: 2014年02月10日

在Lu脚本中绘制分层视图

原文:http://blog.csdn.net/forcal/article/details/19149577

(0)
(0)
   
举报
评论 一句话评论(0
关于我们 - 联系我们 - 留言反馈 - 联系我们:wmxa8@hotmail.com
© 2014 bubuko.com 版权所有
打开技术之扣,分享程序人生!