this code worked in another prog that i made, yet in this one i keep getting a "not enough memory" error.
load image "SLAB04.jpg",4
load image "loading.bmp",5
sprite 1,0,0,4
stretch sprite 1,250,200
paste sprite 1,0,0
sprite 2,125,100,5
stretch sprite 2,150,150
paste sprite 2,200,150
this stuff loads over my environment as it loads, kind of like a curtain covering a stage while it is being set up. like i said, it worked in my other program, just that i keep getting that error. here's my complete code to show what's going on. thanx to anyone who might have an idea.
#include "LoadMatrix.dba"
#include "gameMenu.dba"
sync on
sync rate 0
hide mouse
autocam off
`until the menu works, leave this out
disable escapekey
`loading stuff
load image "SLAB04.jpg",4
load image "loading.bmp",5
sprite 1,0,0,4
stretch sprite 1,250,200
paste sprite 1,0,0
sprite 2,125,100,5
stretch sprite 2,150,150
paste sprite 2,200,150
`array for matrix info
Dim BigMatrix(600,600,1)
Dim StartLoc_X(1): Dim StartLoc_Z(1)
im Info(2)
Dim TArrayX(1): Dim TArrayZ(1): Dim FKey(10,1)
Dim ColData(100): Dim ZoneData(100): Dim Tiles(500,500)
Dim OverTexture$(100): Dim OverName$(20): Dim ReplaceTex(100)
Dim MOffsetX(25): Dim MOffsetY(25)
Dim MWire(20): Dim MGhost(20): Dim Lock(20)
Dim MatX#(20): Dim MatY#(20): Dim MatZ#(20)
Dim MatWidth#(20): Dim MatHeight#(20)
Dim TilesX(20): Dim TilesZ(20)
Dim MatHi#(20): Dim MatLo#(20)
`load level
LoadMatrix("EXILE",1)
fog on : fog distance 2300
fog color RGB(128,128,128)
set ambient light 40
gosub water
gosub sky
gosub houses
gosub trees
gosub fences
make object box 900,15,15,15
set object collision on 900
hide object 900
`by house on lake
`position object 900,2689,0,2409
`by river house
position object 900,7810,0,8262
`by waterfall
`position camera 8200,10,9330
`by house on lake
`position camera 2689,-16,2409
`delete loading images
delete sprite 1
delete sprite 2
delete image 4
delete image 5
`main-------------------------------------------------------------
do
fps# = screen fps()
set cursor 0,0
print x#
print y#
print z#
print fps#
gosub player_movement
if inkey$()="s" then gosub screenshot
if keystate(59) = 1 then menu()
`make the sky follow the camera
position object 1,camera position x(),camera position y(),camera position z()
sync
loop
`end of main---------------------------------------------
`subroutines
water:
load image "water.jpg",1
a = 500
b = 501
c = 502
d = 503
e = 504
`make the lake
make matrix a,4600,4600,40,40
prepare matrix texture a,1,2,2
set matrix texture a,1,1
ghost matrix on a
position matrix a,2600,-55,0
`make the river
make matrix b,2600,5000,40,40
prepare matrix texture b,1,2,2
set matrix texture b,1,1
ghost matrix on b
position matrix b,6000,-55,4600
`make the waterfall
`bottom
make object plain c,140,210
texture object c,1
ghost object on c
position object c,8225,-51,9336.23
xrotate object c,65
set object collision off c
`middle
make object plain d,125,258
texture object d,1
ghost object on d
position object d,8233,70,9490
xrotate object d,38
yrotate object d,357
set object collision off d
`top
make object plain e,122,185
texture object e,1
ghost object on e
position object e,8232,220,9640
xrotate object e,53
yrotate object e,357
set object collision off e
return
player_movement:
remstart
rem mouse control for camera
position mouse 320,240
cx#=wrapvalue(cx#+mousemovey() )
cy#=wrapvalue(cy#+mousemovex() )
cz#=wrapvalue(cz#+mousemovez() )
Rem Rotate camera
if cx#>270
if cx#-270 > 90 then cx#=270
else
if cx# > 90 and cx#-2700 then position object 900,x#,y#,z#
x# = object position x(900)
z# = object position z(900)
y# = get ground height(1,x#,z#)+10
`keep the player from going through the mountains on the waterfall side
if z# > 9820 then z# = 9820
`keep the player from going through the mountain on the other side
if x# 9950 then x# = 9950
Position object 900, x#,y#,z#
cz# = Newzvalue(z#,Yang#-180,5)
cx# = Newxvalue(x#,Yang#-180,5)
cy# = get ground height(1,cx#,cz#)
Position Camera cx#,cy#+25,cz#
Point Camera x#,y#+15,z#
`set camera to follow cx#,cy#,cz#,180,-2,25,2,1
`for underwater fog
if cy#
You're ate up like a soup sandwich.
