echo off
goto :batch
n user
l
r sp
100
a 80
cli
cld
mov dx,cx
mov ax,ds
add ax,1000
mov ds,ax
mov es,ax
mov di,5701
mov cx,100
mov ax,3B3
repne scasw
jne AE
sub word ptr -2[di],1
add di,117
add byte ptr 6[di],1
mov si,di
inc si
mov cx,13
rep movsb
mov cx,dx
mov ax,cs
mov ds,ax
int 3

g =80
n user
w
q

:batch
if not %1. == . goto doit

echo This batch file, FIXCARET.BAT, will make the blinking caret displayed by
echo Notepad and edit fields in dialog boxes more visible.  (It will be two
echo pixels wide instead of one.)  This file patches the USER.EXE file on your
echo Windows BUILD disk.  To apply the patch, first *make a copy* of your BUILD
echo disk and use the copy.  Do not use the original disk!  Copy this file,
echo FIXCARET.BAT, onto the BUILD disk and make sure DEBUG.COM is available in
echo your search path (or else copy DEBUG.COM onto the BUILD disk).  Then, at
echo the "A" prompt, give the command "fixcaret doit" (without the quotes),
echo and the patch will be applied.  There will be two "^ Error" messages from
echo DEBUG; you can disregard them.  Finally, run SETUP to re-install Windows,
echo using the patched copy of the BUILD disk.  This patch has been tested with
echo Windows 1.01 and 1.03, on both the standard and debugging (developer's)
echo versions of Windows.
goto done

:doit
rename user.exe user
debug <fixcaret.bat
rename user user.exe
:done
 