Search icon CANCEL
Subscription
0
Cart icon
Your Cart (0 item)
Close icon
You have no products in your basket yet
Arrow left icon
Explore Products
Best Sellers
New Releases
Books
Videos
Audiobooks
Learning Hub
Conferences
Free Learning
Arrow right icon
Arrow up icon
GO TO TOP
XNA 4.0 Game Development by Example: Beginner's Guide - Visual Basic Edition

You're reading from   XNA 4.0 Game Development by Example: Beginner's Guide - Visual Basic Edition Create your own exciting games with Visual Basic and Microsoft XNA 4.0

Arrow left icon
Product type Paperback
Published in Dec 2011
Publisher Packt
ISBN-13 9781849692403
Length 424 pages
Edition 1st Edition
Arrow right icon
Author (1):
Arrow left icon
Kurt Jaegers Kurt Jaegers
Author Profile Icon Kurt Jaegers
Kurt Jaegers
Arrow right icon
View More author details
Toc

Table of Contents (16) Chapters Close

XNA 4.0 Game Development by Example – Visual Basic Edition Beginner's Guide
Credits
About the Author
About the Reviewers
www.PacktPub.com
Preface
1. Introducing XNA Game Studio FREE CHAPTER 2. Flood Control – Underwater Puzzling 3. Flood Control – Smoothing Out the Rough Edges 4. Asteroid Belt Assault – Lost in Space 5. Asteroid Belt Assault – Special Effects 6. Robot Rampage – Multi-Axis Mayhem 7. Robot Rampage – Lots and Lots of Bullets 8. Gemstone Hunter - Put on your Platform Shoes 9. Gemstone Hunter—Standing on your Own Two Pixels Index

Time for action – summoning the zombies


  1. Add a new class called Enemy to the Gemstone Hunter project.

  2. Add the following Imports directive to the top of the Enemy class file:

    Imports Tile_Engine
  3. Add an Inherits line to derive the Enemy class from GameObject:

    Public Class Enemy
        Inherits GameObject
  4. Add declarations for the Enemy class:

    #Region "Declarations"
    Private _fallSpeed As Vector2 = New Vector2(0, 20)
    Private _walkSpeed As Single = 60
    Private _facingLeft As Boolean = True
    #End Region
  5. Add a property to the Enemy class:

    #Region "Properties"
    Public Property Dead As Boolean
    #End Region
  6. Add a constructor for the Enemy class:

    #Region "Constructor"
    Public Sub New(
        content As ContentManager, 
        cellX As Integer,
        cellY As Integer)
    
        _animations.Add("idle",
            New AnimationStrip(
                content.Load(Of Texture2D)(
                    "Textures\Sprites\MonsterC\Idle"),
                48, 
                "idle"))
        _animations("idle").LoopAnimation = True
    
        _animations.Add("run",
       ...
lock icon The rest of the chapter is locked
Register for a free Packt account to unlock a world of extra content!
A free Packt account unlocks extra newsletters, articles, discounted offers, and much more. Start advancing your knowledge today.
Unlock this book and the full library FREE for 7 days
Get unlimited access to 7000+ expert-authored eBooks and videos courses covering every tech area you can think of
Renews at $19.99/month. Cancel anytime
Banner background image