Why does this crash?

[TerryRitchie]

Can anyone explain why the code below crashes?

Sometimes the Y value gets as high as a few hundred, other times just barely past 10.

I would have chalked this up as running out of memory but the random crash points has me confused. The picture I'm using is attached below.

Code: (Select All)

OPTION _EXPLICIT



TYPE TYPE_PIXEL

    hard AS LONG ' hardware image

    soft AS LONG ' software image

    ox AS INTEGER

    oy AS INTEGER

    x AS INTEGER

    y AS INTEGER

    xdir AS SINGLE

    ydir AS SINGLE



END TYPE



DIM Pixel(1280, 720) AS TYPE_PIXEL

DIM Picture AS LONG

DIM x AS INTEGER

DIM y AS INTEGER



SCREEN _NEWIMAGE(1280, 720, 32)

Picture = _LOADIMAGE("picture.png", 32)



_SOURCE Picture

FOR y = 0 TO 719

    FOR x = 0 TO 1279

        Pixel(x, y).soft = _NEWIMAGE(1, 1, 32)

        _DEST Pixel(x, y).soft

        PSET (0, 0), POINT(x, y)

        Pixel(x, y).hard = _COPYIMAGE(Pixel(x, y).soft, 33)

        Pixel(x, y).ox = x

        Pixel(x, y).oy = y



        _DEST 0 '                                        temporarily print values to figure

        PRINT x, y, Pixel(x, y).soft, Pixel(x, y).hard '  out why this crashes



    NEXT x

NEXT y