goto batstart
A 100
MOV     SI,0082
MOV     BX,[SI]                            
MOV     AX,0040                            
AND     AX,BX                              
JZ      010F                               
SUB     BX,+07                             
SUB     BX,+30
ADD     BX,BX                              
ADD     BX,BX                              
ADD     BX,BX                              
ADD     BX,BX                              
NOP                                        
NOP                                        
INC     SI                                 
MOV     AX,[SI]                            
ADD     BX,AX                              
AND     AX,0040                            
JZ      0129                               
SUB     BX,+07                             
SUB     BX,+30                             
MOV     AH,09                              
MOV     AL,20                              
MOV     BH,00                              
MOV     CX,07D0                            
INT     10                                 
RET                                        

W
Q


:batstart
@echo off
if exist %0.bat goto havefile
if exist %0 goto havefile
echo Error: Unable to find source file (%0).
goto end
:havefile
if not exist scr.com goto nocom
echo The destination file, SCR.COM, already exists. If you have already
echo successfully run this batch file, you can set your screen colors by
echo typing scr followed by the color choice desired.
echo Please Select:
echo              Rebuild scr.com     [Y] 
echo              Read help info only [N]
choice/cyn
if errorlevel 2 goto havecom
:nocom
echo Ã........1.........1.........31........41........51.....ÿÿÿ>scr.com
echo SCR.COM Copyright 1997, J.E. Boser, Mayville, NY 14757>>scr.com
echo SCR.COM will set your dos vga screen colors as you desire.
echo To use, type scr XY, where X is the background color (0-F) and Y is the>>scr.com
echo foreground color(0-F).>>scr.com
if not exist %0.bat goto noext
debug <%0.bat scr.com
goto havecom
:noext
if not exist %0 goto end
debug <%0 scr.com
:havecom
echo (If no unexpected errors have occurred) you can now set your screen colors
echo at the DOS prompt by typing:
scr 0E
echo        scr 0E          black (0) background with yellow (E) letters.
scr 31
echo        scr 31          cyan (3)  background with blue (1) letters.
scr 13
echo        scr 13          blue (1)  background with cyan (3) letters.
scr 40
echo        scr 40          red (4)   background with black (0) letters.
scr 4E
echo        scr 4E          red (4)   background with yellow (E) letters.
scr 07
echo        scr 07          black (0) background with gray (7) letters.
echo.
echo Other color combinations can be obtained by typing scr followed by any two
echo characters, each 0-9 or A-F (Case IS important).
echo Also note that on many systems, a value greater than 7 for background will 
echo cause flashing letters.
echo If you load the driver, ansi.sys, scr.com will not function, as ansi.sys
echo will cancel the color change.
echo In the future, it is not necessary to run this batch file, only the newly
echo created file, SCR.COM. To allow you to use this from any directory, you may
echo wish to copy it to a directory in your system's path. If you want to do that
echo automatically now, press 'C'. Otherwise, press 'E' to exit.
choice/cec
if not errorlevel 2 goto end
if exist c:\dos\nul goto dos
if exist c:\windows\command\nul goto 9x
echo Sorry. Unable to find standard command directory. File not copied.
echo You must do this manually.
goto end
:dos
copy scr.com c:\dos
echo Success.
goto end
:9x
copy scr.com c:\windows\command
echo Success.
goto end
:end