32 lines
		
	
	
	
		
			363 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
			
		
		
	
	
			32 lines
		
	
	
	
		
			363 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
| .sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
 | |
| .define __brk
 | |
| .define xbrk
 | |
| __brk:	
 | |
| 	mov bx,sp
 | |
| 	mov ax,2(bx)
 | |
| 	mov cx,sp
 | |
| 	sub cx,128
 | |
| 	jbe 1f
 | |
| 	mov bx,(.limhp)
 | |
| 	mov (.limhp),ax
 | |
| 	sub ax,bx
 | |
| 	jbe 2f
 | |
| 	call xbrk
 | |
| 2:
 | |
| 	xor ax,ax
 | |
| 	ret
 | |
| 1:
 | |
| 	mov ax,0xc
 | |
| 	jmp cerror
 | |
| xbrk:
 | |
| 	push di
 | |
| 	mov di,bx
 | |
| 	mov cx,ax
 | |
| 	xor ax,ax
 | |
| 	shr cx,1
 | |
| 	repz stos
 | |
| 	jae 3f
 | |
| 	stosb
 | |
| 3:
 | |
| 	pop di
 | |
| 	ret
 |