# Т > BLib.BASIC 1.01 29-Dec-2005 *Т v1.01 29-Dec-2005 JGH: Added RunAs() 0Т v1.00 12-Nov-1998 JGH: Type and SizeOfReal (: !2Т BASIC interpreter functions !<Т =========================== F: PТ BASIC_Type ZТ --------- dТ Discover interpreter type 'nТ Returns: 65 if Wilson/Acorn BASIC "xТ 86 if Russell BASIC ?┌Т --------------------------------------------------------- ▄: #√щєBASIC_Type:Г?(╦P-3):=65 ▀ =86 ═: ╙: ЄТ FNBASIC_SizeOfReal ЎТ ----------------- BхТ Returns the size of real variables being used by the program DрТ Knows about 4, 5, 8 and 12-byte reals by forcing underflows in DэТ accuracy, using IEEE definintions of floating point numbers. ФТ Returns 0 if size unknown EПТ --------------------------------------------------------------- З: щєBASIC_SizeOfReal @Г 2^-129=0:Г 1+2^-25=1:=4 :Т 8-bit exponent, 23-bit mantissa HГ 2^-129=0:=5 :Т 8-bit exponent, assume 31-bit mantissa I"Г 2^-1025=0:=8 :Т 11 bit exponent, assume 52-bit mantissa I,Г 2^-32769=0:=12 :Т 15 bit exponent, assume 63-bit mantissa 6=0:Т Unknown @: J: TТ FNBASIC_RunAs ^Т ------------- /hТ Returns how the BBFW program has been run rТ Returns: 0 if unknown 5|Т 1 if run from the IDE (selected 'RUN') >├Т 2 if run via the interpreter (CHAIN "file.bbc") ?░Т 3 if run as a compiled executable (run file.exe) E Т --------------------------------------------------------------- є: ўщєBASIC_RunAs $╦Й cmd%: "GetCommandLine" ╦ cmd% бГ ї$$cmd%,"bbcwin.exe"):=1 лГ ї$$cmd%,"bbcwrun.exe"):=2 ж=3 Ю: ЪЪ