home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / dtx9101 / dbase / msklader.asm < prev    next >
Encoding:
Assembly Source File  |  1991-10-14  |  2.3 KB  |  60 lines
  1. ;NAME:             MSKLADER.BIN
  2. ;DATEILAENGE:      0005Ah - 90d
  3. ;START (CS:IP):    00000h
  4. ;CODE ENDE:        0005Ah
  5. ;CODE ANFANG:      00000h
  6. ;DATUM:            Mon Oct 14 11:52:43 1991
  7.  
  8. CODE    SEGMENT BYTE PUBLIC 'CODE'
  9. ASSUME  CS:CODE,DS:CODE,ES:NOTHING,SS:NOTHING
  10.  
  11. Lader   PROC FAR
  12.         ORG     00h
  13.  
  14. H00000: PUSH    BP                        ;00000 55
  15.         MOV     BP,SP                     ;00001 8BEC
  16.         MOV     CS:[0058h],BX             ;00003 2E891E5800
  17.         MOV     AX,CS                     ;00008 8CC8
  18.         MOV     CS:[0056h],AX             ;0000A 2EA35600
  19.         MOV     CS:[0054h],DS             ;0000E 2E8C1E5400
  20.         PUSH    DS                        ;00013 1E
  21.         MOV     CX,0B000h                 ;00014 B900B0
  22.         XOR     AX,AX                     ;00017 33C0
  23.         MOV     DS,AX                     ;00019 8ED8
  24.         MOV     DL,DS:[0449h]             ;0001B 8A0E4904
  25.         CMP     DL,07h                    ;0001F 80F907
  26.         JZ      H00027                    ;00022 7403
  27.  
  28.         MOV     CX,0B800h                 ;00024 B900B8
  29.  
  30. H00027: MOV     CS:[0052h],CX             ;00027 2E890E5200
  31.         POP     DS                        ;0002C 1F
  32.         MOV     SI,005Ah                  ;0002D BE5A00
  33.         MOV     AX,CS:[0056h]             ;00030 2EA15600
  34.         MOV     DS,AX                     ;00034 8ED8
  35.         MOV     AX,CS:[0052h]             ;00036 2EA15200
  36.         MOV     ES,AX                     ;0003A 8EC0
  37.         MOV     CX,0FA0h                  ;0003C B9A00F
  38.         XOR     DI,DI                     ;0003F 33FF
  39.         CLD                               ;00041 FC
  40.         REPZ    MOVSB                     ;00042 F3A4
  41.         MOV     DS,CS:[0054h]             ;00044 2E8E1E5400
  42.         MOV     BX,CS:[0058h]             ;00049 2E8B1E5800
  43.         MOV     SP,BP                     ;0004E 8BE5
  44.         POP     BP                        ;00050 5D
  45.         RETF                              ;00051 CB
  46.  
  47. Lader   ENDP
  48.  
  49. ;---------------------------------------------------
  50.  
  51.         DW      0B000h                    ;00052 00B0
  52.         DW      0000h                     ;00054 0000
  53.         DW      0000h                     ;00056 0000
  54.         DW      0000h                     ;00058 0000
  55.                                           ;0005A
  56.  
  57. CODE    ENDS
  58.         END
  59.  
  60.