设为首页收藏本站

最大的系统仿真与系统优化公益交流社区

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 7949|回复: 0

[求助] 帮我看个程序,好吗

[复制链接]
发表于 2008-6-15 18:49:23 | 显示全部楼层 |阅读模式
5仿真币
你好,帮我看个程序,好吗9 v$ x7 v9 [0 P7 R3 K5 ?9 H2 V* z
   这个程序是一个machine的logic,我是想根据part的型号(400号,500号),来执行不同的process.程序编译没错,能够运行.但是运行时Machine中却有两个part(process中只定义需要一个part)
) u2 v1 q5 A7 M9 b) U) j
$ I# f! X6 k% qprocedure mech_Pro_Type()
4 ^8 i& H) f: Avar
' R/ R! D7 h3 Y1 R& ~pro1_process,pro2_process:process/ c2 X6 ?# o* v* k4 P7 Z
the_logic:logic
1 M1 y# `2 x- t4 }# Ebegin" ^2 d# z; B4 _% z0 R0 h
   wait until out part_count 0
1 L# z& O; U+ M% p: y+ M0 E* W! f   require part any( _4 l! O) r6 x# y2 B
   pro1_process=get_process('Mechanism400')! _: V; A1 b& _+ A; g3 ]
   pro2_process=get_process('Mechanism500')
3 N3 g* R0 }, T  F/ I( \ 8 \# V) T0 w# ~0 ~3 U7 {
   if(cpart<>NULL)then
5 x: l+ c* x, L. A3 s. x       if( cpart->Product_Type==400)then
' S. C$ N8 f8 W. l$ i9 S2 N            do_process(pro1_process)in state IDLE_IDLE, BUSY_PROCESSING
4 w. ]' V( _3 _1 T         -- write('装机构工位:正在执行工艺号',cpart->Product_Type,cr)4 W7 N/ I7 J9 D9 n
       else
! r3 u4 G5 t: U5 I# R7 O- N4 K            do_process(pro2_process)in state IDLE_IDLE, BUSY_PROCESSING
* j- d- c5 [# C/ V  e" T8 m+ o          --write('装机构工位:正在执行工艺号',cpart->Product_Type,cr)
8 u0 Y: t+ M! U5 Z2 p2 [       endif: o8 J- \9 v6 ?( ~: z
   endif
( _, d9 h& e; J( u9 cend

您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|Archiver|手机版|SimulWay 道于仿真   

GMT+8, 2025-9-17 04:57 , Processed in 0.013969 second(s), 11 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表