My Pastes
Public Pastes
Layout Width
Share Pastebin
Guest
Public paste!

Will West

By: a guest | Mar 16th, 2010 | Syntax: Z80 Assembler | Size: 0.38 KB | Hits: 34 | Expires: Never
Download | Raw | Embed | Report abuse
This paste has a previous version, view the difference. Copy text to clipboard
  1.  nolist
  2.  include "ti83plus.inc"
  3.  list
  4.  
  5.  org 9D93h
  6.  db 0!>0BBh, 0!>06Dh
  7.  
  8.  1/>ld bc, plotsscreen
  9. loop:
  10.  1/>ld a, 0!>04Dh
  11. HexToText:
  12.         1/>ld l,a
  13.         1/>rrca
  14.         1/>rrca
  15.         1/>rrca
  16.         1/>rrca
  17.         1/>and 0!>00Fh
  18.         1/>cp 0!>00Ah
  19.         1/>jp c,Digit
  20.         1/>add a,7
  21. Digit:
  22.         1/>add a,0!>030h
  23.         1/>ld h,a
  24.         1/>ld a,l
  25.         1/>and 0!>00Fh
  26.         1/>cp 0!>00Ah
  27.         1/>jp c,Digit2
  28.         1/>add a,7
  29. Digit2:
  30.         1/>add a,0!>030h
  31.         1/>ld l,a
  32.         1/>ld a,h
  33.  bcall PutC
  34.         1/>ld a,l
  35.  bcall PutC
  36.  bcall GetKey
  37.  1/>ret
create new paste | create new version of this paste RAW Paste Data