Snake Help

[fartman_900]

So I followed NoteMe's BitBlt Snake tutorial, by the way its great and easy to follow. Anyway, I'm trying to do what you suggested at the bottom of that page by adding the head and tail and whatnot. I have the walls, head, tail and where if the snake hits its own body.

I need help on the part were if the snake is going up, it cant go down. if its going left it cant go right etc. Is there a way to disable keys like if the snake is going up, then the down key is disabled?

Thanks in advance.

[NoteMe]

Are you using my movement method from the tutorial? Then check the facing of the head in an inner If test in the code....


Algorithm:

- The user pressed left
- Check to see if the snake head is facing right

- If then do nothing
- If NOT then face left


Do the same with all directions..


DId you get it? If not I can make you a code sample...but it's great learning for you, if you figgure it out after reading my Algorithm...

[fartman_900]

Originally posted by NoteMe
Are you using my movement method from the tutorial? Then check the facing of the head in an inner If test in the code....

Algorithm:

- The user pressed left
- Check to see if the snake head is facing right

- If then do nothing
- If NOT then face left

Do the same with all directions..

DId you get it? If not I can make you a code sample...but it's great learning for you, if you figgure it out after reading my Algorithm...

I am using the movement from the tutorial. SO owuld it be something like this:

if keycode=37 and facing=3 then      'check if left is pressed and facing right
     'do nothin
else if 
     Snake(0).facing=1     'goes left
end if

im just not sure what to do for the "do nothing" part. Or would it be better to use a boolean variable?

[cyborg]

you could do it something like this:

If KeyCode = vbKeyLeft And facing <> 3 Then 'check if left is pressed and facing anything but right
        Snake(0).facing = 1   'goes left
    End If

[NoteMe]

Both ways are fine....just do it the way you feel most comfortable with...

[fartman_900]

Thanks alot for the help. I used cyborg's code and worked perfectly. Thanks again.