By background handling of 3D,
A common method.
fill it up with an image.
test code.
rem text front screen . test
input "input 1-4 , 5-8 ,9 >",num
SELECT num
case 1 : goto 1 : endcase
case 2 : goto 2 : endcase
case 3 : goto 3 : endcase
case 4 : goto 4 : endcase
case 5 : goto 5 : endcase
case 6 : goto 6 : endcase
case 7 : goto 7 : endcase
case 8 : goto 8 : endcase
case 9 : goto 9 : endcase
ENDSELECT
1:
set text size 128
ink rgb(255,0,0),0
make object cube 1,10
sync on : sync rate 0
do
turn object left 1,0.3
pitch object up 1,0.2
set cursor 100,100:PRINT "1:text "
sync
loop
2:
set text size 128
ink rgb(255,0,0),0
set cursor 100,100:print "2: bitmap "
GET IMAGE 2,0,0,639,479,1
cls
make object cube 1,10
sync on : sync rate 0
do
turn object left 1,0.3
pitch object up 1,0.2
PASTE IMAGE 2,0,0,1
sync
loop
3:
set text size 128
ink rgb(255,0,0),0
set cursor 100,100:print "3: sprite "
GET IMAGE 2,0,0,639,479,1
cls
make object cube 1,10
SPRITE 3,0,0,2
sync on : sync rate 0
do
turn object left 1,0.3
pitch object up 1,0.2
sync
loop
4:
set text size 128
ink rgb(255,0,0),0
set cursor 100,100:print "4:texture object"
GET IMAGE 2,100,100,640,200,1
cls
MAKE OBJECT PLAIN 3,14,2
POSITION OBJECT 3,0,0,10
TEXTURE OBJECT 3,2
LOCK OBJECT ON 3
make object cube 1,10
sync on : sync rate 0
do
turn object left 1,0.3
pitch object up 1,0.2
sync
loop
5:
DRAW TO BACK
BACKDROP off
set text size 128
ink rgb(255,0,0),0
make object cube 1,10
sync on : sync rate 0
do
cls
turn object left 1,0.3
pitch object up 1,0.2
set cursor 100,00:PRINT "5:text "
sync
loop
6:
DRAW TO BACK
BACKDROP off
set text size 128
ink rgb(255,0,0),0
set cursor 100,00:print "6: bitmap "
GET IMAGE 2,0,0,639,479,1
PASTE IMAGE 2,0,0,1
cls
make object cube 1,10
sync on : sync rate 0
do
cls
PASTE IMAGE 2,0,0,1
turn object left 1,0.3
pitch object up 1,0.2
sync
loop
7:
DRAW TO BACK
BACKDROP off
set text size 128
ink rgb(255,0,0),0
set cursor 100,00:print "7: sprite "
GET IMAGE 2,0,0,639,479,1
cls
make object cube 1,10
SPRITE 3,0,0,2
sync on : sync rate 0
do
turn object left 1,0.3
pitch object up 1,0.2
sync
loop
8:
set text size 128
ink rgb(255,0,0),0
cls
set cursor 00,00:print "8:texture object"
GET IMAGE 2,00,00,640,200,1
cls
MAKE OBJECT PLAIN 3,80,16
POSITION OBJECT 3,0,0,40
TEXTURE OBJECT 3,2
make object cube 1,10
sync on : sync rate 0
do
turn object left 1,0.3
pitch object up 1,0.2
sync
loop
9:
DRAW TO FRONT
DRAW SPRITES FIRST
BACKDROP off
set text size 128
cls
ink rgb(0,255,0),0
set cursor 100,00:print "9: sprite image "
GET IMAGE 2,0,0,639,479,1
cls
ink rgb(255,0,0),0
set cursor 100,00:print "9: bitmap image "
GET IMAGE 4,0,0,639,479,1
cls
make object cube 1,10
SPRITE 3,0,0,2
sync on : sync rate 0
do
PASTE IMAGE 4,0,300,1
turn object left 1,0.3
pitch object up 1,0.2
sync
loop
use skyBoxes, skySpheres.
It is included in dark matter.
There is an exercise in a tutorial attached to DBP.
use Fog.
