设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3827|回复: 1

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

[复制链接]
 楼主| 发表于 2013-3-4 10:22:38 | 显示全部楼层 |阅读模式
请教关于PortalCrane的问题,实在想不明白。发现placeIsFree调用的一个问题:当通过PortalCrane的Strategy下的自定义可利用位置(Define your own method for searching an available location)时,自定义程序为:/ R- X) N9 g8 k, h: ?- b& E
(byref x1,y1,z1 : integer; part : object) : boolean
% Q4 a6 s% w6 ^! ?( \9 ~is( Y- D- B1 h0 M2 s) r5 d- |
        i,j,k,w : integer;6 s; U/ ]; V) r* {4 c
do) ~, W* u# `7 ?8 J7 F) T
        for k := 1 to Crane.getStoreZDim loop4 t* Y9 q/ o# O
                for i := Crane.getStoreXDim downto 1 loop
- n$ y+ M& L& Y  u                        for j := 1 to Crane.getStoreYDim  loop
3 ?4 U" p- r/ n                                if Crane.placeIsFree(i,j,k) then) {# Y7 Q. M1 U
                                        x1 := i;' N+ r. n1 o  y% x' N6 v
                                        y1 := j;
8 y( g! Z4 C1 o8 ~! y4 _0 }                                        z1 := k;
/ l! Q9 T1 h% D: F) g                                        if Crane.placeIsFree(14,1,2) then7 [* k# _9 i& n6 E4 W8 y; K6 W6 t6 o0 M
                                                w:=1
4 e  L# Y, l" q- K+ ^9 |6 v1 `                                        end;4 a5 F! M) h; A0 J4 I
                                        return true;
7 c7 V$ b) H) Z                                end;7 T0 Z. V* z# g2 E' w
                        next;
7 d- C! ]2 }: @                next;( r  C, g# {( A# g, ~3 @/ z/ h
        next;" u* y1 L7 N' w( q+ l
        return false;& h/ R( y, E; x0 h2 Y. c6 Y4 [7 i
end;
+ }: F% {- o+ Q# A" H3 b  判断的位置(14,1,2)的Free是True;而在某个程序中直接调用placeIsFree时, 判断的(14,1,2)的Free是False。保证两次判断位置(14,1,2)一直没有被占用。想知道是什么原因?placeIsFre方法到底该如何用?请求赐教?
: s  v* @% F" i* ~
发表于 2013-3-4 21:40:37 | 显示全部楼层
你调试一下吧,看下i,j,k的值,肯定不是你说的什么14,1,2,不可能出现在同一个方法中输入相同输出不同的情况。7 z  e% e3 q3 D6 \, ~9 l& N. U
从目前你的方法看,当两者不同时,PlaceisFree(i,j,k)为真时,PlaceIsFree(14,1,2)可以为假的。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-8-5 20:48 , Processed in 0.017965 second(s), 15 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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