home *** CD-ROM | disk | FTP | other *** search
-
- TITLE 'PROC2'
-
- ORG 4500H
-
- DUMP EQU 7200H
-
- AS EQU 8004H
- V EQU 8204H
- START EQU 83A8H
- STOP EQU 84A0H
-
- NM1: DB 'PROC1 '
- NM3: DB 'PROC3 '
- NM4: DB 'PROC4 '
-
-
- BEGIN: LXI SP,44A0H ; 3
- LXI B,NM3
- MVI E,2
- CALL START ; Start (and create) PROC3 with priority 2
- ; There will be a jump to PROC3 here
- CALL DUMP
- HLT ; Set AS to 1
-
- LXI B,NM4 ; 5
- MVI E,0FFH
- CALL START ; Start (and create) PROC4 with priority 4
- ; There is again a jump to PROC3 because
- ; of a V
- LXI B,AS
- CALL V ; 9
- ; There is a jump to PROC3
-
- CALL DUMP ; 12
- HLT ; End of test program
- END BEGIN
-