	.model	small
	.stack
	.code
start:	mov ax,cs
	mov ds,ax
	mov di,128
	mov cx,es:[di+2]
	mov bl,es:[di+4]
	sub cx,'00'
	sub bl,'0'
	mov al,es:[di]
	.if !al
	    mov ah,40h
	    mov bx,2
	    mov cx,_size
	    mov dx,offset _info
	    int 21h
	    mov ax,4C00h
	    int 21h
	.elseif al == 2
	    mov al,cl
	.elseif al == 3
	    mov al,10
	    mul cl
	    add al,ch
	.else
	    mov al,100
	    mul cl
	    mov cl,al
	    mov al,10
	    mul ch
	    add al,cl
	    add al,bl
	.endif
	mov ah,4Ch
	int 21h
_info	db 'quietly returns <errorlevel>',13,10
	db 'Syntax: ERLEVEL <errorlevel>',13,10
_size	= $ - offset _info
	end start
