summaryrefslogtreecommitdiff
path: root/frontends/calculator/CEdev/lib/shared/bmuls.src
blob: 1c5ab2e342b75db855cce4d7682f15f40cf72720 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
; (c) Copyright 2007-2008 Zilog, Inc.
;-------------------------------------------------------------------------
; Signed Byte Multiply
; Input:
;	Operand1: 
;                 A : 8 bit 
;
;	Operand2: 
;                 B : 8 bit 
;
; Output:
;	Result:   A : 8 bit product
; Registers Used:
;	none
;-------------------------------------------------------------------------
	.def __bmuls
	.assume adl=1

__bmuls:
	push	bc
	ld	c,a
	mlt	bc
	ld	a,c
	pop	bc
	ret