setstring !autosave YES

hidedebug
; debugoff
question Pick a base filename
setstring filename dialog
setstring sq 0
SETACTIVESCREEN SEQUENCER
label loop
LOAD!VARS
compare !autosave YES
isnotequal die
ACTIVATE
add 1 sq
setstring nfn filename

combine nfn sq
savebmw nfn

setstring !lastsaved nfn

pause 5
goto loop

label die
endscript
