home *** CD-ROM | disk | FTP | other *** search
/ CBM Funet Archive / cbm-funet-archive-2003.iso / cbm / geos / drivers / printers / Userport-driver.asm < prev   
Encoding:
Assembly Source File  |  1994-05-26  |  1.4 KB  |  65 lines
  1. FX80.CVT
  2. STARNX10.CVT
  3.  
  4. gEOS pRINTER dRIVERS WHICH SUPPORT user port CONNECTION.
  5.   cONNECTION CABLE LOOKS LIKE THIS:
  6. C64            pRINTER
  7. PB0..PB7D0..D7
  8.  ?strobe
  9. ?ack
  10.  
  11. ? - FIND OUT FROM ASM SOURCE!
  12.  
  13. ;----------gEOSpRINTERdRIVER------------
  14. ;-------------sTAR lc-20----------------
  15. ;(C)1993 cOMMODORE cRACKER V1.0
  16. ;---------------------------------------
  17. ACK      = $DD0D
  18. STROBE   = $DD00
  19. PAIO     = $DD03
  20. PA       = $DD01
  21. BANK     = $01
  22. ;---------------------------------------
  23.          *= $7900
  24. ;---------------------------------------
  25.          JMP INIT
  26.          JMP START
  27.          JMP PR_BUF
  28.          JMP STOP
  29.          JMP GET_DIM
  30.          JMP PR_ASC
  31.          JMP START_ASC
  32.          JMP SET_NLQ
  33. ;---------------------------------------
  34.          .TEXT "Star LC-20"    ;HEADER
  35.          .BYTE 0,0,0,0,0,0,0,0,0,0
  36.          .BYTE 0,0,0,0
  37. ;---------------------------------------
  38.          LDA #$FF
  39.          STA PAIO
  40.          LDA #0   
  41.          STA PA
  42.  RTS
  43. ;---------------------------------------
  44. WRITE    STA PA
  45.          LDA STROBE
  46.          AND #$FB
  47.          STA STROBE
  48.          ORA #$04
  49.          STA STROBE
  50.          LDX #$FF
  51. LOOP     DEX
  52.          BEQ TIME_OUT
  53.          LDA ACK
  54.          AND #$10
  55.          BEQ LOOP
  56.  LDX #0
  57.  RTS
  58. ;---------------------------------------
  59. TIME_OUT LDX #1
  60.          JMP SET_OLD
  61. ;---------------------------------------
  62.  
  63. eNJOY THIS GREAT DRIVERS!
  64. (KLAMPAR@ELF.STUBA.SK)
  65.