设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 9355|回复: 0

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

[复制链接]
发表于 2008-6-15 18:49:23 | 显示全部楼层 |阅读模式
5仿真币
你好,帮我看个程序,好吗
+ w* P- X2 P) ~! {) I   这个程序是一个machine的logic,我是想根据part的型号(400号,500号),来执行不同的process.程序编译没错,能够运行.但是运行时Machine中却有两个part(process中只定义需要一个part)- [+ C& O: {) a- J9 L# U! W& W/ E

; W" Q1 u) P* C: f/ w+ gprocedure mech_Pro_Type()2 K0 A/ _7 X, H
var
* k+ {6 L$ F% K* t8 k* qpro1_process,pro2_process:process( L- ~/ S( b4 s
the_logic:logic
2 `3 a. f) e: C- Jbegin
1 l" X7 q: F. Q8 a5 g/ v8 q   wait until out part_count 0 ' a$ z! \9 W$ Z# @- s
   require part any. Q' E0 H4 x+ x9 K
   pro1_process=get_process('Mechanism400')9 Z# ~3 P5 [& h# R# n4 \
   pro2_process=get_process('Mechanism500')
4 N9 k9 ?* a* s. B0 \
1 G, ^+ O4 g" ^$ A, I   if(cpart<>NULL)then
- b9 O' S1 `* n+ G       if( cpart->Product_Type==400)then, m2 X9 b/ X& _8 a7 r$ d" W0 N
            do_process(pro1_process)in state IDLE_IDLE, BUSY_PROCESSING
1 R4 s! i& {1 M, ~0 S         -- write('装机构工位:正在执行工艺号',cpart->Product_Type,cr)
4 {6 J  B: k7 M+ I       else
: Z  n6 }) Q0 b1 G            do_process(pro2_process)in state IDLE_IDLE, BUSY_PROCESSING
, u% m0 ~' e. |9 V- r+ ^          --write('装机构工位:正在执行工艺号',cpart->Product_Type,cr)2 T0 c2 r- K, L) W4 H4 {
       endif9 P% K" s: q3 B3 t4 @% q1 @4 N
   endif0 n: L1 I5 O& b0 X) s
end

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

本版积分规则

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

GMT+8, 2026-5-2 18:30 , Processed in 0.015682 second(s), 11 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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