设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3400|回复: 1

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

[复制链接]
 楼主| 发表于 2013-3-4 10:22:38 | 显示全部楼层 |阅读模式
请教关于PortalCrane的问题,实在想不明白。发现placeIsFree调用的一个问题:当通过PortalCrane的Strategy下的自定义可利用位置(Define your own method for searching an available location)时,自定义程序为:
$ s. u# F/ q; r/ t2 ~1 z(byref x1,y1,z1 : integer; part : object) : boolean4 \  H0 X- o/ B
is( l3 e8 P% L6 j! U0 p
        i,j,k,w : integer;
' h5 d1 v+ Y7 S) o9 H* Ydo
' h7 ^& q) @9 x& T8 e        for k := 1 to Crane.getStoreZDim loop
1 b4 u/ {1 C- C3 R; F! `! V                for i := Crane.getStoreXDim downto 1 loop& ~4 z% R' _  h4 T( Z$ v5 l
                        for j := 1 to Crane.getStoreYDim  loop. b5 ?' r' c1 ]' r0 J
                                if Crane.placeIsFree(i,j,k) then" l. p4 A' |$ E2 @
                                        x1 := i;) s9 d1 m8 \- S0 O7 ^) s. T
                                        y1 := j;
; Y  p- B9 k6 U3 k( V9 c; x                                        z1 := k;
: e1 t+ C4 [. x0 n4 u5 w4 |                                        if Crane.placeIsFree(14,1,2) then
8 h/ f0 q; o5 y5 n/ C4 Z5 _* w. M( M                                                w:=17 g/ |: a& g: z$ D5 c
                                        end;. [8 |: b* v0 g0 E: v  F1 Q% [4 m
                                        return true;
) A2 \9 N3 w/ B5 Q                                end;
- E) o/ o' W& o, @                        next;8 ~* b4 e9 |1 ]& }# T# N7 ^
                next;; w2 O; b) L) ?! @# r/ n3 k# B
        next;0 N$ T8 [0 i. j) C% q9 y( l
        return false;; A. b: c, ]. _9 J
end;. \) t8 ?1 T  _  U
  判断的位置(14,1,2)的Free是True;而在某个程序中直接调用placeIsFree时, 判断的(14,1,2)的Free是False。保证两次判断位置(14,1,2)一直没有被占用。想知道是什么原因?placeIsFre方法到底该如何用?请求赐教?
$ B# a# a$ R# E8 K7 |4 m
发表于 2013-3-4 21:40:37 | 显示全部楼层
你调试一下吧,看下i,j,k的值,肯定不是你说的什么14,1,2,不可能出现在同一个方法中输入相同输出不同的情况。
8 Z4 _$ T. Q( f$ ^! K从目前你的方法看,当两者不同时,PlaceisFree(i,j,k)为真时,PlaceIsFree(14,1,2)可以为假的。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-3-17 18:53 , Processed in 0.016168 second(s), 15 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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