Code: Select all
Prototype sprintf(*a, *b, d.d)
OpenLibrary(0, "C:\Windows\System32\msvcrt.dll")
Global sprintf.sprintf = GetFunction(0, "sprintf")
Global.i *b, *f
*b = AllocateMemory(64)
*f = Ascii("%e") ; = @"%e"
Debug sprintf(*b, *f, #PI)
y$ = PeekS(*b, -1, #PB_Ascii)
Debug y$ ;<-- 0.000000e+000