Borland Programmer's Resource

home *** CD-ROM | disk | FTP | other *** search

/ Borland Programmer's Resource / Borland_Programmers_Resource_CD_1995.iso / fonts / cw_src / install / cwsetup.asm < prev next >

Wrap

Assembly Source File | 1995-05-19 | 26.8 KB | 1,600 lines

; Static Name Aliases ; ; $S1048_szFonts EQU szFonts ; $S1049_szSects EQU szSects ; $S1050_szCards EQU szCards TITLE cwsetup.c .8087 INCLUDELIB SLIBCE _TEXT SEGMENT WORD PUBLIC 'CODE' _TEXT ENDS _DATA SEGMENT WORD PUBLIC 'DATA' _DATA ENDS CONST SEGMENT WORD PUBLIC 'CONST' CONST ENDS _BSS SEGMENT WORD PUBLIC 'BSS' _BSS ENDS DGROUP GROUP CONST, _BSS, _DATA ASSUME DS: DGROUP, SS: DGROUP PUBLIC _szSetupInf PUBLIC _patch EXTRN SETDLGITEMTEXT:FAR EXTRN GETDLGITEMTEXT:FAR EXTRN _wsprintf:FAR EXTRN _getcwd:NEAR EXTRN _toupper:NEAR EXTRN _memset:NEAR EXTRN _strcat:NEAR EXTRN _strcmp:NEAR EXTRN _strcpy:NEAR EXTRN SETFOCUS:FAR EXTRN _strlen:NEAR EXTRN MAKEPROCINSTANCE:FAR EXTRN __aNchkstk:NEAR EXTRN _strncmp:NEAR EXTRN FREEPROCINSTANCE:FAR EXTRN MESSAGEBOX:FAR EXTRN DIALOGBOX:FAR EXTRN _LOPEN:FAR EXTRN _LCLOSE:FAR EXTRN GETPRIVATEPROFILESTRING:FAR EXTRN _LCREAT:FAR EXTRN ENDDIALOG:FAR EXTRN GETWINDOWSDIRECTORY:FAR EXTRN GETDLGITEM:FAR EXTRN _LREAD:FAR EXTRN _LWRITE:FAR EXTRN _hInst:WORD _BSS SEGMENT COMM NEAR PLOCALHEAP: BYTE: 2 COMM NEAR _hMainWnd: BYTE: 2 COMM NEAR _szSrcPath: 1: 256 COMM NEAR _szDstPath: 1: 256 COMM NEAR _szSrcFile: 1: 256 COMM NEAR _szDstFile: 1: 256 COMM NEAR _szDiskName: 1: 256 COMM NEAR _szSetupFile: 1: 256 COMM NEAR _szSetupStr: 1: 256 COMM NEAR _cCpBuff: 1: 20480 COMM NEAR _cFilBuff: 1: 5120 _BSS ENDS EXTRN _szTitle:BYTE _BSS SEGMENT COMM NEAR _szErrMessage: 1: 256 _BSS ENDS _DATA SEGMENT $SG1076 DB 'CyrWin distribution disk #1', 00H $SG1077 DB 'FLOPPY', 00H $SG1081 DB 'WIN.INI', 00H $SG1082 DB 'WIN.BAK', 00H $SG1084 DB 'make backup of win.ini file', 00H $SG1085 DB 'SYSTEM.INI', 00H $SG1086 DB 'SYSTEM.BAK', 00H $SG1088 DB 'make backup of system.ini file', 00H $SG1090 DB 'setup information file', 00H $SG1091 DB 00H $SG1092 DB 'nfiles', 00H $SG1096 DB 00H $SG1097 DB 'nfiles', 00H $SG1101 DB 00H $SG1102 DB 'disks', 00H $SG1108 DB 'FLOPPY', 00H $SG1114 DB 'system.ini', 00H $SG1115 DB 'fonts.fon', 00H $SG1116 DB 'boot', 00H $SG1123 DB 'Cannot identify video adapter', 00H $SG1127 DB '.FON', 00H $SG1128 DB 00H $SG1129 DB 'sfonts', 00H $SG1133 DB 00H $SG1134 DB 'disks', 00H $SG1136 DB 'iErr= %d', 00H $SG1138 DB 'FLOPPY', 00H $SG1144 DB '????', 00H $SG1145 DB '????', 00H $SG1146 DB 'iErr= %d', 00H $SG1147 DB 'File copied Ok', 00H $SG1148 DB 'next file', 00H ORG $+101 $SG1167 DB 'Font Name', 00H ORG $+8 $SG1194 DB 'Copying file', 00H $SG1203 DB 00H $SG1204 DB 00H $SG1216 DB 'Error opening file ', 00H $SG1218 DB 'Cannot create file ', 00H $SG1220 DB 'Error reading file ', 00H $SG1222 DB 'Error writing file ', 00H $SG1224 DB 'unknown error while copying', 00H ORG $-241 _szSetupInf DB 'cwsetup.inf', 00H $S1048_szFonts DB 'FIX', 00H DB 'SYS', 00H DB '866', 00H DB 00H DB 3 DUP(0) $S1049_szSects DB 'fixedfon.fon', 00H DB 'fonts.fon', 00H DB 3 DUP(0) DB 'oemfonts.fon', 00H DB 00H DB 12 DUP(0) $S1050_szCards DB 'CGA', 00H DB 'EGA', 00H DB 'VGA', 00H DB '8514' DB 00H DB 3 DUP(0) ORG $+10 _patch DB 'FONTRES', 00H _DATA ENDS _TEXT SEGMENT ASSUME CS: _TEXT ; Line 1 ; Line 14 ; Line 15 ; Line 16 ; Line 17 ; Line 18 ; Line 19 ; Line 84 PUBLIC _cwInst _cwInst PROC NEAR push bp mov bp,sp mov ax,276 call __aNchkstk ; iRetVal = -268 ; i = -270 ; lpfnProc = -264 ; cp = -260 ; bug = -276 ; iErr = -258 ; cps = -266 ; b = -256 ; pCard = -272 ; hWnd = 4 ; Line 95 mov ax,WORD PTR [bp+4] ;hWnd mov WORD PTR _hMainWnd,ax ; Line 96 mov ax,256 push ax sub cx,cx mov WORD PTR [bp-268],cx ;iRetVal push cx mov cx,OFFSET DGROUP:_szDstPath push cx call _memset add sp,6 ; Line 97 mov ax,OFFSET DGROUP:_szDstPath push ds push ax mov cx,256 push cx call FAR PTR GETWINDOWSDIRECTORY ; Line 98 mov ax,OFFSET DGROUP:_szDstPath push ax call _strlen add sp,2 mov bx,ax dec bx mov WORD PTR [bp-270],bx ;i cmp BYTE PTR _szDstPath[bx],92 je $I1069 inc bx mov WORD PTR [bp-270],bx ;i mov BYTE PTR _szDstPath[bx],92 inc bx mov WORD PTR [bp-270],bx ;i mov BYTE PTR _szDstPath[bx],0 $I1069: ; Line 99 mov ax,256 push ax sub ax,ax push ax mov ax,OFFSET DGROUP:_szSrcPath push ax call _memset add sp,6 ; Line 100 mov ax,256 push ax mov ax,OFFSET DGROUP:_szSrcPath push ax call _getcwd add sp,4 ; Line 101 $L20005: mov ax,OFFSET DGROUP:_szSrcPath push ax call _strlen add sp,2 mov bx,ax dec bx mov WORD PTR [bp-270],bx ;i cmp BYTE PTR _szSrcPath[bx],92 je $I1070 inc bx mov WORD PTR [bp-270],bx ;i mov BYTE PTR _szSrcPath[bx],92 inc bx mov WORD PTR [bp-270],bx ;i mov BYTE PTR _szSrcPath[bx],0 $I1070: ; Line 107 ; Line 108 mov ax,OFFSET DGROUP:_szSrcPath push ax mov ax,OFFSET DGROUP:_szSetupFile push ax call _strcpy add sp,4 ; Line 109 mov ax,OFFSET DGROUP:_szSetupInf push ax mov ax,OFFSET DGROUP:_szSetupFile push ax call _strcat add sp,4 ; Line 111 mov ax,OFFSET DGROUP:_szSetupFile push ds push ax sub ax,ax push ax call FAR PTR _LOPEN mov WORD PTR [bp-270],ax ;i or ax,ax jle $I1074 ; Line 112 ; Line 113 push ax call FAR PTR _LCLOSE ; Line 135 mov ax,OFFSET DGROUP:_szDstPath push ax mov cx,OFFSET DGROUP:_szSrcFile push cx call _strcpy add sp,4 mov ax,OFFSET DGROUP:_szDstPath push ax mov ax,OFFSET DGROUP:_szDstFile push ax call _strcpy add sp,4 ; Line 136 mov ax,OFFSET DGROUP:$SG1081 push ax mov ax,OFFSET DGROUP:_szSrcFile push ax call _strcat add sp,4 mov ax,OFFSET DGROUP:$SG1082 push ax mov ax,OFFSET DGROUP:_szDstFile push ax call _strcat add sp,4 ; Line 137 mov ax,OFFSET DGROUP:$SG1084 push ax mov ax,OFFSET DGROUP:_szDstFile push ax mov cx,OFFSET DGROUP:_szSrcFile push cx call _bCopyFile add sp,6 push ax mov ax,OFFSET DGROUP:_szDstFile push ax mov ax,OFFSET DGROUP:_szSrcFile push ax call _CopyErr add sp,6 or ax,ax je $I1083 $I1078: ; Line 127 sub ax,ax mov sp,bp pop bp ret nop $I1074: ; Line 117 ; Line 118 mov ax,OFFSET DGROUP:$SG1076 push ax mov ax,OFFSET DGROUP:_szDiskName push ax call _strcpy add sp,4 ; Line 119 mov ax,OFFSET FLOPPY mov dx,SEG FLOPPY push dx push ax push WORD PTR _hInst call FAR PTR MAKEPROCINSTANCE mov WORD PTR [bp-264],ax ;lpfnProc mov WORD PTR [bp-262],dx ; Line 120 push WORD PTR _hInst mov ax,OFFSET DGROUP:$SG1077 push ds push ax push WORD PTR [bp+4] ;hWnd push dx push WORD PTR [bp-264] ;lpfnProc call FAR PTR DIALOGBOX mov WORD PTR [bp-270],ax ;i ; Line 121 push WORD PTR [bp-262] push WORD PTR [bp-264] ;lpfnProc call FAR PTR FREEPROCINSTANCE ; Line 122 cmp WORD PTR [bp-270],0 ;i je $I1078 jmp $L20005 ; Line 139 $I1083: mov ax,OFFSET DGROUP:_szDstPath push ax mov cx,OFFSET DGROUP:_szSrcFile push cx call _strcpy add sp,4 mov ax,OFFSET DGROUP:_szDstPath push ax mov ax,OFFSET DGROUP:_szDstFile push ax call _strcpy add sp,4 ; Line 140 mov ax,OFFSET DGROUP:$SG1085 push ax mov ax,OFFSET DGROUP:_szSrcFile push ax call _strcat add sp,4 mov ax,OFFSET DGROUP:$SG1086 push ax mov ax,OFFSET DGROUP:_szDstFile push ax call _strcat add sp,4 ; Line 141 mov ax,OFFSET DGROUP:$SG1088 push ax mov ax,OFFSET DGROUP:_szDstFile push ax mov cx,OFFSET DGROUP:_szSrcFile push cx call _bCopyFile add sp,6 push ax mov ax,OFFSET DGROUP:_szDstFile push ax mov ax,OFFSET DGROUP:_szSrcFile push ax call _CopyErr add sp,6 or ax,ax je $JCC503 jmp $I1078 $JCC503: ; Line 143 mov ax,OFFSET DGROUP:_szSrcPath push ax mov ax,OFFSET DGROUP:_szSrcFile push ax call _strcpy add sp,4 mov ax,OFFSET DGROUP:_szSetupInf push ax mov cx,OFFSET DGROUP:_szSrcFile push cx call _strcat add sp,4 ; Line 144 mov ax,OFFSET DGROUP:_szDstPath push ax mov ax,OFFSET DGROUP:_szDstFile push ax call _strcpy add sp,4 mov ax,OFFSET DGROUP:_szSetupInf push ax mov ax,OFFSET DGROUP:_szDstFile push ax call _strcat add sp,4 ; Line 145 mov ax,OFFSET DGROUP:$SG1090 push ax mov ax,OFFSET DGROUP:_szDstFile push ax mov cx,OFFSET DGROUP:_szSrcFile push cx call _bCopyFile add sp,6 push ax mov ax,OFFSET DGROUP:_szDstFile push ax mov ax,OFFSET DGROUP:_szSrcFile push ax call _CopyErr add sp,6 or ax,ax je $JCC599 jmp $I1078 $JCC599: ; Line 147 mov ax,OFFSET DGROUP:_szDstPath push ax mov ax,OFFSET DGROUP:_szSetupFile push ax call _strcpy add sp,4 mov ax,OFFSET DGROUP:_szSetupInf push ax mov ax,OFFSET DGROUP:_szSetupFile push ax call _strcat add sp,4 ; Line 152 mov ax,5120 push ax sub ax,ax push ax mov ax,OFFSET DGROUP:_cFilBuff push ax call _memset add sp,6 ; Line 153 mov ax,OFFSET DGROUP:$SG1092 push ds push ax sub ax,ax push ax push ax mov ax,OFFSET DGROUP:$SG1091 push ds push ax mov ax,OFFSET DGROUP:_cFilBuff push ds push ax mov cx,5120 push cx mov cx,OFFSET DGROUP:_szSetupFile push ds push cx call FAR PTR GETPRIVATEPROFILESTRING ; Line 154 mov WORD PTR [bp-260],OFFSET DGROUP:_cFilBuff ;cp jmp $F1093 nop $FC1099: inc WORD PTR [bp-266] ;cps $F1098: mov bx,WORD PTR [bp-266] ;cps cmp BYTE PTR [bx],45 je $FC1099 ; Line 158 mov ax,256 push ax sub ax,ax push ax mov ax,OFFSET DGROUP:_szDiskName push ax call _memset add sp,6 mov bx,WORD PTR [bp-266] ;cps mov al,BYTE PTR [bx] mov BYTE PTR _szDiskName,al ; Line 159 mov ax,OFFSET DGROUP:$SG1102 push ds push ax mov ax,OFFSET DGROUP:_szDiskName push ds push ax mov ax,OFFSET DGROUP:$SG1101 push ds push ax mov ax,OFFSET DGROUP:_szDiskName push ds push ax mov ax,256 push ax mov ax,OFFSET DGROUP:_szSetupFile push ds push ax call FAR PTR GETPRIVATEPROFILESTRING $FC1104: inc WORD PTR [bp-266] ;cps mov bx,WORD PTR [bp-266] ;cps cmp BYTE PTR [bx],45 je $FC1104 ; Line 161 jmp SHORT $L20003 $NeedRetry1106: ; Line 165 ; Line 166 mov ax,OFFSET FLOPPY mov dx,SEG FLOPPY push dx push ax push WORD PTR _hInst call FAR PTR MAKEPROCINSTANCE mov WORD PTR [bp-264],ax ;lpfnProc mov WORD PTR [bp-262],dx ; Line 167 push WORD PTR _hInst mov ax,OFFSET DGROUP:$SG1108 push ds push ax push WORD PTR _hMainWnd push dx push WORD PTR [bp-264] ;lpfnProc call FAR PTR DIALOGBOX mov WORD PTR [bp-270],ax ;i ; Line 168 push WORD PTR [bp-262] push WORD PTR [bp-264] ;lpfnProc call FAR PTR FREEPROCINSTANCE ; Line 169 cmp WORD PTR [bp-270],0 ;i jne $JCC850 jmp $I1078 $JCC850: ; Line 170 ; Line 171 mov ax,OFFSET DGROUP:_szSrcPath push ax call _strlen add sp,2 mov bx,ax dec bx mov WORD PTR [bp-270],bx ;i cmp BYTE PTR _szSrcPath[bx],92 je $L20003 inc bx mov WORD PTR [bp-270],bx ;i mov BYTE PTR _szSrcPath[bx],92 inc bx mov WORD PTR [bp-270],bx ;i mov BYTE PTR _szSrcPath[bx],0 $L20003: mov ax,OFFSET DGROUP:_szSrcPath push ax mov cx,OFFSET DGROUP:_szSrcFile push cx call _strcpy add sp,4 push WORD PTR [bp-260] ;cp mov ax,OFFSET DGROUP:_szSrcFile push ax call _strcat add sp,4 ; Line 162 mov ax,OFFSET DGROUP:_szDstPath push ax mov ax,OFFSET DGROUP:_szDstFile push ax call _strcpy add sp,4 push WORD PTR [bp-260] ;cp mov ax,OFFSET DGROUP:_szDstFile push ax call _strcat add sp,4 ; Line 164 push WORD PTR [bp-266] ;cps mov ax,OFFSET DGROUP:_szDstFile push ax mov ax,OFFSET DGROUP:_szSrcFile push ax call _bCopyFile add sp,6 mov WORD PTR [bp-258],ax ;iErr dec ax jne $JCC978 jmp $NeedRetry1106 $JCC978: cmp WORD PTR [bp-258],0 ;iErr je $I1113 ; Line 177 ; Line 178 $L20002: push WORD PTR [bp-258] ;iErr mov ax,OFFSET DGROUP:_szDstFile push ax mov ax,OFFSET DGROUP:_szSrcFile push ax call _CopyErr add sp,6 jmp $I1078 ; Line 180 ; Line 181 nop $I1113: push WORD PTR [bp-260] ;cp call _strlen add sp,2 inc ax add WORD PTR [bp-260],ax ;cp $F1093: mov bx,WORD PTR [bp-260] ;cp cmp BYTE PTR [bx],0 je $FB1095 ; Line 155 ; Line 156 mov ax,OFFSET DGROUP:$SG1097 push ds push ax push ds push bx mov ax,OFFSET DGROUP:$SG1096 push ds push ax mov ax,OFFSET DGROUP:_szSetupStr push ds push ax mov cx,256 push cx mov cx,OFFSET DGROUP:_szSetupFile push ds push cx call FAR PTR GETPRIVATEPROFILESTRING ; Line 157 mov WORD PTR [bp-266],OFFSET DGROUP:_szSetupStr ;cps jmp $F1098 $FB1095: ; Line 188 mov ax,OFFSET DGROUP:$SG1116 push ds push ax mov ax,OFFSET DGROUP:$SG1115 push ds push ax sub ax,ax push ax push ax lea ax,WORD PTR [bp-256] ;b push ss push ax mov ax,255 push ax mov ax,OFFSET DGROUP:$SG1114 push ds push ax call FAR PTR GETPRIVATEPROFILESTRING ; Line 189 mov WORD PTR [bp-272],OFFSET DGROUP:$S1050_szCards ;pCard jmp SHORT $F1117 ; Line 194 $FC1118: push WORD PTR [bp-272] ;pCard call _strlen add sp,2 inc ax add WORD PTR [bp-272],ax ;pCard $F1117: mov bx,WORD PTR [bp-272] ;pCard cmp BYTE PTR [bx],0 je $FB1119 ; Line 190 ; Line 192 push bx call _strlen add sp,2 push ax push WORD PTR [bp-272] ;pCard lea ax,WORD PTR [bp-256] ;b push ax call __strup add sp,2 push ax call _strncmp add sp,6 or ax,ax jne $FC1118 ; Line 193 $FB1119: ; Line 195 mov bx,WORD PTR [bp-272] ;pCard cmp BYTE PTR [bx],0 jne $I1122 ; Line 196 ; Line 197 push WORD PTR _hMainWnd mov ax,OFFSET DGROUP:$SG1123 push ds push ax mov ax,OFFSET _szTitle push ds push ax sub ax,ax push ax call FAR PTR MESSAGEBOX jmp $I1078 ; Line 199 ; Line 204 $I1122: mov WORD PTR [bp-260],OFFSET DGROUP:$S1048_szFonts ;cp mov bx,WORD PTR [bp-260] ;cp cmp BYTE PTR [bx],0 jne $JCC1223 jmp $FB1126 $JCC1223: ; Line 205 ; Line 206 push WORD PTR [bp-272] ;pCard lea ax,WORD PTR [bp-256] ;b push ax call _strcpy add sp,4 push WORD PTR [bp-260] ;cp lea ax,WORD PTR [bp-256] ;b push ax call _strcat add sp,4 mov ax,OFFSET DGROUP:$SG1127 push ax lea ax,WORD PTR [bp-256] ;b push ax call _strcat add sp,4 ; Line 207 mov ax,OFFSET DGROUP:$SG1129 push ds push ax lea ax,WORD PTR [bp-256] ;b push ss push ax mov ax,OFFSET DGROUP:$SG1128 push ds push ax mov ax,OFFSET DGROUP:_szSetupStr push ds push ax mov cx,256 push cx mov cx,OFFSET DGROUP:_szSetupFile push ds push cx call FAR PTR GETPRIVATEPROFILESTRING ; Line 208 mov WORD PTR [bp-266],OFFSET DGROUP:_szSetupStr ;cps jmp SHORT $F1130 $FC1131: inc WORD PTR [bp-266] ;cps $F1130: mov bx,WORD PTR [bp-266] ;cps cmp BYTE PTR [bx],45 je $FC1131 ; Line 209 mov ax,256 push ax sub ax,ax push ax mov ax,OFFSET DGROUP:_szDiskName push ax call _memset add sp,6 mov bx,WORD PTR [bp-266] ;cps mov al,BYTE PTR [bx] mov BYTE PTR _szDiskName,al ; Line 210 mov ax,OFFSET DGROUP:$SG1134 push ds push ax mov ax,OFFSET DGROUP:_szDiskName push ds push ax mov ax,OFFSET DGROUP:$SG1133 push ds push ax mov ax,OFFSET DGROUP:_szDiskName push ds push ax mov ax,256 push ax mov ax,OFFSET DGROUP:_szSetupFile push ds push ax call FAR PTR GETPRIVATEPROFILESTRING ; Line 211 jmp SHORT $L20004 nop $NeedSfRetry1135: ; Line 216 ; Line 217 mov ax,OFFSET FLOPPY mov dx,SEG FLOPPY push dx push ax push WORD PTR _hInst call FAR PTR MAKEPROCINSTANCE mov WORD PTR [bp-264],ax ;lpfnProc mov WORD PTR [bp-262],dx ; Line 218 push WORD PTR _hInst mov ax,OFFSET DGROUP:$SG1138 push ds push ax push WORD PTR _hMainWnd push dx push WORD PTR [bp-264] ;lpfnProc call FAR PTR DIALOGBOX mov WORD PTR [bp-270],ax ;i ; Line 219 push WORD PTR [bp-262] push WORD PTR [bp-264] ;lpfnProc call FAR PTR FREEPROCINSTANCE ; Line 220 cmp WORD PTR [bp-270],0 ;i jne $JCC1462 jmp $I1078 $JCC1462: ; Line 221 ; Line 222 mov ax,OFFSET DGROUP:_szSrcPath push ax call _strlen add sp,2 mov bx,ax dec bx mov WORD PTR [bp-270],bx ;i cmp BYTE PTR _szSrcPath[bx],92 je $L20004 inc bx mov WORD PTR [bp-270],bx ;i mov BYTE PTR _szSrcPath[bx],92 inc bx mov WORD PTR [bp-270],bx ;i mov BYTE PTR _szSrcPath[bx],0 $L20004: mov ax,OFFSET DGROUP:_szSrcPath push ax mov cx,OFFSET DGROUP:_szSrcFile push cx call _strcpy add sp,4 lea ax,WORD PTR [bp-256] ;b push ax mov cx,OFFSET DGROUP:_szSrcFile push cx call _strcat add sp,4 ; Line 212 mov ax,OFFSET DGROUP:_szDstPath push ax mov ax,OFFSET DGROUP:_szDstFile push ax call _strcpy add sp,4 lea ax,WORD PTR [bp-256] ;b push ax mov ax,OFFSET DGROUP:_szDstFile push ax call _strcat add sp,4 ; Line 214 mov ax,OFFSET DGROUP:_szSrcFile push ax call _pFontName add sp,2 push ax mov ax,OFFSET DGROUP:_szDstFile push ax mov ax,OFFSET DGROUP:_szSrcFile push ax call _bCopyFile add sp,6 mov WORD PTR [bp-258],ax ;iErr push ax mov cx,OFFSET DGROUP:$SG1136 push ds push cx mov cx,OFFSET DGROUP:_szDiskName push ds push cx call FAR PTR _wsprintf add sp,10 push WORD PTR _hMainWnd mov ax,OFFSET DGROUP:_szDiskName push ds push ax sub ax,ax push ax push ax mov ax,16 push ax call FAR PTR MESSAGEBOX ; Line 215 cmp WORD PTR [bp-258],1 ;iErr jne $JCC1644 jmp $NeedSfRetry1135 $JCC1644: ; Line 228 ; Line 229 push WORD PTR _hMainWnd mov ax,OFFSET DGROUP:$SG1145 push ds push ax mov ax,OFFSET DGROUP:$SG1144 push ds push ax mov ax,16 push ax call FAR PTR MESSAGEBOX ; Line 230 push WORD PTR [bp-258] ;iErr mov ax,OFFSET DGROUP:$SG1146 push ds push ax mov ax,OFFSET DGROUP:_szDiskName push ds push ax call FAR PTR _wsprintf add sp,10 push WORD PTR _hMainWnd mov ax,OFFSET DGROUP:_szDiskName push ds push ax sub ax,ax push ax push ax mov ax,16 push ax call FAR PTR MESSAGEBOX jmp $L20002 nop $FB1126: ; Line 237 mov ax,1 ; Line 238 mov sp,bp pop bp ret nop _cwInst ENDP ; Line 248 PUBLIC _pFontName _pFontName PROC NEAR push bp mov bp,sp mov ax,2 call __aNchkstk push di push si ; flabel = -2 ; register si = i ; pFont = 4 ; Line 252 mov ax,20480 push ax sub ax,ax push ax mov cx,OFFSET DGROUP:_cCpBuff push cx call _memset add sp,6 ; Line 254 push ds push WORD PTR [bp+4] ;pFont sub ax,ax push ax call FAR PTR _LOPEN mov WORD PTR [bp-2],ax ;flabel or ax,ax jge $I1154 ; Line 255 $L20006: mov ax,OFFSET DGROUP:_cCpBuff pop si pop di mov sp,bp pop bp ret ; Line 256 $I1154: push ax mov ax,OFFSET DGROUP:_cCpBuff push ds push ax mov ax,20480 push ax call FAR PTR _LREAD ; Line 257 push WORD PTR [bp-2] ;flabel call FAR PTR _LCLOSE ; Line 259 sub si,si jmp SHORT $F1155 ; Line 273 ; Line 274 nop $FB1165: ; Line 275 ; Line 276 inc si $F1159: cmp si,20480 jae $FB1161 ; Line 264 ; Line 265 cmp BYTE PTR _cCpBuff[si],58 jne $FB1165 $FC1164: inc si cmp si,20480 jae $FB1165 ; Line 268 ; Line 269 cmp BYTE PTR _cCpBuff[si],32 je $FC1164 ; Line 270 ; Line 271 push WORD PTR _hMainWnd mov ax,si add ax,OFFSET DGROUP:_cCpBuff push ds push ax mov cx,OFFSET DGROUP:$SG1167 push ds push cx mov cx,16 push cx mov di,ax call FAR PTR MESSAGEBOX ; Line 272 mov ax,di pop si pop di mov sp,bp pop bp ret nop $FB1161: ; Line 277 ; Line 279 inc si $F1155: cmp si,20480 jae $L20006 ; Line 260 ; Line 261 mov ax,OFFSET DGROUP:_patch push ax call _strlen add sp,2 push ax mov ax,OFFSET DGROUP:_patch push ax mov ax,si add ax,OFFSET DGROUP:_cCpBuff push ax call _strncmp add sp,6 or ax,ax jne $FB1161 ; Line 262 ; Line 263 add si,8 jmp SHORT $F1159 nop _pFontName ENDP ; Line 284 PUBLIC FLOPPY FLOPPY PROC FAR push bp mov bp,sp xor ax,ax call __aNchkstk push di push si mov si,WORD PTR [bp+14] ;hDlg mov di,WORD PTR [bp+12] ;wMsg ; register si = hDlg ; register di = wMsg ; wParam = 10 ; lParam = 6 ; Line 289 mov ax,di jmp SHORT $S1173 ; Line 290 ; Line 291 $SC1177: ; Line 292 push si mov ax,101 push ax mov ax,OFFSET DGROUP:_szDiskName push ds push ax call FAR PTR SETDLGITEMTEXT ; Line 293 push si mov ax,103 push ax mov cx,OFFSET DGROUP:_szSrcPath push ds push cx call FAR PTR SETDLGITEMTEXT ; Line 294 push si mov ax,103 push ax call FAR PTR GETDLGITEM push ax call FAR PTR SETFOCUS ; Line 295 $L20007: mov ax,1 jmp SHORT $EX1172 ; Line 296 nop $SC1178: ; Line 297 mov ax,WORD PTR [bp+10] ;wParam sub ax,105 je $SC1183 dec ax je $SC1184 ; Line 308 jmp SHORT $SB1174 ; Line 298 ; Line 299 nop $SC1183: ; Line 300 mov ax,256 push ax sub ax,ax push ax mov ax,OFFSET DGROUP:_szSrcPath push ax call _memset add sp,6 ; Line 301 push si mov ax,103 push ax mov ax,OFFSET DGROUP:_szSrcPath push ds push ax mov ax,256 push ax call FAR PTR GETDLGITEMTEXT ; Line 302 push si mov ax,1 $L20008: push ax call FAR PTR ENDDIALOG jmp SHORT $L20007 ; Line 304 $SC1184: ; Line 305 push si sub ax,ax jmp SHORT $L20008 nop $S1173: sub ax,272 je $SC1177 dec ax je $SC1178 $SB1174: ; Line 310 sub ax,ax ; Line 311 $EX1172: pop si pop di mov sp,bp pop bp ret 10 FLOPPY ENDP ; Line 324 PUBLIC _bCopyFile _bCopyFile PROC NEAR push bp mov bp,sp mov ax,8 call __aNchkstk ; fSrc = -8 ; fDst = -2 ; iReaded = -6 ; iRetVal = -4 ; pMessage = 8 ; pDst = 6 ; pSrc = 4 ; Line 332 mov WORD PTR [bp-4],0 ;iRetVal ; Line 334 cmp WORD PTR [bp+8],0 ;pMessage jne $I1193 ; Line 335 mov ax,WORD PTR [bp+4] ;pSrc mov WORD PTR [bp+8],ax ;pMessage ; Line 337 $I1193: push WORD PTR _hMainWnd mov ax,102 push ax mov ax,OFFSET DGROUP:$SG1194 push ds push ax call FAR PTR SETDLGITEMTEXT ; Line 338 push WORD PTR _hMainWnd mov ax,104 push ax push ds push WORD PTR [bp+8] ;pMessage call FAR PTR SETDLGITEMTEXT ; Line 340 push ds push WORD PTR [bp+4] ;pSrc sub ax,ax push ax call FAR PTR _LOPEN mov WORD PTR [bp-8],ax ;fSrc or ax,ax jge $I1195 ; Line 341 ; Line 342 mov WORD PTR [bp-4],1 ;iRetVal ; Line 343 jmp SHORT $CopyRet1196 ; Line 344 ; Line 346 nop $I1195: push ds push WORD PTR [bp+6] ;pDst sub ax,ax push ax call FAR PTR _LCREAT push ax call FAR PTR _LCLOSE ; Line 347 push ds push WORD PTR [bp+6] ;pDst mov ax,1 push ax call FAR PTR _LOPEN mov WORD PTR [bp-2],ax ;fDst or ax,ax jge $I1197 ; Line 348 ; Line 349 mov WORD PTR [bp-4],2 ;iRetVal ; Line 350 jmp SHORT $CopyRet1196 ; Line 351 ; Line 353 nop $I1197: ; Line 354 ; Line 360 push WORD PTR [bp-8] ;fSrc mov ax,OFFSET DGROUP:_cCpBuff push ds push ax mov ax,20480 push ax call FAR PTR _LREAD mov WORD PTR [bp-6],ax ;iReaded or ax,ax jge $I1201 ; Line 361 ; Line 362 mov WORD PTR [bp-4],3 ;iRetVal ; Line 363 jmp SHORT $CopyRet1196 ; Line 364 ; Line 365 nop $I1201: push WORD PTR [bp-2] ;fDst mov ax,OFFSET DGROUP:_cCpBuff push ds push ax push WORD PTR [bp-6] ;iReaded call FAR PTR _LWRITE cmp ax,WORD PTR [bp-6] ;iReaded je $I1202 ; Line 366 ; Line 367 mov WORD PTR [bp-4],4 ;iRetVal ; Line 368 jmp SHORT $CopyRet1196 ; Line 369 ; Line 370 $I1202: ; Line 371 cmp WORD PTR [bp-6],0 ;iReaded jg $I1197 ; Line 372 $CopyRet1196: ; Line 373 push WORD PTR [bp-8] ;fSrc call FAR PTR _LCLOSE ; Line 374 push WORD PTR [bp-2] ;fDst call FAR PTR _LCLOSE ; Line 375 push WORD PTR _hMainWnd mov ax,102 push ax mov ax,OFFSET DGROUP:$SG1203 push ds push ax call FAR PTR SETDLGITEMTEXT ; Line 376 push WORD PTR _hMainWnd mov ax,104 push ax mov ax,OFFSET DGROUP:$SG1204 push ds push ax call FAR PTR SETDLGITEMTEXT ; Line 377 mov ax,WORD PTR [bp-4] ;iRetVal ; Line 378 mov sp,bp pop bp ret nop _bCopyFile ENDP ; Line 386 PUBLIC _CopyErr _CopyErr PROC NEAR push bp mov bp,sp xor ax,ax call __aNchkstk ; iError = 8 ; pDst = 6 ; pSrc = 4 ; Line 391 mov ax,WORD PTR [bp+8] ;iError or ax,ax je $SC1214 dec ax je $SC1215 dec ax je $SC1217 dec ax je $SC1219 dec ax je $SC1221 ; Line 417 mov ax,OFFSET DGROUP:$SG1224 push ax mov ax,OFFSET DGROUP:_szErrMessage push ax call _strcpy jmp SHORT $L20009 ; Line 392 ; Line 393 $SC1214: ; Line 394 sub ax,ax mov sp,bp pop bp ret ; Line 395 $SC1215: ; Line 397 mov ax,OFFSET DGROUP:$SG1216 $L20012: push ax mov ax,OFFSET DGROUP:_szErrMessage push ax call _strcpy mov sp,bp ; Line 398 push WORD PTR [bp+4] ;pSrc $L20010: mov ax,OFFSET DGROUP:_szErrMessage push ax call _strcat $L20009: mov sp,bp ; Line 399 jmp SHORT $SB1211 ; Line 400 nop $SC1217: ; Line 402 mov ax,OFFSET DGROUP:$SG1218 jmp SHORT $L20011 ; Line 405 nop $SC1219: ; Line 407 mov ax,OFFSET DGROUP:$SG1220 jmp SHORT $L20012 ; Line 410 nop $SC1221: ; Line 412 mov ax,OFFSET DGROUP:$SG1222 $L20011: push ax mov ax,OFFSET DGROUP:_szErrMessage push ax call _strcpy add sp,4 ; Line 413 push WORD PTR [bp+6] ;pDst jmp SHORT $L20010 ; Line 415 nop $SB1211: ; Line 420 push WORD PTR _hMainWnd mov ax,OFFSET DGROUP:_szErrMessage push ds push ax mov ax,OFFSET _szTitle push ds push ax mov ax,16 push ax call FAR PTR MESSAGEBOX ; Line 422 mov ax,WORD PTR [bp+8] ;iError ; Line 423 mov sp,bp pop bp ret _CopyErr ENDP ; Line 429 PUBLIC __strup __strup PROC NEAR push bp mov bp,sp xor ax,ax call __aNchkstk push si ; register si = i ; b = 4 ; Line 432 sub si,si jmp SHORT $F1229 nop $FC1230: ; Line 433 mov bx,WORD PTR [bp+4] ;b mov al,BYTE PTR [bx][si] cbw push ax call _toupper add sp,2 mov bx,WORD PTR [bp+4] ;b mov BYTE PTR [bx][si],al inc si $F1229: push WORD PTR [bp+4] ;b call _strlen add sp,2 cmp ax,si ja $FC1230 ; Line 434 mov ax,WORD PTR [bp+4] ;b ; Line 435 pop si mov sp,bp pop bp ret __strup ENDP ; Line 441 PUBLIC _myssearch _myssearch PROC NEAR push bp mov bp,sp xor ax,ax call __aNchkstk push di push si ; register si = i ; s2 = 6 ; s1 = 4 ; Line 444 push WORD PTR [bp+4] ;s1 call _strlen add sp,2 push WORD PTR [bp+6] ;s2 mov di,ax call _strlen add sp,2 cmp ax,di jbe $I1236 ; Line 445 ; Line 446 $L20014: sub ax,ax pop si pop di mov sp,bp pop bp ret ; Line 447 ; Line 449 $I1236: push WORD PTR [bp+6] ;s2 push WORD PTR [bp+4] ;s1 call _strcmp add sp,4 or ax,ax jne $I1237 ; Line 450 $L20015: mov ax,1 pop si pop di mov sp,bp pop bp ret ; Line 452 nop $I1237: sub si,si jmp SHORT $F1238 ; Line 457 ; Line 458 $FC1239: inc si $F1238: push WORD PTR [bp+6] ;s2 call _strlen add sp,2 push WORD PTR [bp+4] ;s1 mov di,ax call _strlen add sp,2 sub ax,di cmp ax,si jbe $L20014 ; Line 453 ; Line 454 push WORD PTR [bp+6] ;s2 call _strlen add sp,2 push ax push WORD PTR [bp+6] ;s2 mov ax,WORD PTR [bp+4] ;s1 add ax,si push ax call _strncmp add sp,6 or ax,ax jne $FC1239 jmp SHORT $L20015 _myssearch ENDP _TEXT ENDS END