home *** CD-ROM | disk | FTP | other *** search
/ Team Palmtops 7 / Palmtops_numero07.iso / Ti / Magazine / Tests / DOORSOSD.ZIP / graphtst.asm < prev    next >
Encoding:
Assembly Source File  |  1999-12-22  |  558 b   |  27 lines
  1.     include "doorsos.h"
  2.     include "graphlib.h"
  3.     include "userlib.h"
  4.     xdef    _main
  5.     xdef    _comment
  6.     xdef    _ti89
  7.     xdef    _ti92plus
  8.  
  9. _main:
  10.     jsr    graphlib::clr_scr2    ;Clears the screen but keeps the status line drawed
  11.     lea    big(pc),a0        ;loads the title of the big box
  12.     jsr    graphlib::bigbox    ;draws the big box
  13.  
  14.     lea    small(pc),a0        ;loads the title of the small box
  15.     jsr    graphlib::smallbox    ;draws the small box
  16.  
  17.     jsr    userlib::idle_loop    ;waits for a key input
  18.     rts
  19.  
  20. big    dc.b    "Big box",0
  21. small    dc.b    "Small box",0
  22.  
  23. _comment    dc.b    "Graphlib test",0
  24.  
  25.  
  26.     end
  27.