Initial commit
This commit is contained in:
101
LIB386/LIB_SVGA/S_PLOT.ASM
Normal file
101
LIB386/LIB_SVGA/S_PLOT.ASM
Normal file
@@ -0,0 +1,101 @@
|
||||
;----------------------------------------------------------------------------
|
||||
; S_PLOT.ASM 386
|
||||
; (c) Adeline 1993
|
||||
;----------------------------------------------------------------------------
|
||||
.386p
|
||||
jumps
|
||||
.model SMALL, SYSCALL
|
||||
|
||||
.data
|
||||
|
||||
include svga.ash
|
||||
|
||||
.code
|
||||
|
||||
public NoLanguage Plot
|
||||
public NoLanguage GetPlot
|
||||
|
||||
;----------------------------------------------------------------------------
|
||||
; Plot( x, y, coul )
|
||||
;
|
||||
Plot proc uses esi,\
|
||||
XX:DWORD, YY:DWORD, CC:DWORD
|
||||
mov eax, XX
|
||||
mov esi, YY
|
||||
;----------------------
|
||||
cmp eax, ClipXmin
|
||||
jl Plot_End
|
||||
cmp eax, ClipXmax
|
||||
jg Plot_End
|
||||
cmp esi, ClipYmin
|
||||
jl Plot_End
|
||||
cmp esi, ClipYmax
|
||||
jg Plot_End
|
||||
;----------------------
|
||||
mov esi, TabOffLine[esi*4]
|
||||
|
||||
add esi, Log
|
||||
|
||||
add esi, eax
|
||||
|
||||
mov al, byte ptr [CC]
|
||||
|
||||
mov [esi], al
|
||||
Plot_End:
|
||||
ret
|
||||
Plot endp
|
||||
;----------------------------------------------------------------------------
|
||||
; GetPlot( x, y, coul )
|
||||
;
|
||||
GetPlot proc uses esi,\
|
||||
XX:DWORD, YY:DWORD
|
||||
mov eax, XX
|
||||
mov esi, YY
|
||||
;----------------------
|
||||
cmp eax, ClipXmin
|
||||
jl GetPlot_End
|
||||
cmp eax, ClipXmax
|
||||
jg GetPlot_End
|
||||
cmp esi, ClipYmin
|
||||
jl GetPlot_End
|
||||
cmp esi, ClipYmax
|
||||
jg GetPlot_End
|
||||
;----------------------
|
||||
|
||||
mov esi, TabOffLine[esi*4]
|
||||
|
||||
add esi, Log
|
||||
|
||||
add esi, eax
|
||||
|
||||
xor eax, eax
|
||||
mov al, [esi]
|
||||
ret
|
||||
GetPlot_End:
|
||||
xor eax, eax
|
||||
ret
|
||||
GetPlot endp
|
||||
;----------------------------------------------------------------------------
|
||||
; The
|
||||
End
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user