home *** CD-ROM | disk | FTP | other *** search
- INTROKEP1 DW 09
- INTROKEP2 DW 10
- IPUF DW 00
-
- INTROPART: PUSHA
- PUSH ES DS
- MOV AX,11H
- INT 10H
- MOV DS,CS:IPUF
- MOV DX,0
- MOV AX,CS:INTROKEP1
- CALL LOADOVERLAY
- MOV SI,0
- MOV CX,640*240/8
- MOV AX,0A000H
- MOV ES,AX
- MOV DI,0
- REP MOVSW
- MOV DX,0
- MOV DS,CS:IPUF
- MOV AX,CS:INTROKEP2
- CALL LOADOVERLAY
- INTRP0: CMP CS:PATTERNROW,31
- JB INTRP0
- MOV DI,0
- MOV AX,0
- MOV CX,640*240/8
- REP STOSW
- INTRP1: CMP CS:PATTERNROW,33
- JB INTRP1
- MOV CX,640*240/8
- MOV SI,0
- MOV DI,0
- REP MOVSW
- INTRP2: CMP CS:PATTERNROW,63
- JB INTRP2
- POP DS ES
- POPA
- RET
-