
 1000  *--------------------------------
 1010  * APPLEWRITER PATCH TO UNHOOK PLE
 1020  *--------------------------------
 1030         .OR $803
 1040         .TF AW.1
 1050         JSR PATCH    REPLACES "JSR $10F8"
 1060  *--------------------------------
 1070         .OR $1873    SAFE PATCH AREA
 1080         .TF AW.2
 1090  PATCH  JSR $FE89    SET INPUT TO KEYBOARD
 1100         JSR $FE93    SET OUTPUT TO SCREEN
 1110         LDA #$9C
 1120         STA $9D01    RESTORE NORMAL DOS BUFFERS
 1130         LDA #3
 1140         STA $AA57    MAXFILES=3
 1150         JSR $A7D4
 1160         LDX #$2F
 1170  .1     LDA $9E51,X  RESTORE PAGE 3 POINTERS
 1180         STA $3D0,X
 1190         DEX
 1200         BPL .1
 1210         JSR $3EA     RE-HOOK DOS
 1220         JMP $10F8    DO WHAT THE "JSR PATCH" COVERED

