home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / tasm / chapxmpl.arc / DOUBLE.ASM < prev    next >
Encoding:
Assembly Source File  |  1988-10-09  |  357 b   |  22 lines
  1. ;
  2. ; Double.ASM
  3. ;
  4. DOUBLE_TEXT    SEGMENT BYTE PUBLIC 'CODE'
  5.         ASSUME    CS:DOUBLE_TEXT
  6.         PUBLIC    double_0
  7. double_0    PROC    FAR
  8.         push    bp
  9.         mov    bp,sp
  10.  
  11.         mov    ax,[bp+10]                ; gebundenen Wert laden
  12.         add    ax,ax                ; verdoppeln
  13.         les    si,DWORD PTR [bp+6]        ; abspeichern
  14.         mov    es:[si],ax
  15.  
  16.         mov    sp,bp
  17.         pop    bp
  18.         ret    6
  19. double_0    ENDP
  20. DOUBLE_TEXT    ENDS
  21.         END
  22.