home *** CD-ROM | disk | FTP | other *** search
/ Dave Lowe: AssemPro For Development Amiga Driver / Lowe_AssemProForDevelopmentAmigaDriver.adf / Tables / MATH.Q < prev    next >
Encoding:
Text File  |  1987-10-07  |  619 b   |  48 lines
  1.  
  2. HEADER:MACRO $\S,\A
  3. \1:
  4.  DC.B \S,0
  5. \2:
  6.  IFLO 16,\2-\1
  7.   DS.B 16-(\2-\1)
  8.  ELSE
  9.   IFHI 16,\2-\1
  10.    BLÖK
  11.   ENDIF
  12.  ENDIF
  13.  DC.L \A-TABELLEN
  14.  ENDM
  15.  
  16. ENTRY:MACRO $\S,\A,\B
  17. \1:
  18.  DC.B \S,0
  19. \2:
  20.  IFLO 18,\2-\1
  21.   DS.B 18-(\2-\1)
  22.  ELSE
  23.   IFHI 18,\2-\1
  24.    BLÖK
  25.   ENDIF
  26.  ENDIF
  27.  IFD \B
  28.   DC.W \A-\B
  29.  ELSE
  30.   DC.W \A-TAB_START@
  31.  ENDIF
  32.  ENDM
  33.  
  34. TABELLEN:
  35.  DC.L (\E-\A)/20
  36. \A:
  37.  HEADER "MATHFFP",MATHFFP_TAB
  38.  HEADER "MATHIEEEDOUBBAS",MATHIEEEDOUBBAS_TAB
  39.  HEADER "MATHTRANS",MATHTRANS_TAB
  40.  HEADER "MISC",MISC_TAB
  41. \E:
  42.  
  43.  INCLUDE TABLES/MATHFFP.TAB INCLUDE TABLES/MATHIEEEDOUBBAS.TAB
  44.  INCLUDE TABLES/MATHTRANS.TAB
  45.  INCLUDE TABLES/MISC.TAB
  46.  
  47.  END
  48.