Ответ: Screenshot maker
Function screenshot()
If KeyHit(63) = 1;F5
For w = 1 To 100
name$ = "screenshot" + w + ".jpg"
If FileType(name$) = 0
If done = 0
SaveBuffer(FrontBuffer(), name$)
done = 1
EndIf
EndIf
Next
EndIf
End Function
вызывай функцию всегда в потоке жми ф5 и будет скрин в папке с игрой
для всего экрана фрапсом пользуйся
|