杀毒

开发平台：

DOS

KA5.ASM：源码内容

MOV AX,0201H
INT 13H
JNB V17YPA
JMP V17DPC
V17YPA: MOV AX,[BX+01FEH]
CMP AX,0AA55H
JZ V17YPB
MOV SI,OFFSET FQSQ
MOV DI,OFFSET BOOTQ1
MOV CX,01BEH
REPZ MOVSB
MOV BX,OFFSET BOOTQ1
JMP V17YPC
V17YPB: MOV BX,OFFSET BOOTQ2
V17YPC: MOV DX,0080H
MOV CX,0001H
MOV AX,0301H
INT 13H
JB V17YPD
JMP V17END0
V17YPD: JMP V17XPC
;
V17RP: MOV RPJS,3
V17RPA: MOV DH,01H
MOV DL,DLZC
PUSH DX
MOV CX,2708H
MOV BX,OFFSET BOOTQ2
MOV AX,0201H
INT 13H
JNB V17RPC
DEC RPJS
JZ V17RPB
MOV AH,0
INT 13H
JMP V17RPA
V17RPB: JMP V17DPC
V17RPC: MOV AX,[BX+01FEH]
CMP AX,0AA55H
JZ V17RPD
JMP V17JG1
V17RPD: MOV RPJS,3
V17RPE: MOV DH,00H
MOV DL,DLZC
MOV CX,0001H
MOV BX,OFFSET BOOTQ2
MOV AX,0301H
INT 13H
JNB V17END0
DEC RPJS
JZ V17RPF
MOV AH,0
INT 13H
JMP V17RPE
V17RPF: JMP V17XPC
;
V17END2: MOV FHM,2
MOV XSAXZC,0
JMP V17ZE
V17END0: MOV FHM,0
MOV XSAXZC,0
JMP V17ZE
;
V17JG1: CALL JGBTBDA
JMP V17ZE2
V17DPC: MOV DX,OFFSET DPCZF
JMP V17ZE1
V17XPC: MOV DX,OFFSET XPCZF
V17ZE1: MOV XSAXZC,DX
V17ZE2: MOV FHM,1
V17ZE: MOV AX,XSAXZC
MOV DX,DS
RET
V17 endp
;-V18
V18 proc near
V18START:
PUSH DS
POP ES
CLD
MOV DI,OFFSET V18TZMA
MOV SI,OFFSET BOOTQ1
ADD SI,002AH
MOV CX,8
REPZ CMPSB
JZ V18L01
JMP V18END2
V18L01: MOV DL,DLZC
CMP DL,02H
JNB V18YP
JMP V18RP
;
V18YP: MOV DX,0080H
PUSH DX
MOV CX,0008H
MOV BX,OFFSET BOOTQ2
MOV AX,0201H
INT 13H
JNB V18YPA
JMP V18DPC
V18YPA: MOV AX,[BX+01FEH]
MOV GZB03,0
CMP AX,0AA55H
JZ V18YPB
MOV GZB03,0FH
MOV SI,OFFSET FQSQ
MOV DI,OFFSET BOOTQ1
MOV CX,01BEH
REPZ MOVSB
MOV BX,OFFSET BOOTQ1
JMP V18YPC
V18YPB: MOV BX,OFFSET BOOTQ2
V18YPC: MOV DX,0080H
MOV CX,0001H
MOV AX,0301H
INT 13H
JNB V18YPD
JMP V18XPC
V18YPD: CMP GZB03,0FH
JZ V18YPE
JMP V18END0
V18YPE: JMP V18END3
;
V18RP: MOV RPJS,3
V18RPA: MOV DH,01H
MOV DL,DLZC
PUSH DX
MOV CX,2708H
MOV BX,OFFSET BOOTQ2
MOV AX,0201H
INT 13H
JNB V18RPC
DEC RPJS
JZ V18RPB
MOV AH,0
INT 13H
JMP V18RPA
V18RPB: JMP V18DPC
V18RPC: MOV AX,[BX+01FEH]
CMP AX,0AA55H
JZ V18RPD
JMP V18JG1
V18RPD: MOV RPJS,3
V18RPE: MOV DH,00H
MOV DL,DLZC
MOV CX,0001H
MOV BX,OFFSET BOOTQ2
MOV AX,0301H
INT 13H
JNB V18END0
DEC RPJS
JZ V18RPF
MOV AH,0
INT 13H
JMP V18RPE
V18RPF: JMP V18XPC
;
V18END3: MOV FHM,3
JMP V18ZE
V18END2: MOV FHM,2
MOV XSAXZC,0
JMP V18ZE
V18END0: MOV FHM,0
MOV XSAXZC,0
JMP V18ZE
;
V18JG1: CALL JGBTBDA
JMP V18ZE2
V18DPC: MOV DX,OFFSET DPCZF
JMP V18ZE1
V18XPC: MOV DX,OFFSET XPCZF
V18ZE1: MOV XSAXZC,DX
V18ZE2: MOV FHM,1
V18ZE: MOV AX,XSAXZC
MOV DX,DS
RET
V18 endp
;-V19
V19 proc near
V19START:
PUSH DS
POP ES
CALL BCSX
JNB V19KS1
MOV FHM,1
JMP V19ZE4
V19KS1: CALL GBSX
JNB V19KS2
MOV FHM,1
JMP V19ZE4
V19KS2: CALL WJXOPEN
JNB V19KS3
JMP V19OPENC
V19KS3: CALL BCSJRQ
JNB V19KS4
JMP V19ZE2
V19KS4: CALL WJZZM
JNB V19KS5
JMP V19CZC
MOV WJCD1,DX
MOV WJCD2,AX
V19KS5: CALL WJZZS
;
MOV AH,3FH
MOV CX,0020H
LEA DX,BDTZHCQ
MOV BX,WJH
INT 21H
JNB V19WJ1
JMP V19DWJC
V19WJ1: CMP WJTYPE,'C'
JZ V19C1
JMP V19E1
V19C1: LEA DI,BDTZHCQ
MOV AL,[DI]
CMP AL,0EBH
JZ V19C2
JMP V19END2
V19C2: INC DI
XOR AX,AX
MOV AL,[DI]
ADD AX,0010H
MOV DX,AX
XOR CX,CX
MOV AX,4200H
MOV BX,WJH
INT 21H
JNB V19C3
JMP V19CZC
V19C3: MOV AH,3FH
MOV CX,0006H
LEA DX,BDTZHCQ
MOV BX,WJH
INT 21H
JNB V19C4
JMP V19DWJC
V19C4: LEA DI,BDTZHCQ
CMP WORD PTR [DI],0110H
JNZ V19C5
CMP WORD PTR [DI+02],0CB51H
JZ V19C6
V19C5: JMP V19END2
V19C6: MOV DX,[DI+04]
INC DX
MOV CL,04H
SHL DX,CL
XOR CX,CX
MOV WJCD2,DX
MOV WJCD1,CX
MOV AX,4200H
MOV BX,WJH
INT 21H
JNB V19C7
JMP V19CZC
V19C7: MOV CX,007BH
LEA DX,BDTZHCQ
MOV AH,3FH
MOV BX,WJH
INT 21H
JNB V19C8
JMP V19DWJC
V19C8: LEA DI,BDTZHCQ
CMP BYTE PTR [DI],0EBH
JZ V19C9
JMP V19END2
V19C9: ADD DI,+03
MOV CX,003CH
MOV SI,DI
V19C10: MOV DX,[SI]
ROR DX,CL
MOV [SI],DX
ADD SI,+02
LOOP V19C10
; CALL WJZZS
MOV CX,003CH
MOV AH,40H
ADD CX,+3CH
LEA DX,BDTZHCQ
ADD DX,+03
INT 21H
JMP V19WJ2
;
V19E1: LEA DI,BDTZHCQ
MOV DX,[DI+08H]
ADD DX,[DI+16H]
MOV CL,04H
ROL DX,CL
MOV CX,DX
AND CX,000FH
AND DX,0FFF0H
ADD DX,[DI+14H]
JNB V19E2
INC CX
V19E2: ADD DX,050CH
JNB V19E3
INC CX
V19E3: MOV WJCD2,DX
MOV WJCD1,CX
MOV AX,4200H
MOV BX,WJH
INT 21H
JNB V19E4
JMP V19CZC
V19E4: MOV AH,3FH
MOV CX,0010H
LEA DX,BDTZHCQ
ADD DX,+20H
MOV BX,WJH
INT 21H
JNB V19E5
JMP V19DWJC
V19E5: LEA DI,BDTZHCQ
MOV SI,DI
ADD DI,+20H
CMP [DI+09H],32CFH
JNZ V19E6
CMP [DI+0BH],0CFC0H
JNZ V19E6
CMP [DI+0DH],01EBH
JZ V19E7
V19E6: JMP V19END2
V19E7: MOV AX,[DI]
SUB AX,0010H
MOV [SI+16H],AX
MOV AX,[DI+02]
MOV [SI+14H],AX
MOV AX,[DI+04]
SUB AX,0010H
MOV [SI+0EH],AX
MOV AX,[DI+06]
MOV [SI+10H],AX
MOV DX,WJCD2
MOV CX,WJCD1
SUB DX,0509H
JNB V19E8
DEC CX
V19E8: MOV AX,4200H
MOV BX,WJH
INT 21H
JNB V19E9
JMP V19CZC
V19E9: LEA DX,BDTZHCQ
MOV AH,3FH
MOV CX,000EH
MOV BX,WJH
INT 21H
JNB V19E10
JMP V19DWJC
V19E10:
XOR DX,DX
LEA DI,BDTZHCQ
MOV AX,[DI+04]
ADD AX,AX
JNB V19E11
INC DX
V19E11: MOV CL,08H
ROL AX,CL
MOV BX,AX
AND AX,0FF00H
AND BX,00FFH
ADD DX,BX
MOV BX,[DI+02]
SUB AX,0200H
JNB V19E12
DEC DX
V19E12: ADD AX,BX
JNB V19E13
INC DX
V19E13: MOV WJCD2,AX
MOV WJCD1,DX
;
CALL WJZZS
MOV AH,40H
MOV CX,0020H
LEA DX,BDTZHCQ
MOV BX,WJH
INT 21H
JNB V19WJ2
JMP V19XWJC
;
V19WJ2: MOV DX,WJCD2
MOV CX,WJCD1
MOV AX,4200
MOV BX,WJH
INT 21H
JNB V19WJ3
JMP V19CZC
V19WJ3: MOV CX,0
MOV DX,0
MOV BX,WJH
MOV AH,40H
INT 21H
JNB V19WJ4
JMP V19DWJC
V19WJ4: JMP V19END0
;
V19END2: MOV FHM,2
MOV XSAXZC,0
JMP V19ZE1
V19END0: MOV FHM,0
MOV XSAXZC,0
JMP V19ZE1
;
V19OPENC: MOV FHM,1
MOV DX,OFFSET OPENCZF
MOV XSAXZC,DX
JMP V19ZE3
;
V19CZC: MOV DX,OFFSET CZCZF
JMP V19XSL
V19DWJC: MOV DX,OFFSET DWJCZF
JMP V19XSL
V19XWJC: MOV DX,OFFSET XWJCZF
V19XSL: MOV XSAXZC,DX
V19END1: MOV FHM,1
V19ZE1: CALL HFSJRQ
V19ZE2: CALL CLOFIL
V19ZE3: CALL HFSX
V19ZE4: MOV AX,XSAXZC
MOV DX,DS
RET
V19 ENDP
;-V20
V20 proc near
V20START:
PUSH DS
POP ES
CLD
MOV DI,OFFSET V20TZMA
MOV SI,OFFSET BOOTQ1
JMP V20L02
V20L01: MOV DI,OFFSET V20TZMA
V20L02: MOV CX,000FH
REPZ CMPSB
JZ V20L03
MOV AX,OFFSET BOOTQ1
ADD AX,01FFH
CMP AX,SI
JNZ V20L01
JMP V20END2
V20L03: MOV DL,DLZC
CMP DL,02H
JNB V20YP
JMP V20RP
V20YP: MOV SI,OFFSET FQSQ
MOV CX,01BEH
MOV DI,OFFSET BOOTQ1
REPNZ MOVSB
MOV DX,0080H
MOV BX,OFFSET BOOTQ1
MOV CX,0001H
MOV AX,0301H
INT 13H
JB V20YPA
JMP V20END0
V20YPA: JMP V20XPC
V20RP: MOV RPJS,3
V20RPA: MOV DH,00H
MOV DL,DLZC
PUSH DX
MOV CX,2709H
MOV BX,OFFSET BOOTQ2
MOV AX,0201H
INT 13H
JNB V20RPC
DEC RPJS
JZ V20RPB
MOV AH,0
INT 13H
JMP V20RPA
V20RPB: JMP V20DPC
V20RPC: CLD
MOV AX,[BX+01FEH]
MOV GZB03,0
CMP AX,0AA55H
JZ V20RPD
MOV GZB03,0FH
V20RPD: MOV RPJS,3
V20RPE: MOV DH,00H
MOV DL,DLZC
MOV CX,0001H
MOV BX,OFFSET BOOTQ2
MOV AX,0301H
INT 13H
JNB V20RPG
DEC RPJS
JZ V20RPF
MOV AH,0
INT 13H
JMP V20RPE
V20RPF: JMP V20XPC
V20RPG: CMP GZB03,0FH
JZ V20RPH
JMP V20END0
V20RPH: JMP V20END3
;
V20END3: MOV FHM,3
JMP V20ZE
V20END2: MOV FHM,2
MOV XSAXZC,0
JMP V20ZE
V20END0: MOV FHM,0
MOV XSAXZC,0
JMP V20ZE
;
V20DPC: MOV DX,OFFSET DPCZF
JMP V20ZE1
V20XPC: MOV DX,OFFSET XPCZF
V20ZE1: MOV XSAXZC,DX
MOV FHM,1
V20ZE: MOV AX,XSAXZC
MOV DX,DS
RET
V20 endp
;-V21
V21 proc near
V21START:
PUSH DS
POP ES
CALL BCSX
JNB V21KS1
MOV FHM,1
JMP V21ZE4
V21KS1: CALL GBSX
JNB V21KS2
MOV FHM,1
JMP V21ZE4
V21KS2: CALL WJXOPEN
JNB V21KS3
JMP V21OPENC
V21KS3: CALL BCSJRQ
JNB V21KS4
JMP V21ZE2
V21KS4: MOV BX,WJH
MOV AH,3FH
MOV CX,0020H
LEA DX,WJTQ
MOV DI,DX
MOV BX,WJH
INT 21H
JNB V21WJ0
JMP V21DWJC
V21WJ0:
CMP WORD PTR [DI],5A4DH
JZ V21WJ1
CMP BYTE PTR [DI],0E9H
JNZ V21WJ1
CMP CORPSETZ,0FH
JZ V21SP1
MOV AX,[DI+1]
ADD AX,3
MOV DX,0
JMP V21SP4
V21WJ1: JMP V21END2
V21SP1: CALL WJZZM
MOV CX,WJCXZC
MOV DI,BDDIZC
CMP DX,0
JNZ V21SP3
CMP CX,4000H
JNB V21SP3
SUB DI,0020H
JNB V21SP2
JMP V21END2
V21SP2: MOV DX,0
MOV AX,DI
JMP V21SP4
V21SP3: SUB AX,4000H
SBB DX,0
ADD AX,DI
ADC DX,0
SUB AX,0020H
SBB DX,0
V21SP4: MOV WJCD1,DX
MOV WJCD2,AX
;
MOV CX,DX
MOV DX,AX
MOV AX,4200H
INT 21H
JNB V21WJ2
JMP V21CZC
V21WJ2: MOV AH,3FH
MOV CX,0020H
LEA DX,BDTZHCQ
MOV BX,WJH
INT 21H
JNB V21WJ3
JMP V21CZC
V21WJ3: LEA DI,BDTZHCQ
CMP WORD PTR [DI],0BE50H
JNZ V21WJ4
CMP WORD PTR [DI+04],0D68BH
JNZ V21WJ4
CMP WORD PTR [DI+0AH],0B9FCH
JNZ V21WJ4
CMP WORD PTR [DI+12H],8BA4H
JZ V21WJ5
V21WJ4: JMP V21END2
V21WJ5: LEA DI,BDTZHCQ
XOR CX,CX
MOV DX,[DI+2]
ADD DX,[DI+08]
SUB DX,0100H
MOV AX,4200H
INT 21H
JNB V21WJ6
JMP V21CZC
V21WJ6: MOV CX,0004H
LEA DX,BDTZHCQ
MOV AH,3FH
MOV BX,WJH
INT 21H
JNB V21WJ7
JMP V21DWJC
V21WJ7: CALL WJZZS
MOV AH,40H
MOV CX,0003H
LEA DX,BDTZHCQ
MOV BX,WJH
INT 21H
JNB V21WJ8
JMP V21XWJC
V21WJ8: MOV CX,0
MOV DX,WJCD2
MOV AX,4200H
MOV BX,WJH
INT 21H
JNB V21WJ9
JMP V21XWJC
V21WJ9: MOV CX,0
MOV AH,40H
INT 21H
JNB V21END0
JMP V21XWJC
;
V21END2: MOV FHM,2
MOV XSAXZC,0
JMP V21ZE1
V21END0: MOV FHM,0
MOV XSAXZC,0
JMP V21ZE1
;
V21OPENC: MOV FHM,1
MOV DX,OFFSET OPENCZF
MOV XSAXZC,DX
JMP V21ZE3
;
V21CZC: MOV DX,OFFSET CZCZF
JMP V21XSL
V21DWJC: MOV DX,OFFSET DWJCZF
JMP V21XSL
V21XWJC: MOV DX,OFFSET XWJCZF
V21XSL: MOV XSAXZC,DX
V21END1: MOV FHM,1
V21ZE1: CALL HFSJRQ
V21ZE2: CALL CLOFIL
V21ZE3: CALL HFSX
V21ZE4: MOV AX,XSAXZC
MOV DX,DS
RET
V21 ENDP
;-V22
V22 PROC NEAR
V22START:
PUSH DS
POP ES
CALL BCSX
JNB V22KS1
MOV FHM,1
JMP V22ZE4
V22KS1: CALL GBSX
JNB V22KS2
MOV FHM,1
JMP V22ZE4
V22KS2: CALL WJXOPEN
JNB V22KS3
JMP V22OPENC
V22KS3: CALL BCSJRQ
JNB V22KS4
JMP V22ZE2
V22KS4: CALL WJZZM
JNB V22KS5
JMP V22CZC
MOV WJCD1,DX
MOV WJCD2,AX
V22KS5:
MOV ENDJS,0
V22WJ1: MOV CX,0FFFFH
MOV DX,-652H
SUB DX,ENDJS
MOV AX,4202H
MOV BX,WJH
INT 21H
JNB V22WJ2
JMP V22CZC
V22WJ2: MOV BX,WJH
MOV AH,3FH
MOV CX,70H
MOV DX,OFFSET BDTZHCQ
INT 21H
JNB V22WJ3
JMP V22DWJC
V22WJ3: MOV SI,OFFSET V22TZMA
MOV DI,OFFSET BDTZHCQ
ADD DI,50H
MOV CX,10H
REPE CMPSB
CMP CX,0
JZ V22WJ5
INC ENDJS
CMP ENDJS,28H
JZ V22WJ4
JMP V22WJ1
V22WJ4: JMP V22END2
V22WJ5: CMP WJTYPE,'C'
JZ V22C1
JMP V22E1
V22C1: CALL WJZZS
MOV DX,OFFSET BDTZHCQ
ADD DX,0BH
MOV CX,0CH
MOV AH,40H
MOV BX,WJH
INT 21H
JNB V22C2
JMP V22XWJC
V22C2: JMP V22E4
;
V22E1: CALL WJZZS
MOV AX,WJH
MOV BX,AX
MOV AH,3FH
MOV CX,0018H
MOV DX,OFFSET WJTQ
INT 21H
JNB V22E2
JMP V22DWJC
V22E2: MOV SI,OFFSET BDTZHCQ
MOV DI,OFFSET WJTQ
;
MOV DX,WJCD1
MOV AX,WJCD2
MOV CX,652H
ADD BX,ENDJS
SUB AX,BX
SBB DX,0
MOV BX,AX
AND AX,01FFH
MOV [DI+2],AX
MOV CL,4
SHR BX,CL
MOV CL,0CH
SHL DX,CL
OR DX,BX
MOV CL,5
SHR DX,CL
CMP AX,0
JZ V22E3
INC DX
V22E3: MOV [DI+4],DX
MOV AX,[SI+23H]
MOV [DI+16H],AX
MOV AX,[SI+25H]
MOV [DI+14H],AX
MOV AX,[SI+31H]
MOV [DI+0EH],AX
MOV AX,[SI+33H]
MOV [DI+10H],AX
CALL WJZZS
MOV AX,WJH
MOV BX,AX
MOV AH,40H
MOV CX,0018H
MOV DX,OFFSET WJTQ
INT 21H
JNB V22E4
JMP V22XWJC
V22E4:
MOV CX,0FFFFH
MOV DX,-652H
SUB DX,ENDJS
MOV AX,4202H
MOV BX,WJH
INT 21H
JNB V22E5
JMP V22CZC
V22E5: MOV BX,WJH
MOV DX,0
MOV CX,0
MOV AH,40H
INT 21H
JNB V22E6
JMP V22XWJC
V22E6: JMP V22END0
;
V22END2: MOV FHM,2
MOV XSAXZC,0
JMP V22ZE1
V22END0: MOV FHM,0
MOV XSAXZC,0
JMP V22ZE1
;
V22OPENC: MOV FHM,1
MOV DX,OFFSET OPENCZF
MOV XSAXZC,DX
JMP V22ZE3
;
V22CZC: MOV DX,OFFSET CZCZF
JMP V22XSL
V22DWJC: MOV DX,OFFSET DWJCZF
JMP V22XSL
V22XWJC: MOV DX,OFFSET XWJCZF
V22XSL: MOV XSAXZC,DX
V22END1: MOV FHM,1
V22ZE1: CALL HFSJRQ
V22ZE2: CALL CLOFIL
V22ZE3: CALL HFSX
V22ZE4: MOV AX,XSAXZC
MOV DX,DS
RET
V22 ENDP
;-V23
V23 proc near
V23START:
PUSH DS
POP ES
CALL BCSX
JNB V23KS1
MOV FHM,1
JMP V23ZE4
V23KS1: CALL GBSX
JNB V23KS2
MOV FHM,1
JMP V23ZE4
V23KS2: CALL WJXOPEN
JNB V23KS3
JMP V23OPENC
V23KS3: CALL BCSJRQ
JNB V23KS4
JMP V23ZE2
V23KS4: CALL WJZZM
JNB V23KS5
JMP V23CZC
MOV WJCD1,DX
MOV WJCD2,AX
V23KS5: CALL WJZZS
;
mov dx,offset WJTQ
mov si,dx
mov ah,3fh
mov bx,wjh
mov cx,20h
int 21h
jnc V23WJ1
jmp V23DWJC
V23WJ1: mov al,[si]
cmp al,0e9h
jnz V23WJ2
mov dx,[si+1]
add dx,3
mov cx,0
jmp V23WJ3
V23WJ2: mov cx,[si+8]
add cx,[si+16h]
mov dx,[si+14h]
mov bx,cx
mov cl,4
rol bx,cl
mov cx,bx
and cx,000fh
and bx,0fff0h
add dx,bx
adc cx,0
V23WJ3: mov wjcd2,dx
mov wjcd1,cx
mov ax,4200h
mov bx,wjh
int 21h
jnb V23WJ4
jmp V23CZC
V23WJ4: mov dx,offset BDTZHCQ
mov si,dx
mov cx,50
mov ah,3fh
int 21h
jnc V23WJ5
jmp V23DWJC
V23WJ5:
cmp WORD PTR [SI],0bb0eh
jnz V23WJ6
cmp WORD PTR [SI+4],0b91fh
jnz V23WJ6
cmp WORD PTR [SI+0AH],0c181h
jnz V23WJ6
cmp BYTE PTR [SI+8],0b2h
jz V23WJ7
V23WJ6: jmp V23END2
V23WJ7: mov al,[si+9]
mov V23MMZF,al
mov cx,[si+6]
add cx,[si+0ch]
mov V23BDC,cx
cmp cx,0821h
jnz V23WJ8
sub cx,0beh
push cx
jmp V23XG1
V23WJ8: cmp cx,08dfh
jz V23WJ9
JMP V23OTHER
V23WJ9: sub cx,0c2h
push cx
;
V23XG1: pop bx
mov dx,WJCD2
mov cx,WJCD1
sub dx,bx
sbb cx,0
mov ax,4200h
mov bx,wjh
int 21h
jnc V23XG2
jmp V23CZC
V23XG2: mov dx,offset BDTZHCQ
mov si,dx
mov bx,wjh
mov cx,20h
mov ah,3fh
int 21h
jnc V23XG3
jmp V23DWJC
V23XG3: mov al,V23MMZF
mov cx,20h
V23XG4: add [si],al
inc si
loop V23XG4
;
MOV CX,WJCD1
MOV DX,WJCD2
SUB DX,V23BDC
SBB CX,0
MOV WJCD1,CX
MOV WJCD2,DX
;
CALL WJZZS
CMP WJTYPE,'E'
JZ V23XG6
MOV DX,OFFSET BDTZHCQ
ADD DX,1
MOV CX,3
MOV AH,40H
MOV BX,WJH
INT 21H
JNB V23XG5
JMP V23XWJC
V23XG5: JMP V23WJ10
V23XG6: mov si,offset BDTZHCQ
MOV DI,OFFSET WJTQ
mov ax,[si+4]
mov [di+14h],ax
mov ax,[si+6]
sub ax,10h
mov [di+16h],ax
mov ax,[si+8]
sub ax,10h
mov [di+10h],ax
MOV CX,WJCD1
MOV DX,WJCD2
MOV BX,DX
AND BX,01FFH
AND DX,0FE00H
OR DX,CX
MOV CL,4
ROR DX,CL
MOV CL,5
SHR DX,CL
CMP BX,0
JZ V23XG7
ADD DX,1
V23XG7: MOV [DI+2],BX
MOV [DI+4],DX
MOV DX,OFFSET WJTQ
MOV CX,20H
MOV AH,40H
MOV BX,WJH
INT 21H
JNB V23WJ10
JMP V23XWJC
V23WJ10:
MOV DX,WJCD2
MOV CX,WJCD1
MOV AX,4200H
MOV BX,WJH
INT 21H
JNB V23WJ11
JMP V23CZC
V23WJ11:
MOV DX,0
MOV CX,0
MOV AH,40H
MOV BX,WJH
INT 21H
JNB V23WJ12
JMP V23XWJC
V23WJ12:
JMP V23END0
;
V23END0: MOV FHM,0
MOV XSAXZC,0
JMP V23ZE1
V23END2: MOV FHM,2
MOV XSAXZC,0
JMP V23ZE1
;
V23OPENC: MOV FHM,1
MOV DX,OFFSET OPENCZF
MOV XSAXZC,DX
JMP V23ZE3
;
V23OTHER: MOV DX,OFFSET V23OKZF3
JMP V23XSL
V23CZC: MOV DX,OFFSET CZCZF
JMP V23XSL
V23DWJC: MOV DX,OFFSET DWJCZF
JMP V23XSL
V23XWJC: MOV DX,OFFSET XWJCZF
V23XSL: MOV XSAXZC,DX
V23END1: MOV FHM,1
V23ZE1: CALL HFSJRQ
V23ZE2: CALL CLOFIL
V23ZE3: CALL HFSX
V23ZE4: MOV AX,XSAXZC
MOV DX,DS
RET
V23 ENDP
;-V24
V24 proc near
V24START:
PUSH DS
POP ES
CALL BCSX
JNB V24KS1
MOV FHM,1
JMP V24ZE4
V24KS1: CALL GBSX
JNB V24KS2
MOV FHM,1
JMP V24ZE4
V24KS2: CALL WJXOPEN
JNB V24KS3
JMP V24OPENC
V24KS3: CALL BCSJRQ
JNB V24KS4
JMP V24ZE2
V24KS4: CALL WJZZM
JNB V24KS5
JMP V24CZC
MOV WJCD1,DX
MOV WJCD2,AX
V24KS5: CALL WJZZS
MOV AH,3FH
MOV CX,0003H
LEA DX,BDTZHCQ
INT 21H
JNB V24WJ1
JMP V24DWJC
V24WJ1:
LEA DI,BDTZHCQ
MOV AX,[DI+1]
ADD AX,0002H
MOV WJCD2,AX
MOV BX,WJH
MOV DX,AX
XOR CX,CX
MOV AX,4200H
INT 21H
JNB V24WJ3
JMP V24CZC
V24WJ3: LEA DI,BDTZHCQ
CMP BYTE PTR [DI],0E9H
JZ V24WJ4
JMP V24END2
V24WJ4: MOV AH,3FH
MOV CX,0031H
LEA DX,BDTZHCQ
INT 21H
JNB V24TZ1
JMP V24DWJC
V24TZ1: LEA DI,BDTZHCQ
CMP WORD PTR [DI+02],0EC8BH
JNZ V24TZ2
CMP WORD PTR [DI+06],5B00H
JNZ V24TZ2
CMP WORD PTR [DI+0AH],0131H
JNZ V24TZ2
CMP WORD PTR [DI+0EH],2A87H
JZ V24HF1
V24TZ2: JMP V24END2
V24HF1: PUSH BX
MOV AX,WJCD2
ADD AX,0123H
MOV SI,AX
MOV DI,0685H
MOV CX,0023H
LEA DX,BDTZHCQ
ADD DX,+23H
MOV BX,DX
V24HF2: XOR [BX],SI
XOR [BX],DI
INC CX
INC BX
INC SI
DEC DI
CMP CX,+31H
JNZ V24HF2
POP BX
CALL WJZZS
JNB V24HF3
JMP V24CZC
V24HF3: MOV AH,40H
MOV CX,0003H
LEA DX,BDTZHCQ
ADD DX,2EH
INT 21H
JNB V24WJ7
JMP V24XWJC
V24WJ7: MOV AX,4200H
MOV BX,WJH
MOV CX,0
MOV DX,WJCD2
INT 21H
JNB V24WJ8
JMP V24CZC
V24WJ8: MOV BX,WJH
MOV CX,0
MOV DX,0
MOV AH,40H
INT 21H
JNB V24END0
JMP V24XWJC
;
V24END2: MOV FHM,2
MOV XSAXZC,0
JMP V24ZE1
V24END0: MOV FHM,0
MOV XSAXZC,0
JMP V24ZE1
;
V24OPENC: MOV FHM,1
MOV DX,OFFSET OPENCZF
MOV XSAXZC,DX
JMP V24ZE3
;
V24CZC: MOV DX,OFFSET CZCZF
JMP V24XSL
V24DWJC: MOV DX,OFFSET DWJCZF
JMP V24XSL
V24XWJC: MOV DX,OFFSET XWJCZF
V24XSL: MOV XSAXZC,DX
V24END1: MOV FHM,1
V24ZE1: CALL HFSJRQ
V24ZE2: CALL CLOFIL
V24ZE3: CALL HFSX
V24ZE4: MOV AX,XSAXZC
MOV DX,DS
RET
V24 ENDP
;-V25
V25 proc near
V25START:
PUSH DS
POP ES
CLD
MOV DI,OFFSET V25TZMA
MOV SI,OFFSET BOOTQ1
JMP V25L02
V25L01: MOV DI,OFFSET V25TZMA
V25L02: MOV CX,000FH
REPZ CMPSB
JZ V25L03
MOV AX,OFFSET BOOTQ1
ADD AX,01FFH
CMP AX,SI
JNZ V25L01
JMP V25END2
V25L03: MOV DL,DLZC
CMP DL,02H
JNB V25YP
JMP V25RP
V25YP: MOV SI,OFFSET FQSQ
MOV CX,01BEH
MOV DI,OFFSET BOOTQ1
REPNZ MOVSB
MOV DX,0080H
MOV BX,OFFSET BOOTQ1
MOV CX,0001H
MOV AX,0301H
INT 13H
JB V25YPA
JMP V25END0
V25YPA: JMP V25XPC
V25RP: MOV RPJS,3
V25RPA: MOV DH,01H
MOV DL,DLZC
PUSH DX
MOV CX,2708H
MOV BX,OFFSET BOOTQ2
MOV AX,0201H
INT 13H
JNB V25RPC
DEC RPJS
JZ V25RPB
MOV AH,0
INT 13H
JMP V25RPA
V25RPB: JMP V25DPC
V25RPC: CLD
MOV AX,[BX+01FEH]
MOV GZB03,0
CMP AX,0AA55H
JZ V25RPD
MOV GZB03,0FH
V25RPD: MOV RPJS,3
V25RPE: MOV DH,00H
MOV DL,DLZC
MOV CX,0001H
MOV BX,OFFSET BOOTQ2
MOV AX,0301H
INT 13H
JNB V25RPG
DEC RPJS
JZ V25RPF
MOV AH,0
INT 13H
JMP V25RPE
V25RPF: JMP V25XPC
V25RPG: CMP GZB03,0FH
JZ V25RPH
JMP V25END0
V25RPH: JMP V25END3
;
V25END3: MOV FHM,3
JMP V25ZE
V25END2: MOV FHM,2
MOV XSAXZC,0
JMP V25ZE
V25END0: MOV FHM,0
MOV XSAXZC,0
JMP V25ZE
;
V25DPC: MOV DX,OFFSET DPCZF
JMP V25ZE1
V25XPC: MOV DX,OFFSET XPCZF
V25ZE1: MOV XSAXZC,DX
MOV FHM,1
V25ZE: MOV AX,XSAXZC
MOV DX,DS
RET
V25 endp
;-V26
V26 proc near
V26START:
PUSH DS
POP ES
MOV SI,OFFSET BOOTQ1
JMP V26L02
V26L01: MOV DI,OFFSET V26TZMA
V26L02: MOV CX,001AH
REPZ CMPSB
JZ V26L03
MOV AX,OFFSET BOOTQ1
ADD AX,01FFH
CMP AX,SI
JNZ V26L01
JMP V26END2
;
V26L03: MOV DL,DLZC
CMP DL,02H
JNB V26YP
JMP V26RP
;
V26YP: MOV DL,80H
MOV DH,0
MOV CX,0006H
MOV BX,OFFSET BOOTQ2
MOV AX,0201
INT 13H
JB V26YPA
MOV AX,[BX+01FEH]
CMP AX,0AA55H
JNZ V26YPB
MOV BX,OFFSET BOOTQ2
JMP V26YPC
V26YPA: JMP V26DPC
V26YPB: MOV SI,OFFSET FQSQ
MOV DI,OFFSET BOOTQ1
MOV CX,01BEH
REPNZ MOVSB
MOV BX,OFFSET BOOTQ1
V26YPC: MOV DL,80H
MOV DH,0
MOV CX,0001H
MOV AX,0201H
INT 13
JB V26YPD
JMP V26END0
V26YPD: JMP V26XPC
;
V26RP: MOV RPJS,3
V26RPA: MOV DH,01H
MOV DL,DLZC
MOV CX,0003H
MOV BX,OFFSET BOOTQ2
MOV AX,0201H
INT 13H
JNB V26RPC
DEC RPJS
JZ V26RPB
MOV AH,0
INT 13H
JMP V26RPA
V26RPB: JMP V26DPC
V26RPC: MOV AX,[BX+01FEH]
MOV GZB03,0
CMP AX,0AA55H
JZ V26RPL
MOV GZB03,0FH
V26RPL: MOV RPJS,3
V26RPD: MOV DH,00H
MOV DL,DLZC
MOV CX,0001H
MOV BX,OFFSET BOOTQ2
MOV AX,0301H
INT 13H
JNB V26RPF
DEC RPJS
JZ V26RPE
MOV AH,0
INT 13H
JMP V26RPD
V26RPE: JMP V26XPC
V26RPF: MOV CX,200H
MOV DI,OFFSET BOOTQ2
V26RPG: MOV AL,0E5H
STOSB
LOOP V26RPG
MOV RPJS,3
V26RPH: MOV DH,01H
MOV DL,DLZC
MOV CX,0003H
MOV BX,OFFSET BOOTQ2
MOV AX,0301H
INT 13H
JNB V26RPJ
DEC RPJS
JZ V26RPI
MOV AH,0
INT 13H
JMP V26RPH
V26RPI: JMP V26XPC
V26RPJ: CMP GZB03,0FH
JZ V26RPK
JMP V26END0
V26RPK: JMP V26END3
;
V26END3: MOV FHM,3
JMP V26ZE
V26END2: MOV FHM,2
MOV XSAXZC,0
JMP V26ZE
V26END0: MOV FHM,0
MOV XSAXZC,0
JMP V26ZE
;
V26DPC: MOV DX,OFFSET DPCZF
JMP V26ZE1
V26XPC: MOV DX,OFFSET XPCZF
V26ZE1: MOV XSAXZC,DX
MOV FHM,1
V26ZE: MOV AX,XSAXZC
MOV DX,DS
RET
V26 endp
;-V27
V27 proc near
V27START:
PUSH DS
POP ES
MOV SI,OFFSET BOOTQ1
ADD SI,+28H
LODSW
MOV V27GZW1,AX
LODSW
MOV V27GZW2,AX
LODSW
MOV V27GZW3,AX
CMP V27GZW1,0FE01H
JZ V27L01
JMP V27END2
V27L01: MOV CX,V27GZW2
MOV DX,V27GZW3
CMP DL,80H
JZ V27L02
JMP V27L10
V27L02: MOV BX,OFFSET BOOTQ2
MOV AX,0201H
INT 13H
JNB V27L03
JMP V27DPC
V27L03: MOV SI,OFFSET BOOTQ2
ADD SI,01BEH
MOV BL,04H
V27L04: CMP BYTE PTR [SI],80H
JZ V27L06
CMP BYTE PTR [SI],00H
JNZ V27L05
ADD SI,+10H
DEC BL
JNZ V27L04
V27L05: JMP V27L10
V27L06: MOV DI,SI
MOV DX,[SI]
MOV CX,[SI+02]
MOV BX,ESZC1
MOV ES,BX
MOV BX,0
MOV AX,0201H
INT 13H
JNB V27L07
JMP V27DPC
V27L07: MOV AX,ES:[01FEH]
CMP AX,0AA55H
JZ V27L08
JMP V27L10
V27L08: MOV AX,[DI+06]
ADD AX,0006H
MOV [DI+06],AX
MOV AX,[DI+0CH]
ADD AX,0006H
ADC WORD PTR [DI+0EH],+00
MOV [DI+0CH],AX
MOV DX,0080H
MOV CX,0001H
MOV BX,OFFSET BOOTQ2
MOV AX,0301H
INT 13H
JNB V27L09
JMP V27XPC
V27L09: JMP V27END0
V27L10: LEA SI,FQSQ
LEA DI,BOOTQ1
MOV CX,01BEH
REPZ MOVSB
MOV DX,0080H
MOV CX,0001H
MOV BX,OFFSET BOOTQ1
MOV AX,0301H
INT 13H
JNB V27END3
JMP V27XPC
;
V27END3: MOV FHM,3
JMP V27ZE
V27END2: MOV FHM,2
MOV XSAXZC,0
JMP V27ZE
V27END0: MOV FHM,0
MOV XSAXZC,0
JMP V27ZE
;
V27DPC: MOV DX,OFFSET DPCZF
JMP V27ZE1
V27XPC: MOV DX,OFFSET XPCZF
V27ZE1: MOV XSAXZC,DX
MOV FHM,1
V27ZE: MOV AX,XSAXZC
MOV DX,DS
RET
V27 endp
;-V29
V29 proc near
V29START:
PUSH DS
POP ES
CLD
MOV DI,OFFSET V29TZMA
MOV SI,OFFSET BOOTQ1
ADD SI,+5EH
MOV CX,0008H
REPZ CMPSB
JZ V29L01
JMP V29END2
V29L01: MOV SI,OFFSET BOOTQ1
MOV DX,[SI+5CH]
MOV V29GZWA,DX
MOV CX,[SI+59H]
MOV V29GZWB,CX
CMP CX,2708H
JZ V29L02
CMP CX,4F0EH
JZ V29L02
CMP CX,+02
JZ V29L02
JMP V29JG1
V29L02: MOV RPJS,3
V29L03: MOV DX,V29GZWA
MOV CX,V29GZWB
INC CX
MOV BX,OFFSET BOOTQ2
MOV AX,0201H
INT 13H
JNB V29L05
CMP BYTE PTR DLZC,02H
JNB V29L04
DEC RPJS
JZ V29L04
MOV AH,00H
INT 13H
JMP V29L03
V29L04: JMP V29DPC
V29L05: CMP BYTE PTR DLZC,02H
JNB V29YP
JMP V29RP
V29YP: MOV AX,[BX+01FEH]
LODSW
MOV GZB03,0
CMP AX,0AA55H
JNZ V29YPA
MOV CX,OFFSET BOOTQ2
JMP V29YPB
V29YPA: MOV GZB03,0FH
MOV SI,OFFSET FQSQ
MOV DI,OFFSET BOOTQ1
MOV CX,01BEH
REPNZ MOVSB
MOV BX,OFFSET BOOTQ1
V29YPB: MOV DX,0080H
MOV CX,0001H
MOV AX,0301H
JNB V29YPC
JMP V29XPC
V29YPC: JMP V29RPD
;
V29RP: MOV AX,[BX+01FEH]
LODSW
MOV GZB03,0
CMP AX,0AA55H
JZ V29RPA
MOV GZB03,0FH
V29RPA: MOV RPJS,3
V29RPB: MOV DX,V29GZWA
MOV DH,00H
MOV CX,0001H
MOV BX,OFFSET BOOTQ2
MOV AX,0301H
INT 13H
JNB V29RPD
DEC RPJS
JZ V29RPC
MOV AH,0
INT 13H
JMP V29RPB
V29RPC: JMP V29XPC
V29RPD: CMP GZB03,0FH
JZ V29RPE
JMP V29END0
V29RPE: JMP V29END3
;
V29END3: MOV FHM,3
JMP V29ZE
V29END2: MOV FHM,2
MOV XSAXZC,0
JMP V29ZE
V29END0: MOV FHM,0
MOV XSAXZC,0
JMP V29ZE
;
V29JG1: CALL JGBTBDA
JMP V29ZE2
V29DPC: MOV DX,OFFSET DPCZF
JMP V29ZE1
V29XPC: MOV DX,OFFSET XPCZF
V29ZE1: MOV XSAXZC,DX
V29ZE2: MOV FHM,1
V29ZE: MOV AX,XSAXZC
MOV DX,DS
RET
V29 endp
;-V30
;
; V30--旅行者
; CREATED: 96-7-6
V30 PROC NEAR
V30START:
PUSH DS
POP ES
CLD
V30JMB: CALL BCSX
JNB V30KS1
MOV FHM,1
JMP V30ZE4
V30KS1: CALL GBSX
JNB V30KS2
MOV FHM,1
JMP V30ZE4
V30KS2: CALL WJXOPEN
JNB V30KS3
JMP V30OPENC
V30KS3: CALL BCSJRQ
JNB V30KS4
JMP V30ZE2
V30KS4: MOV DX,OFFSET WJTQ
MOV CX,20H
MOV AH,3FH
MOV BX,WJH
INT 21H
JNB V30KS5
JMP V30DWJC
V30KS5: CMP CORPSETZ,0FH
JZ V30TZ0
V30SP1: MOV SI,OFFSET WJTQ
CMP WJTYPE,'C'
JNZ V30SP2
MOV AX,[SI+1]
ADD AX,3
SUB AX,3
MOV DX,0
JMP V30TZ3
V30SP2: MOV AX,[SI+8]
ADD AX,[SI+16H]
ROL AX,1
ROL AX,1
ROL AX,1
ROL AX,1
MOV DX,AX
AND DX,000FH
AND AX,0FFF0H
ADD AX,100H
ADC DX,0
JMP V30TZ3
;
V30TZ0: CALL WJZZM
MOV CX,WJCXZC
MOV DI,BDDIZC
CMP DX,0
JNZ V30TZ2
CMP CX,4000H
JNB V30TZ2
SUB DI,38H
JNB V30TZ1
JMP V30END2
V30TZ1: MOV DX,0
MOV AX,DI
JMP V30TZ3
V30TZ2: SUB AX,4000H
SBB DX,0
ADD AX,DI
ADC DX,0
SUB AX,38H
SBB DX,0
V30TZ3: MOV WJCD1,DX
MOV WJCD2,AX
;
MOV BX,WJH
MOV CX,DX
MOV DX,AX
MOV AX,4200H
INT 21H
JNB V30TZ4
JMP V30CZC
V30TZ4: LEA DX,BDTZHCQ
MOV BX,WJH
MOV CX,20H
MOV AH,3FH
INT 21H
JNB V30TZ5
JMP V30DWJC
V30TZ5: MOV SI,OFFSET BDTZHCQ
MOV AX,[SI+13H]
CMP AX,2E2AH
JNZ V30TZ6
MOV AX,[SI+15H]
CMP AX,002AH
JZ V30TZ7
V30TZ6: JMP V30END2
V30TZ7: CMP WJTYPE,'C'
JZ V30WC1
JMP V30WE1
;
V30WC1: CALL WJZZS
MOV DX,OFFSET BDTZHCQ
ADD DX,001DH
MOV CX,3H
MOV AH,40H
INT 21H
JNB V30WC2
JMP V30XWJC
V30WC2: MOV CX,0
MOV DX,WJCD2
ADD DX,3
JMP V30WJ2
;
V30WE1: MOV SI,OFFSET BDTZHCQ
MOV DI,OFFSET WJTQ
MOV AX,[SI+07H]
MOV [DI+14H],AX
MOV AX,[SI+09H]
MOV [DI+16H],AX
MOV AX,[SI+0DH]
MOV [DI+10H],AX
MOV AX,[SI+0BH]
MOV [DI+0EH],AX
;
MOV DX,WJCD1
MOV AX,WJCD2
MOV CX,0200H
DIV CX
OR DX,DX
JZ V30WE2
INC AX
V30WE2: MOV [DI+02],DX
MOV [DI+04],AX
CALL WJZZS
MOV BX,WJH
MOV AH,40H
MOV CX,0018H
MOV DX,OFFSET WJTQ
INT 21H
JNB V30WJ1
JMP V30XWJC
V30WJ1: MOV CX,WJCD1
MOV DX,WJCD2
V30WJ2: MOV AX,4200H
MOV BX,WJH
INT 21H
JNB V30WJ3
JMP V30CZC
V30WJ3: MOV AH,40H
MOV BX,WJH
MOV DX,0
MOV CX,0
INT 21H
JNB V30WJ4
JMP V30XWJC
V30WJ4: JMP V30END0
;
V30END2: MOV FHM,2
MOV XSAXZC,0
JMP V30ZE1
V30END0: MOV FHM,0
MOV XSAXZC,0
JMP V30ZE1
;
V30OPENC: MOV FHM,1
MOV DX,OFFSET OPENCZF
MOV XSAXZC,DX
JMP V30ZE3
;
V30CZC: MOV DX,OFFSET CZCZF
JMP V30XSL
V30DWJC: MOV DX,OFFSET DWJCZF
JMP V30XSL
V30XWJC: MOV DX,OFFSET XWJCZF
V30XSL: MOV XSAXZC,DX
V30END1: MOV FHM,1
V30ZE1: CALL HFSJRQ
V30ZE2: CALL CLOFIL
V30ZE3: CALL HFSX
V30ZE4: MOV AX,XSAXZC
MOV DX,DS
RET
V30 ENDP
;-V31
V31 proc near
V31START:
PUSH DS
POP ES
MOV SI,OFFSET BOOTQ1
JMP V31L02
V31L01: MOV DI,OFFSET V31TZMA
V31L02: MOV CX,001AH
REPZ CMPSB
JZ V31L03
MOV AX,OFFSET BOOTQ1
ADD AX,01FFH
CMP AX,SI
JNZ V31L01
JMP V31END2
;
V31L03: MOV AX,[BX+8]
MOV V31GZWA,AX
MOV DL,DLZC
CMP DL,02H
JNB V31YP
JMP V31RP
;
V31YP: MOV DL,80H
MOV DH,0
MOV CX,V31GZWA
MOV BX,OFFSET BOOTQ2
MOV AX,0201
INT 13H
JB V31YPA
MOV AX,[BX+01FEH]
CMP AX,0AA55H
JNZ V31YPB
MOV BX,OFFSET BOOTQ2
JMP V31YPC
V31YPA: JMP V31DPC
V31YPB: MOV SI,OFFSET FQSQ
MOV DI,OFFSET BOOTQ1
MOV CX,01BEH
REPNZ MOVSB
MOV BX,OFFSET BOOTQ1
V31YPC: MOV DL,80H
MOV DH,0
MOV CX,0001H
MOV AX,0201H
INT 13
JB V31YPD
JMP V31END0
V31YPD: JMP V31XPC
;
V31RP: MOV RPJS,3
V31RPA: MOV DH,01H
MOV DL,DLZC
MOV CX,V31GZWA
MOV BX,OFFSET BOOTQ2
MOV AX,0201H
INT 13H
JNB V31RPC
DEC RPJS
JZ V31RPB
MOV AH,0
INT 13H
JMP V31RPA
V31RPB: JMP V31DPC
V31RPC: MOV AX,[BX+01FEH]
MOV GZB03,0
CMP AX,0AA55H
JZ V31RPL
MOV GZB03,0FH
V31RPL: MOV RPJS,3
V31RPD: MOV DH,00H
MOV DL,DLZC
MOV CX,0001H
MOV BX,OFFSET BOOTQ2
MOV AX,0301H
INT 13H
JNB V31RPF
DEC RPJS
JZ V31RPE
MOV AH,0
INT 13H
JMP V31RPD
V31RPE: JMP V31XPC
V31RPF: MOV CX,200H
MOV DI,OFFSET BOOTQ2
V31RPG: MOV AL,0E5H
STOSB
LOOP V31RPG
MOV RPJS,3
V31RPH: MOV DH,01H
MOV DL,DLZC
MOV CX,0003H
MOV BX,OFFSET BOOTQ2
MOV AX,0301H
INT 13H
JNB V31RPJ
DEC RPJS
JZ V31RPI
MOV AH,0
INT 13H
JMP V31RPH
V31RPI: JMP V31XPC
V31RPJ: CMP GZB03,0FH
JZ V31RPK
JMP V31END0
V31RPK: JMP V31END3
;
V31END3: MOV FHM,3
JMP V31ZE
V31END2: MOV FHM,2
MOV XSAXZC,0
JMP V31ZE
V31END0: MOV FHM,0
MOV XSAXZC,0
JMP V31ZE
;
V31DPC: MOV DX,OFFSET DPCZF
JMP V31ZE1
V31XPC: MOV DX,OFFSET XPCZF
V31ZE1: MOV XSAXZC,DX
MOV FHM,1
V31ZE: MOV AX,XSAXZC
MOV DX,DS
RET
V31 endp
;-V32
V32 proc near
V32START:
PUSH DS
POP ES
MOV SI,OFFSET BOOTQ1
JMP V32L02
V32L01: MOV DI,OFFSET V32TZMA
V32L02: MOV CX,001AH
REPZ CMPSB
JZ V32L03
MOV AX,OFFSET BOOTQ1
ADD AX,01FFH
CMP AX,SI
JNZ V32L01
JMP V32END2
;
V32L03: MOV DL,DLZC
CMP DL,02H
JNB V32YP
JMP V32RP
;
V32YP: MOV DL,80H
MOV DH,0
MOV CX,0007H
MOV BX,OFFSET BOOTQ2
MOV AX,0201
INT 13H
JB V32YPA
MOV AX,[BX+01FEH]
CMP AX,0AA55H
JNZ V32YPB
MOV BX,OFFSET BOOTQ2
JMP V32YPC
V32YPA: JMP V32DPC
V32YPB: MOV SI,OFFSET FQSQ
MOV DI,OFFSET BOOTQ1
MOV CX,01BEH
REPNZ MOVSB
MOV BX,OFFSET BOOTQ1
V32YPC: MOV DL,80H
MOV DH,0
MOV CX,0001H
MOV AX,0201H
INT 13
JB V32YPD
JMP V32END0
V32YPD: JMP V32XPC
;
V32RP: MOV RPJS,3
V32RPA: MOV DH,01H
MOV DL,DLZC
MOV CX,0003H
MOV BX,OFFSET BOOTQ2
MOV AX,0201H
INT 13H
JNB V32RPC
DEC RPJS
JZ V32RPB
MOV AH,0
INT 13H
JMP V32RPA
V32RPB: JMP V32DPC
V32RPC: MOV AX,[BX+01FEH]
MOV GZB03,0
CMP AX,0AA55H
JZ V32RPL
MOV GZB03,0FH
V32RPL: MOV RPJS,3
V32RPD: MOV DH,00H
MOV DL,DLZC
MOV CX,0001H
MOV BX,OFFSET BOOTQ2
MOV AX,0301H
INT 13H
JNB V32RPF
DEC RPJS
JZ V32RPE
MOV AH,0
INT 13H
JMP V32RPD
V32RPE: JMP V32XPC
V32RPF: MOV CX,200H
MOV DI,OFFSET BOOTQ2
V32RPG: MOV AL,0E5H
STOSB
LOOP V32RPG
MOV RPJS,3
V32RPH: MOV DH,01H
MOV DL,DLZC
MOV CX,0003H
MOV BX,OFFSET BOOTQ2
MOV AX,0301H
INT 13H
JNB V32RPJ
DEC RPJS
JZ V32RPI
MOV AH,0
INT 13H
JMP V32RPH
V32RPI: JMP V32XPC
V32RPJ: CMP GZB03,0FH
JZ V32RPK
JMP V32END0
V32RPK: JMP V32END3
;
V32END3: MOV FHM,3
JMP V32ZE
V32END2: MOV FHM,2
MOV XSAXZC,0
JMP V32ZE
V32END0: MOV FHM,0
MOV XSAXZC,0
JMP V32ZE
;
V32DPC: MOV DX,OFFSET DPCZF
JMP V32ZE1
V32XPC: MOV DX,OFFSET XPCZF
V32ZE1: MOV XSAXZC,DX
MOV FHM,1
V32ZE: MOV AX,XSAXZC
MOV DX,DS
RET
V32 endp
;-V34
V34 proc near
V34START:
PUSH DS
POP ES
CALL BCSX
JNB V34KS1
MOV FHM,1
JMP V34ZE4
V34KS1: CALL GBSX
JNB V34KS2
MOV FHM,1
JMP V34ZE4
V34KS2: CALL WJXOPEN
JNB V34KS3
JMP V34OPENC
V34KS3: CALL BCSJRQ
JNB V34KS4
JMP V34ZE2
V34KS4: CALL WJZZM
JNB V34KS5
JMP V34CZC
MOV WJCD1,DX
MOV WJCD2,AX
V34KS5: CALL WJZZS
;
MOV ENDJS,0
MOV DX,OFFSET WJTQ
MOV CX,20H
MOV AH,3FH
MOV BX,WJH
INT 21H
JNB V34TZ1
JMP V34DWJC
V34TZ1: mov ax,4202h
mov bx,wjh
mov cx,0ffffh
mov dx,-6cdh
add dx,19h
sub dx,endjs
int 21h
jnb V34TZ2
jmp V34CZC
V34TZ2: mov dx,offset BDTZHCQ
mov bx,wjh
mov cx,20h
mov ah,3fh
int 21h
jnb V34TZ3
jmp V34DWJC
V34TZ3: mov si,offset V34TZMA
mov di,offset BDTZHCQ
mov cx,15h
repe cmpsb
cmp cx,0
jz V34WJ1
inc endjs
cmp endjs,20h
jz V34TZ4
jmp V34TZ1
V34TZ4: jmp V34END2
;
V34WJ1: mov ax,4202h
mov bx,wjh
mov cx,0ffffh
mov dx,-6
sub dx,endjs
int 21h
jnb V34WJ2
jmp V34CZC
V34WJ2: mov dx,offset V34HCQ
mov si,dx
mov cx,6
mov bx,wjh
mov ah,3fh
int 21h
jnb V34WJ3
jmp V34DWJC
V34WJ3: MOV AX,[SI+2]
mov WJCD2,AX
MOV AX,[SI+4]
MOV WJCD1,AX
MOV AX,[SI]
cmp ax,7859h
jz V34WJ4
jmp V34END2
;
V34WJ4: mov ax,4202h
mov cx,0ffffh
mov dx,-6cdh
cmp wjtype,'E'
jnz V34WJ5
add dx,185h
V34WJ5: sub dx,endjs
mov bx,wjh
int 21h
mov dx,offset BDTZHCQ
mov si,dx
mov bx,wjh
mov cx,20h
mov ah,3fh
int 21h
jnb V34WJ6
jmp V34DWJC
V34WJ6: MOV SI,OFFSET BDTZHCQ
MOV DI,OFFSET WJTQ
mov ax,WJCD2
mov dx,WJCD1
mov bx,ax
and bx,1ffh
mov [DI+2],bx
mov cl,9
shr ax,cl
mov cl,7
shl dx,cl
or ax,dx
cmp bx,0
jz V34WJ7
inc ax
V34WJ7: mov [DI+4],ax
mov ax,[si+14h]
mov [di+14h],ax
mov ax,[si+18h]
mov [di+16h],ax
; mov ax,[si+0bh]
; mov [di+0eh],ax
; mov ax,[si+0dh]
; mov [di+10h],ax
;
CALL WJZZS
CMP WJTYPE,'E'
JZ V34WJ8
MOV DX,OFFSET BDTZHCQ
MOV CX,3
MOV AH,40H
MOV BX,WJH
INT 21H
JNB V34WJ9
JMP V34XWJC
;
V34WJ8: MOV DX,OFFSET WJTQ
MOV CX,1CH
MOV AH,40H
MOV BX,WJH
INT 21H
JNB V34WJ9
JMP V34XWJC
;
V34WJ9: MOV CX,WJCD1
MOV DX,WJCD2
MOV AX,4200H
MOV BX,WJH
INT 21H
JNB V34WJ10
JMP V34CZC
V34WJ10: MOV CX,0
MOV DX,0
MOV AH,40H
MOV BX,WJH
INT 21H
JNB V34WJ11
JMP V34XWJC
V34WJ11: JMP V34END0
;
V34END2: MOV FHM,2
MOV XSAXZC,0
JMP V34ZE1
V34END0: MOV FHM,0
MOV XSAXZC,0
JMP V34ZE1
;
V34OPENC: MOV FHM,1
MOV DX,OFFSET OPENCZF
MOV XSAXZC,DX
JMP V34ZE3
;
V34CZC: MOV DX,OFFSET CZCZF
JMP V34XSL
V34DWJC: MOV DX,OFFSET DWJCZF
JMP V34XSL
V34XWJC: MOV DX,OFFSET XWJCZF
V34XSL: MOV XSAXZC,DX
V34END1: MOV FHM,1
V34ZE1: CALL HFSJRQ
V34ZE2: CALL CLOFIL
V34ZE3: CALL HFSX
V34ZE4: MOV AX,XSAXZC
MOV DX,DS
RET
V34 ENDP
;-V35
V35 PROC NEAR
V35START:
PUSH DS
POP ES
CLD
CMP V35JMTZ,0FH
JZ V35JMB
MOV SI,OFFSET V35TZMA
MOV CX,17H
V35JMA: LODSB
INC AL
MOV [SI-1],AL
LOOP V35JMA
MOV V35JMTZ,0FH
V35JMB: CALL BCSX
JNB V35KS1
JMP V35CZC2
V35KS1: CALL GBSX
JNB V35KS2
JMP V35CZC2
V35KS2: CALL WJXOPEN
JNB V35KS3
JMP V35OPENC
V35KS3: CALL BCSJRQ
JNB V35KS4
JMP V35ZE2
V35KS4: CALL WJZZM
JNB V35KS5
JMP V35CZC
MOV WJCD1,DX
MOV WJCD2,AX
V35KS5: CALL WJZZS
MOV DX,OFFSET WJTQ
MOV CX,20H
MOV AH,3FH
MOV BX,WJH
INT 21H
JNB V35WJ1
JMP V35DWJC
V35WJ1: CMP WJTYPE,'C'
JZ V35TC1
JMP V35WE1
V35TC1: MOV AX,4200H
MOV BX,WJH
MOV CX,0
MOV DX,28EH
INT 21H
JNB V35TC2
JMP V35CZC
V35TC2: MOV DX,OFFSET BDTZHCQ
MOV BX,WJH
MOV CX,10H
MOV AH,3FH
INT 21H
JNB V35TC3
JMP V35DWJC
V35TC3: MOV SI,OFFSET V35TZMA
MOV DI,OFFSET BDTZHCQ
MOV CX,10H
REPE CMPSB
JZ V35TC4
JMP V35END2
V35TC4: MOV AX,4200H
MOV BX,WJH
MOV CX,0
MOV DX,719H
INT 21H
JNB V35TC5
JMP V35CZC
V35TC5: MOV DX,OFFSET BDTZHCQ
MOV BX,WJH
MOV CX,7
MOV AH,3FH
INT 21H
JNB V35TC6
JMP V35DWJC
V35TC6: MOV SI,OFFSET V35TZMB
MOV DI,OFFSET BDTZHCQ
MOV CX,7
REPE CMPSB
CMP CX,0
JZ V35WC1
JMP V35END2
V35WC1: MOV CX,0
MOV DX,720H
MOV AX,4200H
MOV BX,WJH
INT 21H
JNB V35WC2
JMP V35CZC
V35WC2: MOV DX,0
MOV BX,WJH
MOV CX,WJCD2
SUB CX,720H
SUB CX,7
MOV WJCD2,CX
MOV WJCD1,0
MOV AX,ESZC1
PUSH DS
MOV DS,AX
MOV AH,3FH
INT 21H
POP DS
CALL WJZZS
MOV DX,0
MOV CX,WJCD2
MOV BX,WJH
MOV AX,ESZC1
PUSH DS
MOV DS,AX
MOV AH,40H
INT 21H
POP DS
JNB V35WC3
JMP V35XWJC
V35WC3: JMP V35WE6
;
V35WE1: CMP CORPSETZ,0FH
JZ V35SP1
MOV SI,OFFSET WJTQ
MOV AX,[SI+8]
ADD AX,[SI+16H]
ROL AX,1
ROL AX,1
ROL AX,1
ROL AX,1
MOV DX,AX
AND DX,000FH
AND AX,0FFF0H
JMP V35SP4
;
V35SP1: CALL WJZZM
MOV CX,WJCXZC
MOV DI,BDDIZC
CMP DX,0
JNZ V35SP3
CMP CX,4000H
JNB V35SP3
SUB DI,0000H
JNB V35SP2
JMP V35END2
V35SP2: MOV DX,0
MOV AX,DI
JMP V35SP4
V35SP3: SUB AX,4000H
SBB DX,0
ADD AX,DI
ADC DX,0
SUB AX,0000H
SBB DX,0
V35SP4: MOV WJCD1,DX
MOV WJCD2,AX
;
V35TE1: MOV CX,WJCD1
MOV DX,WJCD2
ADD DX,028EH
ADC CX,0
MOV AX,4200H
MOV BX,WJH
INT 21H
JNB V35TE2
JMP V35CZC
V35TE2: MOV DX,OFFSET BDTZHCQ
MOV BX,WJH
MOV CX,10H
MOV AH,3FH
INT 21H
JNB V35TE3
JMP V35DWJC
V35TE3: MOV SI,OFFSET V35TZMA
MOV DI,OFFSET BDTZHCQ
MOV CX,10H
REPE CMPSB
CMP CX,0
JZ V35WE2
JMP V35END2
;
V35WE2: MOV CX,WJCD1
MOV DX,WJCD2
ADD DX,0285H
ADC CX,0
MOV AX,4200H
MOV BX,WJH
INT 21H
JNB V35WE3
JMP V35CZC
V35WE3: MOV DX,OFFSET BDTZHCQ
MOV CX,10H
MOV BX,WJH
MOV AH,3FH
INT 21H
JNB V35WE4
JMP V35DWJC
;
V35WE4: MOV SI,OFFSET BDTZHCQ
MOV DI,OFFSET WJTQ
MOV AX,[SI+0]
XOR AX,0013H
MOV [DI+14H],AX
MOV AX,[SI+2]
XOR AX,0013H
MOV [DI+16H],AX
MOV AX,[SI+6]
XOR AX,0013H
MOV [DI+0EH],AX
MOV AX,[SI+4]
XOR AX,0013H
MOV [DI+10H],AX
MOV DX,WJCD1
MOV AX,WJCD2
MOV CX,0200H
DIV CX
OR DX,DX
JZ V35WE5
INC AX
V35WE5: MOV [DI+02],DX
MOV [DI+04],AX
CALL WJZZS
MOV DX,OFFSET WJTQ
MOV CX,18H
MOV AH,40H
MOV BX,WJH
INT 21H
JNB V35WE6
JMP V35XWJC
V35WE6: MOV CX,WJCD1
MOV DX,WJCD2
MOV AX,4200H
MOV BX,WJH
INT 21H
JNB V35WE7
JMP V35CZC
V35WE7: MOV CX,0
MOV DX,0
MOV AH,40H
MOV BX,WJH
INT 21H
JNB V35WE8
JMP V35XWJC
V35WE8: JMP V35END0
;
V35END2: MOV FHM,2
JMP V35ZE1
V35END0: MOV FHM,0
JMP V35ZE1
;
V35OPENC: MOV FHM,1
MOV DX,OFFSET OPENCZF
MOV XSAXZC,DX
JMP V35ZE3
;
V35CZC2: MOV FHM,1
MOV DX,OFFSET CZCZF
MOV XSAXZC,DX
JMP V35ZE4
;
V35CZC: MOV DX,OFFSET CZCZF
JMP V35XSL
V35DWJC: MOV DX,OFFSET DWJCZF
JMP V35XSL
V35XWJC: MOV DX,OFFSET XWJCZF
V35XSL: MOV XSAXZC,DX
V35END1: MOV FHM,1
V35ZE1: CALL HFSJRQ
V35ZE2: CALL CLOFIL
V35ZE3: CALL HFSX
V35ZE4: MOV AX,XSAXZC
MOV DX,DS
RET
V35 ENDP
;-V36
V36 proc near
V36START:
PUSH DS
POP ES
CALL BCSX
JNB V36KS1
MOV FHM,1
JMP V36ZE4
V36KS1: CALL GBSX
JNB V36KS2
MOV FHM,1
JMP V36ZE4
V36KS2: CALL WJXOPEN
JNB V36KS3
JMP V36OPENC
V36KS3: CALL BCSJRQ
JNB V36KS4
JMP V36ZE2
V36KS4: CALL WJZZM
JNB V36KS5
JMP V36CZC
MOV WJCD1,DX
MOV WJCD2,AX
V36KS5: CALL WJZZS
;
MOV DX,OFFSET WJTQ
MOV CX,20H
MOV AH,3FH
INT 21H
JNB V36TZ0
JMP V36DWJC
;
V36TZ0: MOV ENDJS,0
V36TZ1: mov ax,4202h
mov bx,wjh
mov cx,0ffffh
mov dx,-0c00h
add dx,0a0ah
sub dx,endjs
int 21h
jnb V36TZ2
jmp V36CZC
V36TZ2: mov dx,offset BDTZHCQ
mov bx,wjh
mov cx,14h
mov ah,3fh
int 21h
jnb V36TZ3
jmp V36DWJC
V36TZ3: mov si,offset V36TZMA
mov di,offset BDTZHCQ
mov cx,14h
repe cmpsb
jz V36TZ5
inc endjs
cmp endjs,20h
jz V36TZ4
jmp V36TZ1
V36TZ4: JMP V36END2
V36TZ5: mov ax,4202h
mov cx,0ffffh
mov dx,-0c00h
add dx,60h
sub dx,endjs
mov bx,wjh
int 21h
JNB V36TZ6
JMP V36CZC
V36TZ6: mov dx,offset BDTZHCQ
mov bx,wjh
mov cx,30h
mov ah,3fh
int 21h
JNB V36TZ7
JMP V36DWJC
V36TZ7: cmp wjtype,'E'
jz V36TE1
MOV SI,OFFSET BDTZHCQ
mov ax,[si+24h]
mov WJCD2,ax
mov WJCD1,0
CALL WJZZS
MOV DX,OFFSET BDTZHCQ
ADD DX,26H
MOV CX,6
MOV AH,40H
MOV BX,WJH
INT 21H
JNB V36TZ8
JMP V36XWJC
V36TZ8: JMP V36WJ1
V36TE1: MOV SI,OFFSET BDTZHCQ
MOV DI,OFFSET WJTQ
mov ax,[si+0ch]
mov dx,[si+0eh]
mov WJCD2,ax
mov WJCD1,dx
mov bx,ax
and bx,1ffh
mov [DI+2],bx
mov cl,9
shr ax,cl
mov cl,7
shl dx,cl
or ax,dx
cmp bx,0
jz V36TE2
inc ax
V36TE2: mov [DI+4],ax
mov ax,[si+6h]
mov [di+14h],ax
mov ax,[si+4h]
mov [di+16h],ax
; mov ax,[si+8h]
; mov [di+0eh],ax
; mov ax,[si+0ah]
; mov [di+10h],ax
CALL WJZZS
MOV DX,OFFSET WJTQ
MOV CX,1CH
MOV AH,40H
MOV BX,WJH
INT 21H
JNB V36TE3
JMP V36XWJC
V36TE3: JMP V36WJ1
;
V36WJ1: MOV CX,WJCD1
MOV DX,WJCD2
MOV AX,4200H
INT 21H
JNB V36WJ2
JMP V36CZC
V36WJ2: MOV CX,0
MOV DX,0
MOV AH,40H
MOV BX,WJH
INT 21H
JNB V36WJ3
JMP V36XWJC
V36WJ3: JMP V36END0
;
V36END2: MOV FHM,2
JMP V36ZE1
V36END0: MOV FHM,0
JMP V36ZE1
;
V36OPENC: MOV FHM,1
MOV DX,OFFSET OPENCZF
MOV XSAXZC,DX
JMP V36ZE3
;
V36CZC: MOV DX,OFFSET CZCZF
JMP V36XSL
V36DWJC: MOV DX,OFFSET DWJCZF
JMP V36XSL
V36XWJC: MOV DX,OFFSET XWJCZF
V36XSL: MOV XSAXZC,DX
V36END1: MOV FHM,1
V36ZE1: CALL HFSJRQ
V36ZE2: CALL CLOFIL
V36ZE3: CALL HFSX
V36ZE4: MOV AX,XSAXZC
MOV DX,DS
RET
V36 ENDP
;-V37
V37 proc near
V37START:
PUSH DS
POP ES
CLD
MOV DI,OFFSET V37TZMA
MOV SI,OFFSET BOOTQ1
ADD SI,000AH
MOV CX,14H
REPZ CMPSB
JZ V37L01
JMP V37END2
V37L01: MOV DL,DLZC
CMP DL,02H
JNB V37YP
JMP V37END2
;
V37YP: MOV DX,0080H
PUSH DX
MOV CX,0002H
MOV BX,OFFSET BOOTQ2
MOV AX,0201H
INT 13H
JNB V37YPA
JMP V37DPC
V37YPA: MOV AX,[BX+01FEH]
CMP AX,0AA55H
JZ V37YPB
MOV SI,OFFSET FQSQ
MOV DI,OFFSET BOOTQ1
MOV CX,01BEH
REPZ MOVSB
MOV BX,OFFSET BOOTQ1
JMP V37YPC
V37YPB: MOV BX,OFFSET BOOTQ2
V37YPC: MOV DX,0080H
MOV CX,0001H
MOV AX,0301H
INT 13H
JB V37YPD
JMP V37END0
V37YPD: JMP V37XPC
;
V37END2: MOV FHM,2
MOV XSAXZC,0
JMP V37ZE
V37END0: MOV FHM,0
MOV XSAXZC,0
JMP V37ZE
;
V37DPC: MOV DX,OFFSET DPCZF
JMP V37ZE1
V37XPC: MOV DX,OFFSET XPCZF
V37ZE1: MOV XSAXZC,DX
MOV FHM,1
V37ZE: MOV AX,XSAXZC
MOV DX,DS
RET
V37 endp
;-V38
V38 proc near
V38START:
PUSH DS
POP ES
CLD
MOV DI,OFFSET V38TZMA
MOV SI,OFFSET BOOTQ1
ADD SI,00AAH
MOV CX,15H
REPZ CMPSB
JZ V38L01
JMP V38END2
V38L01: MOV DL,DLZC
CMP DL,02H
JNB V38YP
JMP V38RP
;
V38YP: MOV SI,OFFSET FQSQ
MOV DI,OFFSET BOOTQ1
MOV CX,01BEH
REPZ MOVSB
MOV BX,OFFSET BOOTQ1
MOV DX,0080H
MOV CX,0001H
MOV AX,0301H
INT 13H
JB V38YPC
JMP V38END3
V38YPC: JMP V38XPC
;
V38RP: MOV RPJS,3
V38RPA: MOV DH,01H
MOV DL,DLZC
PUSH DX
MOV CX,1901H
MOV BX,OFFSET BOOTQ2
MOV AX,0201H
INT 13H
JNB V38RPC
DEC RPJS
JZ V38RPB
MOV AH,0
INT 13H
JMP V38RPA
V38RPB: JMP V38DPC
V38RPC: MOV V38GZBA,0
MOV AX,[BX+01FEH]
CMP AX,0AA55H
JZ V38RPD
MOV V38GZBA,1
MOV SI,OFFSET BOOTQ1
MOV DI,OFFSET BOOTSQ
ADD SI,0BH
ADD DI,0BH
MOV CX,15H
REPNZ MOVSB
V38RPD: MOV RPJS,3
V38RPE: MOV DH,00H
MOV DL,DLZC
MOV CX,0001H
MOV BX,OFFSET BOOTQ2
CMP V38GZBA,0
JZ V38RPF
MOV BX,OFFSET BOOTSQ
V38RPF: MOV AX,0301H
INT 13H
JNB V38RPH
DEC RPJS
JZ V38RPG
MOV AH,0
INT 13H
JMP V38RPE
V38RPG: JMP V38XPC
V38RPH: CMP V38GZBA,1
JZ V38RPI
JMP V38END0
V38RPI: JMP V38END3
;
V38END3: MOV FHM,3
MOV XSAXZC,0
JMP V38ZE
V38END2: MOV FHM,2
MOV XSAXZC,0
JMP V38ZE
V38END0: MOV FHM,0
MOV XSAXZC,0
JMP V38ZE
;
V38DPC: MOV DX,OFFSET DPCZF
JMP V38ZE1
V38XPC: MOV DX,OFFSET XPCZF
V38ZE1: MOV XSAXZC,DX
MOV FHM,1
V38ZE: MOV AX,XSAXZC
MOV DX,DS
RET
V38 endp
;-V39
V39 proc near
V39START:
PUSH DS
POP ES
CLD
MOV BYTE PTR RPJS,00
MOV DI,OFFSET V39TZMA
MOV SI,offset BOOTQ1
ADD SI,17FH
MOV CX,17H
REPZ CMPSB
JZ V39L01
JMP V39END2
V39L01:
CMP DLZC,2
JNB V39YP
V39RP:
MOV SI,OFFSET BOOTQ1
MOV DI,OFFSET BOOTSQ
ADD SI,0BH
ADD DI,0BH
MOV CX,13H
REPNZ MOVSB
MOV RPJS,3
V39RPA: MOV DL,DLZC
MOV DH,0
MOV CX,0001
MOV BX,OFFSET BOOTSQ
MOV AX,0301h
INT 13h
JNB V39END3
DEC RPJS
JZ V39RPB
MOV AH,0
INT 13H
JMP V39RPA
V39RPB: JMP V39XPC
;
V39YP: MOV SI,OFFSET FQSQ
MOV DI,OFFSET BOOTQ1
MOV CX,01BEH
REPNZ MOVSB
MOV DX,0080h
MOV CX,0001h
MOV BX,OFFSET BOOTQ1
MOV AX,0301h
INT 13h
JNB V39END3
JMP V39XPC
;
V39END2: MOV FHM,2
MOV XSAXZC,0
JMP V39ZE
V39END3: MOV FHM,3
MOV XSAXZC,0
JMP V39ZE
;
V39DPC: MOV DX,OFFSET DPCZF
JMP V39ZE1
V39XPC: MOV DX,OFFSET XPCZF
V39ZE1: MOV XSAXZC,DX
MOV FHM,1
V39ZE: MOV AX,XSAXZC
MOV DX,DS
RET
V39 endp
;-V40
V40 proc near
V40START:
PUSH DS
POP ES
CALL BCSX
JNB V40KS1
MOV FHM,1
JMP V40ZE4
V40KS1: CALL GBSX
JNB V40KS2
MOV FHM,1
JMP V40ZE4
V40KS2: CALL WJXOPEN
JNB V40KS3
JMP V40OPENC
V40KS3: CALL BCSJRQ
JNB V40KS4
JMP V40ZE2
V40KS4: CALL WJZZM
JNB V40KS5
JMP V40CZC
MOV WJCD1,DX
MOV WJCD2,AX
V40KS5: CALL WJZZS
;
MOV DX,OFFSET WJTQ
MOV CX,20H
MOV AH,3FH
MOV BX,WJH
INT 21H
JNB V40WJ1
JMP V40DWJC
V40WJ1:
cmp wjtype,'C'
JZ V40TC1
JMP V40TE1
V40TC1: mov ax,4200h
mov cx,0
mov dx,0c89h
mov bx,wjh
int 21h
jnb V40TC2
jmp V40CZC
V40TC2: mov dx,offset BDTZHCQ
mov cx,20h
mov ah,3fh
mov bx,wjh
int 21h
jnb V40TC3
jmp V40DWJC
V40TC3: mov si,offset V40TZMA
mov di,offset BDTZHCQ
mov cx,17H
repe cmpsb
cmp cx,0
jz V40WJ2
jmp V40END2
;
V40WJ2: mov ax,WJCD2
sub ax,1000H
mov WJCD2,ax
mov WJCD1,0
MOV CX,0
MOV DX,1000H
MOV AX,4200H
MOV BX,WJH
INT 21H
JNB V40WJ3
JMP V40CZC
V40WJ3: MOV DX,0
MOV CX,WJCD2
MOV BX,WJH
MOV AX,ESZC1
PUSH DS
MOV DS,AX
MOV AH,3FH
INT 21H
POP DS
JNB V40WJ3A
JMP V40DWJC
V40WJ3A: CALL WJZZS
MOV DX,0
MOV CX,WJCD2
MOV BX,WJH
MOV AX,ESZC1
PUSH DS
MOV DS,AX
MOV AH,40H
INT 21H
POP DS
JNB V40WJ3B
JMP V40XWJC
V40WJ3B: JMP V40WJ5
;
V40TE1: mov ax,4202h
mov cx,0ffffh
mov dx,0c89h
sub dx,1000H
sub dx,endjs
mov bx,wjh
int 21h
jnb V40TE2
jmp V40CZC
V40TE2: mov dx,offset BDTZHCQ
mov bx,wjh
mov cx,20h
mov ah,3fh
int 21h
jnb V40TE3
jmp V40DWJC
V40TE3: mov si,offset V40TZMA
mov di,offset BDTZHCQ
mov cx,17H
repe cmpsb
jz V40WJC1
inc endjs
cmp endjs,20h
jz V40TE4
jmp V40TE1
V40TE4: jmp V40END2
;
V40WJC1: mov ax,4202h
mov cx,0ffffh
mov dx,0044h
sub dx,1000H
sub dx,endjs
mov bx,wjh
int 21h
jnb V40WJC2
jmp V40CZC
V40WJC2: mov dx,offset V40HCQ
mov si,dx
mov cx,4
mov bx,wjh
mov ah,3fh
int 21h
jnb V40WJC3
jmp V40DWJC
V40WJC3: MOV SI,OFFSET V40HCQ
MOV DI,OFFSET WJTQ
mov ax,[SI]
mov dx,[SI+2]
MOV WJCD2,AX
MOV WJCD1,DX
mov bx,ax
and bx,1ffh
mov [DI+2],bx
mov cl,9
shr ax,cl
mov cl,7
shl dx,cl
or ax,dx
cmp bx,0
jz V40WJC4
inc ax
V40WJC4: mov [DI+4],ax
;
V40CSIP1: mov ax,4202h
mov cx,0ffffh
mov dx,0ba6h
sub dx,1000H
sub dx,endjs
mov bx,wjh
int 21h
jnb V40CSIP2
jmp V40CZC
V40CSIP2: mov dx,offset V40HCQ
mov si,dx
mov cx,4
mov bx,wjh
mov ah,3fh
int 21h
jnb V40CSIP3
jmp V40DWJC
V40CSIP3: MOV SI,OFFSET V40HCQ
MOV DI,OFFSET WJTQ
mov ax,[SI]
mov [di+14h],ax
mov ax,[SI+2]
mov [di+16h],ax
V40SSSP1: mov ax,4202h
mov cx,0ffffh
mov dx,0040h
sub dx,1000H
sub dx,endjs
mov bx,wjh
int 21h
jnb V40SSSP2
jmp V40CZC
V40SSSP2: mov dx,offset V40HCQ
mov si,dx
mov cx,4
mov bx,wjh
mov ah,3fh
int 21h
jnb V40SSSP3
jmp V40DWJC
V40SSSP3: MOV SI,OFFSET V40HCQ
MOV DI,OFFSET WJTQ
mov ax,[SI]
mov [di+0eh],ax
mov ax,[SI+2]
mov [di+10h],ax
V40XGE1: CALL WJZZS
MOV DX,OFFSET WJTQ
MOV CX,1CH
MOV AH,40H
MOV BX,WJH
INT 21H
JNB V40WJ5
JMP V40XWJC
V40WJ5: MOV CX,WJCD1
MOV DX,WJCD2
MOV AX,4200H
INT 21H
JNB V40WJ6
JMP V40CZC
V40WJ6: MOV CX,0
MOV DX,0
MOV AH,40H
MOV BX,WJH
INT 21H
JNB V40WJ7
JMP V40XWJC
V40WJ7: JMP V40END0
;
V40END2: MOV FHM,2
MOV XSAXZC,0
JMP V40ZE1
V40END0: MOV FHM,0
MOV XSAXZC,0
JMP V40ZE1
;
V40OPENC: MOV FHM,1
MOV DX,OFFSET OPENCZF
MOV XSAXZC,DX
JMP V40ZE3
;
V40CZC: MOV DX,OFFSET CZCZF
JMP V40XSL
V40DWJC: MOV DX,OFFSET DWJCZF
JMP V40XSL
V40XWJC: MOV DX,OFFSET XWJCZF
V40XSL: MOV XSAXZC,DX
V40END1: MOV FHM,1
V40ZE1: CALL HFSJRQ
V40ZE2: CALL CLOFIL
V40ZE3: CALL HFSX
V40ZE4: MOV AX,XSAXZC
MOV DX,DS
RET
V40 ENDP
;-V41
V41 proc near
V41START:
PUSH DS
POP ES
CLD
MOV DI,OFFSET V41TZMA
MOV SI,offset BOOTQ1
ADD SI,184H
MOV CX,10H
REPZ CMPSB
JZ V41L01
JMP V41END0
V41L01: MOV DL,DLZC
CMP DL,02
JNB V41YP
JMP V41RP
V41YP: MOV DX,0080H
MOV CX,0008H
MOV BX,offset BOOTQ2
MOV AX,0201h
INT 13h
JNB V41YPA
JMP V41DPC
V41YPA: MOV AX,[BX+01FEH]
CMP AX,0AA55h
JZ V41YPB
JMP V41JG1
V41YPB: MOV DL,80H
MOV DH,1
MOV CX,0001H
MOV BX,offset BOOTQ2
V41YPC: MOV AX,0301h
INT 13h
JNB V41YPD
JMP V41XPC
V41YPD: JMP V41END0
;
V41RP: MOV RPJS,3
MOV BX,OFFSET BOOTQ1
MOV DH,[BX+22H]
MOV DL,DLZC
MOV CX,[BX+20H]
MOV BX,offset BOOTQ2
V41RPA: MOV AX,0201h
INT 13h
JNB V41RPC
DEC RPJS
JZ V41RPB
MOV AH,0
INT 13H
JMP V41RPA
V41RPB: JMP V41DPC
V41RPC: MOV GZB03,0
MOV RPJS,3
MOV AX,[BX+01FEH]
CMP AX,0AA55h
JZ V41RPD
MOV GZB03,0FH
MOV SI,OFFSET BOOTQ1
MOV DI,OFFSET BOOTSQ
ADD SI,0BH
ADD DI,0BH
MOV CX,15H
REPNZ MOVSB
MOV BX,OFFSET BOOTSQ
JMP V41RPE
V41RPD: MOV BX,OFFSET BOOTQ2
V41RPE: MOV DL,DLZC
MOV DH,00
MOV CX,0001
V41RPF: MOV AX,0301h
INT 13h
JNB V41RPH
DEC RPJS
JZ V41RPG
MOV AH,0
INT 13H
JMP V41RPF
V41RPG: JMP V41XPC
V41RPH: CMP GZB03,0FH
JZ V41RPI
JMP V41END0
V41RPI: JMP V41END3
;
V41END3: MOV FHM,3
JMP V41ZE
V41END2: MOV FHM,2
MOV XSAXZC,0
JMP V41ZE
V41END0: MOV FHM,0
MOV XSAXZC,0
JMP V41ZE
;
V41JG1: CALL JGBTBDA
JMP V41ZE2
V41DPC: MOV DX,OFFSET DPCZF
JMP V41ZE1
V41XPC: MOV DX,OFFSET XPCZF
V41ZE1: MOV XSAXZC,DX
V41ZE2: MOV FHM,1
V41ZE: MOV AX,XSAXZC
MOV DX,DS
RET
V41 endp
;-V42
V42 proc near
V42START:
PUSH DS
POP ES
CLD
MOV DI,OFFSET V42TZMA
MOV SI,offset BOOTQ1
ADD SI,1A6H
MOV CX,10H
REPZ CMPSB
JZ V42L01
JMP V42END2
V42L01: MOV BX,OFFSET BOOTQ1
MOV DX,[BX+46H]
MOV CX,[BX+44H]
ADD CL,8
ADC DH,0
CMP DLZC,02
JNB V42YP
JMP V42RP
V42YP:
MOV BX,offset BOOTQ2
MOV AX,0201h
INT 13h
JNB V42L02
JMP V42DPC
V42RP: MOV RPJS,3
MOV BX,offset BOOTQ2
V42RPA: MOV AX,0201h
INT 13h
JNB V42L02
DEC RPJS
JZ V42RPB
MOV AH,0
INT 13H
JMP V42RPA
V42RPB: JMP V42DPC
V42L02: MOV AX,[BX+01FEH]
LODSW
CMP AX,0AA55h
JZ V42L03
JMP V42L04
V42L03: CMP DLZC,02
JNB V42YPC
JMP V42RPC
V42YPC: MOV BX,offset BOOTQ2
MOV DL,80H
MOV DH,1
MOV CX,0001H
MOV AX,0301h
INT 13h
JNB V42L05
JMP V42XPC
V42RPC: MOV RPJS,3
MOV BX,offset BOOTQ2
MOV DL,DLZC
MOV DH,0
MOV CX,0001H
V42RPD: MOV AX,0301h
INT 13h
JNB V42L05
DEC RPJS
JZ V42RPE
MOV AH,0
INT 13H
JMP V42RPD
V42RPE: JMP V42DPC
V42L05: JMP V42END0
V42L04: CMP DLZC,2
JNB V42YPD
JMP V42RPF
V42YPD: MOV SI,OFFSET FQSQ
MOV DI,OFFSET BOOTQ1
MOV CX,01BEH
REPNZ MOVSB
MOV BX,offset BOOTQ1
MOV DL,80H
MOV DH,1
MOV CX,0001H
MOV AX,0301h
INT 13h
JNB V42YPE
JMP V42XPC
V42YPE: JMP V42END3
;
V42RPF: MOV SI,OFFSET BOOTQ1
MOV DI,OFFSET BOOTSQ
ADD SI,03H
ADD DI,03H
MOV CX,25H
REPNZ MOVSB
MOV BX,OFFSET BOOTSQ
MOV RPJS,3
MOV DL,DLZC
MOV DH,0
MOV CX,0001H
V42RPG: MOV AX,0301h
INT 13h
JNB V42RPI
DEC RPJS
JZ V42RPH
MOV AH,0
INT 13H
JMP V42RPG
V42RPH: JMP V42DPC
V42RPI: JMP V42END3
;
V42END3: MOV FHM,3
JMP V42ZE
V42END2: MOV FHM,2
MOV XSAXZC,0
JMP V42ZE
V42END0: MOV FHM,0
MOV XSAXZC,0
JMP V42ZE
;
V42DPC: MOV DX,OFFSET DPCZF
JMP V42ZE1
V42XPC: MOV DX,OFFSET XPCZF
V42ZE1: MOV XSAXZC,DX
MOV FHM,1
V42ZE: MOV AX,XSAXZC
MOV DX,DS
RET
V42 endp
;-V43
V43 proc near
V43START:
PUSH DS
POP ES
CLD
MOV DI,OFFSET V43TZMA
MOV SI,offset BOOTQ1
ADD SI,197H
MOV CX,10H
REPZ CMPSB
JZ V43L01
JMP V43END2
V43L01: CMP DLZC,02
JNB V43YP
JMP V43RP
V43YP: MOV SI,OFFSET FQSQ
MOV DI,OFFSET BOOTQ1
MOV CX,01BEH
REPNZ MOVSB
MOV DX,0080h
MOV CX,0001h
MOV BX,OFFSET BOOTQ1
MOV AX,0301h
INT 13h
JNB V43YPA
JMP V43XPC
V43YPA: JMP V43END0
V43RP: MOV DI,offset BOOTQ1
MOV AX,[DI+15H]
CMP AX,09F0H
JNZ V43RPA
LEA SI,BPB144M
JMP V43RPE
V43RPA: CMP AX,02FDH
JNZ V43RPB
LEA SI,BPB360K
JMP V43RPE
V43RPB: CMP AX,07F9H
JNZ V43RPC
LEA SI,BPB12M
JMP V43RPE
V43RPC: CMP AX,03F9H
JNZ V43RPD
LEA SI,BPB720K
JMP V43RPE
V43RPD: JMP V43JG1
;
V43RPE: MOV DI,OFFSET BOOTSQ
ADD DI,0BH
MOV CX,13H
REP MOVSB
;
MOV RPJS,3
MOV BX,OFFSET BOOTSQ
MOV DL,DLZC
MOV DH,0
MOV CX,0001
V43RPF: MOV AX,0301H
INT 13H
JNB V43RPH
DEC RPJS
JZ V43RPG
MOV AH,0
INT 13H
JMP V43RPF
V43RPG: JMP V43XPC
V43RPH: JMP V43END0
;
V43END2: MOV FHM,2
MOV XSAXZC,0
JMP V43ZE
V43END0: MOV FHM,0
MOV XSAXZC,0
JMP V43ZE
;
V43JG1: CALL JGBTBDA
JMP V43ZE2
V43DPC: MOV DX,OFFSET DPCZF
JMP V43ZE1
V43XPC: MOV DX,OFFSET XPCZF
V43ZE1: MOV XSAXZC,DX
V43ZE2: MOV FHM,1
V43ZE: MOV AX,XSAXZC
MOV DX,DS
RET
V43 endp
;-V44
V44 proc near
V44START:
PUSH DS
POP ES
CLD
MOV DI,OFFSET V44TZMA
MOV CX,16H
ADD SI,17H
CMP DLZC,2
JNB V44L01
ADD SI,0036H
V44L01: REPZ CMPSB
JZ V44L02
JMP V44END2
V44L02: CMP DLZC,02
JNB V44YP
JMP V44RP
;
V44YP: MOV DX,0080H
MOV CX,000DH
MOV BX,OFFSET BOOTQ2
MOV AX,0201H
INT 13H
JNB V44YPA
JMP V44DPC
V44YPA: MOV AX,[BX+01FEH]
CMP AX,0AA55H
JZ V44YPB
MOV SI,OFFSET FQSQ
MOV DI,OFFSET BOOTQ1
MOV CX,01BEH
REPNZ MOVSB
MOV BX,OFFSET BOOTQ1
JMP V44YPC
V44YPB: MOV BX,OFFSET BOOTQ2
V44YPC: MOV DX,0080H
MOV CX,0001H
MOV AX,0301H
INT 13H
JNB V44YPD
JMP V44XPC
V44YPD: JMP V44END0
;
V44RP: MOV RPJS,3
MOV DL,DLZC
MOV DH,1
MOV CX,0001h
MOV BX,OFFSET BOOTQ2
V44RPA: MOV AX,0201H
INT 13H
JNB V44RPC
DEC RPJS
JZ V44RPB
MOV AH,0
INT 13H
JMP V44RPA
V44RPB: JMP V44DPC
;
V44RPC: MOV SI,OFFSET BOOTQ2
MOV AX,[SI+1FEH]
CMP AX,0AA55H
JZ V44RPD
JMP V44JG1
V44RPD: MOV RPJS,3
V44RPE: MOV DL,DLZC
MOV DH,0
MOV CX,0001H
MOV BX,OFFSET BOOTQ2
MOV AX,0301H
INT 13H
JNB V44RPG
DEC RPJS
JZ V44RPF
MOV AH,0
INT 13H
JMP V44RPE
V44RPF: JMP V44XPC
V44RPG: MOV SI,OFFSET BOOTQ2
MOV CX,10H
MOV AL,0E5H
V44RPH: MOV [SI],AL
ADD SI,20H
LOOP V44RPH
;
MOV SI,OFFSET BOOTQ2
MOV AX,[SI+15H]
CMP AX,02FDH
JZ V44RPI
CMP AX,07F9H
JZ V44RPI
CMP AX,09F0H
JZ V44RPL
JMP V44JG1
V44RPI: MOV GZW01,0001H
CALL RPHF
JNB V44RPJ
JMP V44XPC
V44RPJ:
MOV GZW01,0002H
CALL RPHF
JNB V44RPK
JMP V44XPC
V44RPK: JMP V44END0
;
V44RPL:
MOV GZW01,0002H
CALL RPHF
JNB V44RPM
JMP V44XPC
V44RPM: MOV RPJS,3
MOV DL,DLZC
MOV DH,0
MOV CX,000AH
MOV BX,OFFSET BOOTQ2
V44RPN: MOV AX,0201H
INT 13H
JNB V44RPP
DEC RPJS
JZ V44RPO
MOV AH,0
INT 13H
JMP V44RPN
V44RPO: JMP V44DPC
V44RPP:
MOV GZW01,0001H
CALL RPHF
JNB V44RPQ
JMP V44XPC
V44RPQ: JMP V44END0
;
V44END2: MOV FHM,2
MOV XSAXZC,0
JMP V44ZE
V44END0: MOV FHM,0
MOV XSAXZC,0
JMP V44ZE
;
V44JG1: CALL JGBTBDA
JMP V44ZE2
V44DPC: MOV DX,OFFSET DPCZF
JMP V44ZE1
V44XPC: MOV DX,OFFSET XPCZF
V44ZE1: MOV XSAXZC,DX
V44ZE2: MOV FHM,1
V44ZE: MOV AX,XSAXZC
MOV DX,DS
RET
V44 endp
;
RPHF PROC NEAR
MOV RPJS,3
RPHF1: MOV DL,DLZC
MOV DH,1
MOV CX,GZW01
MOV BX,OFFSET BOOTQ2
MOV AX,0101
INT 13H
JNB RPHF3
DEC RPJS
JZ RPHF2
MOV AH,0
INT 13H
JMP RPHF1
RPHF2: STC
JMP RPHF4
RPHF3: CLC
RPHF4: RET
RPHF ENDP
;-V45
V45 proc near
V45START:
PUSH DS
POP ES
MOV DI,OFFSET V45TZMA
ADD SI,0DBH
MOV CX,16H
REPZ CMPSB
JZ V45L01
JMP V45END2
V45L01: CMP DLZC,02
JNB V45YP
JMP V45RP
;
V45YP: MOV DX,0080H
MOV CX,0009H
MOV BX,OFFSET BOOTQ2
MOV AX,0201h
INT 13h
JNB V45YPA
JMP V45DPC
V45YPA: MOV SI,OFFSET BOOTQ2
MOV AX,[SI+01FEH]
MOV GZB03,0
CMP AX,0AA55H
JZ V45YPB
MOV GZB03,0FH
MOV SI,OFFSET FQSQ
MOV DI,OFFSET BOOTQ1
MOV CX,01BEH
REPNZ MOVSB
MOV BX,OFFSET BOOTQ1
JMP V45YPC
V45YPB: MOV BX,OFFSET BOOTQ2
V45YPC: MOV DX,0080H
MOV CX,0001H
MOV AX,0301H
INT 13H
JNB V45YPD
JMP V45XPC
V45YPD: CMP GZB03,0FH
JZ V45YPE
JMP V45END0
V45YPE: JMP V45END3
;
V45RP: MOV RPJS,3
V45RPA: MOV DL,DLZC
MOV DH,0
MOV CX,0009H
MOV BX,OFFSET BOOTQ2
MOV AX,0201H
INT 13H
JNB V45RPC
DEC RPJS
JZ V45RPB
MOV AH,0
INT 13H
JMP V45RPA
V45RPB: JMP V45DPC
V45RPC: MOV SI,OFFSET BOOTQ2
MOV AX,[SI+1FEH]
CMP AX,0AA55H
JZ V45RPD
JMP V45JG1
V45RPD: MOV RPJS,3
V45RPE: MOV DL,DLZC
MOV DH,0
MOV CX,0001
MOV AX,0301H
MOV BX,OFFSET BOOTQ2
INT 13H
JNB V45RPG
DEC RPJS
JZ V45RPF
MOV AH,0
INT 13H
JMP V45RPE
V45RPF: JMP V45XPC
V45RPG: MOV SI,OFFSET BOOTQ2
MOV AX,[SI+15H]
CMP AX,02FDH
JZ K360
CMP AX,07F9H
JZ M12
CMP AX,09F0H
JZ M14
JMP V45JG1
K360: MOV CX,10H
MOV AL,0E5H
K360A: MOV [SI],AL
ADD SI,20H
LOOP K360A
CALL W0009
JNB K360B
JMP V45XPC
K360B: JMP V45END0
;
M12: MOV RPJS,3
M12A: MOV DL,DLZC
MOV DH,0
MOV CX,0002H
MOV BX,OFFSET BOOTQ2
MOV AX,0201H
INT 13H
JNB M12B
DEC RPJS
JZ M12AA
MOV AH,0
INT 13H
JMP M12A
M12AA: JMP V45DPC
M12B: CALL W0009
JNB M12C
JMP V45XPC
M12C: JMP V45END0
;
M14: MOV RPJS,3
M14A: MOV DL,DLZC
MOV DH,0
MOV CX,0012H
MOV BX,OFFSET BOOTQ2
MOV AX,0201H
INT 13H
JNB M14B
DEC RPJS
JZ M14AA
MOV AH,0
INT 13H
JMP M14A
M14AA: JMP V45DPC
M14B: CALL W0009
JNB M14C
JMP V45XPC
M14C: JMP V45END0
;
V45END3: MOV FHM,3
JMP V45ZE
V45END2: MOV FHM,2
MOV XSAXZC,0
JMP V45ZE
V45END0: MOV FHM,0
MOV XSAXZC,0
JMP V45ZE
;
V45JG1: CALL JGBTBDA
JMP V45ZE2
V45DPC: MOV DX,OFFSET DPCZF
JMP V45ZE1
V45XPC: MOV DX,OFFSET XPCZF
V45ZE1: MOV XSAXZC,DX
V45ZE2: MOV FHM,1
V45ZE: MOV AX,XSAXZC
MOV DX,DS
RET
V45 endp
;
W0009 PROC NEAR
MOV RPJS,3
W09A: MOV DL,DLZC
MOV DH,0
MOV CX,0009H
MOV BX,OFFSET BOOTQ2
MOV AX,0301H
INT 13H
JNB W09C
DEC RPJS
JZ W09B
MOV AH,0
INT 13H
JMP W09A
W09B: STC
JMP W09D
W09C: CLC
W09D: RET
W0009 ENDP
;-V47
V47 proc near
V47START:
PUSH DS
POP ES
CMP DLZC,02
JB V47L02
MOV SI,OFFSET BOOTQ2
MOV DX,[SI+1BEH]
MOV CX,[SI+1C0H]
MOV BX,OFFSET BOOTQ1
MOV AX,0201H
INT 13H
JNB V47L02
V47L01: JMP V47DPC
;
V47L02: MOV SI,OFFSET BOOTQ1
V47L03: CLD
MOV DI,OFFSET V47TZMA
ADD SI,123H
MOV CX,14H
REPZ CMPSB
JZ V47L04
JMP V47END2
V47L04: CMP DLZC,02
JNB V47YP
JMP V47RP
;
V47YP: MOV SI,OFFSET BOOTQ2
MOV AL,[SI+1C0H]
CMP AL,2
JZ V47YPA
JMP V47JG1
V47YPA: MOV BYTE PTR [SI+1BFH],1
MOV BYTE PTR [SI+1C0H],1
MOV BYTE PTR [SI+1C1H],0
MOV DX,0080H
MOV CX,0001H
MOV BX,OFFSET BOOTQ2
MOV AX,0301H
INT 13H
JNB V47YPB
JMP V47XPC
V47YPB: JMP V47END0
;
V47RP: MOV SI,OFFSET BOOTQ1
MOV AX,[SI+0BH]
MOV V47GZWA,AX
MOV CX,V47GZWA
MOV BX,OFFSET BOOTQ2
MOV RPJS,3
MOV DL,DLZC
MOV DH,1
V47RPA: MOV AX,0201H
INT 13H
JNB V47RPC
DEC RPJS
JZ V47RPB
MOV AH,0
INT 13H
JMP V47RPA
V47RPB: JMP V47DPC
;
V47RPC: MOV SI,OFFSET BOOTQ2
MOV AX,[SI+1FEH]
CMP AX,0AA55H
JZ V47RPD
JMP V47JG1
V47RPD: MOV RPJS,3
V47RPE: MOV DL,DLZC
MOV DH,0
MOV CX,0001H
MOV BX,OFFSET BOOTQ2
MOV AX,0301H
INT 13H
JNB V47RPG
DEC RPJS
JZ V47RPF
MOV AH,0
INT 13H
JMP V47RPE
V47RPF: JMP V47XPC
V47RPG: MOV SI,OFFSET BOOTQ1
MOV CX,10H
MOV AL,0E5H
V47RPH: MOV [SI],AL
ADD SI,20H
LOOP V47RPH
MOV RPJS,3
V47RPI: MOV DL,DLZC
MOV DH,1
MOV CX,V47GZWA
MOV BX,OFFSET BOOTQ1
MOV AX,0301H
INT 13H
JNB V47END0
DEC RPJS
JZ V47RPJ
MOV AH,0
INT 13H
JMP V47RPI
V47RPJ: JMP V47XPC
;
V47END2: MOV FHM,2
MOV XSAXZC,0
JMP V47ZE
V47END0: MOV FHM,0
MOV XSAXZC,0
JMP V47ZE
;
V47JG1: CALL JGBTBDA
JMP V47ZE2
V47DPC: MOV DX,OFFSET DPCZF
JMP V47ZE1
V47XPC: MOV DX,OFFSET XPCZF
V47ZE1: MOV XSAXZC,DX
V47ZE2: MOV FHM,1
V47ZE: MOV AX,XSAXZC
MOV DX,DS
RET
V47 endp
;-V48
V48 proc near
V48START:
PUSH DS
POP ES
CALL BCSX
JNB V48KS1
MOV FHM,1
JMP V48ZE4
V48KS1: CALL GBSX
JNB V48KS2
MOV FHM,1
JMP V48ZE4
V48KS2: CALL WJXOPEN
JNB V48KS3
JMP V48OPENC
V48KS3: CALL BCSJRQ
JNB V48KS4
JMP V48ZE2
V48KS4: CALL WJZZM
JNB V48KS5
JMP V48CZC
MOV WJCD1,DX
MOV WJCD2,AX
V48KS5:
MOV ENDJS,0
MOV AX,4202H
MOV BX,WJH
MOV CX,0FFFFH
MOV DX,-0627H
ADD DX,0059H
SUB DX,20H
INT 21h
JNB V48TZ1
JMP V48CZC
V48TZ1: LEA DX,BDTZHCQ
MOV BX,WJH
MOV cx,14H
ADD CX,20H
MOV ah,3fh
INT 21h
JNB V48TZ2
JMP V48DWJC
V48TZ2: LEA DI,BDTZHCQ
ADD DI,20H
V48TZ3: PUSH DI
MOV SI,OFFSET V48TZMA
MOV CX,14H
REPZ CMPSB
CMP CX,0
JZ V48WJC
POP DI
DEC DI
INC ENDJS
CMP ENDJS,20h
JNZ V48TZ3
JMP V48END2
V48WJC: POP DI
CMP WJTYPE,'E'
JNZ V48C1
JMP V48E1
;
V48C1:
MOV AX,4202h
MOV cx,0ffffh
MOV DX,-0627H
ADD DX,0000h
SUB DX,ENDJS
MOV BX,wjh
INT 21h
JNB V48C2
JMP V48CZC
V48C2: MOV DX,offset BDTZHCQ
MOV si,DX
MOV BX,wjh
MOV cx,40h
MOV ah,3fh
INT 21h
JNB V48C3
JMP V48DWJC
V48C3:
MOV SI,OFFSET BDTZHCQ
ADD SI,0BH
MOV DI,OFFSET WJTQ
MOV CX,000CH
V48C4: LODSB
STOSB
LOOP V48C4
CALL WJZZS
MOV DX,OFFSET WJTQ
MOV CX,000CH
MOV AH,40H
INT 21H
JNB V48C6
JMP V48XWJC
V48C6: JMP V48E6
;
V48E1:
CALL WJZZS
MOV AX,WJH
MOV BX,AX
MOV AH,3FH
MOV CX,0018H
MOV DX,OFFSET WJTQ
INT 21H
JNB V48E4
JMP V48DWJC
V48E4:
MOV AX,4202h
MOV cx,0ffffh
MOV DX,-0627H
ADD DX,0000h
SUB DX,ENDJS
MOV BX,wjh
INT 21h
JNB V48E4A
JMP V48CZC
V48E4A: MOV DX,offset BDTZHCQ
MOV si,DX
MOV BX,wjh
MOV cx,40h
MOV ah,3fh
INT 21h
JNB V48E5
JMP V48DWJC
V48E5:
MOV SI,OFFSET BDTZHCQ
MOV DI,OFFSET WJTQ
MOV AX,[si+23h]
MOV [di+16h],AX
MOV AX,[si+25h]
MOV [di+14h],AX
MOV AX,[si+31h]
MOV [di+0Eh],AX
MOV AX,[si+33h]
MOV [di+10h],AX
MOV AX,WJCD2
MOV DX,WJCD1
SUB AX,0627H
SBB DX,0
SUB AX,ENDJS
SBB DX,0
MOV CX,0200H
DIV CX
OR DX,DX
JZ V48E5A
INC AX
V48E5A: MOV [DI+02],DX
MOV [DI+04],AX
CALL WJZZS
MOV AX,WJH
MOV BX,AX
MOV AH,40H
MOV CX,0018H
MOV DX,OFFSET WJTQ
INT 21H
JNB V48E6
JMP V48XWJC
V48E6:
MOV AX,4202H
MOV CX,0FFFFH
MOV DX,-627H
SUB DX,ENDJS
MOV BX,WJH
INT 21H
JNB V48E7
JMP V48CZC
V48E7: MOV AH,40H
MOV BX,WJH
MOV DX,0
MOV CX,0
INT 21H
JNB V48END0
JMP V48XWJC
;
V48END2: MOV FHM,2
MOV XSAXZC,0
JMP V48ZE1
V48END0: MOV FHM,0
MOV XSAXZC,0
JMP V48ZE1
;
V48OPENC: MOV FHM,1
MOV DX,OFFSET OPENCZF
MOV XSAXZC,DX
JMP V48ZE3
;
V48CZC: MOV DX,OFFSET CZCZF
JMP V48XSL
V48DWJC: MOV DX,OFFSET DWJCZF
JMP V48XSL
V48XWJC: MOV DX,OFFSET XWJCZF
V48XSL: MOV XSAXZC,DX
V48END1: MOV FHM,1
V48ZE1: CALL HFSJRQ
V48ZE2: CALL CLOFIL
V48ZE3: CALL HFSX
V48ZE4: MOV AX,XSAXZC
MOV DX,DS
RET
V48 ENDP
;-V49
V49 PROC NEAR
V49START:
PUSH DS
POP ES
CALL BCSX
JNB V49KS1
MOV FHM,1
JMP V49ZE4
V49KS1: CALL GBSX
JNB V49KS2
MOV FHM,1
JMP V49ZE4
V49KS2: CALL WJXOPEN
JNB V49KS3
JMP V49OPENC
V49KS3: CALL BCSJRQ
JNB V49KS4
JMP V49ZE2
V49KS4: CALL WJZZM
JNB V49KS5
JMP V49CZC
MOV WJCD1,DX
MOV WJCD2,AX
V49KS5: CALL WJZZS
;
MOV DX,OFFSET WJTQ
MOV CX,20H
MOV AH,3FH
MOV BX,WJH
INT 21H
JNB V49WJ1
JMP V49DWJC
V49WJ1: MOV DX,0
MOV SI,OFFSET WJTQ
MOV AL,[SI]
CMP AL,0E9H
JNZ V49TZ1
MOV AX,[SI+1]
ADD AX,3
SUB AX,0207H
JMP V49TZ4
V49TZ1: CMP AL,0BEH
JNZ V49TZ2
MOV AX,[SI+1]
SUB AX,0100H
JMP V49TZ4
V49TZ2: CMP AL,4DH
JNZ V49TZ3
MOV AX,[SI+16H]
MOV CL,4
ROL AX,CL
MOV DX,AX
AND DX,000FH
AND AX,0FFF0H
MOV BX,[SI+14H]
SUB BX,2CH
ADD AX,BX
ADC DX,0
MOV BX,[SI+8]
SHL BX,CL
ADD AX,BX
ADC DX,0
JMP V49TZ4
V49TZ3: JMP V49END2
V49TZ4: MOV WJCD1,DX
MOV WJCD2,AX
ADD AX,00E1H
ADC DX,0
MOV BX,WJH
MOV CX,DX
MOV DX,AX
MOV AX,4200H
INT 21H
JNB V49TZ5
JMP V49CZC
V49TZ5: LEA DX,BDTZHCQ
MOV BX,WJH
MOV CX,13H
MOV AH,3FH
INT 21H
JNB V49TZ6
JMP V49DWJC
V49TZ6: MOV DI,OFFSET BDTZHCQ
MOV SI,OFFSET V49TZMA
MOV CX,13H
REPE CMPSB
CMP CX,0
JZ V49WJ2
JMP V49END2
;
V49WJ2: MOV CX,WJCD1
MOV DX,WJCD2
ADD DX,0524H
ADC CX,0
MOV BX,WJH
MOV AX,4200H
INT 21H
JNB V49WJ3
JMP V49CZC
V49WJ3: MOV DX,OFFSET BDTZHCQ
MOV BX,WJH
MOV CX,20H
MOV AH,3FH
INT 21H
JNB V49WJ4
JMP V49DWJC
V49WJ4: CMP WJTYPE,'C'
JZ V49WC1
JMP V49WE1
;
V49WC1: MOV SI,OFFSET BDTZHCQ
MOV DI,OFFSET WJTQ
MOV CX,0005H
CLD
V49WC2: LODSB
XOR AL,CL
STOSB
LOOP V49WC2
CALL WJZZS
MOV DX,OFFSET WJTQ
MOV CX,0005H
MOV AH,40H
INT 21H
JNB V49WC3
JMP V49XWJC
V49WC3: JMP V49WJ6
;
V49WE1: MOV SI,OFFSET BDTZHCQ
MOV DI,OFFSET WJTQ
ADD DI,0EH
MOV CX,000AH
CLD
V49WE2: LODSB
XOR AL,CL
STOSB
LOOP V49WE2
MOV AX,WJCD2
MOV DX,WJCD1
MOV CX,0200H
DIV CX
OR DX,DX
JZ V49WE3
INC AX
V49WE3: MOV SI,OFFSET WJTQ
MOV [SI+02],DX
MOV [SI+04],AX
CALL WJZZS
MOV BX,WJH
MOV AH,40H
MOV CX,0018H
MOV DX,OFFSET WJTQ
INT 21H
JNB V49WJ6
JMP V49XWJC
V49WJ6:
MOV AX,4200H
MOV CX,WJCD1
MOV DX,WJCD2
MOV BX,WJH
INT 21H
JNB V49WJ7
JMP V49CZC
V49WJ7: MOV AH,40H
MOV BX,WJH
MOV DX,0
MOV CX,0
INT 21H
JNB V49WJ8
JMP V49XWJC
V49WJ8: JMP V49END0
;
V49END2: MOV FHM,2
MOV XSAXZC,0
JMP V49ZE1
V49END0: MOV FHM,0
MOV XSAXZC,0
JMP V49ZE1
;
V49OPENC: MOV FHM,1
MOV DX,OFFSET OPENCZF
MOV XSAXZC,DX
JMP V49ZE3
;
V49CZC: MOV DX,OFFSET CZCZF
JMP V49XSL
V49DWJC: MOV DX,OFFSET DWJCZF
JMP V49XSL
V49XWJC: MOV DX,OFFSET XWJCZF
V49XSL: MOV XSAXZC,DX
V49END1: MOV FHM,1
V49ZE1: CALL HFSJRQ
V49ZE2: CALL CLOFIL
V49ZE3: CALL HFSX
V49ZE4: MOV AX,XSAXZC
MOV DX,DS
RET
V49 ENDP
;-V50
V50 PROC NEAR
V50START:
PUSH DS
POP ES
CALL BCSX
JNB V50KS1
MOV FHM,1
JMP V50ZE4
V50KS1: CALL GBSX
JNB V50KS2
MOV FHM,1
JMP V50ZE4
V50KS2: CALL WJXOPEN
JNB V50KS3
JMP V50OPENC
V50KS3: CALL BCSJRQ
JNB V50KS4
JMP V50ZE2
V50KS4: CALL WJZZM
JNB V50KS5
JMP V50CZC
MOV WJCD1,DX
MOV WJCD2,AX
V50KS5: CALL WJZZS
;
MOV DX,OFFSET WJTQ
MOV CX,20H
MOV AH,3FH
MOV BX,WJH
INT 21H
JNB V50WJ1
JMP V50DWJC
V50WJ1:
CMP WJTYPE,'E'
JNZ V50TC1
JMP V50TE1
V50TC1:
MOV ENDJS,0
MOV AX,4200H
MOV BX,WJH
MOV CX,0
MOV DX,00D2H
INT 21H
JNB V50TC2
JMP V50CZC
V50TC2: MOV DX,OFFSET BDTZHCQ
MOV BX,WJH
MOV CX,19H
MOV AH,3FH
INT 21H
JNB V50TC3
JMP V50DWJC
V50TC3: MOV DI,OFFSET BDTZHCQ
MOV SI,OFFSET V50TZMA
MOV CX,19H
REPE CMPSB
CMP CX,0
JZ V50TC4
JMP V50END2
V50TC4: MOV AX,4202H
MOV BX,WJH
MOV CX,0FFFFH
MOV DX,-4
SUB DX,20H
INT 21H
JNB V50TC5
JMP V50CZC
V50TC5: MOV DX,OFFSET BDTZHCQ
MOV BX,WJH
MOV CX,4
ADD CX,20H
MOV AH,3FH
INT 21H
JNB V50TC6
JMP V50DWJC
V50TC6: MOV DI,OFFSET BDTZHCQ
ADD DI,20H
V50TC7: PUSH DI
MOV SI,OFFSET V50TZMB
MOV CX,4
REPZ CMPSB
JZ V50HC1
POP DI
DEC DI
INC ENDJS
CMP ENDJS,20H
JB V50TC7
JMP V50END1
V50HC1: POP DI
MOV AX,4200H
MOV CX,0
MOV DX,0036H
MOV BX,WJH
INT 21H
JNB V50HC2
JMP V50CZC
V50HC2: MOV DX,OFFSET BDTZHCQ
MOV SI,DX
MOV BX,WJH
MOV CX,20H
MOV AH,3FH
INT 21H
JNB V50HC3
JMP V50DWJC
V50HC3: MOV SI,OFFSET BDTZHCQ
LODSW
ADD AX,0553H
ADD AX,4
ADD AX,ENDJS
CMP AX,WJCD2
JZ V50HC4
JMP V50END2
V50HC4:
CALL WJZZS
MOV DX,0
MOV CX,WJCD2
MOV BX,WJH
MOV AH,3FH
PUSH DS
MOV DS,ESZC1
INT 21H
POP DS
JNB V50HC5
JMP V50DWJC
V50HC5: CALL WJZZS
MOV DX,553H
MOV CX,WJCD2
SUB CX,553H
SUB CX,ENDJS
SUB CX,4
MOV BX,WJH
MOV AH,40H
PUSH DS
MOV DS,ESZC1
INT 21H
POP DS
JNB V50HC6
JMP V50XWJC
V50HC6: MOV CX,0
MOV DX,0
MOV AH,40H
INT 21H
JNB V50HC7
JMP V50XWJC
V50HC7: JMP V50END0
;
V50TE1:
MOV ENDJS,0
MOV AX,4202H
MOV BX,WJH
MOV CX,0FFFFH
MOV DX,-0553H
ADD DX,00D2H
SUB DX,20H
INT 21H
JNB V50TE2
JMP V50CZC
V50TE2: MOV DX,OFFSET BDTZHCQ
MOV BX,WJH
MOV CX,19H
ADD CX,20H
MOV AH,3FH
INT 21H
JNB V50TE3
JMP V50DWJC
V50TE3: MOV DI,OFFSET BDTZHCQ
ADD DI,20H
V50TE4: PUSH DI
MOV SI,OFFSET V50TZMA
MOV CX,19H ;13H
REPE CMPSB
CMP CX,0
JZ V50HE1
POP DI
DEC DI
INC ENDJS
CMP ENDJS,20H
JZ V50TE5
JMP V50TE4
V50TE5: JMP V50END2
V50HE1: POP DI
MOV AX,4202H
MOV CX,0FFFFH
MOV DX,-0553H
ADD DX,000EH
SUB DX,ENDJS
MOV BX,WJH
INT 21H
JNB V50HE2
JMP V50CZC
V50HE2: MOV DX,OFFSET BDTZHCQ
MOV SI,DX
MOV BX,WJH
MOV CX,20H
MOV AH,3FH
INT 21H
JNB V50HE3
JMP V50DWJC
V50HE3:
MOV SI,OFFSET BDTZHCQ
MOV DI,OFFSET WJTQ
LODSW
MOV [DI+10H],AX
LODSW
MOV [DI+0EH],AX
LODSW
MOV [DI+14H],AX
LODSW
MOV [DI+16H],AX
MOV AX,WJCD2
MOV DX,WJCD1
SUB AX,0553H
SBB DX,0
SUB AX,ENDJS
SBB DX,0
MOV CX,0200H
DIV CX
OR DX,DX
JZ V50HE4
INC AX
V50HE4: MOV SI,OFFSET WJTQ
MOV [SI+02],DX
MOV [SI+04],AX
;
CALL WJZZS
MOV AX,WJH
MOV BX,AX
MOV AH,40H
MOV CX,0018H
MOV DX,OFFSET WJTQ
INT 21H
JNB V50HE5
JMP V50XWJC
V50HE5:
MOV AX,4202H
MOV CX,0FFFFH
MOV DX,-553H
SUB DX,ENDJS
MOV BX,WJH
INT 21H
JNB V50HE6
JMP V50CZC
V50HE6: MOV AH,40H
MOV BX,WJH
MOV DX,0
MOV CX,0
INT 21H
JNB V50HE7
JMP V50XWJC
V50HE7: JMP V50END0
;
V50END2: MOV FHM,2
MOV XSAXZC,0
JMP V50ZE1
V50END0: MOV FHM,0
MOV XSAXZC,0
JMP V50ZE1
;
V50OPENC: MOV FHM,1
MOV DX,OFFSET OPENCZF
MOV XSAXZC,DX
JMP V50ZE3
;
V50CZC: MOV DX,OFFSET CZCZF
JMP V50XSL
V50DWJC: MOV DX,OFFSET DWJCZF
JMP V50XSL
V50XWJC: MOV DX,OFFSET XWJCZF
V50XSL: MOV XSAXZC,DX
V50END1: MOV FHM,1
V50ZE1: CALL HFSJRQ
V50ZE2: CALL CLOFIL
V50ZE3: CALL HFSX
V50ZE4: MOV AX,XSAXZC
MOV DX,DS
RET
V50 ENDP
;KA_CODE
DB 4H DUP (0AAH)
KILL ENDP
SEG_C ENDS
END START
;