24 lines
		
	
	
		
			276 B
		
	
	
	
		
			ArmAsm
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			24 lines
		
	
	
		
			276 B
		
	
	
	
		
			ArmAsm
		
	
	
		
			Executable File
		
	
	
	
	
.define .cms
 | 
						|
 | 
						|
	! #bytes in cx
 | 
						|
	.text
 | 
						|
.cms:
 | 
						|
	pop     bx              ! return address
 | 
						|
	mov     dx,sp
 | 
						|
	push	si
 | 
						|
	push	di
 | 
						|
	mov     si,dx
 | 
						|
	add     dx,cx
 | 
						|
	mov     di,dx
 | 
						|
	add     dx,cx
 | 
						|
	sar     cx,#1
 | 
						|
	repe
 | 
						|
	cmp
 | 
						|
	je      1f
 | 
						|
	inc     cx
 | 
						|
1:
 | 
						|
	pop	di
 | 
						|
	pop	si
 | 
						|
	mov     sp,dx
 | 
						|
	jmp     (bx)
 |