Hey people
Been doing a maze out of boredom really, but... can I say how painful cubes are?
well, take a look at this screenshot:
There I'm using 3DSMAX-made objects: cubes (walls) and a plain (for the roof), the other plain is the floor, and I'm gonna explain later why that.
Look at the walls: I thought this was a model's problem. Ok, I get in 3DSMAX and select all the faces, then remove all the smoothing groups... doesn't fix it. Make Object Cube does the same, so I get on Milkshape and follow what's explained on the site (or basically, Vertex -> Unweld) for removing the smoothing. Okay, looks good in MilkShape, so it should look cool on DB. What happens? looks the same way.
Look at the floor and the roof: The roof is lit correctly by the light I have on the player's spot (camera position), YET the floor isn't! I thought it was a model's problem so I replaced it with Make Object Plain: Same result.
Here's my code:
REM CODE MADE BY: DARKGUY. ANY WISH TO USE PART OF THIS CODE ON YOUR PROJECT, IF IT'S GREAT PART OF IT, AT LEAST NOTIFY ME, PLEASE -.-
autocam off
hide mouse
sync on
sync rate 0
load image "wall1.bmp",10
load image "floor2.bmp",20
load image "roof2.bmp",30
LoadLevel()
col=rgb(0,0,0)
fog on
fog color col
fog distance 100
set ambient light 0
make light 1
color light 1,rgb(255,200,200)
load music "dungeon1.mid",1
loop music 1
do
if leftkey() then yrotate camera wrapvalue(camera angle y()-5)
if rightkey() then yrotate camera wrapvalue(camera angle y()+5)
if upkey() then move camera 1
if downkey() then move camera -1
position light 1,camera position x(),10,camera position z()
sync
loop
function LoadLevel()
open to read 1,"level1.txt"
x=1
while file end(1)=0
read byte 1,a
if a=13
y=y+1
x=0
read byte 1,null
endif
if a=226 or a=228
exit
endif
x=x+1
if a=183
Wall(x,y,10)
endif
if a=49
Floor(x,y,20)
Roof(x,y,30)
endif
if a=50
PutPlayer(x,y)
endif
endwhile
close file 1
endfunction
function Wall(x,y,texture)
for a=1 to 1000
if object exist(a)=0
obj=a
exit
endif
next a
load object "wall1.3ds",obj
position object obj,20*x,0,20*y
texture object obj,texture
endfunction
function Floor(x,y,texture)
for a=2000 to 3000
if object exist(a)=0
obj=a
exit
endif
next a
` load object "floor1.3ds",obj
` position object obj,20*x,0,20*y
` texture object obj,texture
make object plain obj,20,20
xrotate object obj,90
position object obj,20*x,0,20*y
texture object obj,texture
endfunction
function Roof(x,y,texture)
for a=4000 to 5000
if object exist(a)=0
obj=a
exit
endif
next a
load object "roof1.3ds",obj
position object obj,20*x,0,20*y
texture object obj,texture
endfunction
function PutPlayer(x,y)
position camera 20*x,10,20*y
endfunction
If you need the models... it's just a 20x20x20 cube (according to DB, 20 seems to fit each edge perfectly) and two plains. Textures can be anything.
Other thing is, the light "system" I have there is affecting in any way the smoothing on the objects then? or what is it? could it be I'm using .3DS instead of .X? and why the light is correctly set on the roof but not on the floor? If anyone can help... thanks in advance
-DARKGuy
