Thanks to Phaelax's assistance on another matter, I managed to create this code that I use to save my array workspace to a file and make it look pretty nice and smooth. This could easily work for another save menu, and it explains to absolute beginners (at about my level
) an effective way to use the key buffer to create input-like prompts that can run dynamically (while everything else is still going on)
IF SHIFTKEY()=1 AND KEYSTATE(31)=1 AND control_save=0 THEN control_save=1 : control_load=0 : CLEAR ENTRY BUFFER
IF control_save=1
SET CURSOR 0,0
INK col_white,col_menublue
PRINT "Save as? "+word$
word$ = entry$(1)
//Finish Writing Save File When Enter Is Pressed
IF KEYSTATE(28)=1
//Check to make sure something was typed
IF word$=""
control_save=0
ELSE
IF RIGHT$(word$,4)=".dng" THEN SAVE ARRAY word$,dngmap() ELSE word$=word$+".dng" : SAVE ARRAY word$,dngmap()
ENDIF
control_save=0
ENDIF
ENDIF
Also, it doesn't have a FILE EXIST() check. For my purposes, it didn't need one. If it's going to be used for player input, I'd recommend adding one.
EDIT: Minor bugfix. Sorry.
