... TVPATCH.TXT ......................................... g_Mouse Interface ...
                                              Document no.: MT-0021.96.99M01.03
                                                                 Version 1.54.7
                                             Copyright(c) 1996-99 by B-coolWare


This file describes what you have to change in Turbo Vision 2.0 source files
to add support for g_Mouse Interface.

If you have RTL source code for Borland Pascal 7.0x, then use following FC
dump to change the VIEWS.PAS code. Then recompile the unit and replace it in
library directory. From then on g_Mouse will be automatically supported by
TV (don't forget to put G_MOUSE.TPU in library directory too). Because of
copyright restrictions I cannot distribute already changed VIEWS.PAS, but
luckily I can teach you how to fix it yourself. :)

In following dump VIEWS.PAS corresponds to original Views unit code, and
VIEWS.GRM - to modified code. This was version 2.0 of VIEWS.PAS distributed
with Borland Pascal with Objects Version 7.0. Version 7.01 of this file may
have different line numbers, but I think the code I enhanced didn't change.


FC differences between VIEWS.PAS and VIEWS.GRM:
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

***** VIEWS.PAS
   16:
   17:  uses Objects, Drivers, Memory;
   18:
***** VIEWS.GRM
   16:
   17:  uses Objects, Drivers, Memory, g_Mouse;
   18:
*****

***** VIEWS.PAS
  843:  @@41:   CLI
  844:          CMP     AX,MouseWhere.Y
  845:          JNE     @@42
  846:          CMP     BX,MouseWhere.X
  847:          JA      @@42
***** VIEWS.GRM
  843:  @@41:   CLI
  844:          CMP     g_Mouse.Active,1
  845:          JNZ     @@120
  846:          CMP     AX,MouseWhere.Y
  847:          JB      @@42
  848:          PUSH    DX
  849:          MOV     DX,MouseWhere.Y
  850:          INC     DX
  851:          CMP     AX,DX
  852:          POP     DX
  853:          JA      @@42
  854:          PUSH    DX
  855:          MOV     DX,MouseWhere.X
  856:          INC     DX
  857:          CMP     BX,DX
  858:          POP     DX
  859:          JA      @@42
*****

***** VIEWS.PAS
  848:          CMP     CX,MouseWhere.X
  849:          JA      @@43
***** VIEWS.GRM
  860:          CMP     CX,MouseWhere.X
  861:          JB      @@42
  862:          JMP     @@43
  863:  @@120:
  864:          CMP     AX,MouseWhere.Y
  865:          JNE     @@42
  866:          CMP     BX,MouseWhere.X
  867:          JA      @@42
  868:          CMP     CX,MouseWhere.X
  869:          JA      @@43
*****


