For screenshots use this
If KeyHit(68) Then
image=image+1
ImageName$="Myshot"+Str$(image)+".bmp"
SaveBuffer(FrontBuffer(),ImageName$)
End If
for video, use Fraps as suggested
If KeyHit(68) Then
image=image+1
ImageName$="Myshot"+Str$(image)+".bmp"
SaveBuffer(FrontBuffer(),ImageName$)
End If
for video, use Fraps as suggested