*| >FastSave4
*|
MODE0:VDU21,26:DIM B% 30
B%=((B%+3)DIV4)*4:!B%=148
!(B%+4)=7:!(B%+8)=-1
VDU6:INPUT"Filename "file$:OS.("SCREENL. "+file$):file$=LEFT$(file$,9):SYS &31,B%,B%+&10:Z%=!(B%+&10):L%=!(B%+&14):OFF:VDU24|:OS.("SCREENS. "+file$+"+"):OS.("SAVE "+file$+"= "+STR$~Z%+" +"+STR$~L%):ON
