Tecnomatix Plant Simulation 14 学习之路（三）

最新推荐文章于 2023-08-08 20:26:13 发布

原创

最新推荐文章于 2023-08-08 20:26:13 发布 · 5.8k 阅读

19 ·

CC 4.0 BY-SA版权

文章标签：

#Plant Simulation

本文介绍了Tecnomatix Plant Simulation 14中模型的建模过程，包括初始化的InitPartsTable方法和Source对象的工作原理。模型中，Source每隔20s产生不同类型的零件，并通过PartsTable表格进行管理。零件按照预设路径经过多个机器处理，最终到达Drain。文中还展示了Load和Leave方法的代码注解，为后续遗传算法的应用铺垫。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

本篇博客主要介绍模型建模过程，以及相应的代码和逻辑解释

从执行模型的角度来说，首先是初始化

HandlingCost := 0
PartsNo :=0
InitPartsTable      --初始化表格
GASequence.delete   --删除GA序列
for var i := 1 to Number_OF_Machine   --与遗传算法有关，用于生成初始序列
	GASequence[1, i] := i
next

InitPartsTable方法释义如下

var Rows, Lines: integer
var MachineName, BufName: string
var Machine, Buf: object

if Number_Of_Machine /= D_From_To_Chart.YDim            --为整数代表True
	switch messageBox("设施数目不对,请核查…", 50, 13)   --数字50表示按钮组合是否取消,数字13表示带有感叹号的黄色三角形。
		case 16    				--1表示确定,2表示取消,16表示是,32表示否。 
			print "yes"
		case 32
			print "no"
		else
			print "Cancel"
		end
	EventController.stop   --事件停止运行
end		

PartsTable.delete          --清空列表
for var i := 1 to Number_Of_Machine 
	for var j := 1 to Number_Of_Machine
		if j < i                                                --表格左下角部分
			if D_From_To_Chart[j,i] <= 0                        --如果左下角小于或者等于0
				D_From_To_Chart[j,i] := D_From_To_Chart[i,j];   --右上角对称对应值填补到左下角
			end
		else
			if j = i                                            --