Microsoft (R) Macro Assembler Version 5.10                  5/16/24 23:40:13
CP/DOS DosSetVerify mapper                                  Page     1-1


				page 80,132
				
				title CP/DOS DosSetVerify mapper
				
 0000				dosxxx  segment byte public 'dos'
				        assume  cs:dosxxx,ds:nothing,es:nothing,ss:nothing
				
				;**********************************************************************
				;*
				;*   MODULE:   dossetverify       Set new verify switch value
				;*
				;*   FILE NAME: dos054.asm
				;*
				;*   CALLING SEQUENCE:
				;*
				;*       push      word     verify setting
				;*       call      dossetverify
				;*
				;*   MODULES CALLED:  PC-DOS Int 21h, ah=2eh, get verify setting
				;*
				;*********************************************************************
				
				            public   dossetverify
				            .sall
				            .list
				
 = 0002				error_code  equ      0002h
				
				str         struc
 0000  0000			old_bp      dw       ?
 0002  00000000			return      dd       ?
 0006  0000			verify      dw       ?      ; new verify settings value
 0008				str         ends
				
 0000				dossetverify proc    far
				            Enter    dossetverify          ; push registers
				
 000C  8B 46 06			            mov      ax,[bp].verify        ; check request
 000F  3C 01			            cmp      al,1                  ; for validity
 0011  7F 08			            jg       error
				
 0013  B4 2E			            mov      ah,2eh                ; setup new verify value
 0015  CD 21			            int      21h
				
 0017  2B C0			            sub      ax,ax                 ; set good return code
 0019  EB 03			            jmp      short exit            ; return
				
 001B  B8 0002			error:      mov      ax,error_code         ; set error return code
				
 001E				exit:       Mexit                          ; pop registers
 002A  CA 0002			            ret      size str - 6          ; return
				
 002D				dossetverify endp
				
 002D				dosxxx      ends
				
				            end

Microsoft (R) Macro Assembler Version 5.10                  5/16/24 23:40:13
CP/DOS DosSetVerify mapper                                  Symbols-1


Macros:

		N a m e			Lines

ENTER  . . . . . . . . . . . . .  	   3
MEXIT  . . . . . . . . . . . . .  	   3
POPAL  . . . . . . . . . . . . .  	   9
PUSHAL . . . . . . . . . . . . .  	   9

Structures and Records:

                N a m e                 Width   # fields
                                        Shift   Width   Mask    Initial

STR  . . . . . . . . . . . . . .  	0008	0003
  OLD_BP . . . . . . . . . . . .  	0000
  RETURN . . . . . . . . . . . .  	0002
  VERIFY . . . . . . . . . . . .  	0006

Segments and Groups:

                N a m e         	Length	 Align	Combine Class

DOSXXX . . . . . . . . . . . . .  	002D	BYTE	PUBLIC	'DOS'

Symbols:            

                N a m e         	Type	 Value	 Attr

dossetverify . . . . . . . . . .  	F PROC	0000	DOSXXX	Global	Length = 002D

ERROR  . . . . . . . . . . . . .  	L NEAR	001B	DOSXXX
ERROR_CODE . . . . . . . . . . .  	NUMBER	0002	
EXIT . . . . . . . . . . . . . .  	L NEAR	001E	DOSXXX

@CPU . . . . . . . . . . . . . .  	TEXT  0101h		
@FILENAME  . . . . . . . . . . .  	TEXT  sverify		
@VERSION . . . . . . . . . . . .  	TEXT  510		


    105 Source  Lines
    129 Total   Lines
     19 Symbols

  47526 + 316951 Bytes symbol space free

      0 Warning Errors
      0 Severe  Errors
