home *** CD-ROM | disk | FTP | other *** search
/ Amiga Developer CD v1.2 / amidev_cd_12.iso / devcon / sanfrancisco_1989 / sf-devcon89.1 / commodities / aztec / cxsupp / cxlink.asm < prev    next >
Assembly Source File  |  1992-08-27  |  5KB  |  267 lines
  1. ;  liblink.asm -- jimm mackraz, oct 28, 1986
  2. ;  application side interface for C-routines calling example library
  3.  
  4.     include 'exec/types.i'
  5.     include 'exec/libraries.i'
  6.  
  7.     LIBINIT
  8.     LIBDEF    _LVOCreateCxObj
  9.     LIBDEF    _LVOCxBroker
  10.     LIBDEF    _LVOActivateCxObj
  11.     LIBDEF    _LVODeleteCxObj
  12.     LIBDEF    _LVODeleteCxObjAll
  13.     LIBDEF    _LVOCxObjType
  14.     LIBDEF    _LVOCxObjError
  15.     LIBDEF    _LVOClearCxObjError
  16.     LIBDEF    _LVOSetCxObjPri
  17.     LIBDEF    _LVOAttachCxObj
  18.     LIBDEF    _LVOEnqueueCxObj
  19.     LIBDEF    _LVOInsertCxObj
  20.     LIBDEF    _LVORemoveCxObj
  21.     LIBDEF    _LVOFindBroker
  22.     LIBDEF    _LVOSetTranslate
  23.     LIBDEF    _LVOSetFilter
  24.     LIBDEF    _LVOSetFilterIX
  25.     LIBDEF    _LVOParseIX
  26.     LIBDEF    _LVOCxMsgType
  27.     LIBDEF    _LVOCxMsgData
  28.     LIBDEF    _LVOCxMsgID
  29.     LIBDEF    _LVODivertCxMsg
  30.     LIBDEF    _LVORouteCxMsg
  31.     LIBDEF    _LVODisposeCxMsg
  32.     LIBDEF    _LVOInvertKeyMap
  33.     LIBDEF    _LVOAddIEvents
  34.     LIBDEF    _LVOCopyBrokerList
  35.     LIBDEF    _LVOFreeBrokerList
  36.     LIBDEF    _LVOBrokerCommand
  37.  
  38.     ; --- xref from application
  39.     public    _CxBase
  40.  
  41.     ; --- xdef for application
  42.     public    _CreateCxObj
  43.     public    _CxBroker
  44.     public    _ActivateCxObj
  45.     public    _DeleteCxObj
  46.     public    _DeleteCxObjAll
  47.     public    _CxObjType
  48.     public    _CxObjError
  49.     public    _ClearCxObjError
  50.     public    _SetCxObjPri
  51.     public    _AttachCxObj
  52.     public    _EnqueueCxObj
  53.     public    _InsertCxObj
  54.     public    _RemoveCxObj
  55.     public    _FindBroker
  56.     public    _SetTranslate
  57.     public    _SetFilter
  58.     public    _SetFilterIX
  59.     public    _ParseIX
  60.     public    _CxMsgType
  61.     public    _CxMsgData
  62.     public    _CxMsgID
  63.     public    _DivertCxMsg
  64.     public    _RouteCxMsg
  65.     public    _DisposeCxMsg
  66.     public    _InvertKeyMap
  67.     public    _AddIEvents
  68.     public    _CopyBrokerList
  69.     public    _FreeBrokerList
  70.     public    _BrokerCommand
  71.  
  72. ;CreateCxObj(type,arg1,arg2)(D0,A0/A1)
  73. _CreateCxObj:
  74.     move.l    _CxBase,a6
  75.     move.l    4(sp),D0
  76.     move.l    8(sp),A0
  77.     move.l    12(sp),A1
  78.     jmp _LVOCreateCxObj(a6)
  79.  
  80. ;CxBroker(nb,error)(A0,D0)
  81. _CxBroker:
  82.     move.l    _CxBase,a6
  83.     move.l    4(sp),A0
  84.     move.l    8(sp),D0
  85.     jmp _LVOCxBroker(a6)
  86.  
  87. ;ActivateCxObj(co,true)(A0,D0)
  88. _ActivateCxObj:
  89.     move.l    _CxBase,a6
  90.     move.l    4(sp),A0
  91.     move.l    8(sp),D0
  92.     jmp _LVOActivateCxObj(a6)
  93.  
  94. ;DeleteCxObj(co)(A0)
  95. _DeleteCxObj:
  96.     move.l    _CxBase,a6
  97.     move.l    4(sp),A0
  98.     jmp _LVODeleteCxObj(a6)
  99.  
  100. ;DeleteCxObjAll(co)(A0)
  101. _DeleteCxObjAll:
  102.     move.l    _CxBase,a6
  103.     move.l    4(sp),A0
  104.     jmp _LVODeleteCxObjAll(a6)
  105.  
  106. ;CxObjType(co)(A0)
  107. _CxObjType:
  108.     move.l    _CxBase,a6
  109.     move.l    4(sp),A0
  110.     jmp _LVOCxObjType(a6)
  111.  
  112. ;CxObjError(co)(A0)
  113. _CxObjError:
  114.     move.l    _CxBase,a6
  115.     move.l    4(sp),A0
  116.     jmp _LVOCxObjError(a6)
  117.  
  118. ;ClearCxObjError(co)(A0)
  119. _ClearCxObjError:
  120.     move.l    _CxBase,a6
  121.     move.l    4(sp),A0
  122.     jmp _LVOClearCxObjError(a6)
  123.  
  124. ;SetCxObjPri(co,pri)(A0,D0)
  125. _SetCxObjPri:
  126.     move.l    _CxBase,a6
  127.     move.l    4(sp),A0
  128.     move.l    8(sp),D0
  129.     jmp _LVOSetCxObjPri(a6)
  130.  
  131. ;AttachCxObj(headobj,co)(A0/A1)
  132. _AttachCxObj:
  133.     move.l    _CxBase,a6
  134.     move.l    4(sp),A0
  135.     move.l    8(sp),A1
  136.     jmp _LVOAttachCxObj(a6)
  137.  
  138. ;EnqueueCxObj(headobj,co)(A0/A1)
  139. _EnqueueCxObj:
  140.     move.l    _CxBase,a6
  141.     move.l    4(sp),A0
  142.     move.l    8(sp),A1
  143.     jmp _LVOEnqueueCxObj(a6)
  144.  
  145. ;InsertCxObj(headobj,co,pred)(A0/A1/A2)
  146. _InsertCxObj:
  147.     move.l    _CxBase,a6
  148.     move.l    4(sp),A0
  149.     move.l    8(sp),A1
  150.     move.l    12(sp),A2
  151.     jmp _LVOInsertCxObj(a6)
  152.  
  153. ;RemoveCxObj(co)(A0)
  154. _RemoveCxObj:
  155.     move.l    _CxBase,a6
  156.     move.l    4(sp),A0
  157.     jmp _LVORemoveCxObj(a6)
  158.  
  159. ;FindBroker(name)(A0)
  160. _FindBroker:
  161.     move.l    _CxBase,a6
  162.     move.l    4(sp),A0
  163.     jmp _LVOFindBroker(a6)
  164.  
  165. ;SetTranslate(translator,ie)(A0/A1)
  166. _SetTranslate:
  167.     move.l    _CxBase,a6
  168.     move.l    4(sp),A0
  169.     move.l    8(sp),A1
  170.     jmp _LVOSetTranslate(a6)
  171.  
  172. ;SetFilter(filter,text)(A0/A1)
  173. _SetFilter:
  174.     move.l    _CxBase,a6
  175.     move.l    4(sp),A0
  176.     move.l    8(sp),A1
  177.     jmp _LVOSetFilter(a6)
  178.  
  179. ;SetFilterIX(filter,ix)(A0/A1)
  180. _SetFilterIX:
  181.     move.l    _CxBase,a6
  182.     move.l    4(sp),A0
  183.     move.l    8(sp),A1
  184.     jmp _LVOSetFilterIX(a6)
  185.  
  186. ;ParseIX(descr,ix)(A0/A1)
  187. _ParseIX:
  188.     move.l    _CxBase,a6
  189.     move.l    4(sp),A0
  190.     move.l    8(sp),A1
  191.     jmp _LVOParseIX(a6)
  192.  
  193. ;CxMsgType(cxm)(A0)
  194. _CxMsgType:
  195.     move.l    _CxBase,a6
  196.     move.l    4(sp),A0
  197.     jmp _LVOCxMsgType(a6)
  198.  
  199. ;CxMsgData(cxm)(A0)
  200. _CxMsgData:
  201.     move.l    _CxBase,a6
  202.     move.l    4(sp),A0
  203.     jmp _LVOCxMsgData(a6)
  204.  
  205. ;CxMsgID(cxm)(A0)
  206. _CxMsgID:
  207.     move.l    _CxBase,a6
  208.     move.l    4(sp),A0
  209.     jmp _LVOCxMsgID(a6)
  210.  
  211. ;DivertCxMsg(cxm,headobj,return)(A0/A1/A2)
  212. _DivertCxMsg:
  213.     move.l    _CxBase,a6
  214.     move.l    4(sp),A0
  215.     move.l    8(sp),A1
  216.     move.l    12(sp),A2
  217.     jmp _LVODivertCxMsg(a6)
  218.  
  219. ;RouteCxMsg(cxm,co)(A0/A1)
  220. _RouteCxMsg:
  221.     move.l    _CxBase,a6
  222.     move.l    4(sp),A0
  223.     move.l    8(sp),A1
  224.     jmp _LVORouteCxMsg(a6)
  225.  
  226. ;DisposeCxMsg(cxm)(A0)
  227. _DisposeCxMsg:
  228.     move.l    _CxBase,a6
  229.     move.l    4(sp),A0
  230.     jmp _LVODisposeCxMsg(a6)
  231.  
  232.  
  233. ;InvertKeyMap(ansicode,ie,km)(D0,A0/A1)
  234. _InvertKeyMap:
  235.     move.l    _CxBase,a6
  236.     move.l    4(sp),D0
  237.     move.l    8(sp),A0
  238.     move.l    12(sp),A1
  239.     jmp _LVOInvertKeyMap(a6)
  240.  
  241. ;AddIEvents(ie)(A0)
  242. _AddIEvents:
  243.     move.l    _CxBase,a6
  244.     move.l    4(sp),a0
  245.     jmp _LVOAddIEvents(a6)
  246.  
  247. ;CopyBrokerList(ie)(A0)
  248. _CopyBrokerList:
  249.     move.l    _CxBase,a6
  250.     move.l    4(sp),a0
  251.     jmp _LVOCopyBrokerList(a6)
  252.  
  253. ;FreeBrokerList(ie)(A0)
  254. _FreeBrokerList:
  255.     move.l    _CxBase,a6
  256.     move.l    4(sp),a0
  257.     jmp _LVOFreeBrokerList(a6)
  258.  
  259. ;BrokerCommand(name,id)(A0,D0)
  260. _BrokerCommand:
  261.     move.l    _CxBase,a6
  262.     move.l    4(sp),A0
  263.     move.l    8(sp),D0
  264.     jmp _LVOBrokerCommand(a6)
  265.  
  266.     end
  267.