* Hard Disk Protector v1.0 by Jedi/Sector 0ne
* Protects Your Hard Disk Against Format & Writting
* E-Mail: Frank.Denis@epita.edu

        real

        org $100

        move #$3513,a
        trap #$21
        move es,youpla+3
        move b,youpla+1
        move #zippo,d
        push cs
        pop ds
        move #$2513,a
        trap #$21
        move #credits,d
        move.b #9,ah
        trap #$21
        move #@zefin,d
        move #$3100,a
        trap #$21

credits dc.b "Hard Disk Protector v1.0 by Jedi/Sector 0ne",13,10
        dc.b '$'

zippo   cmp.b #5,ah
        beq.s hey
        cmp.b #3,ah
        beq.s heya
        cmp.b #$b,ah
        beq.s heya
youpla  braf 0
heya    cmp.b #$80,d
        bne.s youpla
hey     pusha
        xor.b a,a
        move #$3c8,d
        out.b a,d
        inc d
        out.b a,d
        out.b a,d
        move.b #16,a
        out.b a,d
        popa
        move.b #1,ah
        stc
        rte

        segment
zefin
