title Module from library HIFLOAT_6 : LBOUT name ('LBOUT') maclib baselib.lib ; Convert floating point number to string ; Copyright (C) Werner Cirsovius ; Hohe Weide 44 ; D-20253 Hamburg ; Tel.: +49-40-4223247 ; Version 1.0 January 1989 ; ENTRY Reg pair HL points to floating point number, ; reg pair DE points to ASCII string buffer, ; reg B holds character to be stored at the end of the ; buffer, usually zero or $ ; EXIT Buffer well filled entry flout extrn ?flout flout: push hl ld a,b ld c,e ; Copy buffer ld b,d pop ix ld h,(ix+0) ; Get number ld l,(ix+1) ld e,(ix+2) ld d,(ix+3) jp ?flout ; Convert to ASCII end