ChipMaster's bwBASIC This also includes history going back to v2.10. *WARN* some binary files might have been corrupted by CRLF.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

3728 lines
117 KiB

  1. /***************************************************************
  2. bwd_fun.c Function Table
  3. for Bywater BASIC Interpreter
  4. Copyright (c) 1993, Ted A. Campbell
  5. Bywater Software
  6. email: tcamp@delphi.com
  7. Copyright and Permissions Information:
  8. All U.S. and international rights are claimed by the author,
  9. Ted A. Campbell.
  10. This software is released under the terms of the GNU General
  11. Public License (GPL), which is distributed with this software
  12. in the file "COPYING". The GPL specifies the terms under
  13. which users may copy and use the software in this distribution.
  14. A separate license is available for commercial distribution,
  15. for information on which you should contact the author.
  16. ***************************************************************/
  17. /*---------------------------------------------------------------*/
  18. /* NOTE: Modifications marked "JBV" were made by Jon B. Volkoff, */
  19. /* 11/1995 (eidetics@cerf.net). */
  20. /* */
  21. /* Those additionally marked with "DD" were at the suggestion of */
  22. /* Dale DePriest (daled@cadence.com). */
  23. /* */
  24. /* Version 3.00 by Howard Wulf, AF5NE */
  25. /* */
  26. /* Version 3.10 by Howard Wulf, AF5NE */
  27. /* */
  28. /*---------------------------------------------------------------*/
  29. /* FUNCTION TABLE */
  30. #include "bwbasic.h"
  31. FunctionType bwb_prefuncs[ NUM_FUNCTIONS ] =
  32. {
  33. {
  34. F_ABS_X_N, /* UniqueID */
  35. "N = ABS( X )", /* Syntax */
  36. "The absolute value of X.", /* Description */
  37. "ABS", /* Name */
  38. BasicDoubleSuffix, /* ReturnType */
  39. 1, /* ParameterCount */
  40. P1NUM, /* ParameterTypes */
  41. P1ANY, /* ParameterTests */
  42. NULL, /* NextPointer */
  43. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  44. },
  45. {
  46. F_ACOS_X_N, /* UniqueID */
  47. "N = ACOS( X )", /* Syntax */
  48. "The arccosine of X in radians, where 0 <= ACOS(X) <= PI. X s"
  49. "hall be in the range -1 <= X <= 1.", /* Description */
  50. "ACOS", /* Name */
  51. BasicDoubleSuffix, /* ReturnType */
  52. 1, /* ParameterCount */
  53. P1NUM, /* ParameterTypes */
  54. P1ANY, /* ParameterTests */
  55. NULL, /* NextPointer */
  56. B15 | E86 /* OptionVersionBitmask */
  57. },
  58. {
  59. F_ACS_X_N, /* UniqueID */
  60. "N = ACS( X )", /* Syntax */
  61. "The arccosine of X in radians, where 0 <= ACS(X) <= PI. X sh"
  62. "all be in the range -1 <= X <= 1.", /* Description */
  63. "ACS", /* Name */
  64. BasicDoubleSuffix, /* ReturnType */
  65. 1, /* ParameterCount */
  66. P1NUM, /* ParameterTypes */
  67. P1ANY, /* ParameterTests */
  68. NULL, /* NextPointer */
  69. B15 | I70 | I73 | HB2 /* OptionVersionBitmask */
  70. },
  71. {
  72. F_ACSD_X_N, /* UniqueID */
  73. "N = ACSD( X )", /* Syntax */
  74. "The arccosine of X in degrees, where 0 <= ACSD(X) <= 180. X "
  75. "shall be in the range -1 <= X <= 1.", /* Description */
  76. "ACSD", /* Name */
  77. BasicDoubleSuffix, /* ReturnType */
  78. 1, /* ParameterCount */
  79. P1NUM, /* ParameterTypes */
  80. P1ANY, /* ParameterTests */
  81. NULL, /* NextPointer */
  82. B15 | HB2 /* OptionVersionBitmask */
  83. },
  84. {
  85. F_ACSG_X_N, /* UniqueID */
  86. "N = ACSG( X )", /* Syntax */
  87. "The arccosine of X in gradians, where 0 <= ACS(X) <= 200. X "
  88. "shall be in the range -1 <= X <= 1.", /* Description */
  89. "ACSG", /* Name */
  90. BasicDoubleSuffix, /* ReturnType */
  91. 1, /* ParameterCount */
  92. P1NUM, /* ParameterTypes */
  93. P1ANY, /* ParameterTests */
  94. NULL, /* NextPointer */
  95. B15 | HB2 /* OptionVersionBitmask */
  96. },
  97. {
  98. F_ANGLE_X_Y_N, /* UniqueID */
  99. "N = ANGLE( X, Y )", /* Syntax */
  100. "The angle in radians between the positive x-axis and the vect"
  101. "or joining the origin to the point with coordinates (X, Y), w"
  102. "here -PI < ANGLE(X,Y) <= PI. X and Y must not both be 0. No"
  103. "te that the counterclockwise is positive, e.g., ANGLE(1,1) = "
  104. "45 degrees.", /* Description */
  105. "ANGLE", /* Name */
  106. BasicDoubleSuffix, /* ReturnType */
  107. 2, /* ParameterCount */
  108. P1NUM | P2NUM, /* ParameterTypes */
  109. P1ANY | P2ANY, /* ParameterTests */
  110. NULL, /* NextPointer */
  111. B15 | E86 /* OptionVersionBitmask */
  112. },
  113. {
  114. F_ARCSIN_X_N, /* UniqueID */
  115. "N = ARCSIN( X )", /* Syntax */
  116. "The arcsine of X in radians, where -PI/2 <= ARCSIN(X) <= PI/2"
  117. "; X shall be in the range -1 <= X <= 1.", /* Description */
  118. "ARCSIN", /* Name */
  119. BasicDoubleSuffix, /* ReturnType */
  120. 1, /* ParameterCount */
  121. P1NUM, /* ParameterTypes */
  122. P1ANY, /* ParameterTests */
  123. NULL, /* NextPointer */
  124. B15 | HB2 /* OptionVersionBitmask */
  125. },
  126. {
  127. F_ARCTAN_X_N, /* UniqueID */
  128. "N = ARCTAN( X )", /* Syntax */
  129. "The arctangent of X in radians, i.e. the angle whose tangent "
  130. "is X, where -PI/2 < ARCTAN(X) < PI/2.", /* Description */
  131. "ARCTAN", /* Name */
  132. BasicDoubleSuffix, /* ReturnType */
  133. 1, /* ParameterCount */
  134. P1NUM, /* ParameterTypes */
  135. P1ANY, /* ParameterTests */
  136. NULL, /* NextPointer */
  137. B15 | HB1 | HB2 /* OptionVersionBitmask */
  138. },
  139. {
  140. F_ARGC_N, /* UniqueID */
  141. "N = ARGC", /* Syntax */
  142. "The number of parameters passed to a FUNCTION or SUB. If not"
  143. " in a FUNCTION or SUB, returns -1.", /* Description */
  144. "ARGC", /* Name */
  145. BasicDoubleSuffix, /* ReturnType */
  146. 0, /* ParameterCount */
  147. PNONE, /* ParameterTypes */
  148. PNONE, /* ParameterTests */
  149. NULL, /* NextPointer */
  150. B15 /* OptionVersionBitmask */
  151. },
  152. {
  153. F_ARGT4_X_S, /* UniqueID */
  154. "S$ = ARGT$( X )", /* Syntax */
  155. "The type of the X'th parameter to a FUNCTION or SUB. If the "
  156. "X'th parameter is a string, then return value is '$'. If the"
  157. " X'th parameter is a number, then return value is not '$'. X"
  158. " in [1,ARGC].", /* Description */
  159. "ARGT$", /* Name */
  160. BasicStringSuffix, /* ReturnType */
  161. 1, /* ParameterCount */
  162. P1NUM, /* ParameterTypes */
  163. P1INT, /* ParameterTests */
  164. NULL, /* NextPointer */
  165. B15 /* OptionVersionBitmask */
  166. },
  167. {
  168. F_ARGV_X_N, /* UniqueID */
  169. "N = ARGV( X )", /* Syntax */
  170. "The value of the X'th parameter to a FUNCTION or SUB. X in ["
  171. "1,ARGC] and ARGT$( X ) <> '$'.", /* Description */
  172. "ARGV", /* Name */
  173. BasicDoubleSuffix, /* ReturnType */
  174. 1, /* ParameterCount */
  175. P1NUM, /* ParameterTypes */
  176. P1INT, /* ParameterTests */
  177. NULL, /* NextPointer */
  178. B15 /* OptionVersionBitmask */
  179. },
  180. {
  181. F_ARGV4_X_S, /* UniqueID */
  182. "S$ = ARGV$( X )", /* Syntax */
  183. "The value of the X'th parameter to a FUNCTION or SUB. X in ["
  184. "1,ARGC] and ARGT$( X ) = '$'.", /* Description */
  185. "ARGV$", /* Name */
  186. BasicStringSuffix, /* ReturnType */
  187. 1, /* ParameterCount */
  188. P1NUM, /* ParameterTypes */
  189. P1INT, /* ParameterTests */
  190. NULL, /* NextPointer */
  191. B15 /* OptionVersionBitmask */
  192. },
  193. {
  194. F_ASC_A_N, /* UniqueID */
  195. "N = ASC( A$ )", /* Syntax */
  196. "The numeric code for the first letter in A$. For example, AS"
  197. "C(\"ABC\") returns 65 on ASCII systems.", /* Description */
  198. "ASC", /* Name */
  199. BasicByteSuffix, /* ReturnType */
  200. 1, /* ParameterCount */
  201. P1STR, /* ParameterTypes */
  202. P1BYT, /* ParameterTests */
  203. NULL, /* NextPointer */
  204. B15 | D64 | G65 | G67 | I70 | I73 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  205. },
  206. {
  207. F_ASC_A_X_N, /* UniqueID */
  208. "N = ASC( A$, X )", /* Syntax */
  209. "The numeric code of the X'th character in A$. Same as ASC(MI"
  210. "D$(A$,X)).", /* Description */
  211. "ASC", /* Name */
  212. BasicByteSuffix, /* ReturnType */
  213. 2, /* ParameterCount */
  214. P1STR | P2NUM, /* ParameterTypes */
  215. P1BYT | P2POS, /* ParameterTests */
  216. NULL, /* NextPointer */
  217. B15 | HB1 | HB2 /* OptionVersionBitmask */
  218. },
  219. {
  220. F_ASCII_A_N, /* UniqueID */
  221. "N = ASCII( A$ )", /* Syntax */
  222. "The numeric code for the first letter in A$. For example, AS"
  223. "CII(\"ABC\") returns 65 on ASCII systems.", /* Description */
  224. "ASCII", /* Name */
  225. BasicDoubleSuffix, /* ReturnType */
  226. 1, /* ParameterCount */
  227. P1STR, /* ParameterTypes */
  228. P1BYT, /* ParameterTests */
  229. NULL, /* NextPointer */
  230. B15 | D71 | HB2 /* OptionVersionBitmask */
  231. },
  232. {
  233. F_ASIN_X_N, /* UniqueID */
  234. "N = ASIN( X )", /* Syntax */
  235. "The arcsine of X in radians, where -PI/2 <= ASIN(X) <= PI/2; "
  236. "X shall be in the range -1 <= X <= 1.", /* Description */
  237. "ASIN", /* Name */
  238. BasicDoubleSuffix, /* ReturnType */
  239. 1, /* ParameterCount */
  240. P1NUM, /* ParameterTypes */
  241. P1ANY, /* ParameterTests */
  242. NULL, /* NextPointer */
  243. B15 | E86 /* OptionVersionBitmask */
  244. },
  245. {
  246. F_ASN_X_N, /* UniqueID */
  247. "N = ASN( X )", /* Syntax */
  248. "The arcsine of X in radians, where -PI/2 <= ASN(X) <= PI/2; X"
  249. " shall be in the range -1 <= X <= 1.", /* Description */
  250. "ASN", /* Name */
  251. BasicDoubleSuffix, /* ReturnType */
  252. 1, /* ParameterCount */
  253. P1NUM, /* ParameterTypes */
  254. P1ANY, /* ParameterTests */
  255. NULL, /* NextPointer */
  256. B15 | I70 | I73 | HB1 | HB2 /* OptionVersionBitmask */
  257. },
  258. {
  259. F_ASND_X_N, /* UniqueID */
  260. "N = ASND( X )", /* Syntax */
  261. "The arcsine of X in degrees, where -90 <= ASN(X) <= 90; X sha"
  262. "ll be in the range -1 <= X <= 1.", /* Description */
  263. "ASND", /* Name */
  264. BasicDoubleSuffix, /* ReturnType */
  265. 1, /* ParameterCount */
  266. P1NUM, /* ParameterTypes */
  267. P1ANY, /* ParameterTests */
  268. NULL, /* NextPointer */
  269. B15 | HB2 /* OptionVersionBitmask */
  270. },
  271. {
  272. F_ASNG_X_N, /* UniqueID */
  273. "N = ASNG( X )", /* Syntax */
  274. "The arcsine of X in radians, where -100 <= ASNG(X) <= 100; X "
  275. "shall be in the range -1 <= X <= 1.", /* Description */
  276. "ASNG", /* Name */
  277. BasicDoubleSuffix, /* ReturnType */
  278. 1, /* ParameterCount */
  279. P1NUM, /* ParameterTypes */
  280. P1ANY, /* ParameterTests */
  281. NULL, /* NextPointer */
  282. B15 | HB2 /* OptionVersionBitmask */
  283. },
  284. {
  285. F_ATAN_X_N, /* UniqueID */
  286. "N = ATAN( X )", /* Syntax */
  287. "The arctangent of X in radians, i.e. the angle whose tangent "
  288. "is X, where -PI/2 < ATAN(X) < PI/2.", /* Description */
  289. "ATAN", /* Name */
  290. BasicDoubleSuffix, /* ReturnType */
  291. 1, /* ParameterCount */
  292. P1NUM, /* ParameterTypes */
  293. P1ANY, /* ParameterTests */
  294. NULL, /* NextPointer */
  295. B15 | HB1 | HB2 /* OptionVersionBitmask */
  296. },
  297. {
  298. F_ATN_X_N, /* UniqueID */
  299. "N = ATN( X )", /* Syntax */
  300. "The arctangent of X in radians, i.e. the angle whose tangent "
  301. "is X, where -PI/2 < ATN(X) < PI/2.", /* Description */
  302. "ATN", /* Name */
  303. BasicDoubleSuffix, /* ReturnType */
  304. 1, /* ParameterCount */
  305. P1NUM, /* ParameterTypes */
  306. P1ANY, /* ParameterTests */
  307. NULL, /* NextPointer */
  308. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  309. },
  310. {
  311. F_ATND_X_N, /* UniqueID */
  312. "N = ATND( X )", /* Syntax */
  313. "The arctangent of X in degrees, i.e. the angle whose tangent "
  314. "is X, where -90 < ATND(X) < 90.", /* Description */
  315. "ATND", /* Name */
  316. BasicDoubleSuffix, /* ReturnType */
  317. 1, /* ParameterCount */
  318. P1NUM, /* ParameterTypes */
  319. P1ANY, /* ParameterTests */
  320. NULL, /* NextPointer */
  321. B15 | HB2 /* OptionVersionBitmask */
  322. },
  323. {
  324. F_ATNG_X_N, /* UniqueID */
  325. "N = ATNG( X )", /* Syntax */
  326. "The arctangent of X in gradians, i.e. the angle whose tangent"
  327. " is X, where -100 < ATND(X) < 100.", /* Description */
  328. "ATNG", /* Name */
  329. BasicDoubleSuffix, /* ReturnType */
  330. 1, /* ParameterCount */
  331. P1NUM, /* ParameterTypes */
  332. P1ANY, /* ParameterTests */
  333. NULL, /* NextPointer */
  334. B15 | HB2 /* OptionVersionBitmask */
  335. },
  336. {
  337. F_BASE_N, /* UniqueID */
  338. "N = BASE", /* Syntax */
  339. "The current OPTION BASE setting.", /* Description */
  340. "BASE", /* Name */
  341. BasicDoubleSuffix, /* ReturnType */
  342. 0, /* ParameterCount */
  343. PNONE, /* ParameterTypes */
  344. PNONE, /* ParameterTests */
  345. NULL, /* NextPointer */
  346. B15 /* OptionVersionBitmask */
  347. },
  348. {
  349. F_CATALOG_N, /* UniqueID */
  350. "N = CATALOG", /* Syntax */
  351. "Displays all the file names.", /* Description */
  352. "CATALOG", /* Name */
  353. BasicDoubleSuffix, /* ReturnType */
  354. 0, /* ParameterCount */
  355. PNONE, /* ParameterTypes */
  356. PNONE, /* ParameterTests */
  357. NULL, /* NextPointer */
  358. D64 | G65 | G67 /* OptionVersionBitmask */
  359. },
  360. {
  361. F_CATALOG_A_N, /* UniqueID */
  362. "N = CATALOG( A$ )", /* Syntax */
  363. "Displays all the file names matching A$.", /* Description */
  364. "CATALOG", /* Name */
  365. BasicDoubleSuffix, /* ReturnType */
  366. 1, /* ParameterCount */
  367. P1STR, /* ParameterTypes */
  368. P1BYT, /* ParameterTests */
  369. NULL, /* NextPointer */
  370. D64 | G65 | G67 /* OptionVersionBitmask */
  371. },
  372. {
  373. F_CCUR_X_N, /* UniqueID */
  374. "N = CCUR( X )", /* Syntax */
  375. "The currency (64-bit) integer value of X.", /* Description */
  376. "CCUR", /* Name */
  377. BasicCurrencySuffix, /* ReturnType */
  378. 1, /* ParameterCount */
  379. P1NUM, /* ParameterTypes */
  380. P1CUR, /* ParameterTests */
  381. NULL, /* NextPointer */
  382. B15 /* OptionVersionBitmask */
  383. },
  384. {
  385. F_CDBL_X_N, /* UniqueID */
  386. "N = CDBL( X )", /* Syntax */
  387. "The double-precision value of X.", /* Description */
  388. "CDBL", /* Name */
  389. BasicDoubleSuffix, /* ReturnType */
  390. 1, /* ParameterCount */
  391. P1NUM, /* ParameterTypes */
  392. P1DBL, /* ParameterTests */
  393. NULL, /* NextPointer */
  394. B15 | D71 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  395. },
  396. {
  397. F_CEIL_X_N, /* UniqueID */
  398. "N = CEIL( X )", /* Syntax */
  399. "The smallest integer not less than X.", /* Description */
  400. "CEIL", /* Name */
  401. BasicDoubleSuffix, /* ReturnType */
  402. 1, /* ParameterCount */
  403. P1NUM, /* ParameterTypes */
  404. P1ANY, /* ParameterTests */
  405. NULL, /* NextPointer */
  406. B15 | E86 /* OptionVersionBitmask */
  407. },
  408. {
  409. F_CHAR_X_Y_S, /* UniqueID */
  410. "S$ = CHAR( X, Y )", /* Syntax */
  411. "The string Y bytes long consisting of CHR$(X). Same as STRIN"
  412. "G$(Y,X).", /* Description */
  413. "CHAR", /* Name */
  414. BasicStringSuffix, /* ReturnType */
  415. 2, /* ParameterCount */
  416. P1NUM | P2NUM, /* ParameterTypes */
  417. P1BYT | P2LEN, /* ParameterTests */
  418. NULL, /* NextPointer */
  419. B15 | HB1 | HB2 /* OptionVersionBitmask */
  420. },
  421. {
  422. F_CHAR4_X_S, /* UniqueID */
  423. "S$ = CHAR$( X )", /* Syntax */
  424. "The one-character string with the character corresponding to "
  425. "the numeric code X. On ASCII systems, CHAR$(65) returns 'A'."
  426. "", /* Description */
  427. "CHAR$", /* Name */
  428. BasicStringSuffix, /* ReturnType */
  429. 1, /* ParameterCount */
  430. P1NUM, /* ParameterTypes */
  431. P1BYT, /* ParameterTests */
  432. NULL, /* NextPointer */
  433. B15 | HB1 | HB2 /* OptionVersionBitmask */
  434. },
  435. {
  436. F_CHDIR_A_N, /* UniqueID */
  437. "N = CHDIR( A$ )", /* Syntax */
  438. "Changes to the directory named to A$.", /* Description */
  439. "CHDIR", /* Name */
  440. BasicDoubleSuffix, /* ReturnType */
  441. 1, /* ParameterCount */
  442. P1STR, /* ParameterTypes */
  443. P1BYT, /* ParameterTests */
  444. NULL, /* NextPointer */
  445. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  446. },
  447. {
  448. F_CHR_X_S, /* UniqueID */
  449. "S$ = CHR( X )", /* Syntax */
  450. "The one-character string with the character corresponding to "
  451. "the numeric code X. On ASCII systems, CHR(65) returns 'A'.Fo"
  452. "r the IBM System/360 and System/370, this function returns th"
  453. "e output of PRINT X, so A$ = CHR(X) is the opposite of X = NU"
  454. "M(A$).", /* Description */
  455. "CHR", /* Name */
  456. BasicStringSuffix, /* ReturnType */
  457. 1, /* ParameterCount */
  458. P1NUM, /* ParameterTypes */
  459. P1ANY, /* ParameterTests */
  460. NULL, /* NextPointer */
  461. B15 | I70 | I73 | HB1 | HB2 | VBX /* OptionVersionBitmask */
  462. },
  463. {
  464. F_CHR4_X_S, /* UniqueID */
  465. "S$ = CHR$( X )", /* Syntax */
  466. "The one-character string with the character corresponding to "
  467. "the numeric code X. On ASCII systems, CHR$(65) returns 'A'.", /* Description */
  468. "CHR$", /* Name */
  469. BasicStringSuffix, /* ReturnType */
  470. 1, /* ParameterCount */
  471. P1NUM, /* ParameterTypes */
  472. P1BYT, /* ParameterTests */
  473. NULL, /* NextPointer */
  474. B15 | D64 | G65 | G67 | D71 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  475. },
  476. {
  477. F_CINT_X_N, /* UniqueID */
  478. "N = CINT( X )", /* Syntax */
  479. "The short (16-bit) integer value of X.", /* Description */
  480. "CINT", /* Name */
  481. BasicIntegerSuffix, /* ReturnType */
  482. 1, /* ParameterCount */
  483. P1NUM, /* ParameterTypes */
  484. P1INT, /* ParameterTests */
  485. NULL, /* NextPointer */
  486. B15 | D71 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  487. },
  488. {
  489. F_CLG_X_N, /* UniqueID */
  490. "N = CLG( X )", /* Syntax */
  491. "The common logarithm of X; X shall be greater than zero.", /* Description */
  492. "CLG", /* Name */
  493. BasicDoubleSuffix, /* ReturnType */
  494. 1, /* ParameterCount */
  495. P1NUM, /* ParameterTypes */
  496. P1GTZ, /* ParameterTests */
  497. NULL, /* NextPointer */
  498. B15 | HB1 | HB2 /* OptionVersionBitmask */
  499. },
  500. {
  501. F_CLK_X_S, /* UniqueID */
  502. "S$ = CLK( X )", /* Syntax */
  503. "The time of day in 24-hour notation according to ISO 3307. F"
  504. "or example, the value of CLK at 11:15 AM is '11:15:00'. If t"
  505. "here is no clock available, then the value of CLK shall be '9"
  506. "9:99:99'. The value of TIME$ at midnight is '00:00:00'. The"
  507. " value of parameter X is ignored.", /* Description */
  508. "CLK", /* Name */
  509. BasicStringSuffix, /* ReturnType */
  510. 1, /* ParameterCount */
  511. P1NUM, /* ParameterTypes */
  512. P1ANY, /* ParameterTests */
  513. NULL, /* NextPointer */
  514. B15 | HB1 | HB2 /* OptionVersionBitmask */
  515. },
  516. {
  517. F_CLK_X_N, /* UniqueID */
  518. "N = CLK( X )", /* Syntax */
  519. "The time elapsed since the previous midnight, expressed in ho"
  520. "urs; e.g., the value of CLK at 3:15 PM is 15.25. If there is"
  521. " no clock available, then the value of CLK shall be -1. The "
  522. "value of CLK at midnight shall be zero (not 24). The value o"
  523. "f X is ignored.", /* Description */
  524. "CLK", /* Name */
  525. BasicDoubleSuffix, /* ReturnType */
  526. 1, /* ParameterCount */
  527. P1NUM, /* ParameterTypes */
  528. P1ANY, /* ParameterTests */
  529. NULL, /* NextPointer */
  530. G65 | G67 /* OptionVersionBitmask */
  531. },
  532. {
  533. F_CLK4_S, /* UniqueID */
  534. "S$ = CLK$", /* Syntax */
  535. "The time of day in 24-hour notation according to ISO 3307. F"
  536. "or example, the value of TIME$ at 11:15 AM is '11:15:00'. If"
  537. " there is no clock available, then the value of TIME$ shall b"
  538. "e '99:99:99'. The value of TIME$ at midnight is '00:00:00'.", /* Description */
  539. "CLK$", /* Name */
  540. BasicStringSuffix, /* ReturnType */
  541. 0, /* ParameterCount */
  542. PNONE, /* ParameterTypes */
  543. PNONE, /* ParameterTests */
  544. NULL, /* NextPointer */
  545. B15 | G67 | HB1 | HB2 /* OptionVersionBitmask */
  546. },
  547. {
  548. F_CLNG_X_N, /* UniqueID */
  549. "N = CLNG( X )", /* Syntax */
  550. "The long (32-bit) integer value of X.", /* Description */
  551. "CLNG", /* Name */
  552. BasicLongSuffix, /* ReturnType */
  553. 1, /* ParameterCount */
  554. P1NUM, /* ParameterTypes */
  555. P1LNG, /* ParameterTests */
  556. NULL, /* NextPointer */
  557. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  558. },
  559. {
  560. F_CLOG_X_N, /* UniqueID */
  561. "N = CLOG( X )", /* Syntax */
  562. "The common logarithm of X; X shall be greater than zero.", /* Description */
  563. "CLOG", /* Name */
  564. BasicDoubleSuffix, /* ReturnType */
  565. 1, /* ParameterCount */
  566. P1NUM, /* ParameterTypes */
  567. P1GTZ, /* ParameterTests */
  568. NULL, /* NextPointer */
  569. B15 | HB1 | HB2 /* OptionVersionBitmask */
  570. },
  571. {
  572. F_CLOSE_N, /* UniqueID */
  573. "N = CLOSE", /* Syntax */
  574. "Close all open files.", /* Description */
  575. "CLOSE", /* Name */
  576. BasicDoubleSuffix, /* ReturnType */
  577. 0, /* ParameterCount */
  578. PNONE, /* ParameterTypes */
  579. PNONE, /* ParameterTests */
  580. NULL, /* NextPointer */
  581. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  582. },
  583. {
  584. F_CLOSE_X_N, /* UniqueID */
  585. "N = CLOSE( X )", /* Syntax */
  586. "Close file number X.", /* Description */
  587. "CLOSE", /* Name */
  588. BasicDoubleSuffix, /* ReturnType */
  589. 1, /* ParameterCount */
  590. P1NUM, /* ParameterTypes */
  591. P1DEV, /* ParameterTests */
  592. NULL, /* NextPointer */
  593. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  594. },
  595. {
  596. F_CLS_N, /* UniqueID */
  597. "N = CLS", /* Syntax */
  598. "Clears the screen. Cursor is positioned at row 1, column 1.", /* Description */
  599. "CLS", /* Name */
  600. BasicDoubleSuffix, /* ReturnType */
  601. 0, /* ParameterCount */
  602. PNONE, /* ParameterTypes */
  603. PNONE, /* ParameterTests */
  604. NULL, /* NextPointer */
  605. B15 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  606. },
  607. {
  608. F_CODE_A_N, /* UniqueID */
  609. "N = CODE( A$ )", /* Syntax */
  610. "The numeric code for the first letter in A$. For example, CO"
  611. "DE(\"ABC\") returns 65 on ASCII systems.", /* Description */
  612. "CODE", /* Name */
  613. BasicDoubleSuffix, /* ReturnType */
  614. 1, /* ParameterCount */
  615. P1STR, /* ParameterTypes */
  616. P1BYT, /* ParameterTests */
  617. NULL, /* NextPointer */
  618. B15 | HB2 /* OptionVersionBitmask */
  619. },
  620. {
  621. F_COLOR_X_Y_N, /* UniqueID */
  622. "N = COLOR( X, Y )", /* Syntax */
  623. "Sets the foreground text color to X, and the background text "
  624. "color to Y.", /* Description */
  625. "COLOR", /* Name */
  626. BasicDoubleSuffix, /* ReturnType */
  627. 2, /* ParameterCount */
  628. P1NUM | P2NUM, /* ParameterTypes */
  629. P1BYT | P2BYT, /* ParameterTests */
  630. NULL, /* NextPointer */
  631. B15 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  632. },
  633. {
  634. F_COMMAND4_X_S, /* UniqueID */
  635. "S$ = COMMAND$( X )", /* Syntax */
  636. "The command line parameters. COMMAND$(0) is the BASIC progra"
  637. "m name. COMMAND$(1) is the first parameter after the BASIC p"
  638. "rogram name, and so on. Support for parameters varies by ope"
  639. "rating system, compiler, and so on. X in [0..9] ", /* Description */
  640. "COMMAND$", /* Name */
  641. BasicStringSuffix, /* ReturnType */
  642. 1, /* ParameterCount */
  643. P1NUM, /* ParameterTypes */
  644. P1BYT, /* ParameterTests */
  645. NULL, /* NextPointer */
  646. B15 | C77 | VBX /* OptionVersionBitmask */
  647. },
  648. {
  649. F_COS_X_N, /* UniqueID */
  650. "N = COS( X )", /* Syntax */
  651. "The cosine of X, where X is in radians.", /* Description */
  652. "COS", /* Name */
  653. BasicDoubleSuffix, /* ReturnType */
  654. 1, /* ParameterCount */
  655. P1NUM, /* ParameterTypes */
  656. P1ANY, /* ParameterTests */
  657. NULL, /* NextPointer */
  658. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  659. },
  660. {
  661. F_COSD_X_N, /* UniqueID */
  662. "N = COSD( X )", /* Syntax */
  663. "The cosine of X, where X is in degrees.", /* Description */
  664. "COSD", /* Name */
  665. BasicDoubleSuffix, /* ReturnType */
  666. 1, /* ParameterCount */
  667. P1NUM, /* ParameterTypes */
  668. P1ANY, /* ParameterTests */
  669. NULL, /* NextPointer */
  670. B15 | HB2 /* OptionVersionBitmask */
  671. },
  672. {
  673. F_COSG_X_N, /* UniqueID */
  674. "N = COSG( X )", /* Syntax */
  675. "The cosine of X, where X is in gradians.", /* Description */
  676. "COSG", /* Name */
  677. BasicDoubleSuffix, /* ReturnType */
  678. 1, /* ParameterCount */
  679. P1NUM, /* ParameterTypes */
  680. P1ANY, /* ParameterTests */
  681. NULL, /* NextPointer */
  682. B15 | HB2 /* OptionVersionBitmask */
  683. },
  684. {
  685. F_COSH_X_N, /* UniqueID */
  686. "N = COSH( X )", /* Syntax */
  687. "The hyperbolic cosine of X.", /* Description */
  688. "COSH", /* Name */
  689. BasicDoubleSuffix, /* ReturnType */
  690. 1, /* ParameterCount */
  691. P1NUM, /* ParameterTypes */
  692. P1ANY, /* ParameterTests */
  693. NULL, /* NextPointer */
  694. B15 | E86 /* OptionVersionBitmask */
  695. },
  696. {
  697. F_COT_X_N, /* UniqueID */
  698. "N = COT( X )", /* Syntax */
  699. "The cotangent of X, where X is in radians.", /* Description */
  700. "COT", /* Name */
  701. BasicDoubleSuffix, /* ReturnType */
  702. 1, /* ParameterCount */
  703. P1NUM, /* ParameterTypes */
  704. P1ANY, /* ParameterTests */
  705. NULL, /* NextPointer */
  706. B15 | G67 | I70 | I73 | E86 /* OptionVersionBitmask */
  707. },
  708. {
  709. F_COUNT_N, /* UniqueID */
  710. "N = COUNT", /* Syntax */
  711. "The current cursor position in the line.", /* Description */
  712. "COUNT", /* Name */
  713. BasicDoubleSuffix, /* ReturnType */
  714. 0, /* ParameterCount */
  715. PNONE, /* ParameterTypes */
  716. PNONE, /* ParameterTests */
  717. NULL, /* NextPointer */
  718. B15 | HB2 /* OptionVersionBitmask */
  719. },
  720. {
  721. F_CSC_X_N, /* UniqueID */
  722. "N = CSC( X )", /* Syntax */
  723. "The cosecant of X, where X is in radians.", /* Description */
  724. "CSC", /* Name */
  725. BasicDoubleSuffix, /* ReturnType */
  726. 1, /* ParameterCount */
  727. P1NUM, /* ParameterTypes */
  728. P1ANY, /* ParameterTests */
  729. NULL, /* NextPointer */
  730. B15 | I70 | I73 | E86 /* OptionVersionBitmask */
  731. },
  732. {
  733. F_CSH_X_N, /* UniqueID */
  734. "N = CSH( X )", /* Syntax */
  735. "The hyperbolic cosine of X.", /* Description */
  736. "CSH", /* Name */
  737. BasicDoubleSuffix, /* ReturnType */
  738. 1, /* ParameterCount */
  739. P1NUM, /* ParameterTypes */
  740. P1ANY, /* ParameterTests */
  741. NULL, /* NextPointer */
  742. B15 | HB2 /* OptionVersionBitmask */
  743. },
  744. {
  745. F_CSNG_X_N, /* UniqueID */
  746. "N = CSNG( X )", /* Syntax */
  747. "The single-precision value of X.", /* Description */
  748. "CSNG", /* Name */
  749. BasicSingleSuffix, /* ReturnType */
  750. 1, /* ParameterCount */
  751. P1NUM, /* ParameterTypes */
  752. P1FLT, /* ParameterTests */
  753. NULL, /* NextPointer */
  754. B15 | D71 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  755. },
  756. {
  757. F_CUR_X_Y_S, /* UniqueID */
  758. "S$ = CUR( X, Y )", /* Syntax */
  759. "Locates the cursor to row X, column Y.", /* Description */
  760. "CUR", /* Name */
  761. BasicStringSuffix, /* ReturnType */
  762. 2, /* ParameterCount */
  763. P1NUM | P2NUM, /* ParameterTypes */
  764. P1BYT | P2BYT, /* ParameterTests */
  765. NULL, /* NextPointer */
  766. B15 | HB2 /* OptionVersionBitmask */
  767. },
  768. {
  769. F_CVC_A_N, /* UniqueID */
  770. "N = CVC( A$ )", /* Syntax */
  771. "The currency (64-bit) integer value in A$, which was created "
  772. "by MKC$.", /* Description */
  773. "CVC", /* Name */
  774. BasicCurrencySuffix, /* ReturnType */
  775. 1, /* ParameterCount */
  776. P1STR, /* ParameterTypes */
  777. P1CUR, /* ParameterTests */
  778. NULL, /* NextPointer */
  779. B15 /* OptionVersionBitmask */
  780. },
  781. {
  782. F_CVD_A_N, /* UniqueID */
  783. "N = CVD( A$ )", /* Syntax */
  784. "The double-precision value in A$, which was created by MKD$.", /* Description */
  785. "CVD", /* Name */
  786. BasicDoubleSuffix, /* ReturnType */
  787. 1, /* ParameterCount */
  788. P1STR, /* ParameterTypes */
  789. P1DBL, /* ParameterTests */
  790. NULL, /* NextPointer */
  791. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  792. },
  793. {
  794. F_CVI_A_N, /* UniqueID */
  795. "N = CVI( A$ )", /* Syntax */
  796. "The short (16-bit) integer value in A$, which was created by "
  797. "MKI$.", /* Description */
  798. "CVI", /* Name */
  799. BasicIntegerSuffix, /* ReturnType */
  800. 1, /* ParameterCount */
  801. P1STR, /* ParameterTypes */
  802. P1INT, /* ParameterTests */
  803. NULL, /* NextPointer */
  804. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  805. },
  806. {
  807. F_CVL_A_N, /* UniqueID */
  808. "N = CVL( A$ )", /* Syntax */
  809. "The long (32-bit) integer value in A$, which was created by M"
  810. "KL$.", /* Description */
  811. "CVL", /* Name */
  812. BasicLongSuffix, /* ReturnType */
  813. 1, /* ParameterCount */
  814. P1STR, /* ParameterTypes */
  815. P1LNG, /* ParameterTests */
  816. NULL, /* NextPointer */
  817. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  818. },
  819. {
  820. F_CVS_A_N, /* UniqueID */
  821. "N = CVS( A$ )", /* Syntax */
  822. "The single-precision value in A$, which was created by MKS$.", /* Description */
  823. "CVS", /* Name */
  824. BasicSingleSuffix, /* ReturnType */
  825. 1, /* ParameterCount */
  826. P1STR, /* ParameterTypes */
  827. P1FLT, /* ParameterTests */
  828. NULL, /* NextPointer */
  829. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  830. },
  831. {
  832. F_DAT4_S, /* UniqueID */
  833. "S$ = DAT$", /* Syntax */
  834. "Mark-II: The current date based on the computer's internal cl"
  835. "ock as a string in the form 'MM/DD/YY'. If there is no calen"
  836. "dar available, then the value of DAT$ shall be '00/00/00'.", /* Description */
  837. "DAT$", /* Name */
  838. BasicStringSuffix, /* ReturnType */
  839. 0, /* ParameterCount */
  840. PNONE, /* ParameterTypes */
  841. PNONE, /* ParameterTests */
  842. NULL, /* NextPointer */
  843. G67 /* OptionVersionBitmask */
  844. },
  845. {
  846. F_DATE_N, /* UniqueID */
  847. "N = DATE", /* Syntax */
  848. "The current date in decimal form YYYDDD, where YYY are the nu"
  849. "mber of years since 1900 and DDD is the ordinal number of the"
  850. " current day of the year; e.g., the value of DATE on May 9, 1"
  851. "977 was 77129. If there is no calendar available, then the v"
  852. "alue of DATE shall be -1.", /* Description */
  853. "DATE", /* Name */
  854. BasicDoubleSuffix, /* ReturnType */
  855. 0, /* ParameterCount */
  856. PNONE, /* ParameterTypes */
  857. PNONE, /* ParameterTests */
  858. NULL, /* NextPointer */
  859. B15 | E86 /* OptionVersionBitmask */
  860. },
  861. {
  862. F_DATE4_S, /* UniqueID */
  863. "S$ = DATE$", /* Syntax */
  864. "BASIC-80: The current date based on the computer's internal c"
  865. "lock as a string in the form 'MM-DD-YYYY'. ECMA-116: The date "
  866. "in the string representation 'YYYYMMDD' according to ISO 2014"
  867. ". For example, the value of DATE$ on May 9, 1977 was '197705"
  868. "09'. If there is no calendar available, then the value of DA"
  869. "TE$ shall be '00000000'.", /* Description */
  870. "DATE$", /* Name */
  871. BasicStringSuffix, /* ReturnType */
  872. 0, /* ParameterCount */
  873. PNONE, /* ParameterTypes */
  874. PNONE, /* ParameterTests */
  875. NULL, /* NextPointer */
  876. B15 | D71 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  877. },
  878. {
  879. F_DATE4_X_S, /* UniqueID */
  880. "S$ = DATE$( X )", /* Syntax */
  881. "BASIC-80: The current date based on the computer's internal c"
  882. "lock as a string in the form 'MM-DD-YYYY'. ECMA-116: The date "
  883. "in the string representation 'YYYYMMDD' according to ISO 2014"
  884. ". For example, the value of DATE$ on May 9, 1977 was '197705"
  885. "09'. If there is no calendar available, then the value of DA"
  886. "TE$ shall be '00000000'. The value of parameter 'X' is ignor"
  887. "ed.", /* Description */
  888. "DATE$", /* Name */
  889. BasicStringSuffix, /* ReturnType */
  890. 1, /* ParameterCount */
  891. P1NUM, /* ParameterTypes */
  892. P1ANY, /* ParameterTests */
  893. NULL, /* NextPointer */
  894. D71 /* OptionVersionBitmask */
  895. },
  896. {
  897. F_DEF_FN_N, /* UniqueID */
  898. "N = DEF FN", /* Syntax */
  899. "User Function.", /* Description */
  900. "DEF FN", /* Name */
  901. BasicDoubleSuffix, /* ReturnType */
  902. 0, /* ParameterCount */
  903. PNONE, /* ParameterTypes */
  904. PNONE, /* ParameterTests */
  905. NULL, /* NextPointer */
  906. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  907. },
  908. {
  909. F_DEG_N, /* UniqueID */
  910. "N = DEG", /* Syntax */
  911. "Configures the math functions to accept and return angles in "
  912. "degrees.", /* Description */
  913. "DEG", /* Name */
  914. BasicDoubleSuffix, /* ReturnType */
  915. 0, /* ParameterCount */
  916. PNONE, /* ParameterTypes */
  917. PNONE, /* ParameterTests */
  918. NULL, /* NextPointer */
  919. B15 | HB1 | HB2 /* OptionVersionBitmask */
  920. },
  921. {
  922. F_DEG_X_N, /* UniqueID */
  923. "N = DEG( X )", /* Syntax */
  924. "The number of degrees in X radians.", /* Description */
  925. "DEG", /* Name */
  926. BasicDoubleSuffix, /* ReturnType */
  927. 1, /* ParameterCount */
  928. P1NUM, /* ParameterTypes */
  929. P1ANY, /* ParameterTests */
  930. NULL, /* NextPointer */
  931. B15 | I70 | I73 | HB1 | HB2 | E86 /* OptionVersionBitmask */
  932. },
  933. {
  934. F_DEGREE_N, /* UniqueID */
  935. "N = DEGREE", /* Syntax */
  936. "Configures the math functions to accept and return angles in "
  937. "degrees.", /* Description */
  938. "DEGREE", /* Name */
  939. BasicDoubleSuffix, /* ReturnType */
  940. 0, /* ParameterCount */
  941. PNONE, /* ParameterTypes */
  942. PNONE, /* ParameterTests */
  943. NULL, /* NextPointer */
  944. B15 | HB2 /* OptionVersionBitmask */
  945. },
  946. {
  947. F_DEGREE_X_N, /* UniqueID */
  948. "N = DEGREE( X )", /* Syntax */
  949. "The number of degrees in X radians.", /* Description */
  950. "DEGREE", /* Name */
  951. BasicDoubleSuffix, /* ReturnType */
  952. 1, /* ParameterCount */
  953. P1NUM, /* ParameterTypes */
  954. P1ANY, /* ParameterTests */
  955. NULL, /* NextPointer */
  956. B15 | HB2 /* OptionVersionBitmask */
  957. },
  958. {
  959. F_DET_N, /* UniqueID */
  960. "N = DET", /* Syntax */
  961. "The determinant of the last MAT INV. Zero means error.", /* Description */
  962. "DET", /* Name */
  963. BasicDoubleSuffix, /* ReturnType */
  964. 0, /* ParameterCount */
  965. PNONE, /* ParameterTypes */
  966. PNONE, /* ParameterTests */
  967. NULL, /* NextPointer */
  968. B15 | G67 | I70 | D71 | I73 | HB2 /* OptionVersionBitmask */
  969. },
  970. {
  971. F_DIM_N, /* UniqueID */
  972. "N = DIM( ... )", /* Syntax */
  973. "DIM( arrayname ). The total number of dimensions of the arra"
  974. "y.", /* Description */
  975. "DIM", /* Name */
  976. BasicDoubleSuffix, /* ReturnType */
  977. 255, /* ParameterCount */
  978. PNONE, /* ParameterTypes */
  979. PNONE, /* ParameterTests */
  980. NULL, /* NextPointer */
  981. B15 /* OptionVersionBitmask */
  982. },
  983. {
  984. F_ENVIRON_A_N, /* UniqueID */
  985. "N = ENVIRON( A$ )", /* Syntax */
  986. "Sends the environment variable expression contained in A$ to "
  987. "the host operating system. A$ must contain the '=' characte"
  988. "r.", /* Description */
  989. "ENVIRON", /* Name */
  990. BasicDoubleSuffix, /* ReturnType */
  991. 1, /* ParameterCount */
  992. P1STR, /* ParameterTypes */
  993. P1BYT, /* ParameterTests */
  994. NULL, /* NextPointer */
  995. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  996. },
  997. {
  998. F_ENVIRON4_A_S, /* UniqueID */
  999. "S$ = ENVIRON$( A$ )", /* Syntax */
  1000. "The value of the environment variable named A$.", /* Description */
  1001. "ENVIRON$", /* Name */
  1002. BasicStringSuffix, /* ReturnType */
  1003. 1, /* ParameterCount */
  1004. P1STR, /* ParameterTypes */
  1005. P1BYT, /* ParameterTests */
  1006. NULL, /* NextPointer */
  1007. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1008. },
  1009. {
  1010. F_EOF_X_N, /* UniqueID */
  1011. "N = EOF( X )", /* Syntax */
  1012. "If device number X is at the end-of-file, then -1, otherwise "
  1013. "0.", /* Description */
  1014. "EOF", /* Name */
  1015. BasicDoubleSuffix, /* ReturnType */
  1016. 1, /* ParameterCount */
  1017. P1NUM, /* ParameterTypes */
  1018. P1DEV, /* ParameterTests */
  1019. NULL, /* NextPointer */
  1020. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1021. },
  1022. {
  1023. F_EPS_X_N, /* UniqueID */
  1024. "N = EPS( X )", /* Syntax */
  1025. "The maximum of (X-X1,X2-X, sigma) where X1 and X2 are the pre"
  1026. "decessor and successor of X and signma is the smallest positi"
  1027. "ve value representable. If X has no predecessor the X1=X and"
  1028. " if X has no successor the X2=X. Note EPS(0) is the smallest"
  1029. " positive number representable by the implementation, and is "
  1030. "therefor implementation-defined. Note also that EPS may prod"
  1031. "uce different results for different arithmetic options (see O"
  1032. "PTION ARITHMETIC).", /* Description */
  1033. "EPS", /* Name */
  1034. BasicDoubleSuffix, /* ReturnType */
  1035. 1, /* ParameterCount */
  1036. P1NUM, /* ParameterTypes */
  1037. P1ANY, /* ParameterTests */
  1038. NULL, /* NextPointer */
  1039. B15 | E86 /* OptionVersionBitmask */
  1040. },
  1041. {
  1042. F_ERL_N, /* UniqueID */
  1043. "N = ERL", /* Syntax */
  1044. "The line number of the most recent error.", /* Description */
  1045. "ERL", /* Name */
  1046. BasicDoubleSuffix, /* ReturnType */
  1047. 0, /* ParameterCount */
  1048. PNONE, /* ParameterTypes */
  1049. PNONE, /* ParameterTests */
  1050. NULL, /* NextPointer */
  1051. B15 | D71 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1052. },
  1053. {
  1054. F_ERR_N, /* UniqueID */
  1055. "N = ERR", /* Syntax */
  1056. "The error number of the most recent error.", /* Description */
  1057. "ERR", /* Name */
  1058. BasicDoubleSuffix, /* ReturnType */
  1059. 0, /* ParameterCount */
  1060. PNONE, /* ParameterTypes */
  1061. PNONE, /* ParameterTests */
  1062. NULL, /* NextPointer */
  1063. B15 | D71 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1064. },
  1065. {
  1066. F_ERR4_S, /* UniqueID */
  1067. "S$ = ERR$", /* Syntax */
  1068. "The last error message.", /* Description */
  1069. "ERR$", /* Name */
  1070. BasicStringSuffix, /* ReturnType */
  1071. 0, /* ParameterCount */
  1072. PNONE, /* ParameterTypes */
  1073. PNONE, /* ParameterTests */
  1074. NULL, /* NextPointer */
  1075. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1076. },
  1077. {
  1078. F_ERRL_N, /* UniqueID */
  1079. "N = ERRL", /* Syntax */
  1080. "The line number of the most recent error.", /* Description */
  1081. "ERRL", /* Name */
  1082. BasicDoubleSuffix, /* ReturnType */
  1083. 0, /* ParameterCount */
  1084. PNONE, /* ParameterTypes */
  1085. PNONE, /* ParameterTests */
  1086. NULL, /* NextPointer */
  1087. B15 | HB2 /* OptionVersionBitmask */
  1088. },
  1089. {
  1090. F_ERRN_N, /* UniqueID */
  1091. "N = ERRN", /* Syntax */
  1092. "The error number of the most recent error.", /* Description */
  1093. "ERRN", /* Name */
  1094. BasicDoubleSuffix, /* ReturnType */
  1095. 0, /* ParameterCount */
  1096. PNONE, /* ParameterTypes */
  1097. PNONE, /* ParameterTests */
  1098. NULL, /* NextPointer */
  1099. B15 | HB2 /* OptionVersionBitmask */
  1100. },
  1101. {
  1102. F_ERROR_X_N, /* UniqueID */
  1103. "N = ERROR( X )", /* Syntax */
  1104. "Simulate the error number in X.", /* Description */
  1105. "ERROR", /* Name */
  1106. BasicDoubleSuffix, /* ReturnType */
  1107. 1, /* ParameterCount */
  1108. P1NUM, /* ParameterTypes */
  1109. P1BYT, /* ParameterTests */
  1110. NULL, /* NextPointer */
  1111. B15 | D71 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1112. },
  1113. {
  1114. F_ERROR_X_A_N, /* UniqueID */
  1115. "N = ERROR( X, A$ )", /* Syntax */
  1116. "Simulate the error number in X, with a custom message in A$.", /* Description */
  1117. "ERROR", /* Name */
  1118. BasicDoubleSuffix, /* ReturnType */
  1119. 2, /* ParameterCount */
  1120. P1NUM | P2STR, /* ParameterTypes */
  1121. P1BYT | P2ANY, /* ParameterTests */
  1122. NULL, /* NextPointer */
  1123. B15 | HB1 | HB2 /* OptionVersionBitmask */
  1124. },
  1125. {
  1126. F_ERROR4_S, /* UniqueID */
  1127. "S$ = ERROR$", /* Syntax */
  1128. "The last error message.", /* Description */
  1129. "ERROR$", /* Name */
  1130. BasicStringSuffix, /* ReturnType */
  1131. 0, /* ParameterCount */
  1132. PNONE, /* ParameterTypes */
  1133. PNONE, /* ParameterTests */
  1134. NULL, /* NextPointer */
  1135. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1136. },
  1137. {
  1138. F_EXAM_X_N, /* UniqueID */
  1139. "N = EXAM( X )", /* Syntax */
  1140. "The value read from hardware address X. Not supported on all"
  1141. " platforms.", /* Description */
  1142. "EXAM", /* Name */
  1143. BasicDoubleSuffix, /* ReturnType */
  1144. 1, /* ParameterCount */
  1145. P1NUM, /* ParameterTypes */
  1146. P1LNG, /* ParameterTests */
  1147. NULL, /* NextPointer */
  1148. HB1 | HB2 /* OptionVersionBitmask */
  1149. },
  1150. {
  1151. F_EXP_X_N, /* UniqueID */
  1152. "N = EXP( X )", /* Syntax */
  1153. "The exponential value of X, i.e., the value of the base of na"
  1154. "tural logarithms (e = 2.71828) raised to the power of X; if "
  1155. "EXP(X) is less that machine infinitesimal, then its value sha"
  1156. "ll be replaced with zero.", /* Description */
  1157. "EXP", /* Name */
  1158. BasicDoubleSuffix, /* ReturnType */
  1159. 1, /* ParameterCount */
  1160. P1NUM, /* ParameterTypes */
  1161. P1ANY, /* ParameterTests */
  1162. NULL, /* NextPointer */
  1163. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  1164. },
  1165. {
  1166. F_FETCH_X_N, /* UniqueID */
  1167. "N = FETCH( X )", /* Syntax */
  1168. "The value read from hardware address X. Not supported on all"
  1169. " platforms.", /* Description */
  1170. "FETCH", /* Name */
  1171. BasicDoubleSuffix, /* ReturnType */
  1172. 1, /* ParameterCount */
  1173. P1NUM, /* ParameterTypes */
  1174. P1LNG, /* ParameterTests */
  1175. NULL, /* NextPointer */
  1176. HB1 | HB2 /* OptionVersionBitmask */
  1177. },
  1178. {
  1179. F_FILEATTR_X_Y_N, /* UniqueID */
  1180. "N = FILEATTR( X, Y )", /* Syntax */
  1181. "For file X, if Y = 1 then returns open mode, otherwise return"
  1182. "s zero.", /* Description */
  1183. "FILEATTR", /* Name */
  1184. BasicDoubleSuffix, /* ReturnType */
  1185. 2, /* ParameterCount */
  1186. P1NUM | P2NUM, /* ParameterTypes */
  1187. P1DEV | P2INT, /* ParameterTests */
  1188. NULL, /* NextPointer */
  1189. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1190. },
  1191. {
  1192. F_FILES_N, /* UniqueID */
  1193. "N = FILES", /* Syntax */
  1194. "Displays all the file names.", /* Description */
  1195. "FILES", /* Name */
  1196. BasicDoubleSuffix, /* ReturnType */
  1197. 0, /* ParameterCount */
  1198. PNONE, /* ParameterTypes */
  1199. PNONE, /* ParameterTests */
  1200. NULL, /* NextPointer */
  1201. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1202. },
  1203. {
  1204. F_FILES_A_N, /* UniqueID */
  1205. "N = FILES( A$ )", /* Syntax */
  1206. "Displays all the file names matching A$.", /* Description */
  1207. "FILES", /* Name */
  1208. BasicDoubleSuffix, /* ReturnType */
  1209. 1, /* ParameterCount */
  1210. P1STR, /* ParameterTypes */
  1211. P1BYT, /* ParameterTests */
  1212. NULL, /* NextPointer */
  1213. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1214. },
  1215. {
  1216. F_FILL_X_Y_N, /* UniqueID */
  1217. "N = FILL( X, Y )", /* Syntax */
  1218. "Sends Y to hardware address X. Not supported on all platform"
  1219. "s.", /* Description */
  1220. "FILL", /* Name */
  1221. BasicDoubleSuffix, /* ReturnType */
  1222. 2, /* ParameterCount */
  1223. P1NUM | P2NUM, /* ParameterTypes */
  1224. P1LNG | P2BYT, /* ParameterTests */
  1225. NULL, /* NextPointer */
  1226. HB1 | HB2 /* OptionVersionBitmask */
  1227. },
  1228. {
  1229. F_FIX_X_N, /* UniqueID */
  1230. "N = FIX( X )", /* Syntax */
  1231. "The truncated integer, part of X. FIX (X) is equivalent to SG"
  1232. "N(X)*INT(ABS(X)). The major difference between FIX and INT is"
  1233. " that FIX does not return the next lower number for negative "
  1234. "X.", /* Description */
  1235. "FIX", /* Name */
  1236. BasicDoubleSuffix, /* ReturnType */
  1237. 1, /* ParameterCount */
  1238. P1NUM, /* ParameterTypes */
  1239. P1ANY, /* ParameterTests */
  1240. NULL, /* NextPointer */
  1241. B15 | D64 | G65 | G67 | I70 | D71 | I73 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  1242. },
  1243. {
  1244. F_FLOAT_X_N, /* UniqueID */
  1245. "N = FLOAT( X )", /* Syntax */
  1246. "The rounded integer valuet of X.", /* Description */
  1247. "FLOAT", /* Name */
  1248. BasicDoubleSuffix, /* ReturnType */
  1249. 1, /* ParameterCount */
  1250. P1NUM, /* ParameterTypes */
  1251. P1ANY, /* ParameterTests */
  1252. NULL, /* NextPointer */
  1253. C77 /* OptionVersionBitmask */
  1254. },
  1255. {
  1256. F_FLOW_N, /* UniqueID */
  1257. "N = FLOW", /* Syntax */
  1258. "Turn tracing ON", /* Description */
  1259. "FLOW", /* Name */
  1260. BasicDoubleSuffix, /* ReturnType */
  1261. 0, /* ParameterCount */
  1262. PNONE, /* ParameterTypes */
  1263. PNONE, /* ParameterTests */
  1264. NULL, /* NextPointer */
  1265. B15 | HB2 /* OptionVersionBitmask */
  1266. },
  1267. {
  1268. F_FP_X_N, /* UniqueID */
  1269. "N = FP( X )", /* Syntax */
  1270. "The fractional part of X, i.e. X - IP(X).", /* Description */
  1271. "FP", /* Name */
  1272. BasicDoubleSuffix, /* ReturnType */
  1273. 1, /* ParameterCount */
  1274. P1NUM, /* ParameterTypes */
  1275. P1ANY, /* ParameterTests */
  1276. NULL, /* NextPointer */
  1277. B15 | E86 /* OptionVersionBitmask */
  1278. },
  1279. {
  1280. F_FRAC_X_N, /* UniqueID */
  1281. "N = FRAC( X )", /* Syntax */
  1282. "The fractional part of X, i.e. X - IP(X).", /* Description */
  1283. "FRAC", /* Name */
  1284. BasicDoubleSuffix, /* ReturnType */
  1285. 1, /* ParameterCount */
  1286. P1NUM, /* ParameterTypes */
  1287. P1ANY, /* ParameterTests */
  1288. NULL, /* NextPointer */
  1289. B15 | HB2 /* OptionVersionBitmask */
  1290. },
  1291. {
  1292. F_FRE_N, /* UniqueID */
  1293. "N = FRE", /* Syntax */
  1294. "The number of bytes of available memory. This function is pr"
  1295. "ovided for backward compatibility only and it always returns "
  1296. "a fixed value of 32000.", /* Description */
  1297. "FRE", /* Name */
  1298. BasicDoubleSuffix, /* ReturnType */
  1299. 0, /* ParameterCount */
  1300. PNONE, /* ParameterTypes */
  1301. PNONE, /* ParameterTests */
  1302. NULL, /* NextPointer */
  1303. B15 | D71 | C77 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1304. },
  1305. {
  1306. F_FRE_A_N, /* UniqueID */
  1307. "N = FRE( A$ )", /* Syntax */
  1308. "The number of bytes of available memory. This function is pr"
  1309. "ovided for backward compatibility only and it always returns "
  1310. "a fixed value of 32000.The value of A$ is ignored.", /* Description */
  1311. "FRE", /* Name */
  1312. BasicDoubleSuffix, /* ReturnType */
  1313. 1, /* ParameterCount */
  1314. P1STR, /* ParameterTypes */
  1315. P1ANY, /* ParameterTests */
  1316. NULL, /* NextPointer */
  1317. B15 | D71 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1318. },
  1319. {
  1320. F_FRE_X_N, /* UniqueID */
  1321. "N = FRE( X )", /* Syntax */
  1322. "The number of bytes of available memory. This function is pr"
  1323. "ovided for backward compatibility only and it always returns "
  1324. "a fixed value of 32000. The value of X is ignored.", /* Description */
  1325. "FRE", /* Name */
  1326. BasicDoubleSuffix, /* ReturnType */
  1327. 1, /* ParameterCount */
  1328. P1NUM, /* ParameterTypes */
  1329. P1ANY, /* ParameterTests */
  1330. NULL, /* NextPointer */
  1331. B15 | D71 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1332. },
  1333. {
  1334. F_FREE_N, /* UniqueID */
  1335. "N = FREE", /* Syntax */
  1336. "The number of bytes of available memory. This function is pr"
  1337. "ovided for backward compatibility only and it always returns "
  1338. "a fixed value of 32000.", /* Description */
  1339. "FREE", /* Name */
  1340. BasicDoubleSuffix, /* ReturnType */
  1341. 0, /* ParameterCount */
  1342. PNONE, /* ParameterTypes */
  1343. PNONE, /* ParameterTests */
  1344. NULL, /* NextPointer */
  1345. HB1 | HB2 /* OptionVersionBitmask */
  1346. },
  1347. {
  1348. F_FREE_A_N, /* UniqueID */
  1349. "N = FREE( A$ )", /* Syntax */
  1350. "The number of bytes of available memory. This function is pr"
  1351. "ovided for backward compatibility only and it always returns "
  1352. "a fixed value of 32000.The value of A$ is ignored.", /* Description */
  1353. "FREE", /* Name */
  1354. BasicDoubleSuffix, /* ReturnType */
  1355. 1, /* ParameterCount */
  1356. P1STR, /* ParameterTypes */
  1357. P1ANY, /* ParameterTests */
  1358. NULL, /* NextPointer */
  1359. HB1 | HB2 /* OptionVersionBitmask */
  1360. },
  1361. {
  1362. F_FREE_X_N, /* UniqueID */
  1363. "N = FREE( X )", /* Syntax */
  1364. "The number of bytes of available memory. This function is pr"
  1365. "ovided for backward compatibility only and it always returns "
  1366. "a fixed value of 32000. The value of X is ignored.", /* Description */
  1367. "FREE", /* Name */
  1368. BasicDoubleSuffix, /* ReturnType */
  1369. 1, /* ParameterCount */
  1370. P1NUM, /* ParameterTypes */
  1371. P1ANY, /* ParameterTests */
  1372. NULL, /* NextPointer */
  1373. HB1 | HB2 /* OptionVersionBitmask */
  1374. },
  1375. {
  1376. F_FREEFILE_N, /* UniqueID */
  1377. "N = FREEFILE", /* Syntax */
  1378. "The next available file number.", /* Description */
  1379. "FREEFILE", /* Name */
  1380. BasicDoubleSuffix, /* ReturnType */
  1381. 0, /* ParameterCount */
  1382. PNONE, /* ParameterTypes */
  1383. PNONE, /* ParameterTests */
  1384. NULL, /* NextPointer */
  1385. B15 | M88 | VBX /* OptionVersionBitmask */
  1386. },
  1387. {
  1388. F_GET_X_N, /* UniqueID */
  1389. "N = GET( X )", /* Syntax */
  1390. "For file X, gets the next available record.", /* Description */
  1391. "GET", /* Name */
  1392. BasicDoubleSuffix, /* ReturnType */
  1393. 1, /* ParameterCount */
  1394. P1NUM, /* ParameterTypes */
  1395. P1DEV, /* ParameterTests */
  1396. NULL, /* NextPointer */
  1397. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1398. },
  1399. {
  1400. F_GET_X_Y_N, /* UniqueID */
  1401. "N = GET( X, Y )", /* Syntax */
  1402. "For file X, gets record number Y. The first record number is"
  1403. " 1.", /* Description */
  1404. "GET", /* Name */
  1405. BasicDoubleSuffix, /* ReturnType */
  1406. 2, /* ParameterCount */
  1407. P1NUM | P2NUM, /* ParameterTypes */
  1408. P1DEV | P2INT, /* ParameterTests */
  1409. NULL, /* NextPointer */
  1410. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1411. },
  1412. {
  1413. F_GRAD_N, /* UniqueID */
  1414. "N = GRAD", /* Syntax */
  1415. "Configures the math functions to accept and return angles in "
  1416. "gradians.", /* Description */
  1417. "GRAD", /* Name */
  1418. BasicDoubleSuffix, /* ReturnType */
  1419. 0, /* ParameterCount */
  1420. PNONE, /* ParameterTypes */
  1421. PNONE, /* ParameterTests */
  1422. NULL, /* NextPointer */
  1423. B15 | HB2 /* OptionVersionBitmask */
  1424. },
  1425. {
  1426. F_GRADIAN_N, /* UniqueID */
  1427. "N = GRADIAN", /* Syntax */
  1428. "Configures the math functions to accept and return angles in "
  1429. "gradians.", /* Description */
  1430. "GRADIAN", /* Name */
  1431. BasicDoubleSuffix, /* ReturnType */
  1432. 0, /* ParameterCount */
  1433. PNONE, /* ParameterTypes */
  1434. PNONE, /* ParameterTests */
  1435. NULL, /* NextPointer */
  1436. B15 | HB2 /* OptionVersionBitmask */
  1437. },
  1438. {
  1439. F_HCS_X_N, /* UniqueID */
  1440. "N = HCS( X )", /* Syntax */
  1441. "The hyperbolic cosine of X.", /* Description */
  1442. "HCS", /* Name */
  1443. BasicDoubleSuffix, /* ReturnType */
  1444. 1, /* ParameterCount */
  1445. P1NUM, /* ParameterTypes */
  1446. P1ANY, /* ParameterTests */
  1447. NULL, /* NextPointer */
  1448. I70 | I73 /* OptionVersionBitmask */
  1449. },
  1450. {
  1451. F_HEX4_X_S, /* UniqueID */
  1452. "S$ = HEX$( X )", /* Syntax */
  1453. "The the hexadecimal (base 16) representation of X.", /* Description */
  1454. "HEX$", /* Name */
  1455. BasicStringSuffix, /* ReturnType */
  1456. 1, /* ParameterCount */
  1457. P1NUM, /* ParameterTypes */
  1458. P1INT, /* ParameterTests */
  1459. NULL, /* NextPointer */
  1460. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1461. },
  1462. {
  1463. F_HOME_N, /* UniqueID */
  1464. "N = HOME", /* Syntax */
  1465. "Clears the screen. Cursor is positioned at row 1, column 1.", /* Description */
  1466. "HOME", /* Name */
  1467. BasicDoubleSuffix, /* ReturnType */
  1468. 0, /* ParameterCount */
  1469. PNONE, /* ParameterTypes */
  1470. PNONE, /* ParameterTests */
  1471. NULL, /* NextPointer */
  1472. B15 | HB1 | HB2 /* OptionVersionBitmask */
  1473. },
  1474. {
  1475. F_HSN_X_N, /* UniqueID */
  1476. "N = HSN( X )", /* Syntax */
  1477. "The hyperbolic sine of X.", /* Description */
  1478. "HSN", /* Name */
  1479. BasicDoubleSuffix, /* ReturnType */
  1480. 1, /* ParameterCount */
  1481. P1NUM, /* ParameterTypes */
  1482. P1ANY, /* ParameterTests */
  1483. NULL, /* NextPointer */
  1484. I70 | I73 /* OptionVersionBitmask */
  1485. },
  1486. {
  1487. F_HTN_X_N, /* UniqueID */
  1488. "N = HTN( X )", /* Syntax */
  1489. "The hyperbolic tangent of X.", /* Description */
  1490. "HTN", /* Name */
  1491. BasicDoubleSuffix, /* ReturnType */
  1492. 1, /* ParameterCount */
  1493. P1NUM, /* ParameterTypes */
  1494. P1ANY, /* ParameterTests */
  1495. NULL, /* NextPointer */
  1496. I70 | I73 /* OptionVersionBitmask */
  1497. },
  1498. {
  1499. F_INDEX_A_B_N, /* UniqueID */
  1500. "N = INDEX( A$, B$ )", /* Syntax */
  1501. "The position at which B$ occurs in A$, beginning at position "
  1502. "1.", /* Description */
  1503. "INDEX", /* Name */
  1504. BasicDoubleSuffix, /* ReturnType */
  1505. 2, /* ParameterCount */
  1506. P1STR | P2STR, /* ParameterTypes */
  1507. P1ANY | P2ANY, /* ParameterTests */
  1508. NULL, /* NextPointer */
  1509. B15 | HB2 /* OptionVersionBitmask */
  1510. },
  1511. {
  1512. F_INITIALIZE_N, /* UniqueID */
  1513. "N = INITIALIZE", /* Syntax */
  1514. "This function is provided for backward compatibility only and"
  1515. " it always returns a fixed value of 0.", /* Description */
  1516. "INITIALIZE", /* Name */
  1517. BasicDoubleSuffix, /* ReturnType */
  1518. 0, /* ParameterCount */
  1519. PNONE, /* ParameterTypes */
  1520. PNONE, /* ParameterTests */
  1521. NULL, /* NextPointer */
  1522. C77 /* OptionVersionBitmask */
  1523. },
  1524. {
  1525. F_INKEY4_S, /* UniqueID */
  1526. "S$ = INKEY$", /* Syntax */
  1527. "The keypress, if available. If a keypress is not available, t"
  1528. "hen immediately returns a null string (''). If not supported"
  1529. " by the platform, then always returns an empty string, so use"
  1530. " INPUT$(1) instead.", /* Description */
  1531. "INKEY$", /* Name */
  1532. BasicStringSuffix, /* ReturnType */
  1533. 0, /* ParameterCount */
  1534. PNONE, /* ParameterTypes */
  1535. PNONE, /* ParameterTests */
  1536. NULL, /* NextPointer */
  1537. B15 | D71 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1538. },
  1539. {
  1540. F_INP_X_N, /* UniqueID */
  1541. "N = INP( X )", /* Syntax */
  1542. "The value read from machine port X. Not supported on all pla"
  1543. "tforms.", /* Description */
  1544. "INP", /* Name */
  1545. BasicDoubleSuffix, /* ReturnType */
  1546. 1, /* ParameterCount */
  1547. P1NUM, /* ParameterTypes */
  1548. P1BYT, /* ParameterTests */
  1549. NULL, /* NextPointer */
  1550. B15 | D71 | C77 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1551. },
  1552. {
  1553. F_INPUT4_X_S, /* UniqueID */
  1554. "S$ = INPUT$( X )", /* Syntax */
  1555. "The string of X characters, read from the terminal.", /* Description */
  1556. "INPUT$", /* Name */
  1557. BasicStringSuffix, /* ReturnType */
  1558. 1, /* ParameterCount */
  1559. P1NUM, /* ParameterTypes */
  1560. P1LEN, /* ParameterTests */
  1561. NULL, /* NextPointer */
  1562. B15 | D71 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1563. },
  1564. {
  1565. F_INPUT4_X_Y_S, /* UniqueID */
  1566. "S$ = INPUT$( X, Y )", /* Syntax */
  1567. "The string of X characters, read from file Y.", /* Description */
  1568. "INPUT$", /* Name */
  1569. BasicStringSuffix, /* ReturnType */
  1570. 2, /* ParameterCount */
  1571. P1NUM | P2NUM, /* ParameterTypes */
  1572. P1LEN | P2DEV, /* ParameterTests */
  1573. NULL, /* NextPointer */
  1574. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1575. },
  1576. {
  1577. F_INSTR_A_B_N, /* UniqueID */
  1578. "N = INSTR( A$, B$ )", /* Syntax */
  1579. "The position at which B$ occurs in A$, beginning at position "
  1580. "1.", /* Description */
  1581. "INSTR", /* Name */
  1582. BasicDoubleSuffix, /* ReturnType */
  1583. 2, /* ParameterCount */
  1584. P1STR | P2STR, /* ParameterTypes */
  1585. P1ANY | P2ANY, /* ParameterTests */
  1586. NULL, /* NextPointer */
  1587. B15 | D71 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1588. },
  1589. {
  1590. F_INSTR_X_A_B_N, /* UniqueID */
  1591. "N = INSTR( X, A$, B$ )", /* Syntax */
  1592. "The position at which B$ occurs in A$, beginning at position "
  1593. "X.", /* Description */
  1594. "INSTR", /* Name */
  1595. BasicDoubleSuffix, /* ReturnType */
  1596. 3, /* ParameterCount */
  1597. P1NUM | P2STR | P3STR, /* ParameterTypes */
  1598. P1POS | P2ANY | P3ANY, /* ParameterTests */
  1599. NULL, /* NextPointer */
  1600. B15 | D71 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1601. },
  1602. {
  1603. F_INT_X_N, /* UniqueID */
  1604. "N = INT( X )", /* Syntax */
  1605. "The largest integer not greater than X; e.g. INT(1.3) = 1 and"
  1606. " INT(-1.3) = 2.", /* Description */
  1607. "INT", /* Name */
  1608. BasicDoubleSuffix, /* ReturnType */
  1609. 1, /* ParameterCount */
  1610. P1NUM, /* ParameterTypes */
  1611. P1ANY, /* ParameterTests */
  1612. NULL, /* NextPointer */
  1613. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  1614. },
  1615. {
  1616. F_INT5_X_N, /* UniqueID */
  1617. "N = INT%( X )", /* Syntax */
  1618. "The rounded integer valuet of X.", /* Description */
  1619. "INT%", /* Name */
  1620. BasicLongSuffix, /* ReturnType */
  1621. 1, /* ParameterCount */
  1622. P1NUM, /* ParameterTypes */
  1623. P1ANY, /* ParameterTests */
  1624. NULL, /* NextPointer */
  1625. C77 /* OptionVersionBitmask */
  1626. },
  1627. {
  1628. F_IP_X_N, /* UniqueID */
  1629. "N = IP( X )", /* Syntax */
  1630. "The integer part of X, i.e., SGN(X)*INT(ABS(X)).", /* Description */
  1631. "IP", /* Name */
  1632. BasicDoubleSuffix, /* ReturnType */
  1633. 1, /* ParameterCount */
  1634. P1NUM, /* ParameterTypes */
  1635. P1ANY, /* ParameterTests */
  1636. NULL, /* NextPointer */
  1637. B15 | E86 /* OptionVersionBitmask */
  1638. },
  1639. {
  1640. F_KEY_S, /* UniqueID */
  1641. "S$ = KEY", /* Syntax */
  1642. "The keypress, if available. If a keypress is not available, t"
  1643. "hen immediately returns a null string (''). If not supported"
  1644. " by the platform, then always returns an empty string, so use"
  1645. " INPUT$(1) instead.", /* Description */
  1646. "KEY", /* Name */
  1647. BasicStringSuffix, /* ReturnType */
  1648. 0, /* ParameterCount */
  1649. PNONE, /* ParameterTypes */
  1650. PNONE, /* ParameterTests */
  1651. NULL, /* NextPointer */
  1652. B15 | HB2 /* OptionVersionBitmask */
  1653. },
  1654. {
  1655. F_KEY4_S, /* UniqueID */
  1656. "S$ = KEY$", /* Syntax */
  1657. "The keypress, if available. If a keypress is not available, t"
  1658. "hen immediately returns a null string (''). If not supported"
  1659. " by the platform, then always returns an empty string, so use"
  1660. " INPUT$(1) instead.", /* Description */
  1661. "KEY$", /* Name */
  1662. BasicStringSuffix, /* ReturnType */
  1663. 0, /* ParameterCount */
  1664. PNONE, /* ParameterTypes */
  1665. PNONE, /* ParameterTests */
  1666. NULL, /* NextPointer */
  1667. B15 | HB2 /* OptionVersionBitmask */
  1668. },
  1669. {
  1670. F_KILL_A_N, /* UniqueID */
  1671. "N = KILL( A$ )", /* Syntax */
  1672. "Removes the file named in A$.", /* Description */
  1673. "KILL", /* Name */
  1674. BasicDoubleSuffix, /* ReturnType */
  1675. 1, /* ParameterCount */
  1676. P1STR, /* ParameterTypes */
  1677. P1BYT, /* ParameterTests */
  1678. NULL, /* NextPointer */
  1679. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1680. },
  1681. {
  1682. F_LBOUND_N, /* UniqueID */
  1683. "N = LBOUND( ... )", /* Syntax */
  1684. "LBOUND( arrayname [, dimension] ). The lower bound of the ar"
  1685. "ray. The dimension defaults to 1. dimension in [1,DIM(array"
  1686. "name)]", /* Description */
  1687. "LBOUND", /* Name */
  1688. BasicDoubleSuffix, /* ReturnType */
  1689. 255, /* ParameterCount */
  1690. PNONE, /* ParameterTypes */
  1691. PNONE, /* ParameterTests */
  1692. NULL, /* NextPointer */
  1693. B15 | E86 | M88 | VBX /* OptionVersionBitmask */
  1694. },
  1695. {
  1696. F_LCASE4_A_S, /* UniqueID */
  1697. "S$ = LCASE$( A$ )", /* Syntax */
  1698. "The string of characters from the value associatedwith A$ by "
  1699. "replacing each upper-case-letter in the string by its lower-c"
  1700. "ase version.", /* Description */
  1701. "LCASE$", /* Name */
  1702. BasicStringSuffix, /* ReturnType */
  1703. 1, /* ParameterCount */
  1704. P1STR, /* ParameterTypes */
  1705. P1ANY, /* ParameterTests */
  1706. NULL, /* NextPointer */
  1707. B15 | D71 | C77 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  1708. },
  1709. {
  1710. F_LEFT_A_X_S, /* UniqueID */
  1711. "S$ = LEFT( A$, X )", /* Syntax */
  1712. "The X left-most characters of A$, beginning from postion 1.", /* Description */
  1713. "LEFT", /* Name */
  1714. BasicStringSuffix, /* ReturnType */
  1715. 2, /* ParameterCount */
  1716. P1STR | P2NUM, /* ParameterTypes */
  1717. P1ANY | P2LEN, /* ParameterTests */
  1718. NULL, /* NextPointer */
  1719. D71 | HB1 | HB2 | VBX /* OptionVersionBitmask */
  1720. },
  1721. {
  1722. F_LEFT4_A_X_S, /* UniqueID */
  1723. "S$ = LEFT$( A$, X )", /* Syntax */
  1724. "The X left-most characters of A$, beginning from postion 1.", /* Description */
  1725. "LEFT$", /* Name */
  1726. BasicStringSuffix, /* ReturnType */
  1727. 2, /* ParameterCount */
  1728. P1STR | P2NUM, /* ParameterTypes */
  1729. P1ANY | P2LEN, /* ParameterTests */
  1730. NULL, /* NextPointer */
  1731. B15 | D71 | C77 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  1732. },
  1733. {
  1734. F_LEN_A_N, /* UniqueID */
  1735. "N = LEN( A$ )", /* Syntax */
  1736. "The length of A$.", /* Description */
  1737. "LEN", /* Name */
  1738. BasicDoubleSuffix, /* ReturnType */
  1739. 1, /* ParameterCount */
  1740. P1STR, /* ParameterTypes */
  1741. P1ANY, /* ParameterTests */
  1742. NULL, /* NextPointer */
  1743. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  1744. },
  1745. {
  1746. F_LGT_X_N, /* UniqueID */
  1747. "N = LGT( X )", /* Syntax */
  1748. "The common logarithm of X; X shall be greater than zero.", /* Description */
  1749. "LGT", /* Name */
  1750. BasicDoubleSuffix, /* ReturnType */
  1751. 1, /* ParameterCount */
  1752. P1NUM, /* ParameterTypes */
  1753. P1GTZ, /* ParameterTests */
  1754. NULL, /* NextPointer */
  1755. I70 | I73 | HB1 | HB2 /* OptionVersionBitmask */
  1756. },
  1757. {
  1758. F_LIN_X_S, /* UniqueID */
  1759. "S$ = LIN( X )", /* Syntax */
  1760. "The string X bytes long of newline characters.", /* Description */
  1761. "LIN", /* Name */
  1762. BasicStringSuffix, /* ReturnType */
  1763. 1, /* ParameterCount */
  1764. P1NUM, /* ParameterTypes */
  1765. P1LEN, /* ParameterTests */
  1766. NULL, /* NextPointer */
  1767. HB1 | HB2 /* OptionVersionBitmask */
  1768. },
  1769. {
  1770. F_LN_X_N, /* UniqueID */
  1771. "N = LN( X )", /* Syntax */
  1772. "The natural logarithm of X; X shall be greater than zero.", /* Description */
  1773. "LN", /* Name */
  1774. BasicDoubleSuffix, /* ReturnType */
  1775. 1, /* ParameterCount */
  1776. P1NUM, /* ParameterTypes */
  1777. P1GTZ, /* ParameterTests */
  1778. NULL, /* NextPointer */
  1779. HB1 | HB2 /* OptionVersionBitmask */
  1780. },
  1781. {
  1782. F_LOC_X_N, /* UniqueID */
  1783. "N = LOC( X )", /* Syntax */
  1784. "The location of file X; the next record that GET or PUT state"
  1785. "ments will use.", /* Description */
  1786. "LOC", /* Name */
  1787. BasicDoubleSuffix, /* ReturnType */
  1788. 1, /* ParameterCount */
  1789. P1NUM, /* ParameterTypes */
  1790. P1DEV, /* ParameterTests */
  1791. NULL, /* NextPointer */
  1792. B15 | G65 | G67 | D71 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  1793. },
  1794. {
  1795. F_LOCATE_X_Y_N, /* UniqueID */
  1796. "N = LOCATE( X, Y )", /* Syntax */
  1797. "Locates the cursor to row X, column Y.", /* Description */
  1798. "LOCATE", /* Name */
  1799. BasicDoubleSuffix, /* ReturnType */
  1800. 2, /* ParameterCount */
  1801. P1NUM | P2NUM, /* ParameterTypes */
  1802. P1BYT | P2BYT, /* ParameterTests */
  1803. NULL, /* NextPointer */
  1804. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1805. },
  1806. {
  1807. F_LOF_X_N, /* UniqueID */
  1808. "N = LOF( X )", /* Syntax */
  1809. "The length of file X.", /* Description */
  1810. "LOF", /* Name */
  1811. BasicDoubleSuffix, /* ReturnType */
  1812. 1, /* ParameterCount */
  1813. P1NUM, /* ParameterTypes */
  1814. P1DEV, /* ParameterTests */
  1815. NULL, /* NextPointer */
  1816. B15 | G65 | G67 | D71 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  1817. },
  1818. {
  1819. F_LOG_X_N, /* UniqueID */
  1820. "N = LOG( X )", /* Syntax */
  1821. "The natural logarithm of X; X shall be greater than zero.", /* Description */
  1822. "LOG", /* Name */
  1823. BasicDoubleSuffix, /* ReturnType */
  1824. 1, /* ParameterCount */
  1825. P1NUM, /* ParameterTypes */
  1826. P1GTZ, /* ParameterTests */
  1827. NULL, /* NextPointer */
  1828. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  1829. },
  1830. {
  1831. F_LOG10_X_N, /* UniqueID */
  1832. "N = LOG10( X )", /* Syntax */
  1833. "The common logarithm of X; X shall be greater than zero.", /* Description */
  1834. "LOG10", /* Name */
  1835. BasicDoubleSuffix, /* ReturnType */
  1836. 1, /* ParameterCount */
  1837. P1NUM, /* ParameterTypes */
  1838. P1GTZ, /* ParameterTests */
  1839. NULL, /* NextPointer */
  1840. B15 | D71 | HB1 | HB2 | E86 /* OptionVersionBitmask */
  1841. },
  1842. {
  1843. F_LOG2_X_N, /* UniqueID */
  1844. "N = LOG2( X )", /* Syntax */
  1845. "The base 2 logarithm of X; X shall be greater than zero.", /* Description */
  1846. "LOG2", /* Name */
  1847. BasicDoubleSuffix, /* ReturnType */
  1848. 1, /* ParameterCount */
  1849. P1NUM, /* ParameterTypes */
  1850. P1GTZ, /* ParameterTests */
  1851. NULL, /* NextPointer */
  1852. B15 | E86 /* OptionVersionBitmask */
  1853. },
  1854. {
  1855. F_LOGE_X_N, /* UniqueID */
  1856. "N = LOGE( X )", /* Syntax */
  1857. "The natural logarithm of X; X shall be greater than zero.", /* Description */
  1858. "LOGE", /* Name */
  1859. BasicDoubleSuffix, /* ReturnType */
  1860. 1, /* ParameterCount */
  1861. P1NUM, /* ParameterTypes */
  1862. P1GTZ, /* ParameterTests */
  1863. NULL, /* NextPointer */
  1864. HB1 | HB2 /* OptionVersionBitmask */
  1865. },
  1866. {
  1867. F_LPOS_N, /* UniqueID */
  1868. "N = LPOS", /* Syntax */
  1869. "The current cursor position in the line for the printer.", /* Description */
  1870. "LPOS", /* Name */
  1871. BasicDoubleSuffix, /* ReturnType */
  1872. 0, /* ParameterCount */
  1873. PNONE, /* ParameterTypes */
  1874. PNONE, /* ParameterTests */
  1875. NULL, /* NextPointer */
  1876. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1877. },
  1878. {
  1879. F_LTRIM4_A_S, /* UniqueID */
  1880. "S$ = LTRIM$( A$ )", /* Syntax */
  1881. "The string of characters resulting from the value associated "
  1882. "with A$ by deleting all leading space characters.", /* Description */
  1883. "LTRIM$", /* Name */
  1884. BasicStringSuffix, /* ReturnType */
  1885. 1, /* ParameterCount */
  1886. P1STR, /* ParameterTypes */
  1887. P1ANY, /* ParameterTests */
  1888. NULL, /* NextPointer */
  1889. B15 | D71 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  1890. },
  1891. {
  1892. F_LTW_X_N, /* UniqueID */
  1893. "N = LTW( X )", /* Syntax */
  1894. "The base 2 logarithm of X; X shall be greater than zero.", /* Description */
  1895. "LTW", /* Name */
  1896. BasicDoubleSuffix, /* ReturnType */
  1897. 1, /* ParameterCount */
  1898. P1NUM, /* ParameterTypes */
  1899. P1GTZ, /* ParameterTests */
  1900. NULL, /* NextPointer */
  1901. I70 | I73 /* OptionVersionBitmask */
  1902. },
  1903. {
  1904. F_LWIDTH_X_N, /* UniqueID */
  1905. "N = LWIDTH( X )", /* Syntax */
  1906. "For printer, sets the line width to X. Zero means no wrapping"
  1907. " will occur.", /* Description */
  1908. "LWIDTH", /* Name */
  1909. BasicDoubleSuffix, /* ReturnType */
  1910. 1, /* ParameterCount */
  1911. P1NUM, /* ParameterTypes */
  1912. P1BYT, /* ParameterTests */
  1913. NULL, /* NextPointer */
  1914. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  1915. },
  1916. {
  1917. F_MATCH_A_B_X_N, /* UniqueID */
  1918. "N = MATCH( A$, B$, X )", /* Syntax */
  1919. "The character position, within the value assocated with A$, o"
  1920. "f the first character of the first occurence of the value ass"
  1921. "ociated with B$, starting at the Xth character of A$. If the"
  1922. "re is not such occurence, then the value returned is zero.", /* Description */
  1923. "MATCH", /* Name */
  1924. BasicDoubleSuffix, /* ReturnType */
  1925. 3, /* ParameterCount */
  1926. P1STR | P2STR | P3NUM, /* ParameterTypes */
  1927. P1ANY | P2ANY | P3POS, /* ParameterTests */
  1928. NULL, /* NextPointer */
  1929. C77 /* OptionVersionBitmask */
  1930. },
  1931. {
  1932. F_MAX_X_Y_N, /* UniqueID */
  1933. "N = MAX( X, Y )", /* Syntax */
  1934. "The larger of the parameters.", /* Description */
  1935. "MAX", /* Name */
  1936. BasicDoubleSuffix, /* ReturnType */
  1937. 2, /* ParameterCount */
  1938. P1NUM | P2NUM, /* ParameterTypes */
  1939. P1ANY | P2ANY, /* ParameterTests */
  1940. NULL, /* NextPointer */
  1941. B15 | I70 | I73 | HB2 | E86 /* OptionVersionBitmask */
  1942. },
  1943. {
  1944. F_MAX_A_B_S, /* UniqueID */
  1945. "S$ = MAX( A$, B$ )", /* Syntax */
  1946. "The larger of the parameters.", /* Description */
  1947. "MAX", /* Name */
  1948. BasicStringSuffix, /* ReturnType */
  1949. 2, /* ParameterCount */
  1950. P1STR | P2STR, /* ParameterTypes */
  1951. P1ANY | P2ANY, /* ParameterTests */
  1952. NULL, /* NextPointer */
  1953. B15 | I70 | I73 | HB2 /* OptionVersionBitmask */
  1954. },
  1955. {
  1956. F_MAXBYT_N, /* UniqueID */
  1957. "N = MAXBYT", /* Syntax */
  1958. "The largest finite positive number representable as a BYTE; i"
  1959. "mplementation-defined.", /* Description */
  1960. "MAXBYT", /* Name */
  1961. BasicDoubleSuffix, /* ReturnType */
  1962. 0, /* ParameterCount */
  1963. PNONE, /* ParameterTypes */
  1964. PNONE, /* ParameterTests */
  1965. NULL, /* NextPointer */
  1966. B15 /* OptionVersionBitmask */
  1967. },
  1968. {
  1969. F_MAXCUR_N, /* UniqueID */
  1970. "N = MAXCUR", /* Syntax */
  1971. "The largest finite positive number representable as a CURRENC"
  1972. "Y; implementation-defined.", /* Description */
  1973. "MAXCUR", /* Name */
  1974. BasicDoubleSuffix, /* ReturnType */
  1975. 0, /* ParameterCount */
  1976. PNONE, /* ParameterTypes */
  1977. PNONE, /* ParameterTests */
  1978. NULL, /* NextPointer */
  1979. B15 /* OptionVersionBitmask */
  1980. },
  1981. {
  1982. F_MAXDBL_N, /* UniqueID */
  1983. "N = MAXDBL", /* Syntax */
  1984. "The largest finite positive number representable as a DOUBLE;"
  1985. " implementation-defined.", /* Description */
  1986. "MAXDBL", /* Name */
  1987. BasicDoubleSuffix, /* ReturnType */
  1988. 0, /* ParameterCount */
  1989. PNONE, /* ParameterTypes */
  1990. PNONE, /* ParameterTests */
  1991. NULL, /* NextPointer */
  1992. B15 /* OptionVersionBitmask */
  1993. },
  1994. {
  1995. F_MAXDEV_N, /* UniqueID */
  1996. "N = MAXDEV", /* Syntax */
  1997. "The largest finite positive number useable as a FILE NUMBER; "
  1998. "implementation-defined.", /* Description */
  1999. "MAXDEV", /* Name */
  2000. BasicDoubleSuffix, /* ReturnType */
  2001. 0, /* ParameterCount */
  2002. PNONE, /* ParameterTypes */
  2003. PNONE, /* ParameterTests */
  2004. NULL, /* NextPointer */
  2005. B15 /* OptionVersionBitmask */
  2006. },
  2007. {
  2008. F_MAXINT_N, /* UniqueID */
  2009. "N = MAXINT", /* Syntax */
  2010. "The largest finite positive number representable as an INTEGE"
  2011. "R; implementation-defined.", /* Description */
  2012. "MAXINT", /* Name */
  2013. BasicDoubleSuffix, /* ReturnType */
  2014. 0, /* ParameterCount */
  2015. PNONE, /* ParameterTypes */
  2016. PNONE, /* ParameterTests */
  2017. NULL, /* NextPointer */
  2018. B15 /* OptionVersionBitmask */
  2019. },
  2020. {
  2021. F_MAXLEN_A_N, /* UniqueID */
  2022. "N = MAXLEN( A$ )", /* Syntax */
  2023. "The maximum length associated with the simple-string-variable"
  2024. " A$.", /* Description */
  2025. "MAXLEN", /* Name */
  2026. BasicDoubleSuffix, /* ReturnType */
  2027. 1, /* ParameterCount */
  2028. P1STR, /* ParameterTypes */
  2029. P1ANY, /* ParameterTests */
  2030. NULL, /* NextPointer */
  2031. B15 | E86 /* OptionVersionBitmask */
  2032. },
  2033. {
  2034. F_MAXLNG_N, /* UniqueID */
  2035. "N = MAXLNG", /* Syntax */
  2036. "The largest finite positive number representable as a LONG; i"
  2037. "mplementation-defined.", /* Description */
  2038. "MAXLNG", /* Name */
  2039. BasicDoubleSuffix, /* ReturnType */
  2040. 0, /* ParameterCount */
  2041. PNONE, /* ParameterTypes */
  2042. PNONE, /* ParameterTests */
  2043. NULL, /* NextPointer */
  2044. B15 /* OptionVersionBitmask */
  2045. },
  2046. {
  2047. F_MAXLVL_N, /* UniqueID */
  2048. "N = MAXLVL", /* Syntax */
  2049. "The maximum stack level; implementation-defined.", /* Description */
  2050. "MAXLVL", /* Name */
  2051. BasicDoubleSuffix, /* ReturnType */
  2052. 0, /* ParameterCount */
  2053. PNONE, /* ParameterTypes */
  2054. PNONE, /* ParameterTests */
  2055. NULL, /* NextPointer */
  2056. B15 /* OptionVersionBitmask */
  2057. },
  2058. {
  2059. F_MAXNUM_N, /* UniqueID */
  2060. "N = MAXNUM", /* Syntax */
  2061. "The largest finite positive number representable and manipula"
  2062. "ble by the implementation; implementation-defined. MAXNUM ma"
  2063. "y represent diffent number for different arithmetic options ("
  2064. "see OPTION ARITHMETIC).", /* Description */
  2065. "MAXNUM", /* Name */
  2066. BasicDoubleSuffix, /* ReturnType */
  2067. 0, /* ParameterCount */
  2068. PNONE, /* ParameterTypes */
  2069. PNONE, /* ParameterTests */
  2070. NULL, /* NextPointer */
  2071. B15 | E86 /* OptionVersionBitmask */
  2072. },
  2073. {
  2074. F_MAXSNG_N, /* UniqueID */
  2075. "N = MAXSNG", /* Syntax */
  2076. "The largest finite positive number representable as a SINGLE;"
  2077. " implementation-defined.", /* Description */
  2078. "MAXSNG", /* Name */
  2079. BasicDoubleSuffix, /* ReturnType */
  2080. 0, /* ParameterCount */
  2081. PNONE, /* ParameterTypes */
  2082. PNONE, /* ParameterTests */
  2083. NULL, /* NextPointer */
  2084. B15 /* OptionVersionBitmask */
  2085. },
  2086. {
  2087. F_MEM_N, /* UniqueID */
  2088. "N = MEM", /* Syntax */
  2089. "The number of bytes of available memory. This function is pr"
  2090. "ovided for backward compatibility only and it always returns "
  2091. "a fixed value of 32000.", /* Description */
  2092. "MEM", /* Name */
  2093. BasicDoubleSuffix, /* ReturnType */
  2094. 0, /* ParameterCount */
  2095. PNONE, /* ParameterTypes */
  2096. PNONE, /* ParameterTests */
  2097. NULL, /* NextPointer */
  2098. HB1 | HB2 /* OptionVersionBitmask */
  2099. },
  2100. {
  2101. F_MID_A_X_S, /* UniqueID */
  2102. "S$ = MID( A$, X )", /* Syntax */
  2103. "The characters of A$, starting from postion X.", /* Description */
  2104. "MID", /* Name */
  2105. BasicStringSuffix, /* ReturnType */
  2106. 2, /* ParameterCount */
  2107. P1STR | P2NUM, /* ParameterTypes */
  2108. P1ANY | P2POS, /* ParameterTests */
  2109. NULL, /* NextPointer */
  2110. D71 | HB1 | HB2 | VBX /* OptionVersionBitmask */
  2111. },
  2112. {
  2113. F_MID_A_X_Y_S, /* UniqueID */
  2114. "S$ = MID( A$, X, Y )", /* Syntax */
  2115. "The Y characters of A$, starting from postion X.", /* Description */
  2116. "MID", /* Name */
  2117. BasicStringSuffix, /* ReturnType */
  2118. 3, /* ParameterCount */
  2119. P1STR | P2NUM | P3NUM, /* ParameterTypes */
  2120. P1ANY | P2POS | P3LEN, /* ParameterTests */
  2121. NULL, /* NextPointer */
  2122. D71 | HB1 | HB2 | VBX /* OptionVersionBitmask */
  2123. },
  2124. {
  2125. F_MID4_A_X_S, /* UniqueID */
  2126. "S$ = MID$( A$, X )", /* Syntax */
  2127. "The characters of A$, starting from postion X.", /* Description */
  2128. "MID$", /* Name */
  2129. BasicStringSuffix, /* ReturnType */
  2130. 2, /* ParameterCount */
  2131. P1STR | P2NUM, /* ParameterTypes */
  2132. P1ANY | P2POS, /* ParameterTests */
  2133. NULL, /* NextPointer */
  2134. B15 | D71 | C77 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  2135. },
  2136. {
  2137. F_MID4_A_X_Y_S, /* UniqueID */
  2138. "S$ = MID$( A$, X, Y )", /* Syntax */
  2139. "The Y characters of A$, starting from postion X.", /* Description */
  2140. "MID$", /* Name */
  2141. BasicStringSuffix, /* ReturnType */
  2142. 3, /* ParameterCount */
  2143. P1STR | P2NUM | P3NUM, /* ParameterTypes */
  2144. P1ANY | P2POS | P3LEN, /* ParameterTests */
  2145. NULL, /* NextPointer */
  2146. B15 | D71 | C77 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  2147. },
  2148. {
  2149. F_MIN_X_Y_N, /* UniqueID */
  2150. "N = MIN( X, Y )", /* Syntax */
  2151. "The smaller of the parameters.", /* Description */
  2152. "MIN", /* Name */
  2153. BasicDoubleSuffix, /* ReturnType */
  2154. 2, /* ParameterCount */
  2155. P1NUM | P2NUM, /* ParameterTypes */
  2156. P1ANY | P2ANY, /* ParameterTests */
  2157. NULL, /* NextPointer */
  2158. B15 | I70 | I73 | HB2 | E86 /* OptionVersionBitmask */
  2159. },
  2160. {
  2161. F_MIN_A_B_S, /* UniqueID */
  2162. "S$ = MIN( A$, B$ )", /* Syntax */
  2163. "The smaller of the parameters.", /* Description */
  2164. "MIN", /* Name */
  2165. BasicStringSuffix, /* ReturnType */
  2166. 2, /* ParameterCount */
  2167. P1STR | P2STR, /* ParameterTypes */
  2168. P1ANY | P2ANY, /* ParameterTests */
  2169. NULL, /* NextPointer */
  2170. B15 | I70 | I73 | HB2 /* OptionVersionBitmask */
  2171. },
  2172. {
  2173. F_MINBYT_N, /* UniqueID */
  2174. "N = MINBYT", /* Syntax */
  2175. "The largest finite negative number representable as a BYTE; i"
  2176. "mplementation-defined.", /* Description */
  2177. "MINBYT", /* Name */
  2178. BasicDoubleSuffix, /* ReturnType */
  2179. 0, /* ParameterCount */
  2180. PNONE, /* ParameterTypes */
  2181. PNONE, /* ParameterTests */
  2182. NULL, /* NextPointer */
  2183. B15 /* OptionVersionBitmask */
  2184. },
  2185. {
  2186. F_MINCUR_N, /* UniqueID */
  2187. "N = MINCUR", /* Syntax */
  2188. "The largest finite negative number representable as a CURRENC"
  2189. "Y; implementation-defined.", /* Description */
  2190. "MINCUR", /* Name */
  2191. BasicDoubleSuffix, /* ReturnType */
  2192. 0, /* ParameterCount */
  2193. PNONE, /* ParameterTypes */
  2194. PNONE, /* ParameterTests */
  2195. NULL, /* NextPointer */
  2196. B15 /* OptionVersionBitmask */
  2197. },
  2198. {
  2199. F_MINDBL_N, /* UniqueID */
  2200. "N = MINDBL", /* Syntax */
  2201. "The largest finite negative number representable as a DOUBLE;"
  2202. " implementation-defined.", /* Description */
  2203. "MINDBL", /* Name */
  2204. BasicDoubleSuffix, /* ReturnType */
  2205. 0, /* ParameterCount */
  2206. PNONE, /* ParameterTypes */
  2207. PNONE, /* ParameterTests */
  2208. NULL, /* NextPointer */
  2209. B15 /* OptionVersionBitmask */
  2210. },
  2211. {
  2212. F_MINDEV_N, /* UniqueID */
  2213. "N = MINDEV", /* Syntax */
  2214. "The largest finite negative number useable as a FILE NUMBER; "
  2215. "implementation-defined.", /* Description */
  2216. "MINDEV", /* Name */
  2217. BasicDoubleSuffix, /* ReturnType */
  2218. 0, /* ParameterCount */
  2219. PNONE, /* ParameterTypes */
  2220. PNONE, /* ParameterTests */
  2221. NULL, /* NextPointer */
  2222. B15 /* OptionVersionBitmask */
  2223. },
  2224. {
  2225. F_MININT_N, /* UniqueID */
  2226. "N = MININT", /* Syntax */
  2227. "The largest finite negative number representable as an INTEGE"
  2228. "R; implementation-defined.", /* Description */
  2229. "MININT", /* Name */
  2230. BasicDoubleSuffix, /* ReturnType */
  2231. 0, /* ParameterCount */
  2232. PNONE, /* ParameterTypes */
  2233. PNONE, /* ParameterTests */
  2234. NULL, /* NextPointer */
  2235. B15 /* OptionVersionBitmask */
  2236. },
  2237. {
  2238. F_MINLNG_N, /* UniqueID */
  2239. "N = MINLNG", /* Syntax */
  2240. "The largest finite negative number representable as a LONG; i"
  2241. "mplementation-defined.", /* Description */
  2242. "MINLNG", /* Name */
  2243. BasicDoubleSuffix, /* ReturnType */
  2244. 0, /* ParameterCount */
  2245. PNONE, /* ParameterTypes */
  2246. PNONE, /* ParameterTests */
  2247. NULL, /* NextPointer */
  2248. B15 /* OptionVersionBitmask */
  2249. },
  2250. {
  2251. F_MINNUM_N, /* UniqueID */
  2252. "N = MINNUM", /* Syntax */
  2253. "The largest finite negative number representable and manipula"
  2254. "ble by the implementation; implementation-defined. MINNUM ma"
  2255. "y represent diffent number for different arithmetic options ("
  2256. "see OPTION ARITHMETIC).", /* Description */
  2257. "MINNUM", /* Name */
  2258. BasicDoubleSuffix, /* ReturnType */
  2259. 0, /* ParameterCount */
  2260. PNONE, /* ParameterTypes */
  2261. PNONE, /* ParameterTests */
  2262. NULL, /* NextPointer */
  2263. B15 /* OptionVersionBitmask */
  2264. },
  2265. {
  2266. F_MINSNG_N, /* UniqueID */
  2267. "N = MINSNG", /* Syntax */
  2268. "The largest finite negative number representable as a SINGLE;"
  2269. " implementation-defined.", /* Description */
  2270. "MINSNG", /* Name */
  2271. BasicDoubleSuffix, /* ReturnType */
  2272. 0, /* ParameterCount */
  2273. PNONE, /* ParameterTypes */
  2274. PNONE, /* ParameterTests */
  2275. NULL, /* NextPointer */
  2276. B15 /* OptionVersionBitmask */
  2277. },
  2278. {
  2279. F_MKC4_X_S, /* UniqueID */
  2280. "S$ = MKC$( X )", /* Syntax */
  2281. "The internal representation of the currency (64-bit) integer "
  2282. "X as a string.", /* Description */
  2283. "MKC$", /* Name */
  2284. BasicStringSuffix, /* ReturnType */
  2285. 1, /* ParameterCount */
  2286. P1NUM, /* ParameterTypes */
  2287. P1CUR, /* ParameterTests */
  2288. NULL, /* NextPointer */
  2289. B15 /* OptionVersionBitmask */
  2290. },
  2291. {
  2292. F_MKD4_X_S, /* UniqueID */
  2293. "S$ = MKD$( X )", /* Syntax */
  2294. "The internal representation of X as a string.", /* Description */
  2295. "MKD$", /* Name */
  2296. BasicStringSuffix, /* ReturnType */
  2297. 1, /* ParameterCount */
  2298. P1NUM, /* ParameterTypes */
  2299. P1DBL, /* ParameterTests */
  2300. NULL, /* NextPointer */
  2301. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2302. },
  2303. {
  2304. F_MKDIR_A_N, /* UniqueID */
  2305. "N = MKDIR( A$ )", /* Syntax */
  2306. "Makes the directory named in A$.", /* Description */
  2307. "MKDIR", /* Name */
  2308. BasicDoubleSuffix, /* ReturnType */
  2309. 1, /* ParameterCount */
  2310. P1STR, /* ParameterTypes */
  2311. P1BYT, /* ParameterTests */
  2312. NULL, /* NextPointer */
  2313. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2314. },
  2315. {
  2316. F_MKI4_X_S, /* UniqueID */
  2317. "S$ = MKI$( X )", /* Syntax */
  2318. "The internal representation of the short (16-bit) integer X a"
  2319. "s a string.", /* Description */
  2320. "MKI$", /* Name */
  2321. BasicStringSuffix, /* ReturnType */
  2322. 1, /* ParameterCount */
  2323. P1NUM, /* ParameterTypes */
  2324. P1INT, /* ParameterTests */
  2325. NULL, /* NextPointer */
  2326. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2327. },
  2328. {
  2329. F_MKL4_X_S, /* UniqueID */
  2330. "S$ = MKL$( X )", /* Syntax */
  2331. "The internal representation of the long (32-bit) integer X as"
  2332. " a string.", /* Description */
  2333. "MKL$", /* Name */
  2334. BasicStringSuffix, /* ReturnType */
  2335. 1, /* ParameterCount */
  2336. P1NUM, /* ParameterTypes */
  2337. P1LNG, /* ParameterTests */
  2338. NULL, /* NextPointer */
  2339. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2340. },
  2341. {
  2342. F_MKS4_X_S, /* UniqueID */
  2343. "S$ = MKS$( X )", /* Syntax */
  2344. "The internal representation of X as a string.", /* Description */
  2345. "MKS$", /* Name */
  2346. BasicStringSuffix, /* ReturnType */
  2347. 1, /* ParameterCount */
  2348. P1NUM, /* ParameterTypes */
  2349. P1FLT, /* ParameterTests */
  2350. NULL, /* NextPointer */
  2351. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2352. },
  2353. {
  2354. F_MOD_X_Y_N, /* UniqueID */
  2355. "N = MOD( X, Y )", /* Syntax */
  2356. "X modulo Y, i.e., X-Y*INT(X/Y). Y shall not equal zero.", /* Description */
  2357. "MOD", /* Name */
  2358. BasicDoubleSuffix, /* ReturnType */
  2359. 2, /* ParameterCount */
  2360. P1NUM | P2NUM, /* ParameterTypes */
  2361. P1ANY | P2NEZ, /* ParameterTests */
  2362. NULL, /* NextPointer */
  2363. E86 /* OptionVersionBitmask */
  2364. },
  2365. {
  2366. F_NAME_A_B_N, /* UniqueID */
  2367. "N = NAME( A$, B$ )", /* Syntax */
  2368. "Rename the file named A$ into B$.", /* Description */
  2369. "NAME", /* Name */
  2370. BasicDoubleSuffix, /* ReturnType */
  2371. 2, /* ParameterCount */
  2372. P1STR | P2STR, /* ParameterTypes */
  2373. P1BYT | P2BYT, /* ParameterTests */
  2374. NULL, /* NextPointer */
  2375. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2376. },
  2377. {
  2378. F_NOFLOW_N, /* UniqueID */
  2379. "N = NOFLOW", /* Syntax */
  2380. "Turn tracing OFF", /* Description */
  2381. "NOFLOW", /* Name */
  2382. BasicDoubleSuffix, /* ReturnType */
  2383. 0, /* ParameterCount */
  2384. PNONE, /* ParameterTypes */
  2385. PNONE, /* ParameterTests */
  2386. NULL, /* NextPointer */
  2387. B15 | HB2 /* OptionVersionBitmask */
  2388. },
  2389. {
  2390. F_NOTRACE_N, /* UniqueID */
  2391. "N = NOTRACE", /* Syntax */
  2392. "Turn tracing OFF", /* Description */
  2393. "NOTRACE", /* Name */
  2394. BasicDoubleSuffix, /* ReturnType */
  2395. 0, /* ParameterCount */
  2396. PNONE, /* ParameterTypes */
  2397. PNONE, /* ParameterTests */
  2398. NULL, /* NextPointer */
  2399. HB1 | HB2 /* OptionVersionBitmask */
  2400. },
  2401. {
  2402. F_NULL_X_N, /* UniqueID */
  2403. "N = NULL( X )", /* Syntax */
  2404. "Appends X null characters after each line printed by LPRINT o"
  2405. "r LLIST.", /* Description */
  2406. "NULL", /* Name */
  2407. BasicDoubleSuffix, /* ReturnType */
  2408. 1, /* ParameterCount */
  2409. P1NUM, /* ParameterTypes */
  2410. P1BYT, /* ParameterTests */
  2411. NULL, /* NextPointer */
  2412. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2413. },
  2414. {
  2415. F_NUM_N, /* UniqueID */
  2416. "N = NUM", /* Syntax */
  2417. "The number of values processed by the last MAT INPUT. Zero m"
  2418. "eans error.", /* Description */
  2419. "NUM", /* Name */
  2420. BasicDoubleSuffix, /* ReturnType */
  2421. 0, /* ParameterCount */
  2422. PNONE, /* ParameterTypes */
  2423. PNONE, /* ParameterTests */
  2424. NULL, /* NextPointer */
  2425. B15 | G67 | HB2 /* OptionVersionBitmask */
  2426. },
  2427. {
  2428. F_NUM_A_N, /* UniqueID */
  2429. "N = NUM( A$ )", /* Syntax */
  2430. "The value of the numeric-constant associated with A$, if the "
  2431. "string associated with A$ is a numeric-constant. Leading and"
  2432. " trailing spaces in the string are ignored. If the evaluatio"
  2433. "n of the numeric-constant would result in a value which cause"
  2434. "s an underflow, then the value returned shall be zero. For e"
  2435. "xample, NUM(' 123.5 ' ) = 123.5, NUM('2.E-99') could be zero,"
  2436. " and NUM('MCMXVII') causes an exception.", /* Description */
  2437. "NUM", /* Name */
  2438. BasicDoubleSuffix, /* ReturnType */
  2439. 1, /* ParameterCount */
  2440. P1STR, /* ParameterTypes */
  2441. P1ANY, /* ParameterTests */
  2442. NULL, /* NextPointer */
  2443. B15 | I70 | I73 | HB2 /* OptionVersionBitmask */
  2444. },
  2445. {
  2446. F_NUM4_X_S, /* UniqueID */
  2447. "S$ = NUM$( X )", /* Syntax */
  2448. "The string generated by the print-statement as the numeric-re"
  2449. "presentation of the value associated with X.", /* Description */
  2450. "NUM$", /* Name */
  2451. BasicStringSuffix, /* ReturnType */
  2452. 1, /* ParameterCount */
  2453. P1NUM, /* ParameterTypes */
  2454. P1ANY, /* ParameterTests */
  2455. NULL, /* NextPointer */
  2456. B15 | D64 | G65 | G67 | I70 | D71 | I73 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  2457. },
  2458. {
  2459. F_OCT4_X_S, /* UniqueID */
  2460. "S$ = OCT$( X )", /* Syntax */
  2461. "The the octal (base 8) representation of X.", /* Description */
  2462. "OCT$", /* Name */
  2463. BasicStringSuffix, /* ReturnType */
  2464. 1, /* ParameterCount */
  2465. P1NUM, /* ParameterTypes */
  2466. P1INT, /* ParameterTests */
  2467. NULL, /* NextPointer */
  2468. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2469. },
  2470. {
  2471. F_OPEN_A_X_B_N, /* UniqueID */
  2472. "N = OPEN( A$, X, B$ )", /* Syntax */
  2473. "Open file number X. A$ is the mode: I, O, A, R. B$ is the f"
  2474. "ile name. Default the record length.", /* Description */
  2475. "OPEN", /* Name */
  2476. BasicDoubleSuffix, /* ReturnType */
  2477. 3, /* ParameterCount */
  2478. P1STR | P2NUM | P3STR, /* ParameterTypes */
  2479. P1BYT | P2DEV | P3BYT, /* ParameterTests */
  2480. NULL, /* NextPointer */
  2481. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2482. },
  2483. {
  2484. F_OPEN_A_X_B_Y_N, /* UniqueID */
  2485. "N = OPEN( A$, X, B$, Y )", /* Syntax */
  2486. "Open file number X. A$ is the mode: I, O, A, R. B$ is the f"
  2487. "ile name. Y is the record length.", /* Description */
  2488. "OPEN", /* Name */
  2489. BasicDoubleSuffix, /* ReturnType */
  2490. 4, /* ParameterCount */
  2491. P1STR | P2NUM | P3STR | P4NUM, /* ParameterTypes */
  2492. P1BYT | P2DEV | P3BYT | P4INT, /* ParameterTests */
  2493. NULL, /* NextPointer */
  2494. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2495. },
  2496. {
  2497. F_ORD_A_N, /* UniqueID */
  2498. "N = ORD( A$ )", /* Syntax */
  2499. "The ordinal position of the character named by the string ass"
  2500. "ociated with A$ in the collating sequence of ASCII character "
  2501. "set, where the first member of the character set is in positi"
  2502. "on zero. The acceptable values for the standard character se"
  2503. "t are shown in Table 1.", /* Description */
  2504. "ORD", /* Name */
  2505. BasicDoubleSuffix, /* ReturnType */
  2506. 1, /* ParameterCount */
  2507. P1STR, /* ParameterTypes */
  2508. P1BYT, /* ParameterTests */
  2509. NULL, /* NextPointer */
  2510. B15 | E86 /* OptionVersionBitmask */
  2511. },
  2512. {
  2513. F_OUT_X_Y_N, /* UniqueID */
  2514. "N = OUT( X, Y )", /* Syntax */
  2515. "Sends Y to hardware port X. Not supported on all platforms.", /* Description */
  2516. "OUT", /* Name */
  2517. BasicDoubleSuffix, /* ReturnType */
  2518. 2, /* ParameterCount */
  2519. P1NUM | P2NUM, /* ParameterTypes */
  2520. P1INT | P2BYT, /* ParameterTests */
  2521. NULL, /* NextPointer */
  2522. B15 | D71 | C77 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2523. },
  2524. {
  2525. F_PAUSE_X_N, /* UniqueID */
  2526. "N = PAUSE( X )", /* Syntax */
  2527. "The program pauses for X times the value of OPTION SLEEP seco"
  2528. "nds. If the result is zero, negative, or more than INT_MAX t"
  2529. "hen PAUSE does nothing. The resolution is implementation def"
  2530. "ined.", /* Description */
  2531. "PAUSE", /* Name */
  2532. BasicDoubleSuffix, /* ReturnType */
  2533. 1, /* ParameterCount */
  2534. P1NUM, /* ParameterTypes */
  2535. P1ANY, /* ParameterTests */
  2536. NULL, /* NextPointer */
  2537. B15 | HB2 /* OptionVersionBitmask */
  2538. },
  2539. {
  2540. F_PDL_X_N, /* UniqueID */
  2541. "N = PDL( X )", /* Syntax */
  2542. "The value read from machine port X. Not supported on all pla"
  2543. "tforms.", /* Description */
  2544. "PDL", /* Name */
  2545. BasicDoubleSuffix, /* ReturnType */
  2546. 1, /* ParameterCount */
  2547. P1NUM, /* ParameterTypes */
  2548. P1BYT, /* ParameterTests */
  2549. NULL, /* NextPointer */
  2550. HB1 | HB2 /* OptionVersionBitmask */
  2551. },
  2552. {
  2553. F_PEEK_X_N, /* UniqueID */
  2554. "N = PEEK( X )", /* Syntax */
  2555. "The value read from hardware address X. Not supported on all"
  2556. " platforms.", /* Description */
  2557. "PEEK", /* Name */
  2558. BasicDoubleSuffix, /* ReturnType */
  2559. 1, /* ParameterCount */
  2560. P1NUM, /* ParameterTypes */
  2561. P1LNG, /* ParameterTests */
  2562. NULL, /* NextPointer */
  2563. B15 | D71 | C77 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2564. },
  2565. {
  2566. F_PI_N, /* UniqueID */
  2567. "N = PI", /* Syntax */
  2568. "The constant 3.14159 which is the ratio of the circumference "
  2569. "of a circle to its diameter.", /* Description */
  2570. "PI", /* Name */
  2571. BasicDoubleSuffix, /* ReturnType */
  2572. 0, /* ParameterCount */
  2573. PNONE, /* ParameterTypes */
  2574. PNONE, /* ParameterTests */
  2575. NULL, /* NextPointer */
  2576. B15 | D71 | HB1 | HB2 | E86 /* OptionVersionBitmask */
  2577. },
  2578. {
  2579. F_PI_X_N, /* UniqueID */
  2580. "N = PI( X )", /* Syntax */
  2581. "The constant 3.14159 which is the ratio of the circumference "
  2582. "of a circle to its diameter, times X.", /* Description */
  2583. "PI", /* Name */
  2584. BasicDoubleSuffix, /* ReturnType */
  2585. 1, /* ParameterCount */
  2586. P1NUM, /* ParameterTypes */
  2587. P1ANY, /* ParameterTests */
  2588. NULL, /* NextPointer */
  2589. B15 | HB2 /* OptionVersionBitmask */
  2590. },
  2591. {
  2592. F_PIN_X_N, /* UniqueID */
  2593. "N = PIN( X )", /* Syntax */
  2594. "The value read from machine port X. Not supported on all pla"
  2595. "tforms.", /* Description */
  2596. "PIN", /* Name */
  2597. BasicDoubleSuffix, /* ReturnType */
  2598. 1, /* ParameterCount */
  2599. P1NUM, /* ParameterTypes */
  2600. P1BYT, /* ParameterTests */
  2601. NULL, /* NextPointer */
  2602. HB1 | HB2 /* OptionVersionBitmask */
  2603. },
  2604. {
  2605. F_POKE_X_Y_N, /* UniqueID */
  2606. "N = POKE( X, Y )", /* Syntax */
  2607. "Sends Y to hardware address X. Not supported on all platform"
  2608. "s.", /* Description */
  2609. "POKE", /* Name */
  2610. BasicDoubleSuffix, /* ReturnType */
  2611. 2, /* ParameterCount */
  2612. P1NUM | P2NUM, /* ParameterTypes */
  2613. P1LNG | P2BYT, /* ParameterTests */
  2614. NULL, /* NextPointer */
  2615. B15 | D71 | C77 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2616. },
  2617. {
  2618. F_POS_N, /* UniqueID */
  2619. "N = POS", /* Syntax */
  2620. "The current cursor position in the line.", /* Description */
  2621. "POS", /* Name */
  2622. BasicDoubleSuffix, /* ReturnType */
  2623. 0, /* ParameterCount */
  2624. PNONE, /* ParameterTypes */
  2625. PNONE, /* ParameterTests */
  2626. NULL, /* NextPointer */
  2627. B15 | D71 | C77 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2628. },
  2629. {
  2630. F_POS_X_N, /* UniqueID */
  2631. "N = POS( X )", /* Syntax */
  2632. "The current cursor position in the line for file X.", /* Description */
  2633. "POS", /* Name */
  2634. BasicDoubleSuffix, /* ReturnType */
  2635. 1, /* ParameterCount */
  2636. P1NUM, /* ParameterTypes */
  2637. P1DEV, /* ParameterTests */
  2638. NULL, /* NextPointer */
  2639. B15 | D71 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2640. },
  2641. {
  2642. F_POS_A_B_N, /* UniqueID */
  2643. "N = POS( A$, B$ )", /* Syntax */
  2644. "The character position, within the value assocated with A$, o"
  2645. "f the first character of the first occurence of the value ass"
  2646. "ociated with B$, starting at the first character of A$. If t"
  2647. "here is not such occurence, then the value returned is zero.", /* Description */
  2648. "POS", /* Name */
  2649. BasicDoubleSuffix, /* ReturnType */
  2650. 2, /* ParameterCount */
  2651. P1STR | P2STR, /* ParameterTypes */
  2652. P1ANY | P2ANY, /* ParameterTests */
  2653. NULL, /* NextPointer */
  2654. B15 | HB2 | E86 /* OptionVersionBitmask */
  2655. },
  2656. {
  2657. F_POS_A_B_X_N, /* UniqueID */
  2658. "N = POS( A$, B$, X )", /* Syntax */
  2659. "The character position, within the value assocated with A$, o"
  2660. "f the first character of the first occurence of the value ass"
  2661. "ociated with B$, starting at the Xth character of A$. If the"
  2662. "re is not such occurence, then the value returned is zero.", /* Description */
  2663. "POS", /* Name */
  2664. BasicDoubleSuffix, /* ReturnType */
  2665. 3, /* ParameterCount */
  2666. P1STR | P2STR | P3NUM, /* ParameterTypes */
  2667. P1ANY | P2ANY | P3POS, /* ParameterTests */
  2668. NULL, /* NextPointer */
  2669. B15 | HB2 | E86 /* OptionVersionBitmask */
  2670. },
  2671. {
  2672. F_PUT_X_N, /* UniqueID */
  2673. "N = PUT( X )", /* Syntax */
  2674. "For file X, puts the next available record.", /* Description */
  2675. "PUT", /* Name */
  2676. BasicDoubleSuffix, /* ReturnType */
  2677. 1, /* ParameterCount */
  2678. P1NUM, /* ParameterTypes */
  2679. P1DEV, /* ParameterTests */
  2680. NULL, /* NextPointer */
  2681. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2682. },
  2683. {
  2684. F_PUT_X_Y_N, /* UniqueID */
  2685. "N = PUT( X, Y )", /* Syntax */
  2686. "For file X, puts record number Y. The first record number is"
  2687. " 1.", /* Description */
  2688. "PUT", /* Name */
  2689. BasicDoubleSuffix, /* ReturnType */
  2690. 2, /* ParameterCount */
  2691. P1NUM | P2NUM, /* ParameterTypes */
  2692. P1DEV | P2INT, /* ParameterTests */
  2693. NULL, /* NextPointer */
  2694. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2695. },
  2696. {
  2697. F_RAD_N, /* UniqueID */
  2698. "N = RAD", /* Syntax */
  2699. "Configures the math functions to accept and return angles in "
  2700. "radians.", /* Description */
  2701. "RAD", /* Name */
  2702. BasicDoubleSuffix, /* ReturnType */
  2703. 0, /* ParameterCount */
  2704. PNONE, /* ParameterTypes */
  2705. PNONE, /* ParameterTests */
  2706. NULL, /* NextPointer */
  2707. B15 | HB1 | HB2 /* OptionVersionBitmask */
  2708. },
  2709. {
  2710. F_RAD_X_N, /* UniqueID */
  2711. "N = RAD( X )", /* Syntax */
  2712. "The number of radians in X degrees.", /* Description */
  2713. "RAD", /* Name */
  2714. BasicDoubleSuffix, /* ReturnType */
  2715. 1, /* ParameterCount */
  2716. P1NUM, /* ParameterTypes */
  2717. P1ANY, /* ParameterTests */
  2718. NULL, /* NextPointer */
  2719. B15 | I70 | I73 | HB2 | E86 /* OptionVersionBitmask */
  2720. },
  2721. {
  2722. F_RADIAN_N, /* UniqueID */
  2723. "N = RADIAN", /* Syntax */
  2724. "Configures the math functions to accept and return angles in "
  2725. "radians.", /* Description */
  2726. "RADIAN", /* Name */
  2727. BasicDoubleSuffix, /* ReturnType */
  2728. 0, /* ParameterCount */
  2729. PNONE, /* ParameterTypes */
  2730. PNONE, /* ParameterTests */
  2731. NULL, /* NextPointer */
  2732. B15 | HB1 | HB2 /* OptionVersionBitmask */
  2733. },
  2734. {
  2735. F_RAN_N, /* UniqueID */
  2736. "N = RAN", /* Syntax */
  2737. "Seeds the pseudo-random number generator with TIME.", /* Description */
  2738. "RAN", /* Name */
  2739. BasicDoubleSuffix, /* ReturnType */
  2740. 0, /* ParameterCount */
  2741. PNONE, /* ParameterTypes */
  2742. PNONE, /* ParameterTests */
  2743. NULL, /* NextPointer */
  2744. HB1 | HB2 /* OptionVersionBitmask */
  2745. },
  2746. {
  2747. F_RAN_X_N, /* UniqueID */
  2748. "N = RAN( X )", /* Syntax */
  2749. "Seeds the pseudo-random number generator with X.", /* Description */
  2750. "RAN", /* Name */
  2751. BasicDoubleSuffix, /* ReturnType */
  2752. 1, /* ParameterCount */
  2753. P1NUM, /* ParameterTypes */
  2754. P1ANY, /* ParameterTests */
  2755. NULL, /* NextPointer */
  2756. HB1 | HB2 /* OptionVersionBitmask */
  2757. },
  2758. {
  2759. F_RANDOM_N, /* UniqueID */
  2760. "N = RANDOM", /* Syntax */
  2761. "Seeds the pseudo-random number generator with TIME.", /* Description */
  2762. "RANDOM", /* Name */
  2763. BasicDoubleSuffix, /* ReturnType */
  2764. 0, /* ParameterCount */
  2765. PNONE, /* ParameterTypes */
  2766. PNONE, /* ParameterTests */
  2767. NULL, /* NextPointer */
  2768. D64 | G65 | G67 | HB1 | HB2 /* OptionVersionBitmask */
  2769. },
  2770. {
  2771. F_RANDOM_X_N, /* UniqueID */
  2772. "N = RANDOM( X )", /* Syntax */
  2773. "Seeds the pseudo-random number generator with X.", /* Description */
  2774. "RANDOM", /* Name */
  2775. BasicDoubleSuffix, /* ReturnType */
  2776. 1, /* ParameterCount */
  2777. P1NUM, /* ParameterTypes */
  2778. P1ANY, /* ParameterTests */
  2779. NULL, /* NextPointer */
  2780. D71 | HB1 | HB2 /* OptionVersionBitmask */
  2781. },
  2782. {
  2783. F_RANDOMIZE_N, /* UniqueID */
  2784. "N = RANDOMIZE", /* Syntax */
  2785. "Seeds the pseudo-random number generator with TIME.", /* Description */
  2786. "RANDOMIZE", /* Name */
  2787. BasicDoubleSuffix, /* ReturnType */
  2788. 0, /* ParameterCount */
  2789. PNONE, /* ParameterTypes */
  2790. PNONE, /* ParameterTests */
  2791. NULL, /* NextPointer */
  2792. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  2793. },
  2794. {
  2795. F_RANDOMIZE_X_N, /* UniqueID */
  2796. "N = RANDOMIZE( X )", /* Syntax */
  2797. "Seeds the pseudo-random number generator with X.", /* Description */
  2798. "RANDOMIZE", /* Name */
  2799. BasicDoubleSuffix, /* ReturnType */
  2800. 1, /* ParameterCount */
  2801. P1NUM, /* ParameterTypes */
  2802. P1ANY, /* ParameterTests */
  2803. NULL, /* NextPointer */
  2804. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  2805. },
  2806. {
  2807. F_REMAINDER_X_Y_N, /* UniqueID */
  2808. "N = REMAINDER( X, Y )", /* Syntax */
  2809. "The remainder function, i.e., X-Y*IP(X/Y). Y shall not equal"
  2810. " zero.", /* Description */
  2811. "REMAINDER", /* Name */
  2812. BasicDoubleSuffix, /* ReturnType */
  2813. 2, /* ParameterCount */
  2814. P1NUM | P2NUM, /* ParameterTypes */
  2815. P1ANY | P2NEZ, /* ParameterTests */
  2816. NULL, /* NextPointer */
  2817. B15 | E86 /* OptionVersionBitmask */
  2818. },
  2819. {
  2820. F_RENAME_A_B_N, /* UniqueID */
  2821. "N = RENAME( A$, B$ )", /* Syntax */
  2822. "Rename file A$ to B$. If successful, the returns -1 else ret"
  2823. "urns 0.", /* Description */
  2824. "RENAME", /* Name */
  2825. BasicDoubleSuffix, /* ReturnType */
  2826. 2, /* ParameterCount */
  2827. P1STR | P2STR, /* ParameterTypes */
  2828. P1BYT | P2BYT, /* ParameterTests */
  2829. NULL, /* NextPointer */
  2830. C77 /* OptionVersionBitmask */
  2831. },
  2832. {
  2833. F_REPEAT4_X_A_S, /* UniqueID */
  2834. "S$ = REPEAT$( X, A$ )", /* Syntax */
  2835. "The string consisting of X copies of LEFT$(A$,1); X > 0.", /* Description */
  2836. "REPEAT$", /* Name */
  2837. BasicStringSuffix, /* ReturnType */
  2838. 2, /* ParameterCount */
  2839. P1NUM | P2STR, /* ParameterTypes */
  2840. P1LEN | P2BYT, /* ParameterTests */
  2841. NULL, /* NextPointer */
  2842. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2843. },
  2844. {
  2845. F_REPEAT4_X_Y_S, /* UniqueID */
  2846. "S$ = REPEAT$( X, Y )", /* Syntax */
  2847. "The string consisting of X copies of CHR$(Y); X > 0.", /* Description */
  2848. "REPEAT$", /* Name */
  2849. BasicStringSuffix, /* ReturnType */
  2850. 2, /* ParameterCount */
  2851. P1NUM | P2NUM, /* ParameterTypes */
  2852. P1LEN | P2BYT, /* ParameterTests */
  2853. NULL, /* NextPointer */
  2854. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2855. },
  2856. {
  2857. F_RESET_N, /* UniqueID */
  2858. "N = RESET", /* Syntax */
  2859. "Close all open files.", /* Description */
  2860. "RESET", /* Name */
  2861. BasicDoubleSuffix, /* ReturnType */
  2862. 0, /* ParameterCount */
  2863. PNONE, /* ParameterTypes */
  2864. PNONE, /* ParameterTests */
  2865. NULL, /* NextPointer */
  2866. B15 | D71 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2867. },
  2868. {
  2869. F_RIGHT_A_X_S, /* UniqueID */
  2870. "S$ = RIGHT( A$, X )", /* Syntax */
  2871. "The right-most X characters of A$.", /* Description */
  2872. "RIGHT", /* Name */
  2873. BasicStringSuffix, /* ReturnType */
  2874. 2, /* ParameterCount */
  2875. P1STR | P2NUM, /* ParameterTypes */
  2876. P1ANY | P2LEN, /* ParameterTests */
  2877. NULL, /* NextPointer */
  2878. D71 | HB1 | HB2 | VBX /* OptionVersionBitmask */
  2879. },
  2880. {
  2881. F_RIGHT4_A_X_S, /* UniqueID */
  2882. "S$ = RIGHT$( A$, X )", /* Syntax */
  2883. "The right-most X characters of A$.", /* Description */
  2884. "RIGHT$", /* Name */
  2885. BasicStringSuffix, /* ReturnType */
  2886. 2, /* ParameterCount */
  2887. P1STR | P2NUM, /* ParameterTypes */
  2888. P1ANY | P2LEN, /* ParameterTests */
  2889. NULL, /* NextPointer */
  2890. B15 | D71 | C77 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  2891. },
  2892. {
  2893. F_RMDIR_A_N, /* UniqueID */
  2894. "N = RMDIR( A$ )", /* Syntax */
  2895. "Removes the directory named in A$.", /* Description */
  2896. "RMDIR", /* Name */
  2897. BasicDoubleSuffix, /* ReturnType */
  2898. 1, /* ParameterCount */
  2899. P1STR, /* ParameterTypes */
  2900. P1BYT, /* ParameterTests */
  2901. NULL, /* NextPointer */
  2902. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2903. },
  2904. {
  2905. F_RND_N, /* UniqueID */
  2906. "N = RND", /* Syntax */
  2907. "The next pseudo-random number in an implementation-defined se"
  2908. "quence of pseudo-random numbers uniformly distributed in the "
  2909. "range 0 <= RND < 1.", /* Description */
  2910. "RND", /* Name */
  2911. BasicDoubleSuffix, /* ReturnType */
  2912. 0, /* ParameterCount */
  2913. PNONE, /* ParameterTypes */
  2914. PNONE, /* ParameterTests */
  2915. NULL, /* NextPointer */
  2916. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  2917. },
  2918. {
  2919. F_RND_X_N, /* UniqueID */
  2920. "N = RND( X )", /* Syntax */
  2921. "Returns a pseudorandom number in the range [0,1]. The value "
  2922. "of X is ignored.", /* Description */
  2923. "RND", /* Name */
  2924. BasicDoubleSuffix, /* ReturnType */
  2925. 1, /* ParameterCount */
  2926. P1NUM, /* ParameterTypes */
  2927. P1ANY, /* ParameterTests */
  2928. NULL, /* NextPointer */
  2929. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  2930. },
  2931. {
  2932. F_ROUND_X_Y_N, /* UniqueID */
  2933. "N = ROUND( X, Y )", /* Syntax */
  2934. "The value of X rounded to Y decimal digits to the right of th"
  2935. "e decimal point (or -Y digits to the left if Y < 0); i.e., IN"
  2936. "T(X*10^Y+.5)/10^Y. Y must be in [-32,32].", /* Description */
  2937. "ROUND", /* Name */
  2938. BasicDoubleSuffix, /* ReturnType */
  2939. 2, /* ParameterCount */
  2940. P1NUM | P2NUM, /* ParameterTypes */
  2941. P1ANY | P2INT, /* ParameterTests */
  2942. NULL, /* NextPointer */
  2943. B15 | E86 /* OptionVersionBitmask */
  2944. },
  2945. {
  2946. F_RTRIM4_A_S, /* UniqueID */
  2947. "S$ = RTRIM$( A$ )", /* Syntax */
  2948. "The string of characters resulting from the value associated "
  2949. "with A$ by deleting all trailing space characters.", /* Description */
  2950. "RTRIM$", /* Name */
  2951. BasicStringSuffix, /* ReturnType */
  2952. 1, /* ParameterCount */
  2953. P1STR, /* ParameterTypes */
  2954. P1ANY, /* ParameterTests */
  2955. NULL, /* NextPointer */
  2956. B15 | D71 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  2957. },
  2958. {
  2959. F_SEC_X_N, /* UniqueID */
  2960. "N = SEC( X )", /* Syntax */
  2961. "The secant of X, where X is in radians.", /* Description */
  2962. "SEC", /* Name */
  2963. BasicDoubleSuffix, /* ReturnType */
  2964. 1, /* ParameterCount */
  2965. P1NUM, /* ParameterTypes */
  2966. P1ANY, /* ParameterTests */
  2967. NULL, /* NextPointer */
  2968. B15 | I70 | I73 | E86 /* OptionVersionBitmask */
  2969. },
  2970. {
  2971. F_SEEK_X_N, /* UniqueID */
  2972. "N = SEEK( X )", /* Syntax */
  2973. "The location of file X; the next record that GET or PUT state"
  2974. "ments will use.", /* Description */
  2975. "SEEK", /* Name */
  2976. BasicDoubleSuffix, /* ReturnType */
  2977. 1, /* ParameterCount */
  2978. P1NUM, /* ParameterTypes */
  2979. P1DEV, /* ParameterTests */
  2980. NULL, /* NextPointer */
  2981. B15 | D71 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  2982. },
  2983. {
  2984. F_SEEK_X_Y_N, /* UniqueID */
  2985. "N = SEEK( X, Y )", /* Syntax */
  2986. "For file X, move to record number Y; the first record number "
  2987. "is 1.", /* Description */
  2988. "SEEK", /* Name */
  2989. BasicDoubleSuffix, /* ReturnType */
  2990. 2, /* ParameterCount */
  2991. P1NUM | P2NUM, /* ParameterTypes */
  2992. P1DEV | P2INT, /* ParameterTests */
  2993. NULL, /* NextPointer */
  2994. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  2995. },
  2996. {
  2997. F_SEG_A_X_Y_S, /* UniqueID */
  2998. "S$ = SEG( A$, X, Y )", /* Syntax */
  2999. "The Y characters of A$, starting from postion X.", /* Description */
  3000. "SEG", /* Name */
  3001. BasicStringSuffix, /* ReturnType */
  3002. 3, /* ParameterCount */
  3003. P1STR | P2NUM | P3NUM, /* ParameterTypes */
  3004. P1ANY | P2POS | P3LEN, /* ParameterTests */
  3005. NULL, /* NextPointer */
  3006. B15 | HB2 /* OptionVersionBitmask */
  3007. },
  3008. {
  3009. F_SEG4_A_X_Y_S, /* UniqueID */
  3010. "S$ = SEG$( A$, X, Y )", /* Syntax */
  3011. "The Y characters of A$, starting from postion X.", /* Description */
  3012. "SEG$", /* Name */
  3013. BasicStringSuffix, /* ReturnType */
  3014. 3, /* ParameterCount */
  3015. P1STR | P2NUM | P3NUM, /* ParameterTypes */
  3016. P1ANY | P2POS | P3LEN, /* ParameterTests */
  3017. NULL, /* NextPointer */
  3018. B15 | HB2 /* OptionVersionBitmask */
  3019. },
  3020. {
  3021. F_SGN_X_N, /* UniqueID */
  3022. "N = SGN( X )", /* Syntax */
  3023. "The sign of X: -1 if X < 0, 0 if X = 0, and +1 if X > 0.", /* Description */
  3024. "SGN", /* Name */
  3025. BasicDoubleSuffix, /* ReturnType */
  3026. 1, /* ParameterCount */
  3027. P1NUM, /* ParameterTypes */
  3028. P1ANY, /* ParameterTests */
  3029. NULL, /* NextPointer */
  3030. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  3031. },
  3032. {
  3033. F_SHELL_A_N, /* UniqueID */
  3034. "N = SHELL( A$ )", /* Syntax */
  3035. "The exit code resulting from the execution of an operating sy"
  3036. "stem command.", /* Description */
  3037. "SHELL", /* Name */
  3038. BasicDoubleSuffix, /* ReturnType */
  3039. 1, /* ParameterCount */
  3040. P1STR, /* ParameterTypes */
  3041. P1BYT, /* ParameterTests */
  3042. NULL, /* NextPointer */
  3043. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  3044. },
  3045. {
  3046. F_SIN_X_N, /* UniqueID */
  3047. "N = SIN( X )", /* Syntax */
  3048. "The sine of X, where X is in radians.", /* Description */
  3049. "SIN", /* Name */
  3050. BasicDoubleSuffix, /* ReturnType */
  3051. 1, /* ParameterCount */
  3052. P1NUM, /* ParameterTypes */
  3053. P1ANY, /* ParameterTests */
  3054. NULL, /* NextPointer */
  3055. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  3056. },
  3057. {
  3058. F_SIND_X_N, /* UniqueID */
  3059. "N = SIND( X )", /* Syntax */
  3060. "The sine of X, where X is in degrees.", /* Description */
  3061. "SIND", /* Name */
  3062. BasicDoubleSuffix, /* ReturnType */
  3063. 1, /* ParameterCount */
  3064. P1NUM, /* ParameterTypes */
  3065. P1ANY, /* ParameterTests */
  3066. NULL, /* NextPointer */
  3067. B15 | HB2 /* OptionVersionBitmask */
  3068. },
  3069. {
  3070. F_SING_X_N, /* UniqueID */
  3071. "N = SING( X )", /* Syntax */
  3072. "The sine of X, where X is in gradians.", /* Description */
  3073. "SING", /* Name */
  3074. BasicDoubleSuffix, /* ReturnType */
  3075. 1, /* ParameterCount */
  3076. P1NUM, /* ParameterTypes */
  3077. P1ANY, /* ParameterTests */
  3078. NULL, /* NextPointer */
  3079. B15 | HB2 /* OptionVersionBitmask */
  3080. },
  3081. {
  3082. F_SINH_X_N, /* UniqueID */
  3083. "N = SINH( X )", /* Syntax */
  3084. "The hyperbolic sine of X.", /* Description */
  3085. "SINH", /* Name */
  3086. BasicDoubleSuffix, /* ReturnType */
  3087. 1, /* ParameterCount */
  3088. P1NUM, /* ParameterTypes */
  3089. P1ANY, /* ParameterTests */
  3090. NULL, /* NextPointer */
  3091. B15 | HB2 | E86 /* OptionVersionBitmask */
  3092. },
  3093. {
  3094. F_SIZE_A_N, /* UniqueID */
  3095. "N = SIZE( A$ )", /* Syntax */
  3096. "The total number of 1KB blockes required to contain the file."
  3097. "", /* Description */
  3098. "SIZE", /* Name */
  3099. BasicDoubleSuffix, /* ReturnType */
  3100. 1, /* ParameterCount */
  3101. P1STR, /* ParameterTypes */
  3102. P1BYT, /* ParameterTests */
  3103. NULL, /* NextPointer */
  3104. C77 /* OptionVersionBitmask */
  3105. },
  3106. {
  3107. F_SIZE_N, /* UniqueID */
  3108. "N = SIZE( ... )", /* Syntax */
  3109. "SIZE( arrayname ). The total number of items in the array.", /* Description */
  3110. "SIZE", /* Name */
  3111. BasicDoubleSuffix, /* ReturnType */
  3112. 255, /* ParameterCount */
  3113. PNONE, /* ParameterTypes */
  3114. PNONE, /* ParameterTests */
  3115. NULL, /* NextPointer */
  3116. E86 /* OptionVersionBitmask */
  3117. },
  3118. {
  3119. F_SLEEP_X_N, /* UniqueID */
  3120. "N = SLEEP( X )", /* Syntax */
  3121. "The program pauses for X times the value of OPTION SLEEP seco"
  3122. "nds. If the result is zero, negative, or more than INT_MAX t"
  3123. "hen SLEEP does nothing. The resolution is implementation def"
  3124. "ined.", /* Description */
  3125. "SLEEP", /* Name */
  3126. BasicDoubleSuffix, /* ReturnType */
  3127. 1, /* ParameterCount */
  3128. P1NUM, /* ParameterTypes */
  3129. P1ANY, /* ParameterTests */
  3130. NULL, /* NextPointer */
  3131. B15 | D71 | HB1 | HB2 /* OptionVersionBitmask */
  3132. },
  3133. {
  3134. F_SNH_X_N, /* UniqueID */
  3135. "N = SNH( X )", /* Syntax */
  3136. "The hyperbolic sine of X.", /* Description */
  3137. "SNH", /* Name */
  3138. BasicDoubleSuffix, /* ReturnType */
  3139. 1, /* ParameterCount */
  3140. P1NUM, /* ParameterTypes */
  3141. P1ANY, /* ParameterTests */
  3142. NULL, /* NextPointer */
  3143. B15 | HB2 /* OptionVersionBitmask */
  3144. },
  3145. {
  3146. F_SPA_X_S, /* UniqueID */
  3147. "S$ = SPA( X )", /* Syntax */
  3148. "The string of X blank spaces.", /* Description */
  3149. "SPA", /* Name */
  3150. BasicStringSuffix, /* ReturnType */
  3151. 1, /* ParameterCount */
  3152. P1NUM, /* ParameterTypes */
  3153. P1LEN, /* ParameterTests */
  3154. NULL, /* NextPointer */
  3155. HB1 | HB2 /* OptionVersionBitmask */
  3156. },
  3157. {
  3158. F_SPACE_X_S, /* UniqueID */
  3159. "S$ = SPACE( X )", /* Syntax */
  3160. "The string of X blank spaces.", /* Description */
  3161. "SPACE", /* Name */
  3162. BasicStringSuffix, /* ReturnType */
  3163. 1, /* ParameterCount */
  3164. P1NUM, /* ParameterTypes */
  3165. P1LEN, /* ParameterTests */
  3166. NULL, /* NextPointer */
  3167. D71 | HB1 | HB2 | VBX /* OptionVersionBitmask */
  3168. },
  3169. {
  3170. F_SPACE4_X_S, /* UniqueID */
  3171. "S$ = SPACE$( X )", /* Syntax */
  3172. "The string of X blank spaces.", /* Description */
  3173. "SPACE$", /* Name */
  3174. BasicStringSuffix, /* ReturnType */
  3175. 1, /* ParameterCount */
  3176. P1NUM, /* ParameterTypes */
  3177. P1LEN, /* ParameterTests */
  3178. NULL, /* NextPointer */
  3179. B15 | D71 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  3180. },
  3181. {
  3182. F_SPC_X_S, /* UniqueID */
  3183. "S$ = SPC( X )", /* Syntax */
  3184. "The string of X blank spaces. Only for use within the PRINT "
  3185. "command.", /* Description */
  3186. "SPC", /* Name */
  3187. BasicStringSuffix, /* ReturnType */
  3188. 1, /* ParameterCount */
  3189. P1NUM, /* ParameterTypes */
  3190. P1ANY, /* ParameterTests */
  3191. NULL, /* NextPointer */
  3192. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  3193. },
  3194. {
  3195. F_SQR_X_N, /* UniqueID */
  3196. "N = SQR( X )", /* Syntax */
  3197. "The non-negative square root of X; X shall be non-negative.", /* Description */
  3198. "SQR", /* Name */
  3199. BasicDoubleSuffix, /* ReturnType */
  3200. 1, /* ParameterCount */
  3201. P1NUM, /* ParameterTypes */
  3202. P1GEZ, /* ParameterTests */
  3203. NULL, /* NextPointer */
  3204. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  3205. },
  3206. {
  3207. F_SQRT_X_N, /* UniqueID */
  3208. "N = SQRT( X )", /* Syntax */
  3209. "The non-negative square root of X; X shall be non-negative.", /* Description */
  3210. "SQRT", /* Name */
  3211. BasicDoubleSuffix, /* ReturnType */
  3212. 1, /* ParameterCount */
  3213. P1NUM, /* ParameterTypes */
  3214. P1GEZ, /* ParameterTests */
  3215. NULL, /* NextPointer */
  3216. HB1 | HB2 /* OptionVersionBitmask */
  3217. },
  3218. {
  3219. F_STR_X_Y_S, /* UniqueID */
  3220. "S$ = STR( X, Y )", /* Syntax */
  3221. "The string X bytes long consisting of CHR$(Y).", /* Description */
  3222. "STR", /* Name */
  3223. BasicStringSuffix, /* ReturnType */
  3224. 2, /* ParameterCount */
  3225. P1NUM | P2NUM, /* ParameterTypes */
  3226. P1LEN | P2BYT, /* ParameterTests */
  3227. NULL, /* NextPointer */
  3228. B15 | HB2 /* OptionVersionBitmask */
  3229. },
  3230. {
  3231. F_STR4_X_S, /* UniqueID */
  3232. "S$ = STR$( X )", /* Syntax */
  3233. "The string generated by the print-statement as the numeric-re"
  3234. "presentation of the value associated with X.", /* Description */
  3235. "STR$", /* Name */
  3236. BasicStringSuffix, /* ReturnType */
  3237. 1, /* ParameterCount */
  3238. P1NUM, /* ParameterTypes */
  3239. P1ANY, /* ParameterTests */
  3240. NULL, /* NextPointer */
  3241. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  3242. },
  3243. {
  3244. F_STRING_X_Y_S, /* UniqueID */
  3245. "S$ = STRING( X, Y )", /* Syntax */
  3246. "The string X bytes long consisting of CHR$(Y).", /* Description */
  3247. "STRING", /* Name */
  3248. BasicStringSuffix, /* ReturnType */
  3249. 2, /* ParameterCount */
  3250. P1NUM | P2NUM, /* ParameterTypes */
  3251. P1LEN | P2BYT, /* ParameterTests */
  3252. NULL, /* NextPointer */
  3253. B15 | HB2 /* OptionVersionBitmask */
  3254. },
  3255. {
  3256. F_STRING4_X_A_S, /* UniqueID */
  3257. "S$ = STRING$( X, A$ )", /* Syntax */
  3258. "The string X bytes long consisting of the first character of "
  3259. "A$.", /* Description */
  3260. "STRING$", /* Name */
  3261. BasicStringSuffix, /* ReturnType */
  3262. 2, /* ParameterCount */
  3263. P1NUM | P2STR, /* ParameterTypes */
  3264. P1LEN | P2BYT, /* ParameterTests */
  3265. NULL, /* NextPointer */
  3266. B15 | D71 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  3267. },
  3268. {
  3269. F_STRING4_X_Y_S, /* UniqueID */
  3270. "S$ = STRING$( X, Y )", /* Syntax */
  3271. "The string X bytes long consisting of CHR$(Y).", /* Description */
  3272. "STRING$", /* Name */
  3273. BasicStringSuffix, /* ReturnType */
  3274. 2, /* ParameterCount */
  3275. P1NUM | P2NUM, /* ParameterTypes */
  3276. P1LEN | P2BYT, /* ParameterTests */
  3277. NULL, /* NextPointer */
  3278. B15 | D71 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  3279. },
  3280. {
  3281. F_STUFF_X_Y_N, /* UniqueID */
  3282. "N = STUFF( X, Y )", /* Syntax */
  3283. "Sends Y to hardware address X. Not supported on all platform"
  3284. "s.", /* Description */
  3285. "STUFF", /* Name */
  3286. BasicDoubleSuffix, /* ReturnType */
  3287. 2, /* ParameterCount */
  3288. P1NUM | P2NUM, /* ParameterTypes */
  3289. P1LNG | P2BYT, /* ParameterTests */
  3290. NULL, /* NextPointer */
  3291. HB1 | HB2 /* OptionVersionBitmask */
  3292. },
  3293. {
  3294. F_TAB_X_S, /* UniqueID */
  3295. "S$ = TAB( X )", /* Syntax */
  3296. "The string required to advance to column X. Only for use wit"
  3297. "hin the PRINT command.", /* Description */
  3298. "TAB", /* Name */
  3299. BasicStringSuffix, /* ReturnType */
  3300. 1, /* ParameterCount */
  3301. P1NUM, /* ParameterTypes */
  3302. P1ANY, /* ParameterTests */
  3303. NULL, /* NextPointer */
  3304. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  3305. },
  3306. {
  3307. F_TAN_X_N, /* UniqueID */
  3308. "N = TAN( X )", /* Syntax */
  3309. "The tangent of X, where X is in radians.", /* Description */
  3310. "TAN", /* Name */
  3311. BasicDoubleSuffix, /* ReturnType */
  3312. 1, /* ParameterCount */
  3313. P1NUM, /* ParameterTypes */
  3314. P1ANY, /* ParameterTests */
  3315. NULL, /* NextPointer */
  3316. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  3317. },
  3318. {
  3319. F_TAND_X_N, /* UniqueID */
  3320. "N = TAND( X )", /* Syntax */
  3321. "The tangent of X, where X is in degrees.", /* Description */
  3322. "TAND", /* Name */
  3323. BasicDoubleSuffix, /* ReturnType */
  3324. 1, /* ParameterCount */
  3325. P1NUM, /* ParameterTypes */
  3326. P1ANY, /* ParameterTests */
  3327. NULL, /* NextPointer */
  3328. B15 | HB2 /* OptionVersionBitmask */
  3329. },
  3330. {
  3331. F_TANG_X_N, /* UniqueID */
  3332. "N = TANG( X )", /* Syntax */
  3333. "The tangent of X, where X is in gradians.", /* Description */
  3334. "TANG", /* Name */
  3335. BasicDoubleSuffix, /* ReturnType */
  3336. 1, /* ParameterCount */
  3337. P1NUM, /* ParameterTypes */
  3338. P1ANY, /* ParameterTests */
  3339. NULL, /* NextPointer */
  3340. B15 | HB2 /* OptionVersionBitmask */
  3341. },
  3342. {
  3343. F_TANH_X_N, /* UniqueID */
  3344. "N = TANH( X )", /* Syntax */
  3345. "The hyperbolic tangent of X.", /* Description */
  3346. "TANH", /* Name */
  3347. BasicDoubleSuffix, /* ReturnType */
  3348. 1, /* ParameterCount */
  3349. P1NUM, /* ParameterTypes */
  3350. P1ANY, /* ParameterTests */
  3351. NULL, /* NextPointer */
  3352. B15 | HB2 | E86 /* OptionVersionBitmask */
  3353. },
  3354. {
  3355. F_TI_N, /* UniqueID */
  3356. "N = TI", /* Syntax */
  3357. "The time elapsed since the previous midnight, expressed in se"
  3358. "conds; e.g., the value of TIME at 11:15 AM is 40500. If ther"
  3359. "e is no clock available, then the value of TIME shall be -1. "
  3360. " The value of TIME at midnight shall be zero (not 86400).", /* Description */
  3361. "TI", /* Name */
  3362. BasicDoubleSuffix, /* ReturnType */
  3363. 0, /* ParameterCount */
  3364. PNONE, /* ParameterTypes */
  3365. PNONE, /* ParameterTests */
  3366. NULL, /* NextPointer */
  3367. HB1 | HB2 /* OptionVersionBitmask */
  3368. },
  3369. {
  3370. F_TI4_S, /* UniqueID */
  3371. "S$ = TI$", /* Syntax */
  3372. "The time of day in 24-hour notation according to ISO 3307. F"
  3373. "or example, the value of TIME$ at 11:15 AM is '11:15:00'. If"
  3374. " there is no clock available, then the value of TIME$ shall b"
  3375. "e '99:99:99'. The value of TIME$ at midnight is '00:00:00'.", /* Description */
  3376. "TI$", /* Name */
  3377. BasicStringSuffix, /* ReturnType */
  3378. 0, /* ParameterCount */
  3379. PNONE, /* ParameterTypes */
  3380. PNONE, /* ParameterTests */
  3381. NULL, /* NextPointer */
  3382. HB1 | HB2 /* OptionVersionBitmask */
  3383. },
  3384. {
  3385. F_TIM_N, /* UniqueID */
  3386. "N = TIM", /* Syntax */
  3387. "The time elapsed since the previous midnight, expressed in se"
  3388. "conds; e.g., the value of TIME at 11:15 AM is 40500. If ther"
  3389. "e is no clock available, then the value of TIME shall be -1. "
  3390. " The value of TIME at midnight shall be zero (not 86400).", /* Description */
  3391. "TIM", /* Name */
  3392. BasicDoubleSuffix, /* ReturnType */
  3393. 0, /* ParameterCount */
  3394. PNONE, /* ParameterTypes */
  3395. PNONE, /* ParameterTests */
  3396. NULL, /* NextPointer */
  3397. G67 | I70 | I73 | HB1 | HB2 /* OptionVersionBitmask */
  3398. },
  3399. {
  3400. F_TIM_X_N, /* UniqueID */
  3401. "N = TIM( X )", /* Syntax */
  3402. "If X is 0, returns minutes in current hour. If X is 1, retur"
  3403. "ns hours in current day. If X is 2, returns days in current "
  3404. "year. If X is 3, returns years since 1900. Any other value "
  3405. "for X is an ERROR.", /* Description */
  3406. "TIM", /* Name */
  3407. BasicDoubleSuffix, /* ReturnType */
  3408. 1, /* ParameterCount */
  3409. P1NUM, /* ParameterTypes */
  3410. P1BYT, /* ParameterTests */
  3411. NULL, /* NextPointer */
  3412. G65 | G67 | HB1 | HB2 /* OptionVersionBitmask */
  3413. },
  3414. {
  3415. F_TIME_N, /* UniqueID */
  3416. "N = TIME", /* Syntax */
  3417. "The time elapsed since the previous midnight, expressed in se"
  3418. "conds; e.g., the value of TIME at 11:15 AM is 40500. If ther"
  3419. "e is no clock available, then the value of TIME shall be -1. "
  3420. " The value of TIME at midnight shall be zero (not 86400).", /* Description */
  3421. "TIME", /* Name */
  3422. BasicDoubleSuffix, /* ReturnType */
  3423. 0, /* ParameterCount */
  3424. PNONE, /* ParameterTypes */
  3425. PNONE, /* ParameterTests */
  3426. NULL, /* NextPointer */
  3427. B15 | D71 | HB1 | HB2 | E86 /* OptionVersionBitmask */
  3428. },
  3429. {
  3430. F_TIME_X_N, /* UniqueID */
  3431. "N = TIME( X )", /* Syntax */
  3432. "The time elapsed since the previous midnight, expressed in se"
  3433. "conds; e.g., the value of TIME at 11:15 AM is 40500. If ther"
  3434. "e is no clock available, then the value of TIME shall be -1. "
  3435. " The value of TIME at midnight shall be zero (not 86400). Th"
  3436. "e value of the parameter X is ignored.", /* Description */
  3437. "TIME", /* Name */
  3438. BasicDoubleSuffix, /* ReturnType */
  3439. 1, /* ParameterCount */
  3440. P1NUM, /* ParameterTypes */
  3441. P1ANY, /* ParameterTests */
  3442. NULL, /* NextPointer */
  3443. D71 | HB1 | HB2 /* OptionVersionBitmask */
  3444. },
  3445. {
  3446. F_TIME4_S, /* UniqueID */
  3447. "S$ = TIME$", /* Syntax */
  3448. "The time of day in 24-hour notation according to ISO 3307. F"
  3449. "or example, the value of TIME$ at 11:15 AM is '11:15:00'. If"
  3450. " there is no clock available, then the value of TIME$ shall b"
  3451. "e '99:99:99'. The value of TIME$ at midnight is '00:00:00'.", /* Description */
  3452. "TIME$", /* Name */
  3453. BasicStringSuffix, /* ReturnType */
  3454. 0, /* ParameterCount */
  3455. PNONE, /* ParameterTypes */
  3456. PNONE, /* ParameterTests */
  3457. NULL, /* NextPointer */
  3458. B15 | D71 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  3459. },
  3460. {
  3461. F_TIME4_X_S, /* UniqueID */
  3462. "S$ = TIME$( X )", /* Syntax */
  3463. "The time of day in 24-hour notation according to ISO 3307. F"
  3464. "or example, the value of TIME$ at 11:15 AM is '11:15:00'. If"
  3465. " there is no clock available, then the value of TIME$ shall b"
  3466. "e '99:99:99'. The value of TIME$ at midnight is '00:00:00'. "
  3467. " The value of X is ignored.", /* Description */
  3468. "TIME$", /* Name */
  3469. BasicStringSuffix, /* ReturnType */
  3470. 1, /* ParameterCount */
  3471. P1NUM, /* ParameterTypes */
  3472. P1ANY, /* ParameterTests */
  3473. NULL, /* NextPointer */
  3474. B15 | D71 | HB2 /* OptionVersionBitmask */
  3475. },
  3476. {
  3477. F_TIMER_N, /* UniqueID */
  3478. "N = TIMER", /* Syntax */
  3479. "The time in the system clock in seconds elapsed since midnigh"
  3480. "t.", /* Description */
  3481. "TIMER", /* Name */
  3482. BasicDoubleSuffix, /* ReturnType */
  3483. 0, /* ParameterCount */
  3484. PNONE, /* ParameterTypes */
  3485. PNONE, /* ParameterTests */
  3486. NULL, /* NextPointer */
  3487. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  3488. },
  3489. {
  3490. F_TOP_N, /* UniqueID */
  3491. "N = TOP", /* Syntax */
  3492. "The address of the top of available memory. This function is"
  3493. " provided for backward compatibility only and it always retur"
  3494. "ns a fixed value of 32000.", /* Description */
  3495. "TOP", /* Name */
  3496. BasicDoubleSuffix, /* ReturnType */
  3497. 0, /* ParameterCount */
  3498. PNONE, /* ParameterTypes */
  3499. PNONE, /* ParameterTests */
  3500. NULL, /* NextPointer */
  3501. HB2 /* OptionVersionBitmask */
  3502. },
  3503. {
  3504. F_TRACE_N, /* UniqueID */
  3505. "N = TRACE", /* Syntax */
  3506. "Turn tracing ON", /* Description */
  3507. "TRACE", /* Name */
  3508. BasicDoubleSuffix, /* ReturnType */
  3509. 0, /* ParameterCount */
  3510. PNONE, /* ParameterTypes */
  3511. PNONE, /* ParameterTests */
  3512. NULL, /* NextPointer */
  3513. HB1 | HB2 /* OptionVersionBitmask */
  3514. },
  3515. {
  3516. F_TRIM4_A_S, /* UniqueID */
  3517. "S$ = TRIM$( A$ )", /* Syntax */
  3518. "The string resulting from removing both leading and trailing "
  3519. "spaces from A$.", /* Description */
  3520. "TRIM$", /* Name */
  3521. BasicStringSuffix, /* ReturnType */
  3522. 1, /* ParameterCount */
  3523. P1STR, /* ParameterTypes */
  3524. P1ANY, /* ParameterTests */
  3525. NULL, /* NextPointer */
  3526. B15 | D71 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  3527. },
  3528. {
  3529. F_TROFF_N, /* UniqueID */
  3530. "N = TROFF", /* Syntax */
  3531. "Turn tracing OFF", /* Description */
  3532. "TROFF", /* Name */
  3533. BasicDoubleSuffix, /* ReturnType */
  3534. 0, /* ParameterCount */
  3535. PNONE, /* ParameterTypes */
  3536. PNONE, /* ParameterTests */
  3537. NULL, /* NextPointer */
  3538. B15 | D71 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  3539. },
  3540. {
  3541. F_TRON_N, /* UniqueID */
  3542. "N = TRON", /* Syntax */
  3543. "Turn tracing ON", /* Description */
  3544. "TRON", /* Name */
  3545. BasicDoubleSuffix, /* ReturnType */
  3546. 0, /* ParameterCount */
  3547. PNONE, /* ParameterTypes */
  3548. PNONE, /* ParameterTests */
  3549. NULL, /* NextPointer */
  3550. B15 | D71 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  3551. },
  3552. {
  3553. F_TRUNCATE_X_Y_N, /* UniqueID */
  3554. "N = TRUNCATE( X, Y )", /* Syntax */
  3555. "The value of X truncated to Y decimal digits to the right of "
  3556. "the decimal point (or -Y digits to the left if Y < 0); i.e., "
  3557. "IP(X*10^Y)/10^Y. Y in [-32,32].", /* Description */
  3558. "TRUNCATE", /* Name */
  3559. BasicDoubleSuffix, /* ReturnType */
  3560. 2, /* ParameterCount */
  3561. P1NUM | P2NUM, /* ParameterTypes */
  3562. P1ANY | P2INT, /* ParameterTests */
  3563. NULL, /* NextPointer */
  3564. B15 | E86 /* OptionVersionBitmask */
  3565. },
  3566. {
  3567. F_UBOUND_N, /* UniqueID */
  3568. "N = UBOUND( ... )", /* Syntax */
  3569. "UBOUND( arrayname [, dimension] ). The upper bound of the ar"
  3570. "ray. The dimension defaults to 1. dimension in [1,DIM(array"
  3571. "name)]", /* Description */
  3572. "UBOUND", /* Name */
  3573. BasicDoubleSuffix, /* ReturnType */
  3574. 255, /* ParameterCount */
  3575. PNONE, /* ParameterTypes */
  3576. PNONE, /* ParameterTests */
  3577. NULL, /* NextPointer */
  3578. B15 | E86 | M88 | VBX /* OptionVersionBitmask */
  3579. },
  3580. {
  3581. F_UCASE4_A_S, /* UniqueID */
  3582. "S$ = UCASE$( A$ )", /* Syntax */
  3583. "The string of characters resulting from the value associated "
  3584. "with A$ by replacing each lower-case-letter in the string by "
  3585. "its upper-case version.", /* Description */
  3586. "UCASE$", /* Name */
  3587. BasicStringSuffix, /* ReturnType */
  3588. 1, /* ParameterCount */
  3589. P1STR, /* ParameterTypes */
  3590. P1ANY, /* ParameterTests */
  3591. NULL, /* NextPointer */
  3592. B15 | D71 | C77 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  3593. },
  3594. {
  3595. F_UNSAVE_A_N, /* UniqueID */
  3596. "N = UNSAVE( A$ )", /* Syntax */
  3597. "Removes the file named in A$.", /* Description */
  3598. "UNSAVE", /* Name */
  3599. BasicDoubleSuffix, /* ReturnType */
  3600. 1, /* ParameterCount */
  3601. P1STR, /* ParameterTypes */
  3602. P1BYT, /* ParameterTests */
  3603. NULL, /* NextPointer */
  3604. D64 | G65 | G67 /* OptionVersionBitmask */
  3605. },
  3606. {
  3607. F_VAL_A_N, /* UniqueID */
  3608. "N = VAL( A$ )", /* Syntax */
  3609. "The value of the numeric-constant associated with A$, if the "
  3610. "string associated with A$ is a numeric-constant. Leading and"
  3611. " trailing spaces in the string are ignored. If the evaluatio"
  3612. "n of the numeric-constant would result in a value which cause"
  3613. "s an underflow, then the value returned shall be zero. For e"
  3614. "xample, VAL(' 123.5 ' ) = 123.5, VAL('2.E-99') could be zero,"
  3615. " and VAL('MCMXVII') causes an exception.", /* Description */
  3616. "VAL", /* Name */
  3617. BasicDoubleSuffix, /* ReturnType */
  3618. 1, /* ParameterCount */
  3619. P1STR, /* ParameterTypes */
  3620. P1BYT, /* ParameterTests */
  3621. NULL, /* NextPointer */
  3622. B15 | D64 | G65 | G67 | I70 | D71 | I73 | C77 | E78 | HB1 | HB2 | T80 | M80 | M85 | E86 | M88 | VBX /* OptionVersionBitmask */
  3623. },
  3624. {
  3625. F_VTAB_X_N, /* UniqueID */
  3626. "N = VTAB( X )", /* Syntax */
  3627. "Savme as LOCATE X, 1.", /* Description */
  3628. "VTAB", /* Name */
  3629. BasicDoubleSuffix, /* ReturnType */
  3630. 1, /* ParameterCount */
  3631. P1NUM, /* ParameterTypes */
  3632. P1BYT, /* ParameterTests */
  3633. NULL, /* NextPointer */
  3634. HB1 | HB2 /* OptionVersionBitmask */
  3635. },
  3636. {
  3637. F_WAIT_X_N, /* UniqueID */
  3638. "N = WAIT( X )", /* Syntax */
  3639. "The program pauses for X times the value of OPTION SLEEP seco"
  3640. "nds. If the result is zero, negative, or more than INT_MAX t"
  3641. "hen WAIT does nothing. The resolution is implementation defi"
  3642. "ned.", /* Description */
  3643. "WAIT", /* Name */
  3644. BasicDoubleSuffix, /* ReturnType */
  3645. 1, /* ParameterCount */
  3646. P1NUM, /* ParameterTypes */
  3647. P1ANY, /* ParameterTests */
  3648. NULL, /* NextPointer */
  3649. B15 | D71 | HB1 | HB2 /* OptionVersionBitmask */
  3650. },
  3651. {
  3652. F_WAIT_X_Y_N, /* UniqueID */
  3653. "N = WAIT( X, Y )", /* Syntax */
  3654. "Waits for the value of (INP(X) AND Y) to become nonzero. Not"
  3655. " supported on all platforms.", /* Description */
  3656. "WAIT", /* Name */
  3657. BasicDoubleSuffix, /* ReturnType */
  3658. 2, /* ParameterCount */
  3659. P1NUM | P2NUM, /* ParameterTypes */
  3660. P1INT | P2BYT, /* ParameterTests */
  3661. NULL, /* NextPointer */
  3662. B15 | D71 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  3663. },
  3664. {
  3665. F_WAIT_X_Y_Z_N, /* UniqueID */
  3666. "N = WAIT( X, Y, Z )", /* Syntax */
  3667. "Waits for the value of ((INP(X) XOR Z) AND Y) to become nonze"
  3668. "ro. Not supported on all platforms.", /* Description */
  3669. "WAIT", /* Name */
  3670. BasicDoubleSuffix, /* ReturnType */
  3671. 3, /* ParameterCount */
  3672. P1NUM | P2NUM | P3NUM, /* ParameterTypes */
  3673. P1INT | P2BYT | P3BYT, /* ParameterTests */
  3674. NULL, /* NextPointer */
  3675. B15 | D71 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  3676. },
  3677. {
  3678. F_WIDTH_X_N, /* UniqueID */
  3679. "N = WIDTH( X )", /* Syntax */
  3680. "For console, sets the line width to X. Zero means no wrapping"
  3681. " will occur.", /* Description */
  3682. "WIDTH", /* Name */
  3683. BasicDoubleSuffix, /* ReturnType */
  3684. 1, /* ParameterCount */
  3685. P1NUM, /* ParameterTypes */
  3686. P1BYT, /* ParameterTests */
  3687. NULL, /* NextPointer */
  3688. B15 | D71 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  3689. },
  3690. {
  3691. F_WIDTH_X_Y_N, /* UniqueID */
  3692. "N = WIDTH( X, Y )", /* Syntax */
  3693. "If X in [MINDEV,MAXDEV] then for file X, sets the line width "
  3694. "to Y. If X = 0, sets the console width to Y. f X > MAXDEV, "
  3695. "then sets the console rows to X and the line width to Y. A v"
  3696. "alue of zero for Y means no wrapping will occur.", /* Description */
  3697. "WIDTH", /* Name */
  3698. BasicDoubleSuffix, /* ReturnType */
  3699. 2, /* ParameterCount */
  3700. P1NUM | P2NUM, /* ParameterTypes */
  3701. P1BYT | P2BYT, /* ParameterTests */
  3702. NULL, /* NextPointer */
  3703. B15 | D71 | HB1 | HB2 | T80 | M80 | M85 | M88 | VBX /* OptionVersionBitmask */
  3704. },
  3705. };
  3706. /* EOF */