Type buttons?

Well I said I would stick to normal types but now I think its unavoidable. Not for a button though, its for a ship
rotation. I used the array of type code from above but I get "image does not exist". I think it is refering to the ship image, but I don't know why it whould say that.

;_______________________________________________________________________________________________________
;Players Space ship Type
;-------------------------------------------------------------------------------------------------------
Type carier
	Field x
	Field y
	Field image
	Field Health
	Field shield
	Field red_power
	Field green_power
	Field blue_power
	Field fighters
End Type

Global player.carier = New carier
player\x = GraphicsWidth()/2
player\y = GraphicsHeight()/2
player\health = 100
player\shield = 100
player\red_power = 100
player\green_power = 100
player\blue_power = 100
player\fighters = 12

player\image = CreateImage(50,50)
SetBuffer ImageBuffer(player\image)

;ship
;drawing of player ship
For i = 1 To 15
	Color 100-(i*5),100-(i*5),100-(i*5)

	Line 15-(i/10),15+i,35+(i/10),15+i ;front underchasi
Next
;....ect

;here I am trying to copy the player\image for the rotation
Dim rplayer.carier(359)
For loop=0 To 359
	rplayer(loop)\image=CopyImage(player\image)
	MidHandle rplayer(loop)\image
	RotateImage rplayer(loop)\image,loop
	DebugLog loop
Next