A86: > frac


[Prev][Next][Index][Thread]

A86: > frac




Ahmed here it is for the 86.



;
;---------------------------------------------------------
;   TOFRAC : CONVERT DECIMAL NUMBER TO FRACTION.	 |
;	     NUMERATOR / DENOMINATOR.			 |
;							 |
;	    INPUT : OP1 = DECIMAL NUMBER		 |
;							 |
;	    OUTPUT : IF SUCCESSFULL :			 |
;							 |
;		     OP1 = NUMERATOR			 |
;		     OP2 = DENOMINATOR			 |
;		     CA = 0				 |
;							 |
;		     IF NOT SUCCESSFULL :		 |
;							 |
;		     OP1 = ORIGINAL INPUT		 |
;		     CA = 1				 |
;							 |
;	    USES : OP1 TO OP6				 |

_TOFRAC                          equ            4B93h

Later,
Pat


Follow-Ups: