[Squeak-fr] encore un pt pb de Array2D

[fontaine mathieu]

comment selectionne des objet dans un Array2D?
 >>movePirate
    | move tempX tempY |
    _(self grid
_        _select: [:each | each notNil _      <=ca ca ne marche pas, il 
me dit 'Use >>self width: x height: y<< instead'
                _and: [each isPirate]])_
        do: [:each |
            tempX _ each place x.
            tempY _ each place y.
            [self size < tempX | self size < tempY | tempY < 0 | tempX < 
0 | self grid at: tempX at: tempY notNil]
                whileTrue: [move _ 4 atRandom.
                    move = 1
                        ifTrue: [tempY _ tempY + 1].
                    move = 2
                        ifTrue: [tempY _ tempY - 1].
                    move = 1
                        ifTrue: [tempX _ tempX + 1].
                    move = 1
                        ifTrue: [tempX _ tempX - 1]].
            self grid
                at: tempX
                at: tempY
                put: each.
            self grid at: each place x at: each place y put:nil.
            each place: tempX @ tempY]
-------------- section suivante --------------
Une pièce jointe HTML a été enlevée...
URL: http://lists.squeakfoundation.org/pipermail/squeak-fr/attachments/20040222/d0a7292f/attachment.htm