AppleWorks 2.1 Patch Locations September 20, 1988 ============================================================================ Please make these patches to BACK UP copies of your files only! It's always nice to be able to start over or put things back the way they were... The FIND/CHANGE information is for use with Block.Warden or some other disk editor containing a search function. This is the recommended patch method since they are more likely to be successful even if previous add-on programs or patches have moved code around. ============================================================================ The following patch to the AppleWorks 2.1 SEG.PR file allows super and sub scripts to be printed in half height characters on the ImageWriter II without using the custom printer setup. BLOAD SEG.PR,TBIN,A$2000 CALL-151 247E:02 1B 2480:78 00 00 00 00 00 02 1B 7A 00 00 00 02 1B 79 00 2490:00 00 02 1B 7A 00 00 00 00 00 00 00 00 00 00 00 24A0:00 00 00 BSAVE SEG.PR,TBIN,A$2000 ======================================================================= Patch APLWORKS.SYS to change the AppleWorks insert cursor to an inverse + sign from the current underline ($DF). POKE 768,43 BSAVE APLWORKS.SYSTEM,TSYS,A$300,L1,B$0DA1 or FIND: DF CD F5 CHANGE: nn CD F5 (nn is Byte $0DA1) in APLWORKS.SYSTEM Where nn is the ASCII code for the character you wish to use. The inverse + is ASCII 2B. ======================================================================= Patch to allow more than 9 copies of a document to be printed at one time. From Open-Apple October 87 POKE 768,255 (original value is 9) BSAVE SEG.M1,TBIN,L1,A$300,B$23C3 for Word Processor BSAVE SEG.M1,TBIN,L1,A$300,B$8D6A for Data Base BSAVE SEG.M1,TBIN,L1,A$300,B$1024F for Spreadsheet or FIND: A9 09 20 35 D0 change first 3 of 4 occurrences CHANGE: A9 FF 20 35 d0 (Rel Blocks 18, 71, 130) in SEG.M1 ======================================================================= Change AWP saves to return cursor to where you left it the next time the file is loaded rather than returning to the start of the document. Patch SEG.M1 starting at byte $168D2 FIND: 8D 62 7C AD 5C 46 85 B1 8D 63 7C CHANGE: 2C 62 7C AD 5C 46 85 B1 4C 8A 45 (Rel Block 181) ============================================================================= This patch is for those who would rather have the overstrike cursor instead of the insert cursor as the default when entering AppleWorks. Patch APLWORKS.SYSTEM at byte $1788 FIND: 00 8D F1 10 AD CHANGE: 01 8D F1 10 AD (Rel Block 12) ============================================================================= AppleWorks Word Processor inserts a space when it breaks a string longer than 61 characters during loading of a text file. The following patch will prevent the space insertion. POKE 768,65 BSAVE SEG.M1,TBIN,A$300,L1,B$19B74 or FIND: 40 E0 3D 90 CF CHANGE: 40 E0 41 90 CF Change byte $19B74 from $3D to $41 ============================================================================= Patch SEG.M1 to change the "-->" file selected indication to a mousetext check mark. FIND: 03 2D 2D 3E (two locations starting at Bytes $157AC and $18B6C) CHANGE: 03 20 20 C4 ============================================================================= Patch SEG.M1 to double underline column titles on Data Base Reports using the equal sign. Patch two locations. FIND: 48 A9 2D AE 94 83 (for screen display) CHANGE: 48 A9 3D AE 94 83 Change byte $0C29 to $3D FIND: 0E A9 2D 9D FA 08 (for printouts) CHANGE: 0E A9 3D 9D FA 08 Change byte $2D77 to $3D ============================================================================= Patch SEG.M1 to change "column overflow" indicator in the Spreadsheet from a "#" ($23) to ">" ($3E) or "|" ($7C) FIND: 0E A9 23 9D 05 Change byte $DBC1 to $3E or $7C CHANGE: 0E A9 3E 9D 05 ============================================================================= Patch APLWORKS.SYS to force available Desktop Space to be continuously displayed instead of flipping between the "oa-? for Help" & "K avail" POKE 768,76 : POKE 769,71 BSAVE APLWORKS.SYS,TSYS,A$300,L2,B$846 or FIND: 60 20 02 D0 20 2 byte change starts at $0846 CHANGE: 60 4C 47 D0 20 =============================================================================