home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 2 / DATAFILE_PDCD2.iso / utilities2 / desklib / Libraries / Font / s / Font11 < prev    next >
Encoding:
Text File  |  1993-07-09  |  485 b   |  23 lines
  1. ; Author: Copyright 1993 Shaun Blackmore
  2.  
  3.         GET     h.regdefs
  4.         GET     h.swinos
  5.         GET     h.macros
  6.  
  7. ;os_error *Font_ListFonts(char *name, int *count);
  8.  
  9.         PREAMBLE
  10.         STARTCODE Font_ListFonts
  11. ;
  12.         STMFD   sp!, {r4,lr}
  13.         MOV     r4,r1
  14.         MOV     r3,#-1
  15.         LDR     r2,[r4,#0]
  16.         MOV     r1,r0 
  17.         SWI     SWI_Font_ListFonts + XOS_Bit
  18.         STR     r2,[r4,#0]
  19.         MOVVC   r0,#0
  20.         LDMFD   sp!, {r4,pc}^
  21. ;
  22.         END
  23.