IF PEEK(1801)>16 OR PEEK(1801)=0 THEN ? "}NOT COMPATIBLE with this DOS.":STOP ¢CLOSE #1:CLR :Z=PEEK(1801):? "}";Z;" Buffers are set up by this DOS."¢? "";Z;" Single Density or ";INT(Z/2);" Double Density Files may be opened at the same time."¢? "Would you like to change this?":OPEN #1,4,0,"K:":GET #1,Z:CLOSE #1:IF Z<>89 THEN STOP ¢? "}How many Buffers would you like DOS to set up?":OPEN #1,4,0,"K:":GET #1,Z:CLOSE #1:IF Z<49 OR Z>57 THEN STOP ¢POKE 1801,Z-48:Z=USR(58484)¢əəəəəəəəəəəəəəəəəəəəəəəəəəəəəəəə
