设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3466|回复: 1

[求助] 请教关于PortalCrane的问题

[复制链接]
 楼主| 发表于 2013-3-4 10:22:38 | 显示全部楼层 |阅读模式
请教关于PortalCrane的问题,实在想不明白。发现placeIsFree调用的一个问题:当通过PortalCrane的Strategy下的自定义可利用位置(Define your own method for searching an available location)时,自定义程序为:/ z1 T% L6 q* L0 t7 z& E( W
(byref x1,y1,z1 : integer; part : object) : boolean% @5 q3 |. u& R, i2 G7 K
is3 S: K* l- H0 Q# P2 E
        i,j,k,w : integer;5 R1 Q' l. @9 L, x& l0 m: K
do
( F1 A+ e' [# V% O8 T9 U: l        for k := 1 to Crane.getStoreZDim loop
5 G+ c  _3 J) f; T1 @6 b                for i := Crane.getStoreXDim downto 1 loop
/ Y6 ~# @7 C0 \) r/ S. I                        for j := 1 to Crane.getStoreYDim  loop% N) A1 t5 D$ d7 _/ k
                                if Crane.placeIsFree(i,j,k) then1 @( f' \9 i$ z+ G
                                        x1 := i;
, W6 Z. w: g/ a                                        y1 := j;  c3 p, Q$ G7 ~4 c1 m7 b
                                        z1 := k;, ^; s- \8 J8 F1 `  i$ v
                                        if Crane.placeIsFree(14,1,2) then
) Y0 q. Y: t4 C1 _9 P  b3 n                                                w:=11 @: X4 @5 N( T9 L+ `5 `3 Y: g
                                        end;
- H5 ^# M8 l' J2 K9 A                                        return true;- r) K% D1 n6 {; i
                                end;
' p! J- U7 [2 ^6 N                        next;6 Q9 k/ n2 h+ h  e
                next;
  m& _6 Q2 [2 I# `. p- _        next;# w9 u1 U* a- r- U" L9 c9 |! {" i4 A
        return false;# r- C" L2 o$ i; O2 {3 H
end;8 w4 I8 c9 `  C5 \
  判断的位置(14,1,2)的Free是True;而在某个程序中直接调用placeIsFree时, 判断的(14,1,2)的Free是False。保证两次判断位置(14,1,2)一直没有被占用。想知道是什么原因?placeIsFre方法到底该如何用?请求赐教?
0 ]* E) F: d' i
发表于 2013-3-4 21:40:37 | 显示全部楼层
你调试一下吧,看下i,j,k的值,肯定不是你说的什么14,1,2,不可能出现在同一个方法中输入相同输出不同的情况。# ~. X$ ~. s6 A. }/ Z$ k! U- |
从目前你的方法看,当两者不同时,PlaceisFree(i,j,k)为真时,PlaceIsFree(14,1,2)可以为假的。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-4-3 15:16 , Processed in 0.016117 second(s), 15 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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