home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 2 / DATAFILE_PDCD2.iso / utilities2 / desklib / Libraries / Font / s / Font05 < prev    next >
Encoding:
Text File  |  1993-07-09  |  638 b   |  29 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_StringWidth(FontString *string);
  8.  
  9. ;       r0=pointer to definition block
  10.  
  11. ;       [r0,#0]  = char *s string
  12. ;       [r0,#4]  = x
  13. ;       [r0,#8]  = y
  14. ;       [r0,#12] = split
  15. ;       [r0,#16] = index
  16.  
  17.         PREAMBLE
  18.         STARTCODE Font_StringWidth
  19. ;
  20.         STMFD   sp!, {r4,r5,r6,lr}
  21.         MOV     r6,r0
  22.         LDMIA   r6,{r1,r2,r3,r4,r5}
  23.         SWI     SWI_Font_StringWidth + XOS_Bit
  24.         STMIA   r6,{r1,r2,r3,r4,r5}
  25.         MOVVC   r0,#0
  26.         LDMFD   sp!, {r4,r5,r6,pc}^
  27. ;
  28.         END
  29.