Sorry your browser is not supported!

Rem Project: tachyonequation
Rem Created: Thursday, August 05, 2010

Rem ***** Main Source File *****

`let lightspeed# represent lightspeed

rem Init for best performance
sync on : sync rate 60 : backdrop off : hide mouse

global spheremap=2
`let v be velocity

global v# = 1000.0
global tachyon=1
global elecfield=2

rem Loading screen
load bitmap "backdrop.jpg",1
copy bitmap 1,0,0,screen width(),screen height(),0,0,0,screen width(),screen height()
sync : delete bitmap 1

load image "space.jpg",spheremap

global lightspeed#=300000.0

make object cube tachyon,1

make object sphere elecfield,1

set sphere mapping on elecfield,spheremap

do
move object 1, (keystate(17)-keystate(31))*.1
turn object left 1, (keystate(30)-keystate(32))*1
set camera to follow object position x(tachyon),object position y(tachyon),object position z(tachyon),0,4,4,20,1
sync
loop

Rem Project: tachyonequation
Rem Created: Thursday, August 05, 2010

Rem ***** Main Source File *****

`let lightspeed# represent lightspeed

rem Init for best performance
sync on : sync rate 60 : backdrop off : hide mouse

global spheremap=2
`let v be velocity

global v# = 1000.0
global tachyon=1
global elecfield=2

rem Loading screen
load bitmap "backdrop.jpg",1
copy bitmap 1,0,0,screen width(),screen height(),0,0,0,screen width(),screen height()
sync  : delete bitmap 1
set current bitmap 0     ` added this

load image "space.jpg",spheremap

global lightspeed#=300000.0

make object cube tachyon,1

make object sphere elecfield,1

set sphere mapping on elecfield,spheremap

draw to back   ` added this

do
paste image 2, 0, 0                     ` added this - use the image number you want as a backdrop
move object 1, (keystate(17)-keystate(31))*.1
turn object left 1, (keystate(30)-keystate(32))*1
set camera to follow object position x(tachyon),object position y(tachyon),object position z(tachyon),0,4,3,20,1
sync
loop