my bmp is here http://www.geocities.com/robhydro1/
My problem is using the handleimage command and rotating my anim strip.If I set handleimage it at 0,0 or don't use it,it does fine,but if I move handleimage anywhere on the bmp,some of my rotations blink out.
here's my preload code
;*************************************
;
; rotate 90 degrees one at a time
;
;**************************************
tmp_image=LoadAnimImage("gunL.bmp",55,11,0,4)
;HandleImage tmp_image,1,0
;MidHandle tmp_image
Dim gunL(90)
For i=0 To 90
gunL(i)=CopyImage(tmp_image)
;HandleImage gunL(i),7,0
RotateImage(gunL(i),-i)
Next
And Here's how I'm rotating it
If showgunfire=1
If MilliSecs()>gunfiretimer+100
gunframe=gunframe+1
gunfiretimer=MilliSecs()
EndIf
If gunframe=4
gunframe=0
showgunfire=0
EndIf
EndIf
;HandleImage gunL(angle),0,0
DrawImage gunL(angle),x,y,gunframe
End Function
As u can see I've tryied putting the handleimage everywhere and still got the same results.
and cure for this?
Thanks,
Rob
My problem is using the handleimage command and rotating my anim strip.If I set handleimage it at 0,0 or don't use it,it does fine,but if I move handleimage anywhere on the bmp,some of my rotations blink out.
here's my preload code
;*************************************
;
; rotate 90 degrees one at a time
;
;**************************************
tmp_image=LoadAnimImage("gunL.bmp",55,11,0,4)
;HandleImage tmp_image,1,0
;MidHandle tmp_image
Dim gunL(90)
For i=0 To 90
gunL(i)=CopyImage(tmp_image)
;HandleImage gunL(i),7,0
RotateImage(gunL(i),-i)
Next
And Here's how I'm rotating it
If showgunfire=1
If MilliSecs()>gunfiretimer+100
gunframe=gunframe+1
gunfiretimer=MilliSecs()
EndIf
If gunframe=4
gunframe=0
showgunfire=0
EndIf
EndIf
;HandleImage gunL(angle),0,0
DrawImage gunL(angle),x,y,gunframe
End Function
As u can see I've tryied putting the handleimage everywhere and still got the same results.
and cure for this?
Thanks,
Rob