Sorry but it is of course not 16 bits. Basic4ppc uses 64 bit for all numbers (System.Double).
This is enough for most applications.
If you need higher precision you could use the Decimal library (which uses 128 bits).
This example will show 1/7 with 25 decimal digits.
Don't forget to add the Decimal library.
Code:
<font size="2"><font color="#008000">'Add a DecOperator named dec.
</font></font><font size="2"><font color="#0000ff">Sub </font></font><font size="2">Globals
</font><font size="2"><font color="#0000ff">End Sub
</font></font><font size="2"><font color="#0000ff">
Sub </font></font><font size="2">App_Start
dec.New1
</font><font size="2"><font color="#0000ff"> AddObject</font></font><font size="2">("d1","decNumber")
</font><font size="2"><font color="#0000ff"> AddObject</font></font><font size="2">("d2","decNumber")
d1.New1
d2.New1
d1.Value = dec.ParseD("1")
d2.Value = dec.FromDouble(7)
d1.Value = dec.DivD(d1.Value,d2.Value)
d1.Value = dec.AddD(d1.Value, d2.Value)
</font><font size="2"><font color="#0000ff"> msgbox</font></font><font size="2">(d1.ToString2("n25"))
</font><font size="2"><font color="#0000ff">End Sub
</font></font>