帮我编写这个Lingo程序代码

在Lingo中创建这样的线性规划模型，我们需要定义变量、常数、目标函数和约束条件。这里是一个基本框架，假设变量名和数据已经预定义好了：

// 定义变量
var a1_output {1..100} >= 0; // a1产量 (kg)
var a2_output {1..50*8} >= 0; // a2产量 (kg)，注意设备乙的限制
var b1_output {1..floor(a1_output/0.8)} >= 0; // b1产量 (kg)
var b2_output {1..floor(a2_output/0.75)} >= 0; // b2产量 (kg)

// 定义常数
positive constant milk_supply = 50; // 牛奶供应总量 (桶)
positive constant labor_hours = 480; // 工人总工时 (小时)
positive constant cost_a1 = 36 / 3; // 加工a1的成本 per kg
positive constant cost_a2 = 40 / 8; // 加工a2的成本 per kg
positive constant extra_cost_milk = 30; // 增加牛奶成本
positive constant extra_cost_hour = 3; // 增加工时成本

positive constant price_a1 = 24; // a1售价 per kg
positive constant price_a2 = 16; // a2售价 per kg
positive constant price_b1 = 44; // b1售价 per kg
positive constant price_b2 = 32; // b2售价 per kg

// 目标函数 (利润最大化)
maximize profit := price_a1*a1_output + price_a2*a2_output + price_b1*b1_output + price_b2*b2_output
                      - cost_a1*a1_output - cost_a2*a2_output;

// 约束条件
a1_output <= 100; // 设备甲的a1产能限制
a2_output <= 4 * labor_hours / 8; // 设备乙的a2产能限制
b1_output <= 0.8 * a1_output; // 根据a1转换b1的比例
b2_output <= 0.75 * a2_output; // 根据a2转换b2的比例
milk_supply * milk_cost + labor_hours * labor_cost <= budget; // 总成本不超过预算

// 还可以添加关于投资成本的约束
if investment > 0 then
   budget += investment;
end if;

// 输出结果
display "Optimal production plan:\n";
display "A1: ", a1_output, " kg\n";
display "A2: ", a2_output, " kg\n";
display "B1: ", b1_output, " kg\n";
display "B2: ", b2_output, " kg\n";

请注意，这只是一个简化的示例，实际模型可能还需要包括更多细节，例如价格波动的可能性、库存管理等。运行此代码前，你需要确认所有输入值（如价格、成本、供应量等）已正确设定，并且Lingo环境已安装并配置好。另外，对于复杂的问题，你可能需要多次迭代来找到全局最优解，或者使用搜索算法。