home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / 93xx / 9304a.d64 / hex-ascii < prev    next >
Text File  |  1995-03-30  |  1KB  |  39 lines
  1.           *= $1000
  2. ;------ HEX TO ASCII -------------------
  3.           JSR BYTINIT   ;BYTES IN $FB/$FC
  4.           JSR CALC      ;UMRECHNEN
  5.           RTS           ;RUECKKEHR
  6.  
  7. CALC      LDY #$01      ;REGISTER
  8.           LDX #$00      ;VORBEREITEN
  9. CALCLOOP  LDA $FB,Y     ;ERSTES HEXBYTE
  10.           PHA           ;HOLEN UND SPEICHERN
  11.           LSR A         ;HI-NIBBLE
  12.           LSR A         ;ISOLIEREN
  13.           LSR A         ;
  14.           LSR A         ;
  15.           JSR WDHADD    ;UMRECHNEN
  16.           INX           ;SCREENMATRIX+1
  17.           PLA           ;ALTES BYTE HOLEN
  18.           JSR WDHADD    ;UND UMRECHNEN
  19.           INX           ;SCREENMATRIX+1
  20.           DEY           ;SOLANGE BIS 2 BYTES
  21.           BPL CALCLOOP  ;UMGERECHNET WURDEN
  22.           RTS           ;
  23. WDHADD    AND #%00001111;LO-NIBBLE ISOLIEREN
  24.           CMP #$0A      ;WENN KLEINER $0A
  25.           BCC ADD       ;DANN ZAHL SCHREIBEN
  26.           SBC #$39      ;WENN GROESSER DANN
  27.                         ;BUCHSTABE ERRECHNEN
  28. ADD       ADC #$30
  29.           STA $0400,X   ;IN SCREENMATRIX
  30.           RTS           ;SCHREIBEN UND ENDE
  31. ;------- SET BYTES ---------------------
  32. BYTINIT   LDX #$01
  33. BYT1      LDA BYTES,X   ;$FB UND $FC
  34.           STA $FB,X     ;VORBEREITEN
  35.           DEX           ;AUF UMRECHNUNG
  36.           BPL BYT1
  37.           RTS
  38. BYTES     .BYTE $AB,$12
  39.