dots/clink.inc

   1 FIXWORD MACRO ;go to word boundary\r
   2         if ($-start) mod 1\r
   3         db 0\r
   4         endif\r
   5         ENDM\r
   6         \r
   7 CDS     MACRO\r
   8         mov     ax,cs\r
   9         mov     ds,ax\r
  10         ENDM\r
  11 \r
  12 CBEG    MACRO ;C/Assembler procedure begin\r
  13         push    bp\r
  14         mov     bp,sp\r
  15         push    si\r
  16         push    di\r
  17         push    ds\r
  18         ENDM\r
  19 \r
  20 CEND    MACRO ;C/Assembler procedure end\r
  21         pop     ds\r
  22         pop     di\r
  23         pop     si\r
  24         pop     bp\r
  25         ret\r
  26         ENDM\r
  27 \r
  28 CBEG0   MACRO ;C/Assembler procedure begin, minimal\r
  29         push    bp\r
  30         mov     bp,sp\r
  31         ENDM\r
  32 \r
  33 CEND0   MACRO ;C/Assembler procedure end, minimal\r
  34         pop     bp\r
  35         ret\r
  36         ENDM\r
  37 \r
  38 movpar  MACRO   reg,par ;loads parameter [par(0..)] to register [reg]\r
  39         mov     reg,[bp+par*2+6]\r
  40         ENDM\r
  41 \r