
Tips, Patches and Comments on the Model 3 Computers.
============================================================
These patches have been assembled from many sources. They
have not been tested for accuracy. CC/LA suggests that these
patches are only applied to backup diskettes and the programs
fully tested. Unfortunately, these patches were obtained
without credit given to the original author.
=============================================================

To make multiple copies of protected VISICALC and SCRIPSIT
programs:
1.  Make 2 backup copies as recommended in owner's manual.
2.  Insert one of the backup copies, without write
protection, into drive 0 and press <RESET>.
3.  Enter BASIC and press <ENTER> for FILES and SIZE
questions.
4.  Enter the following program exactly:

    10  Z=0: FOR X=28672 TO 28808: READ A: POKE X,A: Z=Z+A:
NEXT
    60  IF Z<>12099 THEN PRINT "ERROR - CHECK DATA NUMBERS":
END
    70  DEFUSRR0=&H7000: X=USR(0)
    90  DATA 49,240,111,33,136,0,229,241,33,0,64,229,253,225
    100 DATA 1,20,1,17,105,112,213,221,225,33,120,112,245,197
    110 DATA 213,229,205,66,68,5,5,5,5,205,54,68,17,48,0,33
    120 DATA 137,112,1,0,5,126,254,126,204,101,112,254,94,204
    130 DATA 101,112,25,16,242,1,0,5,17,47,1,33,153,112,54,23
9
    140 DATA 35,54,92,25,16,248,58,115,112,61,50,115,112,225
    150 DATA 209,193,241,205,66,68,5,205,60,68,195,45,64,62
    160 DATA 16,119,201,128,104,0,137,112,0,0,8,0,0,21,1,32,3
    170 DATA 0,31,32,0,16,31,64,0,32,31,96,0,48,31,128,0,64,3
1

5.  Type 'SAVE "SUPER"' and press <ENTER>. Then RUN the
program.
6.  The program will take 5 seconds to run, then will return
to TRSDOS.  You can now copy or backup VISICALC or SCRIPSIT.


For extensive patching, to use only single letters for "ADD",
"FIND", and "CHG":
    PATCH *9 (ADD=56C5,FIND=044144,CHG=02413D)  "A"
    PATCH *9 (A=56CA,FIND=054649,CHG=02463D)    "F"
    PATCH *9 (A=56D0,F=044348,CHG=02433D)       "C"

  (patches must be done in above order, as second and third
steps use previous patches)


R/S corrective patches  (TRS-80 Micro. Newsletter, Oct. 81,
p.13)
    PATCH *10 (ADD=4E2E,FIND=CD3E4B,CHG=CD8A50)
    PATCH *10 (ADD=508A,FIND=4469736B,CHG=4FC33E4B)


To fix a bug when TRSDOS 1.3 tries to LIST a non-existent
file:
    PATCH *10 (ADD=4E47,FIN=D02,CHG=03)


To display full error messages:
    PATCH *4 (ADD=4E28,FIND=20,CHG=18)


To bypass all password checking:
    PATCH *2 (ADD=4ED4,FIND=20,CHG=18)


To enable access to all files (e.g. BASIC/CMD)
    PATCH *2 (ADD=5135,FIND=2C,CHG=00)


To allow unlimited backup, no matter what limited backup
count is set to:
    PATCH *7 (ADD=528E,FIND=C8,CHG=C9)


To bypass Model III 'picture':
    PATCH *0 (ADD=516C,FIND=D0,CHG=03)


To bypass copyright notice:
    PATCH *0 (ADD=508A,FIND=28,CHG=03)


To bypass Date/Time query on power up:
    PATCH *0 (ADD=4EB8,FIND=213B51,CHG=C3394F)


To bypass only the Time query on power up:
    PATCH *0 (ADD=4EF7,FIND=06,CHG=36)


To bypass Date/Time on power up and set Date to 00/00/00:
    PATCH *0 (ADD=4EB1,FIND=06,CHG=17)
    PATCH *0 (ADD=4ED4,FIND=3A81,CHG=184D)


To defeat Date/Time error checking so anything can be
entered:
    PATCH *0 (ADD=4EB5,FIND=CD1B02,CHG=C3F64E)


To eliminate the dots after TRSDOS Ready (next line) ......:
    PATCH *1 (ADD=4E78,FIND=2E,CHG=20)
  (replaces dots <2E hex> with spaces <20 hex>, or any other
character)


To change the "TRSDOS Ready" prompt to any 12 characters:
    PATCH *1 (ADD=509C,FIND=545253444F53,CHG=547273446F73)
 (changes to "TrsDos Ready" - use hex for any characters)


Logo addresses in overlay 0 (PATCH *0):
    516C - Model III picture, using space compression codes.
    5010 - 483216 , used for 48k, 32k, or 16k in the display
    5016 - Version number, # of drives, memory size, text
    508A - Copyright notice (on some DOS, the "(" around the
"(c)" is 03 Hex, should be 28 Hex)
    512D - Try Again, followed by 4 spaces and 03 Hex
    513D - Enter Date (MM/DD/YY)?, followed by 20 Hex, 03 Hex
    4F6B - Auto Function Engaged, followed by 0D Hex
 Normally, a carriage return <0D Hex> follows text.


To bypass the "Auto Function Engaged" message:
    Patch *0 (ADD=4F62,FIND=CD1B02,CHG=000000)
To customize filedate, using any combination of 2 Date/Time
fields:
    PATCH *2 (ADD=4FD2,FIND=1C,CHG=xx)
    PATCH *2 (ADD=4FD7,FIND=1A,CHG=xx)
 (Standard TRSDOS1.3 uses MM/YY. Other values for xx are:
    17 = seconds, 18 = minutes, 19 = hours, 1A = year, 1B =
day,    1C = month.
    (Using 1C & 1B would display MM/DD.)


To skip CLS before DIR listing:
    PATCH *3 (ADD=4FB7,FIND=EDB0,CHG=0000)


Compiled from various sources by Ralph Parker
As published in USR (80), The Journalette of the Vancouver
TRS-80 User's Group, March 1985.  Continued from TCUG
DIRECTORY, May '85, Page 22.


To shorten DIR commands "SYS", "INV", "PRT" to "S","I","P":
     PATCH *6 (ADD=5CC4,FIND=5953,CHG=2020)   "S"
     PATCH *6 (ADD=5CCC,FIND=4E56,CHG=2020)   "I" 
     PATCH *6 (ADD=5CD4,FIND=5254,CHG=2020)   "P"


To hasten the Boot time by eliminating the fancy displays and
telling TRSDOS that you have 4 drives:
     PATCH *0 (ADD=4E11,FIND=21F443,CHG=C3264E) 
     PATCH *0 (ADD=4E43,FIND=3A1244,CHG=C3614E) 
     PATCH *0 (ADD=4E63,FIND=0604CDD444,CHG=3E03C3744E) 
     PATCH *0 (ADD=4E9A,FIND=CD1B02,CHG=000000)
     PATCH *0 (ADD=5039,FIND=20,CHG=0D)       
     PATCH *0 (ADD=516C,FIND=D0BF9F,CHG=1C1F03)
  (You may install any or all patches, depending on the
desired effect)


To install a DOS 'R'epeat command (similar to NEWDOS/80):
     PATCH *1 (ADD=4E36,FIND=2642013F003600,CHG=8041013F00000
0)
     PATCH *1 (ADD=5191,FIND=4D4153544552,CHG=522020202020)
     PATCH *9 (ADD=603E,FIND=CD8E5FFE0D2003,CHG=2180411125420
1)
     PATCH *9 (ADD=6045,FIND=AF1829111060CD,CHG=2500EDB021254
2)
     PATCH *9 (ADD=604C,FIND=5444C2,CHG=C39942)


To convert TRSDOS 1.3 for use with 80 track, rather than 40
track drives:
     PATCH *0 (A=4926,F=28,C=50)
     PATCH *0 (A=499B,F=28,C=50)
     PATCH *2 (A=4F61,F=28,C=50)
     PATCH *6 (A=5C06,F=28,C=50)
     PATCH *6 (A=5D53,F=28,C=50)
     PATCH *7 (A=5203,F=28,C=50)
     PATCH *7 (A=53FF,F=28,C=50)
     PATCH *7 (A=5504,F=28,C=50)
     PATCH *7 (A=5C4F,F=28,C=50)
     PATCH *7 (A=5CD4,F=28,C=50)
     PATCH *0 (A=4B29,F=29,C=51)


To change the track stepping rate from 6ms to 20 ms:
     PATCH *0 (A=42EE,F=0C,C=0F)
     PATCH *0 (A=4516,F=0C,C=0F)
     PATCH *0 (A=4FE1,F=0C,C=0F)
     PATCH *0 (A=4544,F=1C,C=1F)

To add a CAT command to TRSDOS 1.3 (appears to work for Drive
0 only):
     PATCH *1 (ADD=50A9,FIND=4F7065726174,CHG=0D7EFE343004)
     PATCH *1 (ADD=50AF,FIND=696F6E204162,CHG=FE3030023E30)
     PATCH *1 (ADD=50B5,FIND=6F727465640D,CHG=327142C31944)
     PATCH *1 (ADD=51C9,FIND=524F55544520A842,CHG=43415420202
0AA50

==============================================================
      DOWNLOADED FROM COMPUCENTER BBS (213) 320-0222
==============================================================
HINT: You can use word processor to breakout and save sections
you want for setting up patch file and for program "SUPER"
with-out retyping all. Remember to save in ASCII.
 John Mork 02/14/86
 =====