home *** CD-ROM | disk | FTP | other *** search
-
- TITLE 'PROC4'
-
- ORG 4D00H
-
- AS EQU 8004H
- V EQU 8204H
- STOP EQU 84A0H
-
- DUMP EQU 7200H
-
- NM3: DB 'PROC3 '
-
- BEGIN: LXI SP,4CA0H ; 8
- LXI B,NM3
- CALL STOP ; Since AS is still 0, there is a jump
- ; to PROC2
-
- CALL DUMP ; 11
- HLT ; Set AS to 0
-
- LXI B,NM3
- CALL STOP ; There is a jump to PROC2 here because
- ; AS is 0
- HLT
- END BEGIN
-