Code Snippets->What is this shape? 3D? 4D?
U
UberTuba Joined: 5th Oct 2002
Location: Brittania
Posted: 11th Jan 2003 18:58
Time isn't a dimension, merely an illusion. If time were truly a dimension, it could not be bent, alla time dilation. and it would be possible to travel back in it. Also there are officially 13 dimensions, but that is, in my opinion, a load of s@*$!!!
B
Brent_Seraphim Joined: 1st Dec 2002
Location: United States
Posted: 11th Jan 2003 19:43
LOL, yes Moggie. This is great isn't it? I'm sorry for starting this maddness. We've seen some good discussion on Dimensions. . Just great. Moggie could you repost your code? Thank God we exist in space-time. And darkfluff, your last post holds true,somewhat. Time as explained in today's theories and Einstein is rather fickle isn't it? Darn thing has to be relative..why couldn't it have been politically correct and been the same for everybody regardless if their under the influence of extreme gravity or close to C. However time is defined as a dimension. However a dimension is probably not the best label for it, since it does not really 'flow' or 'move' or exist in a spatial direction.

BTW 13? Holy &$%# Could you list those bad boys for us?
B
Brent_Seraphim Joined: 1st Dec 2002
Location: United States
Posted: 11th Jan 2003 19:46
Wait I didn't start this...I said time first but you....Moggie....you said 4d....

:icks up Phaser and takes aim::
R
Revolution Joined: 27th Dec 2002
Location:
Posted: 11th Jan 2003 19:46
Time is a dimension, is is just u can only go fawards through it. Think of it like a one way street, you can only go fawards unless u brake the law. this is the same for time but the law of the universe is a lot harder to brake.
K
k0shi Joined: 30th Dec 2002
Location: Cyberspace
Posted: 11th Jan 2003 20:24
there is a new program out now, i was going to make and patent. i forgot what its called, but if you have ever seen 1 of those 3d books or watch a 3d movie with those glasses that make everything 3d you know what im talking about , they now have it so that comp game can become 3d also its so cool almost life like.
K
k0shi Joined: 30th Dec 2002
Location: Cyberspace
Posted: 11th Jan 2003 20:35
its a $100 but i think its worth it
B
Bogboy2000 Joined: 8th Nov 2002
Location: United Kingdom
Posted: 11th Jan 2003 20:41
4D is not time

1D a location, e.g. on the x axis
2D a flat object, e.g. a sprite on a screen
3D an object with width, height, and depth e.g. a cube
4D (hard to explain)...

objects in 4D have similar objects touching each of their sides.

so you have a cube in the middle with six other cubes touching each side (fairly simple).

it gets complicated when each of the six secondary objects are touching each others sides as well.

just imagin that each letter is a cube because you can't draw cubes on a forum and it would be in practice impossible to draw them correctly, but not in theory

A B C D E F G

each face of A is touching each face of B,C,D,E,F,G,H and I
each face of B is touching each face of A,C,D,E,F,G,H and I
each face of C is touching each face of A,B,D,E,F,G,H and I

and so on

this makes for an object which is rathar difficult to draw
B
Bogboy2000 Joined: 8th Nov 2002
Location: United Kingdom
Posted: 11th Jan 2003 20:42
sorry thats

each face of A is touching each face of B,C,D,E,F,and G
each face of B is touching each face of A,C,D,E,F,and G
each face of C is touching each face of A,B,D,E,F,and G
B
Brent_Seraphim Joined: 1st Dec 2002
Location: United States
Posted: 11th Jan 2003 21:42
Um...BogBoy...have you every seen a "4d Modelling package" or something? Do have the slightest idea about what we were discussing?
B
Bogboy2000 Joined: 8th Nov 2002
Location: United Kingdom
Posted: 12th Jan 2003 12:23
nope i've never seen a 4D modeling pakage because 4D objects are too complicated to draw, a 4D object could not exist in time and space but 4D is an object and not time

yup i know what your discussing!

what 4D is spawned from Moggie100s code snippet
B
Brent_Seraphim Joined: 1st Dec 2002
Location: United States
Posted: 12th Jan 2003 17:08
Riigggghhhhtttt... ... ... ....

Anyway Moggie could you post that code again?
M
Moggie100 Joined: 15th Oct 2002
Location: Behind You...
Posted: 12th Jan 2003 17:44
Brent_Seraphim - sure here it is

The origional:

+ Code Snippet
cls
sync on : sync rate 100
backdrop on : color backdrop RGB(0,0,0)

newx=rnd(640)
newy=rnd(480)
newx1=rnd(640)
newy1=rnd(480)
newx2=rnd(640)
newy2=rnd(480)
newx3=rnd(640)
newy3=rnd(480)
newx4=rnd(640)
newx4=rnd(480)

xval=rnd(1)
yval=rnd(1)
xval1=rnd(1)
yval1=rnd(1)
xval2=rnd(1)
yval2=rnd(1)
xval3=rnd(1)
yval3=rnd(1)
xval4=rnd(1)
yval4=rnd(1)

movex=2
movey=2

do
if newx>640
xval=0
endif
if newx<0
xval=1
endif
if newy>480
yval=0
endif
if newy<0
yval=1
endif
if xval=1 and yval=1
`circle newx,newy,10
newx=newx+movex
newy=newy+movey
endif
if xval=0 and yval=0
`circle newx,newy,10
newx=newx-movex
newy=newy-movey
endif
if xval=1 and yval=0
`circle newx,newy,10
newx=newx+movex
newy=newy-movey
endif
if xval=0 and yval=1
`circle newx,newy,10
newx=newx-movex
newy=newy+movey
endif


if newx1>640
xval1=0
endif
if newx1<0
xval1=1
endif
if newy1>480
yval1=0
endif
if newy1<0
yval1=1
endif
if xval1=1 and yval1=1
`circle newx1,newy1,10
newx1=newx1+movex
newy1=newy1+movey
endif
if xval1=0 and yval1=0
`circle newx1,newy1,10
newx1=newx1-movex
newy1=newy1-movey
endif
if xval1=1 and yval1=0
`circle newx1,newy1,10
newx1=newx1+movex
newy1=newy1-movey
endif
if xval1=0 and yval1=1
`circle newx1,newy1,10
newx1=newx1-movex
newy1=newy1+movey
endif

if newx2>640
xval2=0
endif
if newx2<0
xval2=1
endif
if newy2>480
yval2=0
endif
if newy2<0
yval2=1
endif
if xval2=1 and yval2=1
`circle newx2,newy2,10
newx2=newx2+movex
newy2=newy2+movey
endif
if xval2=0 and yval2=0
`circle newx2,newy2,10
newx2=newx2-movex
newy2=newy2-movey
endif
if xval2=1 and yval2=0
`circle newx2,newy2,10
newx2=newx2+movex
newy2=newy2-movey
endif
if xval2=0 and yval2=1
`circle newx2,newy2,10
newx2=newx2-movex
newy2=newy2+movey
endif

if newx3>640
xval3=0
endif
if newx3<0
xval3=1
endif
if newy3>480
yval3=0
endif
if newy3<0
yval3=1
endif
if xval3=1 and yval3=1
`circle newx3,newy3,10
newx3=newx3+movex
newy3=newy3+movey
endif
if xval3=0 and yval3=0
`circle newx3,newy3,10
newx3=newx3-movex
newy3=newy3-movey
endif
if xval3=1 and yval3=0
`circle newx3,newy3,10
newx3=newx3+movex
newy3=newy3-movey
endif
if xval3=0 and yval3=1
`circle newx3,newy3,10
newx3=newx3-movex
newy3=newy3+movey
endif

if newx4>640
xval4=0
endif
if newx4<0
xval4=1
endif
if newy4>480
yval4=0
endif
if newy4<0
yval4=1
endif
if xval4=1 and yval4=1
`circle newx4,newy4,10
newx4=newx4+movex
newy4=newy4+movey
endif
if xval4=0 and yval4=0
`circle newx4,newy4,10
newx4=newx4-movex
newy4=newy4-movey
endif
if xval4=1 and yval4=0
`circle newx4,newy4,10
newx4=newx4+movex
newy4=newy4-movey
endif
if xval4=0 and yval4=1
`circle newx4,newy4,10
newx4=newx4-movex
newy4=newy4+movey
endif

line newx,newy,newx1,newy1
line newx1,newy1,newx2,newy2
line newx,newy,newx2,newy2
line newx,newy,newx3,newy3
line newx1,newy1,newx3,newy3
line newx2,newy2,newx3,newy3
line newx4,newy4,newx,newy
line newx4,newy4,newx1,newy1
line newx4,newy4,newx2,newy2
line newx4,newy4,newx3,newy3

remstart
set cursor 0,0
print newx
print newy
print xval
print yval
remend

set cursor 0,0
print "Press up to increase speed"
Print "Press down to decrease speed"

if upkey()=1
movex=movex+1
movey=movey+1
print movex
wait 500
endif
if downkey()=1
movex=movex-1
movey=movey-1
print movex
wait 500
endif

sync
loop


The 'bouncing ball' variation on it

+ Code Snippet
cls
sync on : sync rate 100
backdrop on : color backdrop RGB(0,0,0)

newx=rnd(640)
newy=rnd(480)
newx1=rnd(640)
newy1=rnd(480)
newx2=rnd(640)
newy2=rnd(480)
newx3=rnd(640)
newy3=rnd(480)
newx4=rnd(640)
newx4=rnd(480)

xval=rnd(1)
yval=rnd(1)
xval1=rnd(1)
yval1=rnd(1)
xval2=rnd(1)
yval2=rnd(1)
xval3=rnd(1)
yval3=rnd(1)
xval4=rnd(1)
yval4=rnd(1)

movex=2
movey=2

do
if newx>640
xval=0
endif
if newx<0
xval=1
endif
if newy>480
yval=0
endif
if newy<0
yval=1
endif
if xval=1 and yval=1
circle newx,newy,10
newx=newx+movex
newy=newy+movey
endif
if xval=0 and yval=0
circle newx,newy,10
newx=newx-movex
newy=newy-movey
endif
if xval=1 and yval=0
circle newx,newy,10
newx=newx+movex
newy=newy-movey
endif
if xval=0 and yval=1
circle newx,newy,10
newx=newx-movex
newy=newy+movey
endif


if newx1>640
xval1=0
endif
if newx1<0
xval1=1
endif
if newy1>480
yval1=0
endif
if newy1<0
yval1=1
endif
if xval1=1 and yval1=1
circle newx1,newy1,10
newx1=newx1+movex
newy1=newy1+movey
endif
if xval1=0 and yval1=0
circle newx1,newy1,10
newx1=newx1-movex
newy1=newy1-movey
endif
if xval1=1 and yval1=0
circle newx1,newy1,10
newx1=newx1+movex
newy1=newy1-movey
endif
if xval1=0 and yval1=1
circle newx1,newy1,10
newx1=newx1-movex
newy1=newy1+movey
endif

if newx2>640
xval2=0
endif
if newx2<0
xval2=1
endif
if newy2>480
yval2=0
endif
if newy2<0
yval2=1
endif
if xval2=1 and yval2=1
circle newx2,newy2,10
newx2=newx2+movex
newy2=newy2+movey
endif
if xval2=0 and yval2=0
circle newx2,newy2,10
newx2=newx2-movex
newy2=newy2-movey
endif
if xval2=1 and yval2=0
circle newx2,newy2,10
newx2=newx2+movex
newy2=newy2-movey
endif
if xval2=0 and yval2=1
circle newx2,newy2,10
newx2=newx2-movex
newy2=newy2+movey
endif

if newx3>640
xval3=0
endif
if newx3<0
xval3=1
endif
if newy3>480
yval3=0
endif
if newy3<0
yval3=1
endif
if xval3=1 and yval3=1
circle newx3,newy3,10
newx3=newx3+movex
newy3=newy3+movey
endif
if xval3=0 and yval3=0
circle newx3,newy3,10
newx3=newx3-movex
newy3=newy3-movey
endif
if xval3=1 and yval3=0
circle newx3,newy3,10
newx3=newx3+movex
newy3=newy3-movey
endif
if xval3=0 and yval3=1
circle newx3,newy3,10
newx3=newx3-movex
newy3=newy3+movey
endif

if newx4>640
xval4=0
endif
if newx4<0
xval4=1
endif
if newy4>480
yval4=0
endif
if newy4<0
yval4=1
endif
if xval4=1 and yval4=1
circle newx4,newy4,10
newx4=newx4+movex
newy4=newy4+movey
endif
if xval4=0 and yval4=0
circle newx4,newy4,10
newx4=newx4-movex
newy4=newy4-movey
endif
if xval4=1 and yval4=0
circle newx4,newy4,10
newx4=newx4+movex
newy4=newy4-movey
endif
if xval4=0 and yval4=1
circle newx4,newy4,10
newx4=newx4-movex
newy4=newy4+movey
endif

remstart
set cursor 0,0
print newx
print newy
print xval
print yval
remend

set cursor 0,0
print "Press up to increase speed"
Print "Press down to decrease speed"

if upkey()=1
movex=movex+1
movey=movey+1
print movex
wait 500
endif
if downkey()=1
movex=movex-1
movey=movey-1
print movex
wait 500
endif

sync
loop


And here's a little something that uses the bouncing code

+ Code Snippet
cls
sync on : sync rate 100
backdrop on : color backdrop rgb(0,0,0)
hide mouse

reload:

x=320
newx=x
newy=415
movex=2
movey=2

do

gosub player
gosub ball
gosub collision

set cursor 0,0
print newx
print newy
print xval
print yval

sync
loop

player:

line x+20,430,x-20,430
line x+19,431,x-19,431
line x+18,432,x-18,432

line x+20,30,x-20,30
line x+19,31,x-19,31
line x+18,32,x-18,32

if leftkey()=1 then x=x-5
if rightkey()=1 then x=x+5
return

ball:
if newx>640
xval=0
endif
if newx<0
xval=1
endif
if newy>480
yval=0
endif
if newy<0
yval=1
endif
if xval=1 and yval=1
circle newx,newy,5
newx=newx+movex
newy=newy+movey
endif
if xval=0 and yval=0
circle newx,newy,5
newx=newx-movex
newy=newy-movey
endif
if xval=1 and yval=0
circle newx,newy,5
newx=newx+movex
newy=newy-movey
endif
if xval=0 and yval=1
circle newx,newy,5
newx=newx-movex
newy=newy+movey
endif
return

collision:
if newy=>420 and newx=>x-20 and newx=<x+20
yval=0
endif

if newy=<30 and newx=>x-20 and newx=<x+20
yval=1
endif

if newy=<10 then goto reload
if newy=>450 then goto reload

return
M
MattIsFun Joined: 4th Jan 2003
Location:
Posted: 12th Jan 2003 20:08
Time can be measured in dimensions. Computer programs always move forward along the "time axis" because we really have no point to them moving backwards and humans have no control as of yet over movement in the 4th dimension.
R
rapscaLLion Joined: 29th Aug 2002
Location: Canada
Posted: 12th Jan 2003 20:46
How the hell can you know what the 4th, 5th etc dimensions are? How can we know they exist? If all the previous dimensions deal with geometry, WHY would time be the 4th?
There is no way to prove any of it.
B
Brent_Seraphim Joined: 1st Dec 2002
Location: United States
Posted: 12th Jan 2003 21:53
Chill my friend. The idea that Time is the forth dimension comes from Einsteins theories of Relativity and his Theory of Special Relativity. He invisioned time not as a axis but as a way to record an event, he also labeled it as a dimension becasue it can speed up, slow down..or stop completely depending upon an entities mass, speed or it's proximity to a strong gravitational object. In to your question "How can we know they exist? things Einstein proposed such as gravity not being a force but a displacement of space it's self, were at first thought of as been insane. Later they were proven. His theories of what happens when one approaches relavilistic speeds(anything near the speed of light) were thought insane because he proposed the time-dilation effect and that time was completely relative. These things are hard to swallow and even harder to believe. However they have been proven. Just the other day scienctis proved another piece of Einsteins theory. They proved (it was in the news section of yahoo.com) that the effects of gravity travel at the speed of light. And to answer your other question "If all the previous dimensions deal with geometry, WHY would time be the 4th?" why you ask....because thats the way its been for about 80 years since we've had the Theory of Relativity. Just because its the first time you have heard of this 4th dimension doesnt mean you should question it out of ignorance. I am not insulting you. Ignorance is the lack of knowledge. Everybody is ignorant of something, everybody.
Here a few sites you might want to look into

http://www.bartleby.com/173/

http://www-gap.dcs.st-and.ac.uk/~history/HistTopics/General_relativity.html

http://archive.ncsa.uiuc.edu/Cyberia/NumRel/GenRelativity.html

http://www2.slac.stanford.edu/vvc/theory/relativity.html

Ok enough...I've said my piece. Anybody can say "How can we know for sure?!" well we can't see the wind, but we can feel it's effects and study it. So Moggie..damn fine job on some whacko coding, you should ask more question like this its makes for some fun discussion and mabye a lilbit' of flamebait. I now don a flame-retardent jumpsuit and await the flames.
B
Bogboy2000 Joined: 8th Nov 2002
Location: United Kingdom
Posted: 12th Jan 2003 21:57
OK i'll lay it out strait

for most people there are 4 dimentions, 1st, 2nd, 3rd, 4th(being time)

in mathematics, however, there can be infinate number of dimentions with 4D as an object, like i said erlier, wich leave time as X dimention because it could be any thing

finaly, when physasists look at all the visible matter in the universe i.e. stars and plnets, they decided that there is not enough matter to allow the univers to act in the way it does.

One solution to this is "Dark matter" which is there but you can't see it.

Another solution is, is that there are super strings (don't ask, cos i don't know enough to tell), which would require another dimention to exist in i.e. the 4th dimention
B
Brent_Seraphim Joined: 1st Dec 2002
Location: United States
Posted: 12th Jan 2003 22:03
D*mn Straight
B
Bogboy2000 Joined: 8th Nov 2002
Location: United Kingdom
Posted: 12th Jan 2003 22:12
absolutly, (just about)

sorry that was as strait as i could get it
M
Moggie100 Joined: 15th Oct 2002
Location: Behind You...
Posted: 13th Jan 2003 0:55
And the post goes on..................
M
Moggie100 Joined: 15th Oct 2002
Location: Behind You...
Posted: 13th Jan 2003 1:01
AHA!

Something has just come to me!

(no not in a dream, fool.)

Considering that time is the 4th dimention then.....

THIS POST EXISTS IN 4D!

Just a thought.

O and btw.

If we keep this up, at this rate, this post will soon rival the "I'm listening to" post in general