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 / PROC2.ASM < prev    next >
Assembly Source File  |  1984-04-29  |  916b  |  38 lines
  1.  
  2.        TITLE  'PROC2'
  3.  
  4.        ORG    4500H
  5.  
  6. DUMP   EQU    7200H
  7.  
  8. AS     EQU    8004H
  9. V      EQU    8204H
  10. START  EQU    83A8H
  11. STOP   EQU    84A0H
  12.  
  13. NM1:   DB     'PROC1 '
  14. NM3:   DB     'PROC3 '
  15. NM4:   DB     'PROC4 '
  16.  
  17.  
  18. BEGIN: LXI    SP,44A0H  ; 3
  19.        LXI    B,NM3
  20.        MVI    E,2
  21.        CALL   START     ; Start (and create) PROC3 with priority 2
  22.                         ; There will be a jump to PROC3 here
  23.        CALL   DUMP
  24.        HLT              ; Set AS to 1
  25.  
  26.        LXI    B,NM4     ; 5
  27.        MVI    E,0FFH
  28.        CALL   START     ; Start (and create) PROC4 with priority 4
  29.                         ; There is again a jump to PROC3 because 
  30.                         ; of a V
  31.        LXI    B,AS
  32.        CALL   V         ; 9
  33.                         ; There is a jump to PROC3
  34.  
  35.        CALL   DUMP      ; 12
  36.        HLT              ; End of test program
  37.        END    BEGIN
  38.