home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / SIMTEL / CPMUG / CPMUG015.ARK / PROC4.ASM < prev    next >
Assembly Source File  |  1984-04-29  |  548b  |  27 lines
  1.  
  2.        TITLE  'PROC4'
  3.  
  4.        ORG    4D00H
  5.  
  6. AS     EQU    8004H
  7. V      EQU    8204H
  8. STOP   EQU    84A0H
  9.  
  10. DUMP   EQU    7200H
  11.  
  12. NM3:   DB     'PROC3 '
  13.  
  14. BEGIN: LXI    SP,4CA0H   ; 8
  15.        LXI    B,NM3
  16.        CALL   STOP       ; Since AS is still 0, there is a jump
  17.                          ; to PROC2
  18.  
  19.        CALL   DUMP       ; 11
  20.        HLT               ; Set AS to 0
  21.  
  22.        LXI    B,NM3
  23.        CALL   STOP       ; There is a jump to PROC2 here because
  24.                          ; AS is 0
  25.        HLT
  26.        END    BEGIN
  27.