＃＆ｍ：『一障百Ｆ矿『Ｆｆ Ｆ百。

     ｒｉｉ—Ｉ再—ｒ《月＃“Ⅲ ｒ＃＃ｉ∞ｍ≠＆＊：ｒ一厂一ｒ—ｒ一厂一 广广一№月＃“自 『《Ⅻ”Ｍ：广『盯ｒ厨ｉ Ｆ丁。

     ＥｉｉＦ同百∞目＃“自 请输入各原料的配料罔量数据：（单位ｋｇ） 豁ｉＦｒ 自ｉｉ『 《￡■一 到圈 ∞ｒ５阿一 ｎ＆｛ｆ茁一 配料成份蛄襞（Ｋ） 全Ｐ２０５ ｃａ０ １９０ ５ Ｌ０２ ｎｏ ｊｄ．２０３ 瓯西ｆｉ蕊ｉ酉商ｆｉ雨西百ｆ孺爵 一三 玻璃蛄相固子ｏｂ，Ｙ ｂ： 正常 拿钙璃庄８： 正嚣 ｍ目程５｝ 镬咎比Ｍ，ｓ： 正常 图３原料配料计算窗体图 在图３中输入各项化学成分数据 生产批量为磷矿石２９６ｋｇ、烧结矿９６ｋｇ、蛇纹石２１２ｋｇ、白云石１ ０ｋｇ、焦炭８４ｋｇ 点击“进行训算”，即可显示如下： 配料成分结果（％）： 全Ｐ２０ｓ Ｃａ０ ｌ，１９０ Ｓｉ０： Ｆｅ０ ＡＩ。

    ０ ２０ １３ ３２．３ｌ １４ ８１ ２５ ５３ ３ ６５２ ３ ５５７ 玻璃结构因子（ＯｄＹｂ） ２．９５７ 正常 余钙碱度尺 １．２２６ 正常 镁硅比脱俘０．８７０１ 正常 １．３半成品验算功能 在主窗体界面上点击“半成品验算’’按钮，进入半成品验算功能，其程序框图 如图４所示。

     ｌ运行 董务Ｉ妇 篡〕 ～：：‘一一 一一…一ｊ一旦—， ｜显示结果ｌ ●＿————●＿●————●＿＿。

    。

    ——一● —一ｊ…． ！结束 ） 图４半成品验算程序框架图 弹出的“输入半成品数据”窗体见图５。

     在界面的提示下输入钙镁磷肥半成品的全分析数据，然后点击“进行计算”按钮，则显示半成品的玻璃结构因子（ＯｄＹｂ）、余钙碱度Ｒ、镁硅比Ｍ／Ｓ ３个工艺参数的计算值，同样提示计算值与常规控制范围的比较：正常、偏高或偏小。

    结合生产情况，及时进行入炉原料配料的调整，从而达到对半成品进行验算的目的。

     计算举例：我们随机抽取一个钙镁磷肥半成品的全分析数据进行验算，其成分见表２。

     表２钙镁磷肥半成品全分析数据％ （Ｉ）（Ｐ２０５仝） （＾）（Ｐ２０５何） ６０（ＣａＯ） ∞（ＭｇＯ） （Ｉ）（Ｓｉ０２） ∞（ＦｅＯ） ６０（Ａ１２０３） １８．８３ １８．６９ ３０．９７ １６．０８ ２６．０３ ２．３２ ３．６８ 在图５中输入以上数据，点击“进行计算’’，即可显示如下结果： 玻璃结构因子（Ｄ‖６） ２．９７８０ 正常４３６ 垒营低旅班磷耗发鞋Ⅻ讨会蠢料汇犏 余钙碱度Ｒ １ ２８４４ 正常 镁硅比＾ｔ岱 ０ ９２６６２ 币常 请输八钙镁磷肥芈成品化验效拓（∞ 全Ｐ２０５ ｃ日Ｄ Ⅱ８０ Ｓｉ０２ Ｆ∞ Ａ１２０３ 『丽阿『丽『丽阿『 孽 玻璃结构目干ＯｂｌＹｂ： 正常 《目 Ｉ 余钙碱虚Ｒ 正常 ４＆ｇ＃１ 链硅此Ｍ／Ｓ： 正常 图５半成品验算窗体圈 ２程序特点 ２ １综合性 该程序把原料配料计算与半成品核算两项基本计算功能结合为一体．同时与工艺参数控制范围显示功能及时进行对比。

     ２ ２高效性 在编写源程序时，己把各项计算步骤和工艺参数要求嵌入程序中。

    使用时不必考虑计算过程，只需键入相关数据，便可快捷、准确地计算出结果。

     ２ ３实用性 源程序可咀根据实际生产要求对计算程序做出必要的修改与补充，广泛适用于高炉法钙镁磷肥生产的工艺计算，具有较强的推广应用意义。

     ２，４先进性 程序出Ｖｉｓｕａｌ Ｂａｓｉｃ高级语言编写而成．可编译成可执行文什或生成安装程序在任何台式电脑上安装使用，并且界面美观，操作简单。

    对象任务可视化．人机互动对话。

     ３实施条件 （１）台式或便携式电脑１台，Ｗｉｎｄｏｗｓ９８以上操作系统环境； （２）各项原燃料化学成分数据（固定默认值），或半成品全分析数据； （３）工艺技术人员或高中文化以上的高炉值班人员均可操作使用。

     ４效果估算 ４．１节约燃料 我厂粗肥生产的焦炭实物消耗量波动在１７０．７２～１８６．６３ｋｇ／ｔ范围内，平均 １７８．６３ｋｇ／ｔ， 节焦潜力尚有８ｋｇ／ｔ左右。

    如果使用计算程序，结合钙镁磷肥配料相 图进行配料入炉，每吨粗肥可节约８ｋｇ焦炭，按我厂年产１８万ｔ钙镁磷肥计算，每 年可节约焦炭１４４０ｔ。

     ４．２提高产量 据２００２年１月”－－２０