variable type mismatch????

Graphics 800,600
SetBuffer BackBuffer()


;;;;;make types;;;;;
Type player
Field x
Field y 
Field on
Field image
End Type

Type bullet
Field x
Field y
End Type
;;;;/make types;;;;;

;;;;;initialize types;;;;;;
Global player.player = New player 
player\x = 400
player\y = 300
player\on = 1
player\image = LoadImage("guy.bmp")
;;;;/initialize types;;;;;;




While Not KeyDown(1)
Cls

;;;;;background;;;;;
b = LoadImage("b.bmp")
TileImage b
;;;;/background;;;;;
bullet = LoadImage("bullet.bmp")

;;;;;;draw the player;;;;;;
DrawImage player\image, player\x, player\y
;;;;;;draw the player;;;;;;


If KeyDown(200)
player\y = player\y - 10
ElseIf KeyDown(208)
player\y = player\y + 10
ElseIf KeyDown(203)
player\x = player\x - 10
ElseIf KeyDown(205)
player\x = player\x + 10
ElseIf KeyHit(57)
bulleton = 1
bullet.bullet = New bullet
bullet\x = player\x - 10
bullet\y = player\y - 10

EndIf

If bulleton
bullet\x = bullet\x + 10

DrawImage bullet, bullet\x, bullet\y
EndIf

If player\y = 0 
player\y = 590
ElseIf player\y = 600
player\y = 10
ElseIf player\x = 800
player\x = 10
ElseIf player\x = 0
player\x = 800
EndIf 

Flip
Wend

how can i make it so that if you press space bar twice, you see two bullets instead of the other just dissapearing?? thanks

You always draw the last bullet created. Go through each of them in a for each loop instead.

For b.bullet = Each bullet
DrawImage bullet, b\x, b\y
Next 

Also you don't need this

If bulleton

Maybe you should change

bullet.bullet = New bullet
bullet\x = player\x - 10
bullet\y = player\y - 10

to

b.bullet = New bullet
b\x = player\x - 10
b\y = player\y - 10

As it could confuse the compiler

And your reloading the same image again and again. Never load anything during a game. Its slow :o) You only need to load that resource once.