home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Equalizer BBS
/
equalizer-bbs-collection_2004.zip
/
equalizer-bbs-collection
/
DEMOSCENE-STUFF
/
TIMESRC.ZIP
/
L0P8.M
< prev
next >
Wrap
Text File
|
1994-02-23
|
2KB
|
68 lines
;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
; DATA
;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
align 4
d8tile dd ?
d8loc dw 0e000h
d8locd dw 02000h
d8locdtbl dw 02000h,00020h,0e000h,0ffe0h,02000h,00020h,0e000h
dw 0ffe0h,02000h,00020h,0e000h,0ffe0h,02000h,00020h
dw 0e000h, 0
d8cntr db 8
d8index db 0
d8cntrtbl db 8,7,7,6,6,5,5, 4,4,3,3,2,2,1, 1, 1
;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
; CODE
;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
;═════════════════════════════════════════════════════════════════════════════
p80:
movzx edi,d8loc
add di,d8locd
mov d8loc,di
dec d8cntr
jnz short p80f0
movzx edx,d8index
inc edx
and dl,15
mov d8index,dl
mov al,d8cntrtbl[edx]
mov d8cntr,al
mov ax,d8locdtbl[edx*2]
mov d8locd,ax
jnz short p80f0
mov d8loc,0
push offset setnext
p80f0:
mov esi,d8tile
and esi,0ffffff00h
mov eax,256-32
add edi,_bufptr
rept 31
movsd
movsd
movsd
movsd
movsd
movsd
movsd
movsd
add edi,eax
endm
movsd
movsd
movsd
movsd
movsd
movsd
movsd
movsd
ret