text prob - GameCreators Forum

Author

Message

GameMaker Jason

21

Years of Service

User Offline

Joined: 22nd Nov 2003

Location: UK

Posted: 20th Mar 2004 22:16

Link

load image "Pacman.png",1
load image "bblock.png",2

sync on
sync rate 0

pacx=320
pacy=336
pacd=4
distancex=0
distancey=0
pacmapx=20
pacmapy=21
pacs=0

dim map(28,30)

`read map data and store in the map array
restore map
for j = 0 to 28
   for i = 0 to 28
      read map(i,j)
   next i
next j

`draw the map
Sprite 1,pacx,pacy,1
set sprite 1,1,1
for x = 0 to 28
   for y = 0 to 29
      if map(x,y) = 1 then box x*16,y*16,(x*16)+16,(y*16)+16
      if map(x,y) = 2 then circle x*16+8, y*16+8, 3
      if map(x,y) = 3 then circle x*16+8, y*16+8, 6
   next y
next x

Do
   `exit the program
   if escapekey()=1 then undim map(0) : end
   `check directions and collision
   if downkey()=1 then pacd=1
   if upkey()=1 then pacd=2
   if rightkey()=1 then pacd=3
   if leftkey()=1 then pacd=4
   if pacd=1 and map(pacmapx,pacmapy+1)<>1 then pacy=pacy+4 : distancey=distancey+4
   if pacd=2 and map(pacmapx,pacmapy-1)<>1 then pacy=pacy-4 : distancey=distancey-4
   if pacd=3 and map(pacmapx+1,pacmapy)<>1 then pacx=pacx+4 : distancex=distancex+4
   if pacd=4 and map(pacmapx-1,pacmapy)<>1 then pacx=pacx-4 : distancex=distancex-4
   if distancex=16 then inc pacmapx : map(pacmapx,pacmapy)=5 : distancex=0 : pacs=pacs+1
   if distancex=-16 then dec pacmapx : map(pacmapx,pacmapy)=5 : distancex=0 : pacs=pacs+1
   if distancey=16 then inc pacmapy : map(pacmapx,pacmapy)=5 : distancey=0 : pacs=pacs+1
   if distancey=-16 then dec pacmapy : map(pacmapx,pacmapy)=5 : distancey=0 : pacs=pacs+1
   for x = 0 to 28
      for y = 0 to 29
         if map(x,y) = 5 then paste image 2,x*16,y*16
      next y
   next x
   Sprite 1,pacx,pacy,1
   Text 10,10,"score: " +STR$(pacs)
Sync
Loop

`data for the map
map:
data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,1,2,2,2,2,2,2,2,2,1,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,3,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,3,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,1,2,1,1,1,1,2,1,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,1,2,1,1,1,1,2,1,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,1,2,1,1,1,1,2,1,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,1,1,0,0,1,1,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,4,4,4,4,4,4,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,4,4,4,4,4,4,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,1,4,4,4,4,4,4,1,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,4,4,4,4,4,4,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,4,4,4,4,4,4,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,1,1,1,1,1,1,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,2,1,1,1,1,2,1,1,2,1,1,1,1,2,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,2,1,1,1,1,2,1,1,2,1,1,1,1,2,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,2,1,1,1,1,2,1,1,2,1,1,1,1,2,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,2,1,1,1,1,1,1,2,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,2,1,1,1,1,1,1,2,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,3,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,3,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,1,2,2,2,2,2,2,2,2,1,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1

+ Code Snippet

load image "Pacman.png",1
load image "bblock.png",2

sync on
sync rate 0

pacx=320
pacy=336
pacd=4
distancex=0
distancey=0
pacmapx=20
pacmapy=21
pacs=0

dim map(28,30)

`read map data and store in the map array
restore map
for j = 0 to 28
   for i = 0 to 28
      read map(i,j)
   next i
next j

`draw the map
Sprite 1,pacx,pacy,1
set sprite 1,1,1
for x = 0 to 28
   for y = 0 to 29
      if map(x,y) = 1 then box x*16,y*16,(x*16)+16,(y*16)+16
      if map(x,y) = 2 then circle x*16+8, y*16+8, 3
      if map(x,y) = 3 then circle x*16+8, y*16+8, 6
   next y
next x

Do
   `exit the program
   if escapekey()=1 then undim map(0) : end
   `check directions and collision
   if downkey()=1 then pacd=1
   if upkey()=1 then pacd=2
   if rightkey()=1 then pacd=3
   if leftkey()=1 then pacd=4
   if pacd=1 and map(pacmapx,pacmapy+1)<>1 then pacy=pacy+4 : distancey=distancey+4
   if pacd=2 and map(pacmapx,pacmapy-1)<>1 then pacy=pacy-4 : distancey=distancey-4
   if pacd=3 and map(pacmapx+1,pacmapy)<>1 then pacx=pacx+4 : distancex=distancex+4
   if pacd=4 and map(pacmapx-1,pacmapy)<>1 then pacx=pacx-4 : distancex=distancex-4
   if distancex=16 then inc pacmapx : map(pacmapx,pacmapy)=5 : distancex=0 : pacs=pacs+1
   if distancex=-16 then dec pacmapx : map(pacmapx,pacmapy)=5 : distancex=0 : pacs=pacs+1
   if distancey=16 then inc pacmapy : map(pacmapx,pacmapy)=5 : distancey=0 : pacs=pacs+1
   if distancey=-16 then dec pacmapy : map(pacmapx,pacmapy)=5 : distancey=0 : pacs=pacs+1
   for x = 0 to 28
      for y = 0 to 29
         if map(x,y) = 5 then paste image 2,x*16,y*16
      next y
   next x
   Sprite 1,pacx,pacy,1
   Text 10,10,"score: " +STR$(pacs)
Sync
Loop


`data for the map
map:
data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,1,2,2,2,2,2,2,2,2,1,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,3,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,3,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,1,2,1,1,1,1,2,1,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,1,2,1,1,1,1,2,1,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,1,2,1,1,1,1,2,1,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,1,1,0,0,1,1,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,4,4,4,4,4,4,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,4,4,4,4,4,4,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,1,4,4,4,4,4,4,1,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,4,4,4,4,4,4,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,4,4,4,4,4,4,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,1,1,1,1,1,1,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,2,1,1,1,1,2,1,1,2,1,1,1,1,2,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,2,1,1,1,1,2,1,1,2,1,1,1,1,2,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,2,1,1,1,1,2,1,1,2,1,1,1,1,2,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,2,1,1,1,1,1,1,2,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,2,1,1,1,1,1,1,2,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,3,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,3,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,1,2,2,2,2,2,2,2,2,1,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1

When the score is printed on the screen the previous number is not deleted and i just end up with a white block. how do i correct this without clearing the whole screen?

http://www.freewebs.com/the_code_monkeys/ My Games Website

Back to top

Profile PM Email Website

CattleRustler

Retired Moderator

21

Years of Service

User Offline

Joined: 8th Aug 2003

Location: case modding at overclock.net

Posted: 20th Mar 2004 22:27

Link

there are various ways but you might want to print some blank chars then print the value

Home of the VB.NET Class Builder Utility - Demo available now!

Back to top

Profile PM

GameMaker Jason

21

Years of Service

User Offline

Joined: 22nd Nov 2003

Location: UK

Posted: 20th Mar 2004 23:06

Link

what other ways are there becuase that just moves the text right a bit?

http://www.freewebs.com/the_code_monkeys/ My Games Website

Back to top

Profile PM Email Website

CattleRustler

Retired Moderator

21

Years of Service

User Offline

Joined: 8th Aug 2003

Location: case modding at overclock.net

Posted: 21st Mar 2004 00:01

Link

text 10,10," "
text 10,10,data$

Home of the VB.NET Class Builder Utility - Demo available now!

Back to top

Profile PM

GameMaker Jason

21

Years of Service

User Offline

Joined: 22nd Nov 2003

Location: UK

Posted: 21st Mar 2004 11:39

Link

load image "PacmanL.png",1
load image "PacmanR.png",2
load image "PacmanU.png",3
load image "PacmanD.png",4
load image "bblock.png",5

sync on
sync rate 0
hide mouse

pacx=320
pacy=336
pacd=3
distancex=0
distancey=0
pacmapx=20
pacmapy=21
pacs=0
pacin=1

dim map(28,30)

`read map data and store in the map array
restore map
for j = 0 to 28
   for i = 0 to 28
      read map(i,j)
   next i
next j

`draw the map
Sprite 1,pacx,pacy,pacin
set sprite 1,1,1
for x = 0 to 28
   for y = 0 to 29
      if map(x,y) = 1 then box x*16,y*16,(x*16)+16,(y*16)+16
      if map(x,y) = 2 then circle x*16+8, y*16+8, 3
      if map(x,y) = 3 then circle x*16+8, y*16+8, 6
   next y
next x

Do
   `exit the program
   if escapekey()=1 then end
   `check directions and collision
   if upkey()=1 then pacd=1 : pacin=3
   if downkey()=1 then pacd=2 : pacin=4
   if leftkey()=1 then pacd=3 : pacin=1
   if rightkey()=1 then pacd=4 : pacin=2
   if pacd=1 and map(pacmapx,pacmapy-1)<>1 then pacy=pacy-4 : distancey=distancey-4
   if pacd=2 and map(pacmapx,pacmapy+1)<>1 then pacy=pacy+4 : distancey=distancey+4
   if pacd=3 and map(pacmapx-1,pacmapy)<>1 then pacx=pacx-4 : distancex=distancex-4
   if pacd=4 and map(pacmapx+1,pacmapy)<>1 then pacx=pacx+4 : distancex=distancex+4
   if distancex=16 then inc pacmapx : map(pacmapx,pacmapy)=5 : distancex=0
   if distancex=-16 then dec pacmapx : map(pacmapx,pacmapy)=5 : distancex=0
   if distancey=16 then inc pacmapy : map(pacmapx,pacmapy)=5 : distancey=0
   if distancey=-16 then dec pacmapy : map(pacmapx,pacmapy)=5 : distancey=0
   for x = 0 to 28
      for y = 0 to 29
         if map(x,y) = 5 then paste image 5,x*16,y*16 : numpills=numpills-1
      next y
   next x
   Sprite 1,pacx,pacy,pacin
   if map(pacmapx,pacmapy)=2 then pacs=pacs+1
   if numpills=0 then goto win
   Sync
Loop

win:
cls
text 10,10,"score: " +STR$(pacs)
wait key

`data for the map
map:
data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,1,2,2,2,2,2,2,2,2,1,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,1,2,1,1,1,1,2,1,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,1,2,1,1,1,1,2,1,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,1,2,1,1,1,1,2,1,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,1,1,0,0,1,1,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,4,4,4,4,4,4,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,4,4,4,4,4,4,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,1,4,4,4,4,4,4,1,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,4,4,4,4,4,4,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,4,4,4,4,4,4,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,1,1,1,1,1,1,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,2,1,1,1,1,2,1,1,2,1,1,1,1,2,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,2,1,1,1,1,2,1,1,2,1,1,1,1,2,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,2,1,1,1,1,2,1,1,2,1,1,1,1,2,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,2,1,1,1,1,1,1,2,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,2,1,1,1,1,1,1,2,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,1,2,2,2,2,2,2,2,2,1,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1

+ Code Snippet

load image "PacmanL.png",1
load image "PacmanR.png",2
load image "PacmanU.png",3
load image "PacmanD.png",4
load image "bblock.png",5

sync on
sync rate 0
hide mouse

pacx=320
pacy=336
pacd=3
distancex=0
distancey=0
pacmapx=20
pacmapy=21
pacs=0
pacin=1

dim map(28,30)

`read map data and store in the map array
restore map
for j = 0 to 28
   for i = 0 to 28
      read map(i,j)
   next i
next j

`draw the map
Sprite 1,pacx,pacy,pacin
set sprite 1,1,1
for x = 0 to 28
   for y = 0 to 29
      if map(x,y) = 1 then box x*16,y*16,(x*16)+16,(y*16)+16
      if map(x,y) = 2 then circle x*16+8, y*16+8, 3
      if map(x,y) = 3 then circle x*16+8, y*16+8, 6
   next y
next x

Do
   `exit the program
   if escapekey()=1 then end
   `check directions and collision
   if upkey()=1 then pacd=1 : pacin=3
   if downkey()=1 then pacd=2 : pacin=4
   if leftkey()=1 then pacd=3 : pacin=1
   if rightkey()=1 then pacd=4 : pacin=2
   if pacd=1 and map(pacmapx,pacmapy-1)<>1 then pacy=pacy-4 : distancey=distancey-4
   if pacd=2 and map(pacmapx,pacmapy+1)<>1 then pacy=pacy+4 : distancey=distancey+4
   if pacd=3 and map(pacmapx-1,pacmapy)<>1 then pacx=pacx-4 : distancex=distancex-4
   if pacd=4 and map(pacmapx+1,pacmapy)<>1 then pacx=pacx+4 : distancex=distancex+4
   if distancex=16 then inc pacmapx : map(pacmapx,pacmapy)=5 : distancex=0
   if distancex=-16 then dec pacmapx : map(pacmapx,pacmapy)=5 : distancex=0
   if distancey=16 then inc pacmapy : map(pacmapx,pacmapy)=5 : distancey=0
   if distancey=-16 then dec pacmapy : map(pacmapx,pacmapy)=5 : distancey=0
   for x = 0 to 28
      for y = 0 to 29
         if map(x,y) = 5 then paste image 5,x*16,y*16 : numpills=numpills-1
      next y
   next x
   Sprite 1,pacx,pacy,pacin
   if map(pacmapx,pacmapy)=2 then pacs=pacs+1
   if numpills=0 then goto win
   Sync
Loop

win:
cls
text 10,10,"score: " +STR$(pacs)
wait key

`data for the map
map:
data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,1,2,2,2,2,2,2,2,2,1,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,1,2,1,1,1,1,2,1,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,1,2,1,1,1,1,2,1,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,1,2,1,1,1,1,2,1,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,1,1,0,0,1,1,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,4,4,4,4,4,4,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,4,4,4,4,4,4,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,1,4,4,4,4,4,4,1,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,4,4,4,4,4,4,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,4,4,4,4,4,4,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,2,1,1,1,1,1,1,1,1,2,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,2,1,1,1,1,2,1,1,2,1,1,1,1,2,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,2,1,1,1,1,2,1,1,2,1,1,1,1,2,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,2,1,1,1,1,2,1,1,2,1,1,1,1,2,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,2,1,1,1,1,1,1,2,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,1,1,2,1,1,1,1,1,1,2,1,1,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,1,1,2,1,2,1,1,1,1,1,1,2,1,2,1,1,2,1
data 0,0,0,0,0,0,0,0,0,1,2,2,2,2,1,2,2,2,2,2,2,2,2,1,2,2,2,2,1
data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1

I have changed the code so that when he eats all of the pills (circles) it says his score but when i have eaten all the pills nothing happens why?

http://www.freewebs.com/the_code_monkeys/ My Games Website

Back to top

Profile PM Email Website

Sorry your browser is not supported!

Newcomers DBPro Corner / text prob