VB Classic: Snake's Escapade [Source]

[Fedhax]

Language: VB Classic (VB 6)

Taking NoteMe's Snakes tutorial, I implemented it and expanded upon it. It does what NoteMe's program did and more:

• Multiple fruits for different values
• Multiple power-ups
• Tracks levels: increases speed as you level up
• Tracks score: your snake gains body segments every 100 points
• Simple help/about windows to provide control/gameplay assistance
• /debug: Comes with a basic debug mode for testing/development

I've tested it through the first two levels, and it behave a little unbalanced or unpredictable as gameplay continues. There are more things that I've thought about doing for it, but I may move on to another game/format unless someone is curious to see it developed. It come as is. Every function/sub is formatted and has a comment header with everything filled out except for Description, and it comes with a table of contents to easily find code that I grouped together (Game Loop, Image Processing, etc).

Graphics are handled via three image objects and not bitblt, but all of the objects are tracked in corresponding arrays so you would probably only have to rewrite the image routines to make it behave that way.