Help creating 2d side scroller - GameCreators Forum

Author

Message

AJay

22

Years of Service

User Offline

Joined: 24th Jan 2004

Location:

Posted: 10th Jan 2005 07:22

Link

Im looking to create a mario-ish side scroller. Are there any tutorials out there that would help me out. So far all i can do is place the character sprite on the screen and make him run left and right. He also looks up.

Here is the source code i have so far. I can give you the .exe if you ask

Rem Sets up program
Sync On
Hide Mouse
Set Display Mode 640, 480, 16

Rem Loads all media for game
Load Music "halo.mid", 1
Load Image "chiefr.bmp", 1
Load Image "chiefl.bmp", 2
Load Image "background.jpg", 3
Load Image "chiefrunr.bmp", 4
Load Image "chiefrunl.bmp", 5
Load Image "lookupr.bmp", 6
Load Image "lookupl.bmp", 7

Rem Plays music and sets volume
Play Music 1

Rem Creates and positions the background plane
Make Object Plain 1, 600, 100
Position Object 1, 0, -4, 70

Rem Textures the background plane with black bitmap
Texture Object 1, 3
Lock Object On 1

Rem Creates the MC position variables
mcx = 320
mcy = 320

Rem Creates the facing variable
facing = 1

Rem places mc sprite on screen at beginning of game
Sprite 1, mcx, mcy, 1

Rem Main Loop
Do

Rem refreshes MC at beginning of every loop if he is not moving and makes him face the right direction
If Rightkey() = 0 And Leftkey() = 0 and facing = 1
   Sprite 1, mcx, mcy, facing
Endif

If Rightkey() = 0 And Leftkey() = 0 and facing = 2
   Sprite 1, mcx, mcy, facing
Endif

Rem goes to moveforward sub
Gosub moveforward:

Rem goes to moveback sub
Gosub moveback:

Rem goes to lookup sub
Gosub lookup:

Sync
Loop

Rem Moves MC forward if Right key is pressed
moveforward:
If Rightkey() = 1 and mcx < 570
   Inc mcx, 1.5
   Sprite 1, mcx, mcy, 4
   facing = 1
Endif
Return

Rem Moves MC back if Left key is pressed
moveback:
If Leftkey() = 1 and mcx > 0
   Dec mcx, 1.5
   Sprite 1, mcx, mcy, 5
   facing = 2
Endif
Return

Rem makes MC look up when Up key is pressed
lookup:
If Upkey() = 1 and Leftkey() = 0 and Rightkey() = 0 and facing = 1
   Sprite 1, mcx, mcy, 6
Endif
If Upkey() = 1 and Leftkey() = 0 and Rightkey() = 0 and facing = 2
   Sprite 1, mcx, mcy, 7
Endif
Return

+ Code Snippet

Rem Sets up program
Sync On
Hide Mouse
Set Display Mode 640, 480, 16

Rem Loads all media for game
Load Music "halo.mid", 1
Load Image "chiefr.bmp", 1
Load Image "chiefl.bmp", 2
Load Image "background.jpg", 3
Load Image "chiefrunr.bmp", 4
Load Image "chiefrunl.bmp", 5
Load Image "lookupr.bmp", 6
Load Image "lookupl.bmp", 7

Rem Plays music and sets volume
Play Music 1

Rem Creates and positions the background plane
Make Object Plain 1, 600, 100
Position Object 1, 0, -4, 70

Rem Textures the background plane with black bitmap
Texture Object 1, 3
Lock Object On 1

Rem Creates the MC position variables
mcx = 320
mcy = 320

Rem Creates the facing variable
facing = 1

Rem places mc sprite on screen at beginning of game
Sprite 1, mcx, mcy, 1


Rem Main Loop
Do

Rem refreshes MC at beginning of every loop if he is not moving and makes him face the right direction
If Rightkey() = 0 And Leftkey() = 0 and facing = 1
   Sprite 1, mcx, mcy, facing
Endif

If Rightkey() = 0 And Leftkey() = 0 and facing = 2
   Sprite 1, mcx, mcy, facing
Endif


Rem goes to moveforward sub
Gosub moveforward:

Rem goes to moveback sub
Gosub moveback:

Rem goes to lookup sub
Gosub lookup:

Sync
Loop



Rem Moves MC forward if Right key is pressed
moveforward:
If Rightkey() = 1 and mcx < 570
   Inc mcx, 1.5
   Sprite 1, mcx, mcy, 4
   facing = 1
Endif
Return

Rem Moves MC back if Left key is pressed
moveback:
If Leftkey() = 1 and mcx > 0
   Dec mcx, 1.5
   Sprite 1, mcx, mcy, 5
   facing = 2
Endif
Return

Rem makes MC look up when Up key is pressed
lookup:
If Upkey() = 1 and Leftkey() = 0 and Rightkey() = 0 and facing = 1
   Sprite 1, mcx, mcy, 6
Endif
If Upkey() = 1 and Leftkey() = 0 and Rightkey() = 0 and facing = 2
   Sprite 1, mcx, mcy, 7
Endif
Return

Thanks once again guys

128MB ATI All In Wonder 9200 AGP video card, 768 MB of Ram, 2.4 Ghz Pentium 4 processor, 768 MB of ram, 64 bit sound blaster live, 40 Gig hard drive. -AJay- Much thanks to Coding Area

Back to top

Profile PM Email Website

AJay

22

Years of Service

User Offline

Joined: 24th Jan 2004

Location:

Posted: 10th Jan 2005 15:08

Link

Come on guys. I can send someone the code and the media and you could implement it yourself. You would get recognition in the game

Thanks

128MB ATI All In Wonder 9200 AGP video card, 768 MB of Ram, 2.4 Ghz Pentium 4 processor, 768 MB of ram, 64 bit sound blaster live, 40 Gig hard drive. -AJay- Much thanks to Coding Area

Back to top

Profile PM Email Website

Code Ninja

22

Years of Service

User Offline

Joined: 17th Dec 2003

Location: AZ, U.S.

Posted: 11th Jan 2005 07:36

Link

Unfortunately, AJay, I am in the same boat as you here, and, just as you are experienceing, I am recieving no help.

Dragael Software
Current Project: Nothing worth mentioning

Back to top

Profile PM Email Website

AJay

22

Years of Service

User Offline

Joined: 24th Jan 2004

Location:

Posted: 11th Jan 2005 10:17

Link

I have looked at some example code on other posts, but they do not help me at all.

Can someone pleas help us out

128MB ATI All In Wonder 9200 AGP video card, 768 MB of Ram, 2.4 Ghz Pentium 4 processor, 768 MB of ram, 64 bit sound blaster live, 40 Gig hard drive. -AJay- Much thanks to Coding Area

Back to top

Profile PM Email Website

Random 69

21

Years of Service

User Offline

Joined: 24th Aug 2004

Location: Marshmellowland

Posted: 11th Jan 2005 12:02

Link

Heres some code that makes you move side to side and jump

also has a level

rem  Title Screen

load image "title.bmp" ,1

paste image 1,0,0

wait 5000

rem Normal initialisation stuff
sync on
sync rate 45
hide mouse

rem Load the player tileset and split it up into images 1 to 4
load bitmap "player.bmp",1
for i=0 to 3
get image i+1,i*32,0,(i+1)*32,32
next i
delete bitmap 1

rem Load the level tileset and split it up into images 100 to 107
load bitmap "tileset.bmp",1
for i=0 to 7
get image i+100,i*32,0,(i+1)*32,32
next i
delete bitmap 1

set current bitmap 0

rem Level data
dim level(50,15)
data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,1,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,1
data 1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,1
data 1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,1
data 1,1,1,1,0,0,0,0,1,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,1,1,1,0,0,0,0,1,0,0,0,0,0,1,1,1,1,1,1,1,0,0,0,0,0,1
data 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1

for i=0 to 14
for j=0 to 49
read level(j,i)
next j
next i

rem Background data
dim background(25,15)
data 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,5,5,4,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,5,5,2,3,5,5,4,5,5,5,5,5,5,5,5
data 5,5,5,2,3,5,5,5,5,5,5,5,6,7,5,5,5,5,5,5,5,5,4,5,5
data 5,5,5,6,7,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,2,3,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,4,5,5,5,5,5,5,5,6,7,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,4,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5

for i=0 to 14
for j=0 to 24
read background(j,i)
next j
next i

rem Set some variables
frame=1
x=100
y=300
g=1

do

rem Moving variable determines whether the player
rem is moving or not, and changes the animation state later
moving=0

if leftkey()=1
rem If the sprite is facing right (default as I drew it)
rem then turn it the other way
if sprite mirrored(1)=0 then mirror sprite 1

rem Moving, so provide animation later
moving=1

rem If the tile that the player is about to move to is
rem empty, then move the player
if level(int((x-2)/32),int(y/32)+1)=0 then x=x-2

rem If the player is moving off the screen to the left,
rem adjust the xoffset accordingly
if x-xoffset<140 and xoffset>0 then xoffset=xoffset-2
endif

if rightkey()=1
rem If the sprite is facing left then turn it the other way
if sprite mirrored(1)=1 then mirror sprite 1

rem Moving, so provide animation later

moving=1

rem If the tile that the player is about to move to is
rem empty, then move the player
if level(int((x+2)/32),int(y/32)+1)=0 then x=x+2

rem If the player is moving off the screen to the right,
rem adjust the xoffset accordingly
if x-xoffset>500 and xoffset<958 then xoffset=xoffset+2
endif

if spacekey()=1 and jump=0
rem If the player is allowed to jump (on the ground) then
rem set the yvelocity to 15 upwards
jump=1
yvel=-15
endif

rem Gravity
yvel=yvel+g
rem If the tile that the player is about to move to is
rem empty, then move the player due to gravity
if level(int(x/32),int((y+yvel)/32)+1)=0
y=y+yvel
jump=1
else
rem Otherwise, set the vertical yvel to 0 and allow the
rem player to jump again
yvel=0
jump=0
endif

rem Tile offsets
tileoffset=int(xoffset/32)
backoffset=int((int(xoffset/6)/32))

rem Draw the background
for i=0 to 20
for j=0 to 15
paste image background(i+backoffset,j)+100,(i*32)-(xoffset/6)+(backoffset*32),j*32
next j
next i

rem Draw the foreground
for i=0 to 20
for j=0 to 15
paste image level(i+tileoffset,j)+100,(i*32)-xoffset+(tileoffset*32),j*32,1
next j
next i

rem If the player is moving, animate the sprite by changing
rem the image number in a cycle, with a delay of 5 cycles per frame
if moving>0
a=a+1
if a=5
a=1
frame=frame+1
if frame=5 then frame=1
endif
endif

rem Position and offset the sprite
sprite 1,x-xoffset,y,frame
offset sprite 1,16,0

rem End of the loop
sync
loop

+ Code Snippet


rem  Title Screen

load image "title.bmp" ,1


paste image 1,0,0





wait 5000



rem Normal initialisation stuff
sync on
sync rate 45
hide mouse

rem Load the player tileset and split it up into images 1 to 4
load bitmap "player.bmp",1
for i=0 to 3
get image i+1,i*32,0,(i+1)*32,32
next i
delete bitmap 1

rem Load the level tileset and split it up into images 100 to 107
load bitmap "tileset.bmp",1
for i=0 to 7
get image i+100,i*32,0,(i+1)*32,32
next i
delete bitmap 1

set current bitmap 0

rem Level data
dim level(50,15)
data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,1,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,1
data 1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,1
data 1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,1
data 1,1,1,1,0,0,0,0,1,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,1,1,1,0,0,0,0,1,0,0,0,0,0,1,1,1,1,1,1,1,0,0,0,0,0,1
data 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1

for i=0 to 14
for j=0 to 49
read level(j,i)
next j
next i

rem Background data
dim background(25,15)
data 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,5,5,4,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,5,5,2,3,5,5,4,5,5,5,5,5,5,5,5
data 5,5,5,2,3,5,5,5,5,5,5,5,6,7,5,5,5,5,5,5,5,5,4,5,5
data 5,5,5,6,7,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,2,3,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,4,5,5,5,5,5,5,5,6,7,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,4,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5
data 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5

for i=0 to 14
for j=0 to 24
read background(j,i)
next j
next i

rem Set some variables
frame=1
x=100
y=300
g=1

do

rem Moving variable determines whether the player
rem is moving or not, and changes the animation state later
moving=0

if leftkey()=1
rem If the sprite is facing right (default as I drew it)
rem then turn it the other way
if sprite mirrored(1)=0 then mirror sprite 1

rem Moving, so provide animation later
moving=1

rem If the tile that the player is about to move to is
rem empty, then move the player
if level(int((x-2)/32),int(y/32)+1)=0 then x=x-2

rem If the player is moving off the screen to the left,
rem adjust the xoffset accordingly
if x-xoffset<140 and xoffset>0 then xoffset=xoffset-2
endif

if rightkey()=1
rem If the sprite is facing left then turn it the other way
if sprite mirrored(1)=1 then mirror sprite 1

rem Moving, so provide animation later

moving=1

rem If the tile that the player is about to move to is
rem empty, then move the player
if level(int((x+2)/32),int(y/32)+1)=0 then x=x+2

rem If the player is moving off the screen to the right,
rem adjust the xoffset accordingly
if x-xoffset>500 and xoffset<958 then xoffset=xoffset+2
endif

if spacekey()=1 and jump=0
rem If the player is allowed to jump (on the ground) then
rem set the yvelocity to 15 upwards
jump=1
yvel=-15
endif

rem Gravity
yvel=yvel+g
rem If the tile that the player is about to move to is
rem empty, then move the player due to gravity
if level(int(x/32),int((y+yvel)/32)+1)=0
y=y+yvel
jump=1
else
rem Otherwise, set the vertical yvel to 0 and allow the
rem player to jump again
yvel=0
jump=0
endif

rem Tile offsets
tileoffset=int(xoffset/32)
backoffset=int((int(xoffset/6)/32))

rem Draw the background
for i=0 to 20
for j=0 to 15
paste image background(i+backoffset,j)+100,(i*32)-(xoffset/6)+(backoffset*32),j*32
next j
next i

rem Draw the foreground
for i=0 to 20
for j=0 to 15
paste image level(i+tileoffset,j)+100,(i*32)-xoffset+(tileoffset*32),j*32,1
next j
next i

rem If the player is moving, animate the sprite by changing
rem the image number in a cycle, with a delay of 5 cycles per frame
if moving>0
a=a+1
if a=5
a=1
frame=frame+1
if frame=5 then frame=1
endif
endif

rem Position and offset the sprite
sprite 1,x-xoffset,y,frame
offset sprite 1,16,0

rem End of the loop
sync
loop

make the images they have to be something by something

the guys animated and whatnot have fun

Try Chronic Basic the new programming langauge -- 1% Done

Back to top

Profile PM Email Website

2D Analyst

AGK Developer

22

Years of Service

User Offline

Joined: 2nd May 2004

Location:

Posted: 11th Jan 2005 12:30

Link

Marsh..that code really helped me out alot. I know how to use array, but I can't put it into coding for side scrolling game. I also looked around the forum, but the side scrolling tutorial doesn't explain itself too well. Sure, I can just copy and paste someone else side scrolling code, but then I can't make innovating games if I don't understand the codes. Thanks man!

www.creepyfish.com

eatfishy

Back to top

Profile PM Website

pizzaman

22

Years of Service

User Offline

Joined: 18th Feb 2004

Location: Gateshead, UK

Posted: 12th Jan 2005 00:44

Link

Try This

Its a mini tutorial on tile based collision which scrolls, its in 2 parts - take out the remstart to play the first program or just leave it to play the second which scrolls and has collision.

`****************************************************************************************
`**************************** HOW TILE BASED COLLISION WORKS ****************************
`****************************          by pizzaman           ****************************
`**************************** Date:             14/6/04      ****************************
`**************************** Time to complete: 1 hour       ****************************
`****************************************************************************************

`THE PRINCIPLE -
`The visible screen is devided up into boxes which we call tiles. This means that each
`tile is sitting on a range of coordinates. For example a 20 pixel by 20 pixel tile that
`is the top-left most tile is sitting on the coordinates (0,0) to (19,19). Since we know
`each tile is sitting on a range of coordinates we can check to see whether a sprite (or
`image) has the same coordinates as the tile. However, we must take into consideration
`that a sprite (or image) is usually bigger than a pixel, so we have to form a collision
`box around the sprite.

`HOW TO IMPLEMENT A TILE BASED COLLISION SYSTEM -
`Firstly we need a 2 dimensional array to store tile data in (Tile data is the image
`numbers of the of the images you are going to use; e.g. 1 could be a wall, 2 could be
`a grass image etc. Note: the image sizes should be the same as the tile size you will
`use.
`Secondly we store the data in the array. Note: you could already store data in an array
`and just load the array - this would be faster for loading times.
`Next we create some collision points around our sprite, usually 4 points which would
`be placed at the corners of the sprite creating a collision box, you could have more
`collision points if a collision box is not suitable.
`Next we have to figure out which tile in the array each collision point is on to do
`this you have to use the formula
`
`                 Tile = (x / Tile Sise, y / Tile size)
`
`                 where Tile is the tile in the array, x is the x coordinate of the
`                 collision point your checking for and y is the y coordinate of the
`                 collision point your checking for
`
`Now if the tile is a tile you dont want your sprite to go on; just reset the sprites
`coordinates to what they were before the collision and voila!!!! you've got tile
`based collision.

`rem out along with the ending one to execute this program
remstart

`gosubs are here instead of actual code, just to make things look neat
gosub screensetup
gosub createimages
gosub loaddata
gosub makeplayer

`start the main loop
do

`exit the loop if space bar is pressed - effectively ending the program
   `Note: it has to be place here and not in a gosub as it wont work
   if spacekey() = 1 then exit

gosub controls
   gosub collision

`call our home made function for displaying the tiles
   PasteTiles()

gosub displayplayer

`update screen
   sync

loop

gosub cleanup

`end the program
end

`****************************************************************************************
`************************************* End of program ***********************************
`****************************************************************************************

screensetup:

`delete anything stored in video memory
   flush video memory

`set screen resolution
   set display mode 800,600,32

`setup syncing
   sync on
   sync rate 150

return

createimages:

`create a green box
   cls rgb(0,255,0)
   get image 1,0,0,40,40,1

`create a yellow box as the player
   cls rgb(255,255,0)
   get image 2,0,0,40,40,1

`create a red box
   cls rgb(255,0,0)
   get image 10,0,0,40,40,1

`create a blue box
   cls rgb(0,0,255)
   get image 11,0,0,40,40,1

return

loaddata:

`create an array called TileMap - we will use this to store the tile data.
   `an array is like a file cabinet - in each drawer of the file cabinet there are
   `folders that hold our data. Therefore in our "file cabinet" we have 20 drawers; and
   `inside of each drawer we 15 folders; which hold data we want to access.
   `Also arrays can have up to 5 dimensions (ours has 2 dimensions) - you can visualise
   `this as being more folders inside of the other folders and so on; and of course you
   `can just have 1 dimension array as well (in other words just the drawers)
   dim TileMap(20,15)

`load data into the array - basically the computer will read 20 bits of data from one
   `data statment (at the end of the program), then move onto the next data statment
   `until all 15 data statments are read. Note: all 15 data statments could have been
   `combined into one large data statment of 300 items; the reason why its not currently
   `like that is its hard to read also you can kind of see the map the way its currently
   `written.
   for y = 0 to 14

for x = 0 to 19

read TileMap(x,y)

next x

next y

return

makeplayer:

`store predefined coordinates of player
   x1 = 380
   y1 = 280

`make the player
   sprite 1,x1,y1,2

`this sets the sprites properties; by placing a 0 in the backsave flag the background
   `behind sprite will not be saved by the computer, hence will speed up our program a
   `little. We are not using the backsave feature because we will be replacing the
   `background ourselves; this is due to when a sprite is created the 3d backdrop is
   `automatically created (a blue screen wiping any 2d images previously draw to the
   `screen) and cannot be turned off as long as you have a sprite on screen.
   set sprite 1,0,1

return

controls:

`store the x and y coordinates of the player into the variables oldx1 and oldy1
   oldx1 = x1
   oldy1 = y1

`makes the player move by altering the sprites coordinates
   if leftkey()  = 1 then x1 = x1 - 2
   if rightkey() = 1 then x1 = x1 + 2
   if upkey()    = 1 then y1 = y1 - 2
   if downkey()  = 1 then y1 = y1 + 2

return

collision:

`the following 8 lines of code stores the old and new left,right,top,bottom edges of
   `the sprite in the respective variables

`gets which tiles the current left and right co-ordinates of the player are on
   LeftTileNum   = int(x1 / 40)
   RightTileNum  = int((x1 + 39) / 40)
   `gets which tiles the current top and bottom co-ordinates of the player are on
   TopTileNum    = int(y1 / 40)
   BottomTileNum = int((y1 + 39) / 40)

`gets which tiles the old left and right co-ordinates of the player are on
   OldLeftTileNum   = int(oldx1 / 40)
   OldRightTileNum  = int((oldx1 + 39) / 40)
   `gets which tiles the old top and bottom co-ordinates of the player are on
   OldTopTileNum    = int(oldy1 / 40)
   OldBottomTileNum = int((oldy1 + 39) / 40)

`this is where we check for those 4 collision points; if the collision point is on a
   `tile you are not able to pass through (in our case a tile that has an image number
   `of 10 or greater), then the old coordinates of the sprite are restored.
   `Note: to have sliding collision we must check the the current x tile against the
   `old y tile and vice versa.

`checks for top-left collision point
   if TileMap(LeftTileNum,    OldTopTileNum)     >= 10 then x1 = oldx1
   if TileMap(OldLeftTileNum, TopTileNum)        >= 10 then y1 = oldy1

`checks for top-right collision point
   if TileMap(RightTileNum,    OldTopTileNum)    >= 10 then x1 = oldx1
   if TileMap(OldRightTileNum, TopTileNum)       >= 10 then y1 = oldy1

`checks for bottom-left collision point
   if TileMap(LeftTileNum,    OldBottomTileNum)  >= 10 then x1 = oldx1
   if TileMap(OldLeftTileNum, BottomTileNum)     >= 10 then y1 = oldy1

`checks foe bottom-right collision point
   if TileMap(RightTileNum,    OldBottomTileNum) >= 10 then x1 = oldx1
   if TileMap(OldRightTileNum, BottomTileNum)    >= 10 then y1 = oldy1

return

displayplayer:

`display sprite
   sprite 1,x1,y1,2

`show frame rate (also sometimes its useful to display debug info like player
   `player positions, program specific variables etc)
   text 10,10,str$(screen fps())

return

cleanup:

`delete any media involved in this program
   for x = 1 to 11
      if image exist(x) then delete image x
      if sprite exist(x) then delete sprite x
   next x

`delete anything thats left in the video memory - if anything
   flush video memory

return

`this is a simple user defined function - all it does is paste the tile images to the
`screen in the correct order from the array
function PasteTiles()

for y = 0 to 14

for x = 0 to 19

paste image TileMap(x,y),x*40,y*40

next x

next y

endfunction

`store tile data at the end of the program so its out of the way
data 10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1,10
data 10, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10, 1, 1,11, 1,11, 1, 1, 1, 1, 1, 1, 1, 1,11, 1,11, 1, 1,10
data 10, 1, 1,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11, 1, 1,10
data 10, 1, 1,11, 1,11, 1, 1, 1, 1, 1, 1, 1, 1,11, 1,11, 1, 1,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1,10
data 10, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10

`rem out this along with the starting one to execute this program
remend

`****************************************************************************************
`**************************** HOW TO SCROLL A TILE BASED MAP ****************************
`****************************          by pizzaman           ****************************
`**************************** Date:             11/7/04      ****************************
`**************************** Time to complete: 30 mins      ****************************
`****************************************************************************************

`THE PRINCIPLE -
`To scroll a tile based map, you simply have to move all the tiles in the given direction
`then when the tiles have moved more pixels then the size of the tiles, the tiles get
`reset to the positions they were in before they were moved, but their images changed
`to simulated the tiles have moved, and generating a seamless transition.

`HOW TO IMPLEMENT A SCROLLING TILE BASED MAP -
`Instead of using a system that relies on screen coordinates, we need to build our map
`on a global coordinate system where coordinates (0,0) is the first tile (usually the
`top-left most tile). Everything we do will be based in this global coordinate system,
`which will include the player and their collision system. The coordinates then will be
`transferred to screen coordinates, where the images can be pasted correctly.
`Note that an extra row and column of tiles are pasted to the screen, this is to
`generate the seamless scrolling.

`****************************************************************************************
`*********************************** Start of program ***********************************
`****************************************************************************************

`gosubs are here instead of actual code, just to make things look neat
gosub screensetup
gosub DeclareVariables
gosub createimages
gosub loaddata
gosub makeplayer

`start the main loop
do

`exit the loop if space bar is pressed - effectively ending the program
   `Note: it has to be place here and not in a gosub as it wont work
   if spacekey() = 1 then exit

gosub controls
   gosub collision
   gosub ScrollScreen
   gosub displayplayer
   gosub DisplayDebugInfo

`update screen
   sync

loop

gosub cleanup

`end the program
end

`****************************************************************************************
`************************************* End of program ***********************************
`****************************************************************************************

screensetup:

`delete anything stored in video memory
   flush video memory

`set screen resolution
   set display mode 800,600,32

`setup syncing
   sync on
   sync rate 150

return

DeclareVariables:

`store how many horizontal/verticle tiles there are
   NumOfTilesX = 40
   NumOfTilesY = 40

`store the size (in pixels) of a tile
   TileSizeX = 40
   TileSizeY = 40

`store the speed of the tile
   SpeedX = 2
   SpeedY = 2

`store the coordinates that will make the player be at the centre of the screen
   ScreenCentreX = 380
   ScreenCentreY = 280

`store predefined coordinates of player
   X1 = ScreenCentreX
   Y1 = ScreenCentreY

`store predefined coordinates of map
   MapX = 0
   MapY = 0

return

createimages:

`create a green box
   box 0,0,TileSizeX,TileSizeY,rgb(0,255,0),rgb(0,225,0),rgb(0,225,0),rgb(0,200,0)
   get image 1,0,0,TileSizeX,TileSizeY,1

`create a yellow/orange box as the player
   box 0,0,TileSizeX,TileSizeY,rgb(255,255,0),rgb(255,128,0),rgb(255,128,0),rgb(255,255,0)
   get image 2,0,0,TileSizeX,TileSizeY,1

`create a red box
   cls rgb(255,0,0)
   get image 10,0,0,TileSizeX,TileSizeY,1

`create a blue box
   box 0,0,TileSizeX,TileSizeY,rgb(0,0,255),rgb(0,0,225),rgb(0,0,225),rgb(0,0,200)
   get image 11,0,0,TileSizeX,TileSizeY,1

return

loaddata:

`create an array called TileMap - we will use this to store the tile data.
   `an array is like a file cabinet - in each drawer of the file cabinet there are
   `folders that hold our data. Therefore in our "file cabinet" we have 20 drawers; and
   `inside of each drawer we 15 folders; which hold data we want to access.
   `Also arrays can have up to 5 dimensions (ours has 2 dimensions) - you can visualise
   `this as being more folders inside of the other folders and so on; and of course you
   `can just have 1 dimension array as well (in other words just the drawers)
   dim TileMap(NumOfTilesX - 1,NumOfTilesY - 1)

`load data into the array - basically the computer will read 20 bits of data from one
   `data statment (at the end of the program), then move onto the next data statment
   `until all 15 data statments are read. Note: all 15 data statments could have been
   `combined into one large data statment of 300 items; the reason why its not currently
   `like that is its hard to read also you can kind of see the map the way its currently
   `written.
   for y = 0 to NumOfTilesY - 1

for x = 0 to NumOfTilesX - 1

read TileMap(x,y)

next x

next y

return

makeplayer:

`make the player
   sprite 1,X1,Y1,2

`this sets the sprites properties; by placing a 0 in the backsave flag the background
   `behind sprite will not be saved by the computer, hence will speed up our program a
   `little. We are not using the backsave feature because we will be replacing the
   `background ourselves; this is due to when a sprite is created the 3d backdrop is
   `automatically created (a blue screen wiping any 2d images previously draw to the
   `screen) and cannot be turned off as long as you have a sprite on screen.
   set sprite 1,0,1

return

controls:

`store the map's x and y coordinates into the variables OldMapX and OldMapY
   OldMapX = MapX
   OldMapY = MapY

`store the x and y coordinates of the player into the variables oldX1 and oldY1
   OldX1 = X1
   OldY1 = Y1

`makes the player move by altering the sprites coordinates
   `makes the map move by altering the maps coordinates, if the player is roughly at the
   `centre of the screen
   if leftkey()  = 1
      if MapX < X1 - (ScreenCentreX - 5) and MapX > X1 - (ScreenCentreX + 5) then MapX = MapX - SpeedX
      X1 = X1 - SpeedX
   endif
   if rightkey() = 1
      if MapX < X1 - (ScreenCentreX - 5) and MapX > X1 - (ScreenCentreX + 5) then MapX = MapX + SpeedX
      X1 = X1 + SpeedX
   endif
   if upkey()    = 1
      if MapY < Y1 - (ScreenCentreY - 5) and MapY > Y1 - (ScreenCentreY + 5) then MapY = MapY - SpeedY
      Y1 = Y1 - SpeedY
   endif
   if downkey()  = 1
      if MapY < Y1 - (ScreenCentreY - 5) and MapY > Y1 - (ScreenCentreY + 5) then MapY = MapY + SpeedY
      Y1 = Y1 + SpeedY
   endif

return

collision:

`NOTE : you may have noticed the player sticking to the blocks, to stop this make the
   `       collision area of the player smaller and edit the players image to the same
   `       same size (so it doesn't look weird). You have to make the change in the
   `       players x and y sizes greater or equal to their speed or you wont notice a
   `       difference.

`the following 8 lines of code stores the old and new left,right,top,bottom edges of
   `the sprite in the respective variables

`gets which tiles the current left and right co-ordinates of the player are on
   LeftTileNum   = int(X1 / TileSizeX)
   RightTileNum  = int((X1 + (TileSizeX - 1)) / TileSizeX)
   `gets which tiles the current top and bottom co-ordinates of the player are on
   TopTileNum    = int(Y1 / TileSizeY)
   BottomTileNum = int((Y1 + (TileSizeY - 1)) / TileSizeY)

`gets which tiles the old left and right co-ordinates of the player are on
   OldLeftTileNum   = int(oldX1 / TileSizeX)
   OldRightTileNum  = int((oldX1 + (TileSizeX - 1)) / TileSizeX)
   `gets which tiles the old top and bottom co-ordinates of the player are on
   OldTopTileNum    = int(oldY1 / TileSizeY)
   OldBottomTileNum = int((oldY1 + (TileSizeY - 1)) / TileSizeY)

`this is where we check for those 4 collision points; if the collision point is on a
   `tile you are not able to pass through (in our case a tile that has an image number
   `of 10 or greater), then the old coordinates of the sprite are restored.
   `Note: to have sliding collision we must check the the current x tile against the
   `old y tile and vice versa.

`checks for top-left collision point
   if TileMap(LeftTileNum,    OldTopTileNum)     >= 10 then X1 = oldX1 : MapX = OldMapX
   if TileMap(OldLeftTileNum, TopTileNum)        >= 10 then Y1 = oldY1 : MapY = OldMapY

`checks for top-right collision point
   if TileMap(RightTileNum,    OldTopTileNum)    >= 10 then X1 = oldX1 : MapX = OldMapX
   if TileMap(OldRightTileNum, TopTileNum)       >= 10 then Y1 = oldY1 : MapY = OldMapY

`checks for bottom-left collision point
   if TileMap(LeftTileNum,    OldBottomTileNum)  >= 10 then X1 = oldX1 : MapX = OldMapX
   if TileMap(OldLeftTileNum, BottomTileNum)     >= 10 then Y1 = oldY1 : MapY = OldMapY

`checks for bottom-right collision point
   if TileMap(RightTileNum,    OldBottomTileNum) >= 10 then X1 = oldX1 : MapX = OldMapX
   if TileMap(OldRightTileNum, BottomTileNum)    >= 10 then Y1 = oldY1 : MapY = OldMapY

`stops player from scrolling past the edges of the map by resetting the maps
   `global coordinates to their maximum values. The maximum values are calculated by
   `(TileSizeX * NumOfTilesInRow) - SpeedX               - for MapX
   `(TileSizeY * NumOfTilesInColumn) - SpeedY            - for MapX
   if MapX < 0    then MapX = 0
   if MapX >= 798 then MapX = 798
   if MapY < 0    then MapY = 0
   if MapY >= 598 then MapY = 598

return

ScrollScreen:

`works out the tile number within array to start displaying tiles at
   TileNumX = MapX / NumOfTilesX
   TileNumY = MapY / NumOfTilesY

`cache calculation to tempX and TempY variables for a minor speed increase
   `this calculation works out how many pixels to offset the position where the tile
   `images should be placed.
   TempX = MapX - (TileNumX * TileSizeX)
   TempY = MapY - (TileNumY * TileSizeY)

`this pastes the images to screen in the correct order by working out where to start
   `pasting the images from in the array, then displaying the images at the correct
   `screen coordinates
   for y = 0 to 15

for x = 0 to 20

paste image TileMap(x + TileNumX,y + TileNumY),(x * TileSizeX) - TempX,(y * TileSizeY) - TempY

next x

next y

return

displayplayer:

`display sprite
   sprite 1,X1 - MapX,Y1 - MapY,2

return

DisplayDebugInfo:

text 0, 0,"FPS  " + str$(screen fps())
   text 0,20,"MapX " + str$(MapX)
   text 0,40,"MapY " + str$(MapY)
   text 0,60,"X1   " + str$(X1)
   text 0,80,"Y1   " + str$(Y1)

text 100, 0,"Press spacebar to exit"

return

cleanup:

`delete any media involved in this program
   for x = 1 to 11
      if image exist(x) then delete image x
      if sprite exist(x) then delete sprite x
   next x

`delete anything thats left in the video memory - if anything
   flush video memory

return

`store tile data at the end of the program so its out of the way
data 10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1, 1, 1, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1,10
data 10, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1, 1, 1, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10, 1, 1,11, 1,11, 1, 1, 1, 1, 1, 1, 1, 1,11, 1,11, 1, 1, 1, 1, 1, 1,11, 1,11, 1, 1, 1, 1, 1, 1, 1, 1,11, 1,11, 1, 1,10
data 10, 1, 1,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11, 1, 1, 1, 1, 1, 1,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11, 1, 1,10,
data 10, 1, 1,11, 1,11, 1, 1, 1, 1, 1, 1, 1, 1,11, 1,11, 1, 1, 1, 1, 1, 1,11, 1,11, 1, 1, 1, 1, 1, 1, 1, 1,11, 1,11, 1, 1,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1, 1, 1, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1,10
data 10, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1, 1, 1, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1, 1, 1, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1,10
data 10, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1, 1, 1, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10, 1, 1,11, 1,11, 1, 1, 1, 1, 1, 1, 1, 1,11, 1,11, 1, 1, 1, 1, 1, 1,11, 1,11, 1, 1, 1, 1, 1, 1, 1, 1,11, 1,11, 1, 1,10
data 10, 1, 1,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11, 1, 1, 1, 1, 1, 1,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11, 1, 1,10
data 10, 1, 1,11, 1,11, 1, 1, 1, 1, 1, 1, 1, 1,11, 1,11, 1, 1, 1, 1, 1, 1,11, 1,11, 1, 1, 1, 1, 1, 1, 1, 1,11, 1,11, 1, 1,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1, 1, 1, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1,10
data 10, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1, 1, 1, 1, 1,11,11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,11,11, 1, 1,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,10
data 10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10

Hope you find this useful
pizzaman  
Edit Post            Back to top

There are 16 Messages in total -  Page 1 of   1   
  
Your Time Offset is: -1 hours from the Server time

Post Forum Message
 Post Forum Message 
  Text:          
  
Emoties:                                                          
                                                         more  
Message: 
Close all Tags 
Code: 
If you want to attach source code to this message then paste it above to retain correct formatting.  
Attachment:    Maximum 1MB file size 
   
Looking for Customer or Order Support? Then you're posting to the wrong place. Try here instead.
Please note that by posting a Forum Message you are agreeing to all terms in our Acceptable Usage Policy.     
Forum Search
Enter a word or phrase to search our Forum for:

Thread Subject Search 
Search Phrase:  
   
   Google Forum Search 
Search Phrase: