A1VBCode Forums / Visual Basic (VB 4/5/6) / Game Programming

my question about???

vikas — Tue, 23 Dec 2008 04:39:59 GMT

It has to do with the same old story I've posted weeks ago..... and I'm so angry about VB. Net (1.1) ....

Someone solve me this one, please:
----------------------------------------
Public Class Thinger

Private arrThings As ArrayList

Public Sub New()
Me.arrThings = New ArrayList()
End Sub

Public Sub AddThing(String thingId)
Dim x As New Thing(thingId)
Me.arrThings.Add(x)
End Sub

Public Function GetThings() As Thing()
Return CType(Me.arrThings.ToArray(?#@!?), Thing())
End Function

End Class

My picture is showing white

DevinM — Tue, 01 May 2007 09:13:20 GMT

I have imported a picture (JPEG) for a game and where it should be transparent it shows white. So it would help if you could tell me how to fix it.

controls

austinst — Sun, 16 Nov 2008 12:30:04 GMT

hey im making (or trying to) a game and i want to know how to make the person go diagnal and also be able to shoot

and walls and gravity(im new to vb)

and my parents dont let me download so...(can you PLEASE just put the code for the things)

Star Trek RPG Game

KTC_88 — Thu, 29 May 2008 18:38:01 GMT

Hello, I am working on a Star Trek RPG based off of the Star Trek RPG by Decipher.

The game is taking a while to make (one person can only do so much), and I am not experianced with the more advanced form of VB Programming, if anyone would like to be involved in creating a Star Trek RPG please reply to this thread.

I also have a question, I am trying to make a bounding box for the buildings on the maps I'm using, how do I do that?

I have a Star Trek Community web site that I'm putting together for those interested in Star Trek, the main reason I built the site is so Star Trek Game designers have a place to meet.

I am going to post my game there for people to test, I am also going to make it so othe people can do the same with thier games as well.

If you are interested check out startrekcommunity.net

Whack a mole game

Fent00zler — Mon, 04 Jun 2007 23:22:20 GMT

can someone help me out? or like... send me a step by step so I can not fail and be happy and prospherous? thanks :]

image rotation around x-axis(x-rotation)

riazulhaq — Sat, 18 Aug 2007 01:49:24 GMT

I am developing a graphic application for album creation in vb.net 2005.

I have to rotate image around x-axis(x-rotation).

Anyone have idea how can i do that?

Playing a video on a surface

kazamamakoto — Sun, 06 Apr 2008 00:28:08 GMT

Hi all. If you havent realized by now lol, I want to play a video on a DirectDrawSurface in DirectX7. Is this possible? If not, is there an alternative method of playing videos that wont make my DirectX fullscreen window minimize? I'm using the ActiveMovie Control Type Library which unfortunately makes my app minimize every time I want to play something (a video). Also, it obviously wont allow me to have a video play in the background and have my other surfaces move around in the foreground or something cool like that XD. Any ideas? Thanks

How to send email

TheProgrammer — Wed, 28 May 2008 03:14:30 GMT

I want to how to send an email to a known address using vb

softwares needed to do game programming...???

harrylennox — Tue, 29 Apr 2008 13:40:30 GMT

Hi....

ex: I want to create a counter strike game.....

What are the softwares need to install to do game programming....???
and
What would be the minimum system requirements????

somebody....????

card game help

melkor — Tue, 01 May 2007 00:56:09 GMT

i need to make a way to get the cards in a memory card game in a random order each time. i can get the cards in a random order however i do not no how 2 get the cards to appear in pairs in the random order.

Screen size and Computer Resolution

KTC_88 — Wed, 30 Apr 2008 18:49:33 GMT

Hi, I'm trying to create an RPG using Visual Basic 2005.

This is my second time for trying to make a game on this scale, the first game I tried to make had a problem with the screen size, when I played it on a smaller screen resolution part of the screen was hidden.

What size should I make my screen or what can I do to make my game workable on full screen for all screen resolutions?

Does gaming need a widescreen

chaky — Fri, 01 Feb 2008 03:58:40 GMT

I am buying a new pc mainly for gaming and just wondering if I really need a widescren lcd monitor?
Does a widescreen monitor make any difference for games or should i save myself around €500 by keeping my current 19inch lcd which seems to be in fine condition? I plan to have a 768MB nVidia GeForce 8800 GTX graphics card if that makes any difference to the subject.

Xtremely Important DirectX Real-Time Character Animation

vbinterface — Tue, 11 Dec 2007 07:46:59 GMT

Hi to all Visual Basic-DirectX Programmers,

I am developing a character animation program just like Poser in DirectX 8.1. I know that it is possible to animate the frames in .X files by parsing the .X file and manipulate the frames in run-time. Although, the route to it seems to be very long instead of direct frame trasformation.

If anyone of you have directly transformed the Frame Rotation matrix in runtime please help me in writing similar code.

I expect the process in following steps:

1) Loading .X file into program ..................(done)
2) Loading SkinMesh Information.
3) Transforming Frame Matrix.
4) Updating Frames
5) Display Skinned Mesh.

I have read most of skinned mesh documents, but I still find them confusing.

What I want just is rotate a character body part in run-time using Frame Transformation Matrix.

Thanks in advance.

Hex Editing or something like it.

Oblivion_Of_Pain — Thu, 18 Oct 2007 02:06:09 GMT

I'm using VB 6.0 and I'm trying to make an editor for an old playstation game. I'm using CDmage to extract files off of the CD. I can use a hex editor to edit the files, but I want to us VB to automate the process and make it more user friendly. I'm not a total newb with VB but what I'm looking to do, I might as well be. I've looked at over 100 pages here of code and programs looking for something that I can use to build on. I found one good hex editor, but it's quite complex for me and the author wrote it with almost no comments so I'm not making heads or tails of it. I'm hoping that someone can help me with some simple coding to edit in hex, I don't actually want to display the hex at all, just have it so users can select something out of a list box and have my program change the file I'm editing. I'm not sure I'm making myself clear but any help would be much appreciated.

Using Dance Pad (Mad Catz USB) within VB6

GAITman — Sat, 21 Jul 2007 09:02:20 GMT

I am looking for help (sample code) for working with dance pads, am trying to develop excersice program for CP kids that easy to tailor to kids ablity. How do I open the device in VB and does anyone know data sequence when pad is stepped on, it appears to be a 10 button input (game controller) device after it is installed with some information on X and Y location with some data on rotation.

drawImage problems

BTowal — Thu, 12 Jul 2007 11:03:25 GMT

Hi, i'm completely new to VB but not at all new to programming. I'm trying to create a very basic first program with Visual Basic .Net 2005 but keep getting an error that I have no idea how to handle.

My code:

Public Class Form1

Private mImage As Image

Private Sub Panel1_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Panel1.Paint

mImage = Bitmap.FromFile("C:\valve2.bmp")

e.Graphics.DrawImage(mImage, 5, 5)

End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub

End Class

My error:

Request for the permission of type 'System.Security.Permissions.FileIOPermission, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089' failed.

This error targets line 4, the "mImage = ..." part. The image exists and is located where I declare it to be. I have a form and a panel in design view. I don't know what else is wrong, but the troubleshooting tells me to use "isolated storage" (no idea what that is) or obtain/follow security permissions. Can anyone help?

(When i strip the program down to just that line --the mImage assignment line-- i get the error even then)

How to move a sprite with DirectX 7?

kazamamakoto — Mon, 25 Jun 2007 08:10:41 GMT

Yo ppl =P I've tried several times to learn directX but this time I actually got it lol (^_^) anywayz, Im trying to expand my knowledge step by step, and the next step for me is to gain the power to set the .left and .top values of the objects I load as DirectDrawSurfaces and thus be able to move them around the screen (I can use both windowed mode and full screen mode, so it doesnt matter which approach u have used) and well, anyone who can give me a hand in accomplishing this task I shall bestow my thanks and blessings upon lol.

Making An Object do a circle

halo2ring — Wed, 23 Nov 2005 20:54:01 GMT

how do i make a object to move in a curve or a circle..........so far my object can move up down , left right etc diagonal but not in a circle or a curve how do i make it do a circle? thanks

Rotating a picture or shape

DevinM — Tue, 22 May 2007 13:39:34 GMT

I was wondering if it was possible to rotate or flip a picture or shape during run time.

how can i set a program to keep pressting 1 key

teha908 — Wed, 16 May 2007 11:50:01 GMT

hi,, hwo can i make a program to keep hitting enter

My Frogger Game

DevinM — Wed, 25 Apr 2007 09:10:08 GMT

' This is my first real game and I decided that the best thing to do would
' be frogger but There is two things that are making it hard
' I have used adobe photoshop to make my characters but the parts of the
' pictures that are supposed to be transparent ( I think it might be because
' I used a bitmap but the other is my speed of the cars, please help.
' I haven't made the collision detection yet though.

Option Explicit
Dim level As Integer
Public x As Integer
Dim win As Boolean
Dim speed(1 To 4) As Integer
Dim car As Integer
Dim lives As Integer

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyLeft
shpman.Left = shpman.Left - 200
Case vbKeyRight
shpman.Left = shpman.Left + 200
Case vbKeyUp
shpman.Top = shpman.Top - 490
Case vbKeyDown
shpman.Top = shpman.Top + 490
End Select

If shpman.Top < 255 Then
MsgBox "You win!"
shpman.Top = 2650
shpman.Left = 2040
win = True
Else
win = False
End If

If win = True Then
For x = 1 To 4
speed(x) = Int((level * 2) * 15 * Rnd)
Next x
End If

End Sub

Private Sub form_load()
frminfo.Show
tmrcommove.Enabled = True
frmgame.Hide

tmrcommove.Interval = 4

For x = 1 To 4
speed(x) = Int((level * 2) * 15 * Rnd)
Next x
End Sub

Private Sub tmrcommove_Timer() ' when this timer goes of it make the cars move
tmrcommove.Interval = 4

For x = 1 To 2
shpcar(x).Left = shpcar(x).Left - speed(1) ' these are the cars going left
Next x

For x = 3 To 4
shpcar(x).Left = shpcar(x).Left - speed(2) ' these are other cars going left
Next x ' but at different speed

For x = 1 To 4
shpcar(x).Left = shpcar(x).Left + speed(3) ' cars going right as different speed
Next x

For x = 7 To 8
shpcar(x).Left = shpcar(x).Left + speed(2)' cars going right different speed
Next x
End Sub

' something isn't letting the cars move, they just stay in the same place and flash

' repeatedly so I am really stumped

using ip addresses

DevinM — Wed, 16 May 2007 09:04:26 GMT

I was wondering how to use an ip address to play two player games and just type it in and go, is it hard? or simple, and to do that will I need to make a separate form for each player (sending and recieving)?

I would like to be able to make a decent game with graphics for the first time.

DevinM — Fri, 13 Apr 2007 09:18:05 GMT

I am a newby, I started two months ago, I wish to make some games. I have looked at some source codes but I am still clueless. So it would help so much if any one could tell me how to use vbkey controls and use the registry for high scores.

Coding a Game Character

Link — Mon, 19 Jun 2006 21:42:16 GMT

I know this has been asked before but I didn't get a clear enough answer. How do you code a character to move around a screen? I also want to know some good websites that have code snippets I believe there called, for rpg types of games. I've looked hours on the internet but I can't find websites that tell you these types of things.

Tips And Tricks To Making GAmes For The First Time

DevinM — Thu, 19 Apr 2007 08:56:05 GMT

I have looked all over for game making instruction a I've only found samples and source codes, nothing that can or will teach what every thing means and how to use the commands and keywords.

For all game programmers

Im confused2321 — Sat, 10 Dec 2005 23:30:26 GMT

I'm creating a game right now and time and time again, i come across the problem of needing an artist. Does anyone know if there are any free sites that allow you to get free pictures that others have donated?? weapon pictures (for my rpg)... a space ship for a shooter that i'm making .. i don't know where to stop. Now yes, i have created my own pictures and designed my own levels . But i'm spending more time on the actual pictures that the game itself.

Please does anyone know of a site that will free me of all this art work and so I can concentrate on Programming?

10 year old wants to make a video game

Saprobic — Mon, 29 May 2006 10:39:25 GMT

Hello everyone.

My 10 year old nephew has asked me to teach him to make a video game and being the super keen uncle that I am said that I would without the first idea of how to make one. I do have a reasonable knowledge of Visual Basic and so thought I would use that to make something super simple at first and figure he and I can work on improvements from there. When I was a kid they had these books of code that you could just copy onto the computer and you had a simple working game and as you learned more you could alter these and build on the. Does anyone know of anything like that for VB or even C++? Any help would be greatly appreciated.

Thank you all in advance

Thirteen card game

kazamamakoto — Thu, 11 Jan 2007 01:54:07 GMT

As my sub and desc implies, i am trying to create the 'thirteen' card game with VB. It has been going great until i got up 2 making the computer opponent AI, which is proving to be very difficult. If anyone out there has successfully made the 13 card game, could u please send it to me at jasonlovessaori@hotmail.com? Thank u very much

Does someone wants to build "Reversi" with me?

talika_g — Sat, 14 Oct 2006 10:43:09 GMT

Well. Im new on this forum. so first of all hello everybody.

I want to build with someone a game called "Reversi". I guess you know this game, but if not:
-all about reversi: http://en.wikipedia.org/wiki/Reversi
-play reversi: http://www.darkfish.com/turncoat/Turncoat.html

Acually, I want to build it 1 On 1 (2 players), and not player VS computer.
But how do you want, I don't really care...

So, if someone wants to build it with me he could just post here and give here ICQ or Messenger or whatever...
Thanks on time.

Some More Question to be solved.....

Manku_D — Fri, 09 Jun 2006 14:48:49 GMT

Hello to all of u, Manku_D here

Since my want to make some games but there r some problem and i m struck in that and cannot find the solution plz help me.

01. How to make player shoot (by gun or simple).

02. What is the theory of X and Y coordinates plz tell me this (urgent)

03. How to save and Load game.

04. If any one can tell me simple gravity.

05. How to make any thing like picture box (solid).

06. How to make an image moving in random direction.

07. How to run Gif files ( for my enemy and player)

There r some other question too but i will ask them later.

If u know any one of the problems solution then plz tell me.

Do not reply telling that there is a example on the net i have searched and i cannot find how to do these tasks.

One more thing is that don't mind my language because my english is not very good.

Thanks for each and every help.

Can someone get me started?

BaNdNeRd — Fri, 08 Apr 2005 09:38:36 GMT

Hello,

Right now i am learning to create windows applications in visual basic and i am a beginner. But what i really want to do is to learn how to create simple video games in vb. Can someone put me in a direction? Thanks.

Please help (DirectPlay8)

alexma12345 — Tue, 29 Aug 2006 11:47:08 GMT

Could someone please show me or send me an example on it? I heard that there is a sample code in Directx 8.1 SDK called SimpleChat... but i cant the download link of the sdk anymore.. maybe its too outdated..

Help needed in Texas Holdem Poker game

qwertyuiop4 — Mon, 05 Jun 2006 22:49:30 GMT

Hi im making a texas holdem poker game in visual basic and i need some help with winning i have bet worked out check and call all worked out and i need some help with a module to find out who wins, i have numbers corresponding with images for the cards eg. 1 = two of hearts so i need some help,

HElp

Bouzy — Fri, 18 Aug 2006 15:26:10 GMT

Hello, I am new to VB6 and am trying to get throught Jonathan S. Harbours book Game Programing For Teens. I am trying to load a bitmap image onto the screen and like I think make a program so I can use this code in the future..... I think.... but I Keep getting error messages on my code can someone please help.

[code]Private Sub DrawTile( _
ByRef source As Direct3DSurface8, _
ByVal sourcex As Long, _
ByVal sourcey As Long, _
ByVal width As Long, _
ByVal height As Long, _
ByVal destx As Long, _
ByVal desty As Long)

'create a RECT to describe the source image
Dim sourceRect As DxVBLibA.RECT
'set the upper left corner of the source image
sourceRect.Left = sourcex
sourceRect.Top = sourcey
'set the bottom right corner of the source image
sourceRect.Right = sourcex + width
sourceRect.bottom = sourcey + height

'create a POINT to define the destination
Dim point1 As DxVBLibA.Point
'set the upper left corner of where to draw the image
point1.x = destx
point1.y = desty

'draw the source bitmap tile image
d3ddev.CopyRects source, sourceRect, 1, backbuffer, point1

End Sub

'make sure every variable is declared
Option Explicit
'make all arrays start with 0 instead of 1
Option Base 0

'customize the program here
Const SCREENWIDTH As Long = 800
Const SCREENHEIGHT As Long = 600
Const FULLSCREEN As Boolean = False
Const C_BLACK As Long = &H0
Const C_RED As Long = &HFF0000

'the DirectX objects
Dim dx As DirectX8
Dim d3d As Direct3D8
Dim d3dx As New D3DX8
Dim dispmode As D3DDISPLAYMODE
Dim d3dpp As D3DPRESENT_PARAMETERS
Dim d3ddev As Direct3DDevice8

'some surfaces
Dim backbuffer As Direct3DSurface8
Dim castle As Direct3DSurface8

Private Sub Form_Load()
'set up the main form
Form1.Caption = "DrawTile"
Form1.AutoRedraw = False
Form1.BorderStyle = 1
Form1.ClipControls = False
Form1.ScaleMode = 3
Form1.width = Screen.TwipsPerPixelX * (SCREENWIDTH + 12)
Form1.height = Screen.TwipsPerPixelY * (SCREENHEIGHT + 30)
Form1.Show

'initialize Direct3D
InitDirect3D Me.hwnd, SCREENWIDTH, SCREENHEIGHT, FULLSCREEN

'get reference to the back buffer
Set backbuffer = d3ddev.GetBackBuffer(0, D3DBACKBUFFER_TYPE_MONO)

'load the bitmap file--castle.bmp is 1024x1024
Set castle = LoadSurface(App.Path & "\castle.bmp", 1024, 1024)

End Sub

Public Sub InitDirect3D( _
ByVal hwnd As Long, _
ByVal lWidth As Long, _
ByVal lHeight As Long, _
ByVal bFullscreen As Boolean)

'catch any errors here
On Local Error GoTo fatal_error

'create the DirectX object
Set dx = New DirectX8

'create the Direct3D object
Set dx = New DirectX8

'create the DirectX object
Set dx = New DirectX8

'create the Direct3D object
Set d3d = dx.Direct3DCreate()
If d3d Is Nothing Then
MsgBox "Error initializing Direct3D!"
Shutdown
End If

'tell D3D to use the current color depth
d3d.GetAdapterDisplayMode D3DADAPTER_DEFAULT, dispmode

'set the display settings used to create the device
Dim d3dpp As D3DPRESENT_PARAMETERS
d3dpp.hDeviceWindow = hwnd
d3dpp.BackBufferCount = 1
d3dpp.BackBufferWidth = lWidth
d3dpp.BackBufferHeight = lHeight
d3dpp.SwapEffect = D3DSWAPEFFECT_COPY_VSYNC
d3dpp.BackBufferFormat = dispmode.Format

'set windowed or fullscreen mode
If bFullscreen Then
d3dpp.Windowed = 0
Else
d3dpp.Windowed = 1
End If

'chapter 9
d3dpp.MultiSampleType = D3DMULTISAMPLE_NONE
d3dpp.AutoDepthStencilFormat = D3DMULTISAMPLE_NONE
d3dpp.AutoDepthStencilFormat = D3DFMT_D32

'create the D3D primary device
Set d3ddev = d3d.CreeateDevice( _
D3DADAPTER_DEFAULT, _
D3DDEVTYPE_HAL, _
hwnd, _
D3DCREATE_SOFTWARE_VERTEXPROCESSING, _
d3dpp)

If d3ddev Is Nothing Then
MsgBox "Error creating the Direct3D device!"
Shutdown
End Sub

Private Sub Form_Paint()
'clear the background of the screen
d3ddeb.Clear 0, ByVal 0, D3DCLEAR_TARGET, C_BLACK, 1, 0

'draw the castle bitmap "tile" image
DrawTile castle, 0, 0, 511, 511, 25, 25

'send the back buffer to the screen
d3ddev.Present ByVal 0, ByVal 0, 0, ByVal 0
End Sub

Private Sub FormKeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 27 Then Shutdown
End Sub

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Shutdown
End Sub

Private Sub Shutdown()
Set castle = Nothing
Set d3ddev = Nothing
Set d3d = Nothing
Set dx = Nothing
End
End Sub

Private Function LoadSurface( _
ByVal filename As String, _
ByVal width As Long, _
ByVal height As Long) _
As Direct3DSurface8

On Local Error GoTo fatal_error
Dim surf As Direct3DSurface8

'return error by default
Set LoadSurface = Nothing

'create the new surface
Set surf = d3ddev.CreateImageSurface(width, height, dispmode.Format)
If surf Is Nothing Then
MsgBox "Error creating surface!"
Exit Function
End If

'load surface from file
d3dx.LoadSurfaceFromFile _
surf, _
ByVal 0, _
ByVal 0, _
filename, _
ByVal 0, _
D3DX_DEFAULT, _
0, _
ByVal 0

If surf Is Nothing Then
MsgBox "Error loading " & filename & "!"
Exit Function
End If

'return the new surface
Set LoadSurface = surf

fatal_error:
Exit Function
End Function
[/code]

The first error im getting is in bold if i can fix this i will post the rest but its in bold above and says Compile Error only user-difine types define in public object modules can be coerced to or from a variant or passed to late-bound funtions And it is hilighted not red but hilighted.

Thanks

Oh ya and since i dont know any basic VB commands where can i learn them I have a book Visual Basic 6 Crash course but the code in it simply doesnt work. I dont want to halve to spend a month learnign basic commands cause i was iching to get into this other book i have and its so far not a real problem but i cant like read the code or understand all of it. I get some,,,, a little some of it and the book explains it well but it goes over my head does that matter or will i learn as i make the rpg the book teaches how to make???? how long did it take you guys to be able to like read code???

DirectX features

kazamamakoto — Thu, 03 Aug 2006 04:39:29 GMT

Hi, I have approximately one year of Visual Basic experience and now I'm moving on to the more complex aspects (API, DirectX, etc) I'm currently having a lot of trouble with DirectX concepts, I'm not too sure what each Data Type does so if someone could explain to me the following, I would greatly appreciate it:

D3DMATRIX

D3DLVERTEX

DIRECTDRAWSURFACE

These are what I have seen commonly and I am still unsure as to what they do exactly. Any help is much appreciated (^_^)

How much VB 6 is Good for a Game Programmer.

Manku_D — Fri, 26 May 2006 15:07:07 GMT

Hello me as u know Manku,

Want to know that how much it is good to program games in Visual Basic 6 (not in vb.net). So plz can any one tell me or can u count the profit or lose.

Just a basic question.

Thanks bye bye take care Manku_D

Autorun

JXDOS — Thu, 29 Jun 2006 09:45:50 GMT

Hello programmers, could you plz help me out in how to use vb codes to create a autorun for a game/program when a folder is opened?

JX

PICTURE BOX WITH IMAGE MUCH BIGGER

sotsubo — Thu, 08 Jun 2006 10:47:18 GMT

I want to load a part of my image into the picture box. But I want to specificate what part of my image i want to load.

How can i do that?

Thanks

Collosion (For My Game)

Manku_D — Wed, 24 May 2006 14:33:40 GMT

Hello My Self Manku,

Dear Friends I just want to know how to make a collosion dectection like if player colloide with enemy he loose life. Since my english is not very good so plz forgive me, every thing is all right.

Just dont view the topic if u know any thing u can tell me.

If you want any other information tell me i can gave u. I see other example in this site but i cannot understand them so plz help me.

Ok then bye bye take care Manku_D.

Try My Game

rsanine — Mon, 29 May 2006 21:28:11 GMT

This is a game ive put together in about 3 months now, I am 15 yrs old, I never thought i could make something like this.

Check it out.
Get is at: eot.no-ip.org

Use the IP: 72.140.214.29

Im hoping to see many ppl playing at a time so its fun.
Have Fun! See U Here.