limb does not exist error - GameCreators Forum

Author

Message

Thomas85

11

Years of Service

User Offline

Joined: 29th Apr 2012

Location:

Posted: 29th Apr 2012 08:11

Link

Hi yall! I'm new to the forums and to DarkBasic, so please go easy on my code...

I'm trying to create a builder-type simulation where the player can add buildings to a sphere that's in constant y-axis rotation. The best way I figured I could do this was to create an array of limbs that the buildings glue to, but I get an odd error consistently with limb number 41. Here's my code:

`load bitmap
load bitmap "grass08.bmp",1 : get image 1,0,0,128,128 : delete bitmap 1

`create and texture objects
make object sphere 1,120 : texture object 1,1 : position object 1,0,0,0
make object sphere 2,5 : make mesh from object 1,2 : delete object 2
load object "AIRDHANG.X",3

for x=1 to 40
	add limb 1,x,1
	hide limb 1,x
next x

for x=41 to 80
	add limb 1,x,1
	hide limb 1,x
next x

for x=81 to 90
	add limb 1,x,1
	hide limb 1,x
next x

`array creation 
dim rotation(90,2)

`**********  OFFSET LIMBS  **********

`LIMB SET 1
y=0
for x=1 to 10
	rotation(x,1)=30
	rotation(x,2)=360-y
	offset limb 1,x,cos(y)*32,50,sin(y)*32
	y=y+36
	show limb 1,x
next x

`LIMB SET 2
y=0
for x=11 to 20
	rotation(x,1)=60
	rotation(x,2)=360-y
	offset limb 1,x,cos(y)*45,40,sin(y)*45
	y=y+36
	show limb 1,x
next x

`LIMB SET 3
y=0
for x=21 to 30
	rotation(x,1)=67
	rotation(x,2)=360-y
	offset limb 1,x,cos(y)*54,26,sin(y)*54
	y=y+36
	show limb 1,x
next x

`LIMB SET 4
y=0
for x=31 to 40
	rotation(x,1)=76
	rotation(x,2)=360-y
	offset limb 1,x,cos(y)*58,13,sin(y)*58
	y=y+36
	show limb 1,x
next x

`LIMB SET 5
y=0
for x=41 to 50
	rotation(x,1)=90
	rotation(x,2)=360-y
	offset limb 1,x,cos(y)*60,0,sin(y)*60
	y=y+36
	show limb 1,x
next x

`LIMB SET 6
y=0
for x=51 to 60
	rotation(x,2)=360-y
	offset limb 1,x,cos(y)*58,-13,sin(y)*58
	y=y+36
	show limb 1,x
next x

`LIMB SET 7
y=0
for x=61 to 70
	rotation(x,2)=360-y
	offset limb 1,x,cos(y)*54,-26,sin(y)*54
	y=y+36
	show limb 1,x
next x

`LIMB SET 8
y=0
for x=71 to 80
	rotation(x,2)=360-y
	offset limb 1,x,cos(y)*45,-40,sin(y)*45
	y=y+36
	show limb 1,x
next x

`LIMB SET 9
y=0
for x=81 to 90
	rotation(x,2)=360-y
	offset limb 1,x,cos(y)*32,-50,sin(y)*32
	y=y+36
	show limb 1,x
next x

for l=1 to 90 step 10
	color limb 1,l,rgb(255,120,0)
next l

position camera 0,10,-150
point camera 0,0,0

show object 1

x=0

rem **************  LOOP START  **************
DO

yrotate object 1, wrapvalue(object angle y(1) + 1.0)

if spacekey()=1
	glue object to limb 3,1,x
	x=x+1
endif

if limb exist(1,41)=1 
	print "yay"
else
	print "boo"
endif

LOOP

+ Code Snippet

`load bitmap
load bitmap "grass08.bmp",1 : get image 1,0,0,128,128 : delete bitmap 1

`create and texture objects
make object sphere 1,120 : texture object 1,1 : position object 1,0,0,0
make object sphere 2,5 : make mesh from object 1,2 : delete object 2
load object "AIRDHANG.X",3

for x=1 to 40
	add limb 1,x,1
	hide limb 1,x
next x

for x=41 to 80
	add limb 1,x,1
	hide limb 1,x
next x

for x=81 to 90
	add limb 1,x,1
	hide limb 1,x
next x

`array creation 
dim rotation(90,2)


`**********  OFFSET LIMBS  **********

`LIMB SET 1
y=0
for x=1 to 10
	rotation(x,1)=30
	rotation(x,2)=360-y
	offset limb 1,x,cos(y)*32,50,sin(y)*32
	y=y+36
	show limb 1,x
next x

`LIMB SET 2
y=0
for x=11 to 20
	rotation(x,1)=60
	rotation(x,2)=360-y
	offset limb 1,x,cos(y)*45,40,sin(y)*45
	y=y+36
	show limb 1,x
next x

`LIMB SET 3
y=0
for x=21 to 30
	rotation(x,1)=67
	rotation(x,2)=360-y
	offset limb 1,x,cos(y)*54,26,sin(y)*54
	y=y+36
	show limb 1,x
next x

`LIMB SET 4
y=0
for x=31 to 40
	rotation(x,1)=76
	rotation(x,2)=360-y
	offset limb 1,x,cos(y)*58,13,sin(y)*58
	y=y+36
	show limb 1,x
next x

`LIMB SET 5
y=0
for x=41 to 50
	rotation(x,1)=90
	rotation(x,2)=360-y
	offset limb 1,x,cos(y)*60,0,sin(y)*60
	y=y+36
	show limb 1,x
next x

`LIMB SET 6
y=0
for x=51 to 60
	rotation(x,2)=360-y
	offset limb 1,x,cos(y)*58,-13,sin(y)*58
	y=y+36
	show limb 1,x
next x

`LIMB SET 7
y=0
for x=61 to 70
	rotation(x,2)=360-y
	offset limb 1,x,cos(y)*54,-26,sin(y)*54
	y=y+36
	show limb 1,x
next x

`LIMB SET 8
y=0
for x=71 to 80
	rotation(x,2)=360-y
	offset limb 1,x,cos(y)*45,-40,sin(y)*45
	y=y+36
	show limb 1,x
next x

`LIMB SET 9
y=0
for x=81 to 90
	rotation(x,2)=360-y
	offset limb 1,x,cos(y)*32,-50,sin(y)*32
	y=y+36
	show limb 1,x
next x

for l=1 to 90 step 10
	color limb 1,l,rgb(255,120,0)
next l

position camera 0,10,-150
point camera 0,0,0

show object 1


x=0

 rem **************  LOOP START  **************
DO

yrotate object 1, wrapvalue(object angle y(1) + 1.0)

if spacekey()=1
	glue object to limb 3,1,x
	x=x+1
endif


if limb exist(1,41)=1 
	print "yay"
else
	print "boo"
endif

LOOP

As you can see from my if then in the loop, it deffo see's that limb 41 exists, but then when you try to glue to limb 41, DB decides it doesn't anymore. I tried to create the limb blocks separately in the hopes that might do the trick, but to no avail. Please help DB gooroos!

thanks!

Back to top

Profile PM Email

Latch

17

Years of Service

User Offline

Joined: 23rd Jul 2006

Location:

Posted: 29th Apr 2012 12:12

Link

@Thomas85

Hello and welcome!

I'm not at a computer with DB on it at the moment, but eyeballing your code, I think you are getting a huge increase in x values that goes beyond your limb count in code you have near the end:

+ Code Snippet

DO

yrotate object 1, wrapvalue(object angle y(1) + 1.0)


if spacekey()=1
	glue object to limb 3,1,x
	x=x+1
endif


if limb exist(1,41)=1 
	print "yay"
else
	print "boo"
endif

LOOP

The culprit, I would guess, is If Spacekey()=1 ... x=x+1 .

Because you could be pressing the spacekey longer than you anticipate before you release it, x may run up quite high. And since you are using x as the variable for the limb number, you will most likely be exceding your limb count.

2 things you need to do:

1. Make sure that the spacekey() press only registers once per press and release and doesn't key repeat.

2. Have a limit on x that stops at 90 or resets to 1 when 90 is reached.

The spacekey thing can be handled with a comparision of it's last state and current state:

+ Code Snippet

oldspace=newspace
newspace=spacekey()
if newspace > oldspace
   do stuff
endif

The limit can be handled easily as well and incorporated into the spacekey code:

+ Code Snippet

oldspace=newspace
newspace=spacekey()
if newspace > oldspace
   x=x+1
   if x > 90 

      rem do something as a result of reaching the top limb
      break "Highest limb exceded "+str$(x)
      end

      rem the above just stops the program for bug checking
      rem You could loop x back around instead

      x=1
   endif

   glue object to limb 3,1,x
endif

Enjoy your day.

Back to top

Profile PM

Thomas85

11

Years of Service

User Offline

Joined: 29th Apr 2012

Location:

Posted: 29th Apr 2012 16:03

Link

That does make sense, but I can watch my program add the limbs as I push the spacekey, and even holding it down it consistently stops at 40. If the x value was running too high, wouldn't it still add a limb to all the previous x values? I will try your code anyway, but I really only added that part as a test bed to see where the bug was. I didn't put it in my snippet (STOOPID!!!) but right before the loop begins I have a routine that chooses a random number between 1 and 90, then chooses that limb number to glue object 3 to. Unfortunately, I'm not on a DB computer either, but the code looks something like this:

random:
r=rnd(89)+1
if limb exist(1,r)=1
glue object to limb 3,1,r
else
goto random
endif

there's other code in there that handles the rotation of the object, but that's the part that I remember where DB is having trouble. As you can see, my code has something that handles the possibility of the limb not existing, so the fact that it still returning a "limb does not exist" error makes no sense. I appreciate the help Latch!

Back to top

Profile PM Email

Thomas85

11

Years of Service

User Offline

Joined: 29th Apr 2012

Location:

Posted: 30th Apr 2012 02:38

Link

Ok, so I kinda solved the problem. Instead of trying to make the program glue the object to random limb 1 to 90, I duplicated the sphere that the limbs attach to to make three spheres occupying the same location in 3D space, then created 30 limbs on each set at the proper offsets to give the appearance of one sphere with 90 limbs. After making my code a little hairier, I finally got my program to behave like I want it to. So until the next hurdle, thanks everyone!

Here's what my code looks like now in case anyone is interested...

sync on
`load bitmap
load bitmap "grass08.bmp",1 : get image 1,0,0,128,128 : delete bitmap 1

`create and texture objects
for x=1 to 3
	make object sphere x,120
	texture object x,1
	position object x,0,0,0
next x

make object sphere 4,5 : make mesh from object 1,4 : delete object 4

load object "AIRDHANG.X",5
load object "CASTLE4.X",6 : scale object 6,150,150,150
load object "BUILDG16.X",7 : scale object 7,50,50,50
load object "TREE5.X",8 : scale object 8,500,500,500
load object "ARTSTORE.X",9 : scale object 9,200,200,200
load object "MUSHROOM.X",10 : scale object 10,10000,10000,10000
load object "TREE3.X",11 : scale object 11,400,400,400
load object "MOBILE.X",12 : scale object 12,6000,6000,6000
load object "WINDMIL3.X",13 : scale object 13,400,400,400
load object "WINDMIL3.X",14 : scale object 14,400,400,400
load object "WINDMIL3.X",15 : scale object 15,400,400,400

for x=1 to 3
	for y=1 to 30
		add limb x,y,1
		hide limb 1,y
	next y
next x

`array creation 
dim rotation(30,3,2)
dim limb(30,3,1)

for r=1 to 10 : rotation(r,1,1)=30 : next r
for r=11 to 20 : rotation(r,1,1)=50 : next r
for r=21 to 30 : rotation(r,1,1)=67 : next r

for r=1 to 10 : rotation(r,2,1)=78 : next r
for r=11 to 20 : rotation(r,2,1)=90 : next r
for r=21 to 30 : rotation(r,2,1)=102 : next r

for r=1 to 10 : rotation(r,3,1)=113 : next r
for r=11 to 20 : rotation(r,3,1)=130 : next r
for r=21 to 30 : rotation(r,3,1)=150 : next r

`**********  OFFSET LIMBS  **********

`LIMB SET 1
y=0
for x=1 to 10
	rotation(x,1,2)=360-y
	rotation(x,2,2)=360-y
	rotation(x,3,2)=360-y
	offset limb 1,x,cos(y)*33,50,sin(y)*33
	offset limb 2,x,cos(y)*58,13,sin(y)*58
	offset limb 3,x,cos(y)*55,-26,sin(y)*55
	y=y+36
	show limb 1,x
next x

`LIMB SET 2
y=0
for x=11 to 20
	rotation(x,1,2)=360-y
	rotation(x,2,2)=360-y
	rotation(x,3,2)=360-y
	offset limb 1,x,cos(y)*46,40,sin(y)*46
	offset limb 2,x,cos(y)*60,0,sin(y)*60
	offset limb 3,x,cos(y)*46,-40,sin(y)*46
	y=y+36
	show limb 1,x
next x

`LIMB SET 3
y=0
for x=21 to 30
	rotation(x,1,2)=360-y
	rotation(x,2,2)=360-y
	rotation(x,3,2)=360-y
	offset limb 1,x,cos(y)*55,26,sin(y)*55
	offset limb 2,x,cos(y)*58,-13,sin(y)*58
	offset limb 3,x,cos(y)*33,-50,sin(y)*33
	y=y+36
	show limb 1,x
next x

for s=1 to 3
	for h=1 to 30
		hide limb s,h
	next h
next s

object=5

random:
r=rnd(29)+1
s=rnd(2)+1

if limb(r,s,1)=0
	glue object to limb object,s,r
	turn object right object,rotation(r,s,2)
	roll object right object,rotation(r,s,1)
	limb(r,s,1)=1
else
	goto random
endif

object=object+1
if object<16 then goto random

x=0
move=0
speed#=0.5
position camera 0,0,-150
point camera 0,0,0

`**************  LOOP START  **************
DO

for x=1 to 3
	yrotate object x, wrapvalue(object angle y(x) + speed#)
next x

if upkey()=1
	for x=1 to 3
		xrotate object x, wrapvalue(object angle x(x) +0.5)
	next x
endif

if downkey()=1
	for x=1 to 3
		xrotate object x, wrapvalue(object angle x(x) -0.5)
	next x
endif

if leftkey()=1
	speed#=2
else
	speed#=0.5
endif

sync
LOOP

+ Code Snippet


sync on
`load bitmap
load bitmap "grass08.bmp",1 : get image 1,0,0,128,128 : delete bitmap 1

`create and texture objects
for x=1 to 3
	make object sphere x,120
	texture object x,1
	position object x,0,0,0
next x

make object sphere 4,5 : make mesh from object 1,4 : delete object 4

load object "AIRDHANG.X",5
load object "CASTLE4.X",6 : scale object 6,150,150,150
load object "BUILDG16.X",7 : scale object 7,50,50,50
load object "TREE5.X",8 : scale object 8,500,500,500
load object "ARTSTORE.X",9 : scale object 9,200,200,200
load object "MUSHROOM.X",10 : scale object 10,10000,10000,10000
load object "TREE3.X",11 : scale object 11,400,400,400
load object "MOBILE.X",12 : scale object 12,6000,6000,6000
load object "WINDMIL3.X",13 : scale object 13,400,400,400
load object "WINDMIL3.X",14 : scale object 14,400,400,400
load object "WINDMIL3.X",15 : scale object 15,400,400,400

for x=1 to 3
	for y=1 to 30
		add limb x,y,1
		hide limb 1,y
	next y
next x


`array creation 
dim rotation(30,3,2)
dim limb(30,3,1)

for r=1 to 10 : rotation(r,1,1)=30 : next r
for r=11 to 20 : rotation(r,1,1)=50 : next r
for r=21 to 30 : rotation(r,1,1)=67 : next r

for r=1 to 10 : rotation(r,2,1)=78 : next r
for r=11 to 20 : rotation(r,2,1)=90 : next r
for r=21 to 30 : rotation(r,2,1)=102 : next r

for r=1 to 10 : rotation(r,3,1)=113 : next r
for r=11 to 20 : rotation(r,3,1)=130 : next r
for r=21 to 30 : rotation(r,3,1)=150 : next r


`**********  OFFSET LIMBS  **********

`LIMB SET 1
y=0
for x=1 to 10
	rotation(x,1,2)=360-y
	rotation(x,2,2)=360-y
	rotation(x,3,2)=360-y
	offset limb 1,x,cos(y)*33,50,sin(y)*33
	offset limb 2,x,cos(y)*58,13,sin(y)*58
	offset limb 3,x,cos(y)*55,-26,sin(y)*55
	y=y+36
	show limb 1,x
next x

`LIMB SET 2
y=0
for x=11 to 20
	rotation(x,1,2)=360-y
	rotation(x,2,2)=360-y
	rotation(x,3,2)=360-y
	offset limb 1,x,cos(y)*46,40,sin(y)*46
	offset limb 2,x,cos(y)*60,0,sin(y)*60
	offset limb 3,x,cos(y)*46,-40,sin(y)*46
	y=y+36
	show limb 1,x
next x

`LIMB SET 3
y=0
for x=21 to 30
	rotation(x,1,2)=360-y
	rotation(x,2,2)=360-y
	rotation(x,3,2)=360-y
	offset limb 1,x,cos(y)*55,26,sin(y)*55
	offset limb 2,x,cos(y)*58,-13,sin(y)*58
	offset limb 3,x,cos(y)*33,-50,sin(y)*33
	y=y+36
	show limb 1,x
next x


for s=1 to 3
	for h=1 to 30
		hide limb s,h
	next h
next s

object=5


random:
r=rnd(29)+1
s=rnd(2)+1

if limb(r,s,1)=0
	glue object to limb object,s,r
	turn object right object,rotation(r,s,2)
	roll object right object,rotation(r,s,1)
	limb(r,s,1)=1
else
	goto random
endif

object=object+1
if object<16 then goto random

x=0
move=0
speed#=0.5
position camera 0,0,-150
point camera 0,0,0


`**************  LOOP START  **************
DO

for x=1 to 3
	yrotate object x, wrapvalue(object angle y(x) + speed#)
next x

if upkey()=1
	for x=1 to 3
		xrotate object x, wrapvalue(object angle x(x) +0.5)
	next x
endif

if downkey()=1
	for x=1 to 3
		xrotate object x, wrapvalue(object angle x(x) -0.5)
	next x
endif

if leftkey()=1
	speed#=2
else
	speed#=0.5
endif

sync
LOOP

Back to top

Profile PM Email

Latch

17

Years of Service

User Offline

Joined: 23rd Jul 2006

Location:

Posted: 30th Apr 2012 10:02 Edited at: 30th Apr 2012 10:13

Link

Well, it seems you have stumbled upon a little known if not unknown limitation in the highest limb number that can be glued to. It seems one can only glue objects to limbs 0-31 . Anything higher and the LIMB DOES NOT EXIST MESSAGE shows up. Even when the limbs do indeed exist.

A quick test:

+ Code Snippet

sync on

make object cube 1,10
make mesh from object 1,1

for lmb=1 to 100
   add limb 1,lmb,1
next lmb
sync

rem make a sphere to glue
make object sphere 2,1
glue object to limb 2,1,31

This works but if you change glue object to limb 2,1,31 to a higher limb (32 or above) the error will occur.

Thanks for uncovering this!

As it is, I always try and avoid using glue object to limb unless it's simple code, or there really is no other way to get what I want.

If you don't need to query the limb's Z angle, you can use the limb position and limb angle commands to place your object as if it was glued.

An alternative to gluing besides positioning, could be to change the mesh of the limb into whatever shape it needs to be at any given time.

CHANGE MESH obj,limb,mesh
SHOW LIMB obj,limb

Enjoy your day.

Back to top

Profile PM

Sorry your browser is not supported!

DarkBASIC Discussion / limb does not exist error