home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / MBUG / MBUG094.ARC / PATCH.DOC < prev    next >
Text File  |  1979-12-31  |  3KB  |  58 lines
  1. PatcΦ developeΣ b∙ R.K.HallwortΦ oµ Donvalσ Christiaε School¼ ì
  2. Victoria
  3.  
  4. Thi≤ patcΦ t∩ wordsta≥ i≤ t∩ enablσ direc⌠ printinτ unde≥ thσ ì
  5. starne⌠ networδ enviroment« ╔ havσ onl∙ testeΣ thi≤ fo≥ thσ DP10░ ì
  6. version of wordstar. 
  7.  
  8. First make a copy of ws.com called nws.com
  9.  
  10. Now patch as shown below.
  11.  
  12. Thσ networδ configuratioε wil∞ havσ t∩ bσ changeΣ s∩ tha⌠ thσ ì
  13. application wordprocessor is NWS.COM not WS.COM
  14.  
  15. Location      Patch        Purpose
  16.  
  17. áááááááááááááá             ; This routine flushes the bios print
  18. áááááááááááááá             ; buffer by filling it with 0H. Hence
  19. áááááááááááááá             ╗ ensurinτ tha⌠ al∞ printablσ materia∞ ì
  20. áááááááááááááá             ; has been set to the FS       
  21.  
  22. 02BB          06 7D                     LD B,125
  23.               C5           LOOP:        PUSH BC
  24. áááááááááááááá3E 00                     LD A,0
  25. ááááááááááááááCD 1C 07                  CALL 071C   ;OUTPUT CHAR
  26. ááááááááááááááC1                        POP BC
  27. áááááááááááááá10 F7                     DJNZ LOOP
  28.  
  29. áááááááááááááá               ;Thi≤ routinσ cause≤ ß packe⌠ ì
  30. áááááááááááááá;locateΣ a⌠ 02┼ t∩ bσ transmiteΣ t∩ thσ filσ serve≥ ì
  31. áááááááááááááá;which causes the file server to print spooled data              
  32.               ;thi≤ routinσ i≤ froφ thσ "StarNetworδ Systeφ Manual"   
  33.               ;page 5-22
  34.  
  35. 02C5áááááááááá21 6╢ 0│       SENDPACK║á    L─ HL,036╢  ;enΣá oµ ì
  36. áááááááááááááá                                         ;transmit bufferáááááááá
  37. áááááááááááááá1▒ E░ 0▓                     L─ DE,02E░  ;STAR╘á O╞ BUFFER   áááá
  38. ááááááááááááááCD 3D D6              áá     CALL tx_pack
  39. áááááááááááááá2▒ 0░ 4░                     L─ HL,040░  ;RECIEV┼ BUFFE╥
  40. ááááááááááááááE5                           PUSH HL
  41. ááááááááááááááCD 3A D6                     CALL RX_PACK
  42. ááááááááááááááD1                           POP DE
  43. ááááááááááááááCD 37 D6                     CALL CALC_CK
  44. ááááááááááááááB7                           OR A
  45. áááááááááááááá20 E9                        JR NZ,SENDPACK
  46. ááááááááááááááC9                           RET               
  47.  
  48. 02E           10         ;CODE TO BE SENT TO CAUSE PRINTING
  49.  
  50. 0714          C3 BB 02   ;THIS CAUSES WORDSTAR TO EXECUTE THE ABOVE CODE ONCE
  51. áááááááááááááá      ááááá;PRINTING HAS CEASED
  52.  
  53. 06FEáááááááááá03 1B 6A 24 ;THIS IS SENT TO THE PRINTER TO CAUSE IT TO 
  54. áááááááááááááá            ;BAC╦ SPAC┼ ON┼ LIN┼ AFTE╥ ┴ DOCUMEN╘ ì
  55. áááááááááááááá            ;I╙ PRINTED« THI╙ REMOVE╙ TH┼ EXTR┴ LIN┼ èáááááááááááááá            ;ADDE─ B┘ FS ???
  56.  
  57. 0400          00 4E 57 53 ;THIS RENAMES WS TO NWS FOR INTERNAL USE
  58. ááááááááááááááááááááááááááá