10 REM ..........ALTERDOS...........›20 REM ..by Gordon L Banks..........›30 REM .............................›40 GRAPHICS 0:DIM A$(40):POKE 752,1›50 READ A$:IF A$="*" THEN 160›60 ? A$:GOTO 50›70 DATA                ÁÌÔÅÒÄÏÓ              ,›80 DATA This program will alter your DOS to›90 DATA allow more descriptive names for your›100 DATA AUTORUN.SYS files. You will hereafter,be able to use names that include the›110 DATA letters of your choice in lieu of the,'x's shown in this example.›120 DATA ,         D:Axxxxxxx.SYS,,(Note that a file named AUTORUN.SYS, will still function as normal.),›130 DATA Now names such as ARENUMBR.SYS or,ASCRNDMP.SYS (for RENUMBER or SCREEN-,DUMP) may be used.›140 DATA ,Just remember to start the name with,an A and end with .SYS.,›150 DATA If you are ready press RETURN.,,*›160 INPUT A$:RESTORE 180:A$="A*.SYS"›170 IF LEN(A$)>12 THEN ? :? "ý NO MORE THAN 12 CHARACTERS ALLOWED.":GOTO 230›180 FOR I=1 TO LEN(A$):POKE 5902+I,ASC(A$(I,I)):NEXT I›190 FOR I=5903+LEN(A$) TO 5914:POKE I,155:NEXT I›200 ? :? " Now writing new DOS.SYS file."›210 REM XIO 36,#1,0,0,"D:filename.ext" unlocks file if locked.›220 XIO 36,#1,0,0,"D:DOS.SYS":CLOSE #1:OPEN #1,8,0,"D:DOS.SYS":GRAPHICS 0:? "I'M DONE,":? "AND YOU'RE";›230 POKE 752,0:END ›