home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1990 / 05 / einsteig / listing3.asm < prev   
Assembly Source File  |  1990-01-30  |  865b  |  25 lines
  1. TITLE Listing3.asm
  2. ;Beispiel für ein Unterprogramm mit Variablenübergabe
  3. ;unter Verwendung des LEAVE und ENTER Befehls
  4.  
  5. MAIN: 
  6.       ENTER 1, 1              ;eine Wort-Var, LEVEL 1
  7.                               ;generiert Stapelrahmen
  8.                               ;mit Platz für einen
  9.                               ;Rahmen-Pointer und eine
  10.                               ;16-Bit-Variable
  11.       MOV WORD PTR [BP-4],1   ;Variable initialisieren
  12.       CALL UPRO_1
  13.       LEAVE                   ;Speicher wieder freigeben
  14.       RET
  15.  
  16. UPRO_1:
  17.       ENTER 0, 2              ;keine weiteren Var, LEVEL 2 
  18.       MOV AX, 2               ;Beisp. Multiplikator für Var
  19.       MOV WORD PTR SS:[BP-4]  ;multipliziert Variable aus
  20.                               ;dem Hauptprogramm mit AX
  21.                               ;Ergebnis in AX
  22.       LEAVE
  23.       RET
  24.  
  25.