读取ini文件脚本例子

蓝星际语音平台脚本例子

这些例子都比较简单, 有些比较有趣，您很容易看明白，仔细阅读源程序可以让您迅速入门，也会提高您的水平。
每个例子都有一个说明文档，请您在运行例子之前阅读它。
请将蓝星际平台程序拷贝到相应的目录之下，然后运行。因为有些脚本使用了相对路径，所以建议脚本文件和蓝星际平台程序放在相同的目录。

读取Windows格式.ini文件

说明：

ReadIni.bss - 函数实现和测试脚本
fxsperf.ini - 作为例子的ini文件
这个例子说明了文件操作函数的使用方法，也展示了2维数组的灵活性。
可以将函数ReadIni()包含到实际使用的脚本中去，用来动态读取配置项目。

示例：

// 辅助函数
// 读取Windows格式的.ini文件
// 朱东宁,深圳市蓝星际电子有限公司
// zhudn@bluespace.com.cn
// 2004.09.20
//

// 读取配置文件
// 输入参数: file - Windows格式的.ini文件名
// 输出参数: m - 二维数组, 第一维是段名, 第二维是配置项key - val
//           sNum - 段数目
// 注意：没有段的key, 其段名为空串""
function ReadIni(file, m, sNum)
{
 sNum = 0;
 kNum = 0;
 hd = -1;
 FileOpen(file, "r", hd);
 if( hd<0 )
 {
    return(-1);
 }

 lines = 0;
 FileReadLines(hd, lines);

 FileClose(hd);

 n = 0;
 Len(lines, n);

 ch = "";
 k = 0;
 seg = "";
 for(i=0; i<n; i++)
 {
    s = lines[i];
    Trim(s);
    Substr(s, 0, 1, ch); // 取第一个字符

    if( ch==";" || ch=="#" || ch== "/" ) // 如果是注释行
    {
       continue;
    }

    if( ch=="[" ) // 如果是段
    {
       if( k!=0 )
       {
          m[seg] = k;
       }

       x = 0;
       Strstr(s, "]", x);
       if( x==0 )
       {
          continue;
       }

       len = x - 2;
       Substr(s, 1, len, seg);  // 得到段名
       k = 0;

       continue;
    }

    t = 0;
    AnlyStr(s, "=", t); // 分解串到数组
    if( _retVal<2 )
    {
       continue;
    }

    item = t[0];
    Trim(item);

    val = t[1];
    Trim(val);
    k[item] = val;
 }

 if( k!=0 )
 {
    m[seg] = k;
 }

 t = 0;
 k = 0;
 lines = 0;

 Len(m, sNum);

 return(sNum);
}

// 读取配置项目
// 输入参数: m - 二维数组, 调用ReadIni()的结果
//           seg - 段名
//           key - 关键字
// 输出参数: val - 返回值
// 注意：seg, key, val都是字符串
function ReadIniVal(m, seg, key, val)
{
  val = "";
  v = m[seg];
  t = 0;
  Type(v, t);
  if( t!=4 )
  {
     return(-1);
  }

  val = m[seg][key];
  Type(val, t);
  if( t!=1 )
  {
     return(-2);
  }
  return(0);
}


// 测试流程
m = 0;
n = 0;
ReadIni("fxsperf.ini", m, n);

k = m["languages"];
k1 = k["004"];

// 直接读取Key的值
k2 = m["text"]["004"];
k3 = m["objects"]["004"];

// 使用ReadIniVal()读取Key的值
v = "";
ReadIniVal(m, "info", "symbolfile", v);

return(0);

下载：

脚本＋说明＋ini

Koodoo脚本示例

蓝星际语音平台 脚本例子

读取Windows格式.ini文件

蓝星际语音平台脚本例子