设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 9493|回复: 0

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

[复制链接]
发表于 2008-6-15 18:49:23 | 显示全部楼层 |阅读模式
5仿真币
你好,帮我看个程序,好吗
  v+ q( r1 u. y   这个程序是一个machine的logic,我是想根据part的型号(400号,500号),来执行不同的process.程序编译没错,能够运行.但是运行时Machine中却有两个part(process中只定义需要一个part), X* j  @, K& W: W' s

; ?) t0 Q& M) q8 n' _+ G. \procedure mech_Pro_Type()6 O5 Y+ v. f  T( ^
var
9 F) G8 A% v3 p! w2 |pro1_process,pro2_process:process, z) |2 h0 ?6 W$ E" W! U# S
the_logic:logic
) [1 t' P' Y1 b6 @* nbegin0 t( _# T* k7 [! R
   wait until out part_count 0 9 U/ e5 U; x* m7 W. z( J
   require part any1 Z8 X0 i4 Q# _3 b! x( s% g
   pro1_process=get_process('Mechanism400')" x$ y4 D: ]# k5 V2 m* s9 z
   pro2_process=get_process('Mechanism500')+ ^# r& Y: {1 }. _' P0 o

0 A" a  T& s$ f. b" g   if(cpart<>NULL)then
( H! m# l# s% Y* C       if( cpart->Product_Type==400)then0 b+ x; _) Z3 U- k8 c. ^
            do_process(pro1_process)in state IDLE_IDLE, BUSY_PROCESSING
, h4 r  N3 W9 Z4 X9 I+ a         -- write('装机构工位:正在执行工艺号',cpart->Product_Type,cr)
9 ]! e2 \9 {7 y. f% V7 v3 s% T       else - t5 S0 a* m- q8 b7 K9 w
            do_process(pro2_process)in state IDLE_IDLE, BUSY_PROCESSING 6 ]: E& {2 c3 y1 d% G
          --write('装机构工位:正在执行工艺号',cpart->Product_Type,cr)) N9 c4 Q$ g, c9 h
       endif) U( ?# J' X% }" A) ~1 W
   endif0 s) w0 q+ O0 l. i. O. W
end

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

本版积分规则

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

GMT+8, 2026-6-14 17:25 , Processed in 0.014995 second(s), 11 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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