diff --git a/source/qb64.bas b/source/qb64.bas index 62a605dc3..5334fd3f7 100644 --- a/source/qb64.bas +++ b/source/qb64.bas @@ -686,6 +686,8 @@ TYPE idstruct 'For variables which are arguments passed to a sub/function sfid AS LONG 'id number of variable's parent sub/function sfarg AS INTEGER 'argument/parameter # within call (1=first) + + hr_syntax AS STRING END TYPE DIM SHARED id AS idstruct @@ -2427,23 +2429,23 @@ DO FOR i2 = i2 TO n2 e$ = getelement$(a2$, i2) IF e$ = "(" THEN - IF m <> 0 THEN a$ = "Syntax error": GOTO errmes + IF m <> 0 THEN a$ = "Syntax error - too many opening brackets": GOTO errmes m = 1 array = 1 GOTO gotaa END IF IF e$ = ")" THEN - IF m <> 1 THEN a$ = "Syntax error": GOTO errmes + IF m <> 1 THEN a$ = "Syntax error - closing bracket without opening bracket": GOTO errmes m = 2 GOTO gotaa END IF IF e$ = "AS" THEN - IF m <> 0 AND m <> 2 THEN a$ = "Syntax error": GOTO errmes + IF m <> 0 AND m <> 2 THEN a$ = "Syntax error - check your brackets": GOTO errmes m = 3 GOTO gotaa END IF IF m = 1 THEN GOTO gotaa 'ignore contents of bracket - IF m <> 3 THEN a$ = "Syntax error": GOTO errmes + IF m <> 3 THEN a$ = "Syntax error - check your brackets": GOTO errmes IF t2$ = "" THEN t2$ = e$ ELSE t2$ = t2$ + " " + e$ gotaa: NEXT i2 @@ -2452,7 +2454,7 @@ DO argnelereq = 0 - IF symbol2$ <> "" AND t2$ <> "" THEN a$ = "Syntax error": GOTO errmes + IF symbol2$ <> "" AND t2$ <> "" THEN a$ = "Syntax error - check parameter types": GOTO errmes IF t2$ = "" THEN t2$ = symbol2$ IF t2$ = "" THEN IF LEFT$(n2$, 1) = "_" THEN v = 27 ELSE v = ASC(UCASE$(n2$)) - 64 @@ -4825,7 +4827,7 @@ DO byvalue = 0 IF UCASE$(e$) = "BYVAL" THEN - IF declaringlibrary = 0 THEN a$ = "BYVAL can currently only be used with DECLARE LIBRARY": GOTO errmes + IF declaringlibrary = 0 THEN a$ = "BYVAL can only be used with DECLARE LIBRARY": GOTO errmes byvalue = 1: a2$ = RIGHT$(a2$, LEN(a2$) - 6) IF RIGHT$(l$, 1) = "(" THEN l$ = l$ + sp2 + SCase$("ByVal") ELSE l$ = l$ + sp + SCase$("Byval") n2 = numelements(a2$): e$ = getelement$(a2$, 1) @@ -4846,31 +4848,31 @@ DO FOR i2 = 2 TO n2 e$ = getelement$(a2$, i2) IF e$ = "(" THEN - IF m <> 0 THEN a$ = "Syntax error": GOTO errmes + IF m <> 0 THEN a$ = "Syntax error - too many opening brackets": GOTO errmes m = 1 array = 1 l$ = l$ + sp2 + "(" GOTO gotaa2 END IF IF e$ = ")" THEN - IF m <> 1 THEN a$ = "Syntax error": GOTO errmes + IF m <> 1 THEN a$ = "Syntax error - closing bracket without opening bracket": GOTO errmes m = 2 l$ = l$ + sp2 + ")" GOTO gotaa2 END IF IF UCASE$(e$) = "AS" THEN - IF m <> 0 AND m <> 2 THEN a$ = "Syntax error": GOTO errmes + IF m <> 0 AND m <> 2 THEN a$ = "Syntax error - check your brackets": GOTO errmes m = 3 l$ = l$ + sp + SCase$("As") GOTO gotaa2 END IF IF m = 1 THEN l$ = l$ + sp + e$: GOTO gotaa2 'ignore contents of option bracket telling how many dimensions (add to layout as is) - IF m <> 3 THEN a$ = "Syntax error": GOTO errmes + IF m <> 3 THEN a$ = "Syntax error - check your brackets": GOTO errmes IF t2$ = "" THEN t2$ = e$ ELSE t2$ = t2$ + " " + e$ gotaa2: NEXT i2 - IF m = 1 THEN a$ = "Syntax error": GOTO errmes - IF symbol2$ <> "" AND t2$ <> "" THEN a$ = "Syntax error": GOTO errmes + IF m = 1 THEN a$ = "Syntax error - check your brackets": GOTO errmes + IF symbol2$ <> "" AND t2$ <> "" THEN a$ = "Syntax error - check parameter types": GOTO errmes IF LEN(t2$) THEN 'add type-name after AS @@ -7590,8 +7592,8 @@ DO midgotpart: i = i + 1 LOOP - IF stringvariable$ = "" THEN a$ = "Syntax error": GOTO errmes - IF start$ = "" THEN a$ = "Syntax error": GOTO errmes + IF stringvariable$ = "" THEN a$ = "Syntax error - first parameter must be a string variable/array-element": GOTO errmes + IF start$ = "" THEN a$ = "Syntax error - second parameter not optional": GOTO errmes 'check if it is a valid source string stringvariable$ = fixoperationorder$(stringvariable$) IF Error_Happened THEN GOTO errmes @@ -8850,7 +8852,7 @@ DO IF n = 1 THEN PRINT #12, "data_offset=0;" ELSE - IF n > 2 THEN a$ = "Syntax error": GOTO errmes + IF n > 2 THEN a$ = "Syntax error - too many parameters (expected RESTORE label/line number)": GOTO errmes lbl$ = getelement$(ca$, 2) IF validlabel(lbl$) = 0 THEN a$ = "Invalid label": GOTO errmes @@ -8911,7 +8913,7 @@ DO ne = ne + 1 IF ne = 1 THEN blk$ = e$: e$ = "" IF ne = 2 THEN offs$ = e$: e$ = "" - IF ne = 3 THEN a$ = "Syntax error": GOTO errmes + IF ne = 3 THEN a$ = "Syntax error - too many parameters (Expected " + qb64prefix$ + "MEMGET mem-reference, offset, variable)": GOTO errmes ELSE IF LEN(e$) = 0 THEN e$ = e2$ ELSE e$ = e$ + sp + e2$ END IF @@ -9523,7 +9525,7 @@ DO IF firstelement$ = "CLOSE" OR firstelement$ = "RESET" THEN IF firstelement$ = "RESET" THEN - IF n > 1 THEN a$ = "Syntax error": GOTO errmes + IF n > 1 THEN a$ = "Syntax error - RESET takes no parameters": GOTO errmes l$ = SCase$("Reset") ELSE l$ = SCase$("Close") @@ -9776,7 +9778,7 @@ DO IF a2$ = "," THEN GOTO finishedpromptstring END IF - a$ = "INPUT STATEMENT: SYNTAX ERROR!": GOTO errmes + a$ = "Syntax error - Expected INPUT [;] " + CHR$(34) + "[Question or statement text]" + CHR$(34) + "{,|;} variable[, ...] or INPUT ; variable[, ...]": GOTO errmes END IF 'there was no promptstring, so print a ? IF lineinput = 0 THEN PRINT #12, "qbs_print(qbs_new_txt(" + CHR$(34) + "? " + CHR$(34) + "),0);" @@ -9785,7 +9787,7 @@ DO FOR i = i TO n IF commaneeded = 1 THEN a2$ = getelement$(ca$, i) - IF a2$ <> "," THEN a$ = "INPUT STATEMENT: SYNTAX ERROR! (COMMA EXPECTED)": GOTO errmes + IF a2$ <> "," THEN a$ = "Syntax error - comma expected": GOTO errmes ELSE B = 0 @@ -9852,7 +9854,7 @@ DO gotinputvar: commaneeded = commaneeded + 1: IF commaneeded = 2 THEN commaneeded = 0 NEXT - IF numvar = 0 THEN a$ = "INPUT STATEMENT: SYNTAX ERROR! (NO VARIABLES LISTED FOR INPUT)": GOTO errmes + IF numvar = 0 THEN a$ = "Syntax error - Expected INPUT [;] " + CHR$(34) + "[Question or statement text]" + CHR$(34) + "{,|;} variable[, ...] or INPUT ; variable[, ...]": GOTO errmes IF lineinput = 1 AND numvar > 1 THEN a$ = "Too many variables": GOTO errmes PRINT #12, "qbs_input(" + str2(numvar) + "," + str2$(newline) + ");" PRINT #12, "if (stop_program) end();" @@ -10870,7 +10872,7 @@ DO IF n >= 1 THEN IF firstelement$ = "LET" THEN - IF n = 1 THEN a$ = "Syntax error": GOTO errmes + IF n = 1 THEN a$ = "Syntax error - Expected LET variable = expression (tip: LET is entirely optional)": GOTO errmes ca$ = RIGHT$(ca$, LEN(ca$) - 4) n = n - 1 l$ = SCase$("Let") @@ -21462,6 +21464,7 @@ FUNCTION seperateargs (a$, ca$, pass&) IF Branches = 0 THEN 'All options have been exhausted seperateargs_error = 1 seperateargs_error_message = "Syntax error" + IF LEN(id2.hr_syntax) > 0 THEN seperateargs_error_message = seperateargs_error_message + " - Reference: " + id2.hr_syntax EXIT FUNCTION END IF '2)Toggle taken branch to untaken and revert diff --git a/source/subs_functions/subs_functions.bas b/source/subs_functions/subs_functions.bas index d528e0a31..bdd2d0a4a 100644 --- a/source/subs_functions/subs_functions.bas +++ b/source/subs_functions/subs_functions.bas @@ -91,6 +91,7 @@ id.callname = "sub__resize" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[{On|Off}][,{_Stretch|_Smooth}]" +id.hr_syntax = "_RESIZE [{ON|OFF}][, {_STRETCH|_SMOOTH}]" regid clearid @@ -98,6 +99,7 @@ id.n = qb64prefix$ + "Resize" id.subfunc = 1 id.callname = "func__resize" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_RESIZE" regid clearid @@ -105,6 +107,7 @@ id.n = qb64prefix$ + "ResizeWidth" id.subfunc = 1 id.callname = "func__resizewidth" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_RESIZEWIDTH" regid clearid @@ -112,6 +115,7 @@ id.n = qb64prefix$ + "ResizeHeight" id.subfunc = 1 id.callname = "func__resizeheight" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_RESIZEHEIGHT" regid clearid @@ -119,6 +123,7 @@ id.n = qb64prefix$ + "ScaledWidth" id.subfunc = 1 id.callname = "func__scaledwidth" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_SCALEDWIDTH" regid clearid @@ -126,6 +131,7 @@ id.n = qb64prefix$ + "ScaledHeight" id.subfunc = 1 id.callname = "func__scaledheight" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_SCALEDHEIGHT" regid @@ -136,6 +142,7 @@ id.callname = "sub__glrender" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "{_Behind|_OnTop|_Only}" +id.hr_syntax = "_GLRENDER {_Behind|_OnTop|_Only}" regid clearid @@ -145,6 +152,7 @@ id.callname = "sub__displayorder" id.args = 4 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[{_Software|_Hardware|_Hardware1|_GLRender}[,{_Software|_Hardware|_Hardware1|_GLRender}[,{_Software|_Hardware|_Hardware1|_GLRender}[,{_Software|_Hardware|_Hardware1|_GLRender}]]]]" +id.hr_syntax = "_DISPLAYORDER {_Software|_Hardware|_Hardware1|_GLRender} (any combination/order)" regid clearid @@ -154,6 +162,7 @@ id.callname = "func__memget" id.args = 3 id.arg = MKL$(UDTTYPE + (1)) + MKL$(OFFSETTYPE - ISPOINTER) + MKL$(-1) 'x = _MEMGET(block, offset, type) id.ret = -1 +id.hr_syntax = "_MEMGET(block, offset, type)" regid clearid @@ -166,6 +175,7 @@ id.args = 2 id.arg = MKL$(OFFSETTYPE - ISPOINTER) + MKL$(OFFSETTYPE - ISPOINTER) id.specialformat = "?[,?]" id.ret = ISUDT + (1) 'the _MEM type is the first TYPE defined +id.hr_syntax = "_MEM(referenceVariable) or _MEM(offset, byteSize)" regid '---special case--- @@ -176,6 +186,7 @@ id.callname = "func__mem" id.args = 1 id.arg = MKL$(-8) id.ret = ISUDT + (1) 'the _MEM type is the first TYPE defined +id.hr_syntax = "_MEMELEMENT(referenceVariable)" regid '---special case--- @@ -187,6 +198,7 @@ id.subfunc = 2 id.callname = "sub__memfree" id.args = 1 id.arg = MKL$(UDTTYPE + (1)) +id.hr_syntax = "_MEMFREE memoryVariable" regid clearid @@ -196,6 +208,7 @@ id.callname = "func__memexists" id.args = 1 id.arg = MKL$(UDTTYPE + (1)) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_MEMEXISTS(memBlock)" regid clearid @@ -205,6 +218,7 @@ id.callname = "func__memnew" id.args = 1 id.arg = MKL$(OFFSETTYPE - ISPOINTER) id.ret = ISUDT + (1) 'the _MEM type is the first TYPE defined +id.hr_syntax = "_MEMNEW(byteSize)" regid clearid @@ -215,6 +229,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" 'dest is default id.ret = ISUDT + (1) 'the _MEM type is the first TYPE defined +id.hr_syntax = "_MEMIMAGE or _MEMIMAGE(imageHandle)" regid clearid @@ -224,6 +239,7 @@ id.callname = "func__memsound" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.ret = ISUDT + (1) 'the _MEM type is the first TYPE defined +id.hr_syntax = "_MEMSOUND(soundHandle)" regid clearid '_MEMCOPY a, aoffset, bytes TO b, boffset @@ -233,6 +249,7 @@ id.callname = "sub__memcopy" id.args = 5 id.arg = MKL$(UDTTYPE + (1)) + MKL$(OFFSETTYPE - ISPOINTER) + MKL$(OFFSETTYPE - ISPOINTER) + MKL$(UDTTYPE + (1)) + MKL$(OFFSETTYPE - ISPOINTER) id.specialformat = "?,?,?{To}?,?" 'dest is default +id.hr_syntax = "_MEMCOPY sourceBlock, sourceBlock.OFFSET, sourceBlock.SIZE TO destBlock, destBlock.OFFSET" regid clearid @@ -241,18 +258,21 @@ id.subfunc = 2 id.callname = "sub__consoletitle" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) +id.hr_syntax = "_CONSOLETITLE title$" regid clearid id.n = qb64prefix$ + "ScreenShow" id.subfunc = 2 id.callname = "sub__screenshow" +id.hr_syntax = "_SCREENSHOW" regid clearid id.n = qb64prefix$ + "ScreenHide" id.subfunc = 2 id.callname = "sub__screenhide" +id.hr_syntax = "_SCREENHIDE" regid clearid @@ -260,6 +280,7 @@ id.n = qb64prefix$ + "ScreenHide" id.subfunc = 1 id.callname = "func__screenhide" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_SCREENHIDE" regid @@ -268,6 +289,7 @@ id.n = qb64prefix$ + "Console" id.subfunc = 1 id.callname = "func__console" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_CONSOLE" regid clearid @@ -277,6 +299,7 @@ id.callname = "sub__console" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "{On|Off}" +id.hr_syntax = "_CONSOLE {On|Off}" regid clearid @@ -286,6 +309,7 @@ id.callname = "sub__controlchr" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "{On|Off}" +id.hr_syntax = "_CONTROLCHR {On|Off}" regid clearid @@ -295,6 +319,7 @@ id.callname = "sub__blink" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "{On|Off}" +id.hr_syntax = "_BLINK {On|Off}" regid clearid @@ -302,6 +327,7 @@ id.n = qb64prefix$ + "Blink" id.subfunc = 1 id.callname = "func__blink" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_BLINK" regid clearid @@ -311,6 +337,7 @@ id.callname = "func__fileexists" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_FILEEXISTS(fileName$)" regid clearid @@ -320,6 +347,7 @@ id.callname = "func__direxists" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_DIREXISTS(path$)" regid 'QB64 DEVICE interface @@ -332,6 +360,7 @@ id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER id.specialformat = "?[,?]" +id.hr_syntax = "STICK(direction%) or STICK(direction%, axis_number%)" regid clearid @@ -342,6 +371,7 @@ id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER id.specialformat = "?[,?]" +id.hr_syntax = "STRIG(button_function%) or STRIG(button_function%, device_number%)" regid clearid @@ -352,6 +382,7 @@ id.args = 3 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[(?[,?])]{On|Off|Stop}" 'In previous versions of BASIC, the statement STRIG ON enables testing of the joystick triggers; STRIG OFF disables joystick trigger testing. QuickBASIC ignores STRIG ON and STRIG OFF statements--the statements are provided for compatibility with earlier versions. +id.hr_syntax = "STRIG(button%) {On|Off|Stop}" regid @@ -361,6 +392,7 @@ id.n = qb64prefix$ + "Devices": id.Dependency=DEPENDENCY_DEVICEINPUT id.subfunc = 1 id.callname = "func__devices" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_DEVICES" regid clearid @@ -372,6 +404,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER id.specialformat = "[?]" +id.hr_syntax = "_DEVICE$(device_number) regid clearid @@ -382,6 +415,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER id.specialformat = "[?]" +id.hr_syntax = "_DEVICEINPUT or _DEVICEINPUT(device_number%) regid clearid @@ -392,6 +426,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER id.specialformat = "[?]" +id.hr_syntax = "_LASTBUTTON(deviceNumber)" regid clearid @@ -402,6 +437,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER id.specialformat = "[?]" +id.hr_syntax = "_LASTAXIS(deviceNumber)" regid clearid @@ -412,6 +448,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER id.specialformat = "[?]" +id.hr_syntax = "_LASTWHEEL(deviceNumber)" regid clearid @@ -422,6 +459,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER id.specialformat = "[?]" +id.hr_syntax = "_BUTTON(button_number%)" regid clearid @@ -432,6 +470,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER id.specialformat = "[?]" +id.hr_syntax = "_BUTTONCHANGE(button_number%)" regid clearid @@ -442,6 +481,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = SINGLETYPE - ISPOINTER id.specialformat = "[?]" +id.hr_syntax = "_AXIS(axis_number%)" regid @@ -453,6 +493,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = SINGLETYPE - ISPOINTER id.specialformat = "[?]" +id.hr_syntax = "_WHEEL(wheelNumber%)" regid @@ -471,6 +512,7 @@ id.callname = "sub_key" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "(?){On|Off|Stop}" +id.hr_syntax = "KEY(number) {On|Off|Stop}" regid clearid @@ -478,6 +520,7 @@ id.n = qb64prefix$ + "ScreenX" id.subfunc = 1 id.callname = "func__screenx" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_SCREENX" regid clearid @@ -485,6 +528,7 @@ id.n = qb64prefix$ + "ScreenY" id.subfunc = 1 id.callname = "func__screeny" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_SCREENY" regid clearid @@ -494,6 +538,7 @@ id.callname = "sub__screenmove" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[{_Middle}][?,?]" +id.hr_syntax = "_SCREENMOVE x, y or _SCREENMOVE _Middle" regid clearid @@ -502,6 +547,7 @@ id.subfunc = 2 id.callname = "sub__mousemove" id.args = 2 id.arg = MKL$(SINGLETYPE - ISPOINTER) + MKL$(SINGLETYPE - ISPOINTER) +id.hr_syntax = "_MOUSEMOVE x, y" regid clearid @@ -510,6 +556,7 @@ id.musthave = "$" id.subfunc = 1 id.callname = "func__os" id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "_OS$" regid clearid @@ -518,6 +565,7 @@ id.musthave = "$" id.subfunc = 1 id.callname = "func__title" id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "_TITLE$" regid clearid @@ -527,6 +575,7 @@ id.callname = "sub__mapunicode" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?{To}?" +id.hr_syntax = "_MAPUNICODE unicode& TO asciiCode%" regid clearid @@ -536,6 +585,7 @@ id.callname = "func__mapunicode" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_MAPUNICODE(asciiCode%)" regid clearid @@ -545,6 +595,7 @@ id.callname = "func__keydown" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_KEYDOWN(code&)" regid clearid @@ -552,6 +603,7 @@ id.n = qb64prefix$ + "KeyHit" id.subfunc = 1 id.callname = "func__keyhit" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_KEYHIT" regid clearid @@ -559,6 +611,7 @@ id.n = qb64prefix$ + "WindowHandle" id.subfunc = 1 id.callname = "func__handle" id.ret = INTEGER64TYPE - ISPOINTER +id.hr_syntax = "_WINDOWHANDLE" regid clearid @@ -568,6 +621,7 @@ id.callname = "sub_files" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.specialformat = "[?]" +id.hr_syntax = "FILES fileSpec$" regid clearid @@ -578,6 +632,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) ''proposed version: ''id.specialformat = "[_SQUAREPIXELS][?][,(?,?)-(?,?)]" +id.hr_syntax = "_PRINTIMAGE imageHandle&" regid 'remote desktop @@ -589,6 +644,7 @@ id.callname = "sub__screenclick" id.args = 3 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?,?[,?]" +id.hr_syntax = "_SCREENCLICK x, y[, button%]" regid clearid @@ -597,6 +653,7 @@ id.subfunc = 2 id.callname = "sub__screenprint" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) +id.hr_syntax = "_SCREENPRINT text$" regid clearid @@ -607,6 +664,7 @@ id.args = 4 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?,?,?,?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_SCREENIMAGE(column1, row1, column2, row2) regid @@ -620,6 +678,7 @@ id.callname = "sub_lock" id.args = 3 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(INTEGER64TYPE - ISPOINTER) + MKL$(INTEGER64TYPE - ISPOINTER) id.specialformat = "[#]?[,[?][{To}?]]" +id.hr_syntax = "LOCK #fileNumber%, record& or LOCK #fileNumber% firstRecord& TO lastRecord&" regid clearid @@ -629,6 +688,7 @@ id.callname = "sub_unlock" id.args = 3 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(INTEGER64TYPE - ISPOINTER) + MKL$(INTEGER64TYPE - ISPOINTER) id.specialformat = "[#]?[,[?][{To}?]]" +id.hr_syntax = "UNLOCK #fileNumber%, record& or UNLOCK #fileNumber% firstRecord& TO lastRecord&" regid clearid @@ -636,6 +696,7 @@ id.n = qb64prefix$ + "FreeTimer" id.subfunc = 1 id.callname = "func__freetimer" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_FREETIMER" regid clearid @@ -645,6 +706,7 @@ id.callname = "sub_timer" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[(?)]{On|Off|Stop|Free}" +id.hr_syntax = "TIMER[(number%)] {On|Off|Stop|Free}" regid clearid @@ -654,6 +716,7 @@ id.callname = "sub__fullscreen" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[{_Off|_Stretch|_SquarePixels|Off}][,{_Smooth}]" +id.hr_syntax = "_FULLSCREEN [{_Off|_Stretch|_SquarePixels|Off}][,{_Smooth}]" regid clearid @@ -663,6 +726,7 @@ id.callname = "sub__allowfullscreen" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[{_Stretch|_SquarePixels|_Off|_All|Off}][,{_Smooth|_Off|_All|Off}]" +id.hr_syntax = "_ALLOWFULLSCREEN [{_Stretch|_SquarePixels|_Off|_All|Off}][,{_Smooth|_Off|_All|Off}]" regid clearid @@ -670,6 +734,7 @@ id.n = qb64prefix$ + "FullScreen" id.subfunc = 1 id.callname = "func__fullscreen" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_FULLSCREEN" regid clearid @@ -677,6 +742,7 @@ id.n = qb64prefix$ + "Smooth" id.subfunc = 1 id.callname = "func__fullscreensmooth" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_SMOOTH" regid clearid @@ -684,6 +750,7 @@ id.n = qb64prefix$ + "WindowHasFocus" id.subfunc = 1 id.callname = "func__hasfocus" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_WINDOWHASFOCUS" regid clearid @@ -694,6 +761,7 @@ id.callname = "sub__clipboard" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.specialformat = "=?" +id.hr_syntax = "_CLIPBOARD$ = text$" regid clearid @@ -702,6 +770,7 @@ id.musthave = "$" id.subfunc = 1 id.callname = "func__clipboard" id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "_CLIPBOARD$" regid clearid @@ -709,6 +778,7 @@ id.n = qb64prefix$ + "ClipboardImage": id.Dependency = DEPENDENCY_SCREENIMAGE id.subfunc = 1 id.callname = "func__clipboardimage" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_CLIPBOARDIMAGE" regid clearid @@ -718,6 +788,7 @@ id.callname = "sub__clipboardimage" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "=?" +id.hr_syntax = "_CLIPBOARDIMAGE = existingImageHandle&" regid clearid @@ -725,6 +796,7 @@ id.n = qb64prefix$ + "Exit" id.subfunc = 1 id.callname = "func__exit" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_EXIT" regid clearid @@ -734,6 +806,7 @@ id.callname = "func__openhost" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_OPENHOST(" + CHR$(34) + "TCP/IP:portNumber" + CHR$(34) + ")" regid clearid @@ -743,6 +816,7 @@ id.callname = "func__connected" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_CONNECTED(connectionHandle&)" regid clearid @@ -753,6 +827,7 @@ id.callname = "func__connectionaddress" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "_CONNECTIONADDRESS(connectionHandle&)" regid clearid @@ -762,6 +837,7 @@ id.callname = "func__openconnection" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_OPENCONNECTION(hostHandle)" regid clearid @@ -771,6 +847,7 @@ id.callname = "func__openclient" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_OPENCLIENT(" + CHR$(34) + "TCP/IP:port:address" + CHR$(34) + ")" regid @@ -782,6 +859,7 @@ id.callname = "func_environ" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "ENVIRON$(listIndex%) or ENVIRON$(systemID$)" regid clearid @@ -790,6 +868,7 @@ id.subfunc = 2 id.callname = "sub_environ" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) +id.hr_syntax = "ENVIRON stringExpression$" regid clearid @@ -797,6 +876,7 @@ id.n = qb64prefix$ + "ErrorLine" id.subfunc = 1 id.callname = "func__errorline" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_ERRORLINE" regid clearid @@ -804,6 +884,7 @@ id.n = qb64prefix$ + "InclErrorLine" id.subfunc = 1 id.callname = "func__inclerrorline" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_INCLERRORLINE" regid clearid @@ -815,6 +896,7 @@ id.arg = MKL$(LONGTYPE - ISPOINTER) id.args = 1 id.specialformat = "[?]" id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "_ERRORMESSAGE$ or _ERRORMESSAGE$(errorCode%)" regid clearid @@ -824,18 +906,21 @@ id.callname = "sub__assert" id.args = 2 id.specialformat = "?[,?]" id.arg = MKL$(INTEGERTYPE - ISPOINTER) + MKL$(STRINGTYPE - ISPOINTER) +id.hr_syntax = "_ASSERT condition[, errorMessage$]" regid clearid id.n = qb64prefix$ + "Display" id.subfunc = 2 id.callname = "sub__display" +id.hr_syntax = "_DISPLAY" regid clearid id.n = qb64prefix$ + "AutoDisplay" id.subfunc = 2 id.callname = "sub__autodisplay" +id.hr_syntax = "_AUTODISPLAY" regid clearid @@ -844,6 +929,7 @@ id.subfunc = 2 id.callname = "sub__limit" id.args = 1 id.arg = MKL$(DOUBLETYPE - ISPOINTER) +id.hr_syntax = "_LIMIT framesPerSecond!" regid clearid @@ -853,6 +939,7 @@ id.callname = "sub__fps" id.args = 1 id.arg = MKL$(DOUBLETYPE - ISPOINTER) id.specialformat = "[{_Auto}][?]" +id.hr_syntax = "_FPS fps! or _FPS _Auto" regid clearid @@ -861,6 +948,7 @@ id.subfunc = 2 id.callname = "sub__delay" id.args = 1 id.arg = MKL$(DOUBLETYPE - ISPOINTER) +id.hr_syntax = "_DELAY seconds!" regid clearid @@ -870,6 +958,7 @@ id.callname = "sub__icon" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?[,?]]" +id.hr_syntax = "_ICON [mainImageHandle&[, smallImageHandle&]]" regid clearid @@ -878,6 +967,7 @@ id.subfunc = 2 id.callname = "sub__title" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) +id.hr_syntax = "_TITLE text$" regid clearid @@ -886,6 +976,7 @@ id.subfunc = 2 id.callname = "sub__echo" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) +id.hr_syntax = "_ECHO text$" regid clearid @@ -895,6 +986,7 @@ id.callname = "sub__filedrop" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[{On|Off}]" +id.hr_syntax = "_ACCEPTFILEDROP [{On|Off}]" regid clearid @@ -902,12 +994,14 @@ id.n = qb64prefix$ + "AcceptFileDrop" id.subfunc = 1 id.callname = "func__filedrop" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_ACCEPTFILEDROP" regid clearid id.n = qb64prefix$ + "FinishDrop" id.subfunc = 2 id.callname = "sub__finishdrop" +id.hr_syntax = "_FINISHDROP" regid clearid @@ -915,6 +1009,7 @@ id.n = qb64prefix$ + "TotalDroppedFiles" id.subfunc = 1 id.callname = "func__totaldroppedfiles" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_TOTALDROPPEDFILES" regid clearid @@ -926,6 +1021,7 @@ id.ret = STRINGTYPE - ISPOINTER id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" +id.hr_syntax = "_DROPPEDFILE$ or _DROPPEDFILE$(index&)" regid clearid @@ -935,6 +1031,7 @@ id.callname = "sub_clear" id.args = 3 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?][,[?][,?]]" +id.hr_syntax = "CLEAR" regid 'IMAGE CREATION/FREEING @@ -947,6 +1044,7 @@ id.args = 3 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?,?[,?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_NEWIMAGE(width&, height&, mode)" regid clearid @@ -957,6 +1055,7 @@ id.args = 2 id.arg = MKL$(STRINGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?[,?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_LOADIMAGE(fileName$[, mode])" regid clearid @@ -966,6 +1065,7 @@ id.callname = "sub__freeimage" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" +id.hr_syntax = "_FREEIMAGE handle&" regid clearid @@ -976,6 +1076,7 @@ id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?[,?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_COPYIMAGE[(imageHandle&[, mode])] regid 'IMAGE SELECTION @@ -987,6 +1088,7 @@ id.callname = "sub__source" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?" +id.hr_syntax = "_SOURCE handle&" regid clearid @@ -996,6 +1098,7 @@ id.callname = "sub__dest" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?" +id.hr_syntax = "_DEST imageHandle&" regid clearid @@ -1003,6 +1106,7 @@ id.n = qb64prefix$ + "Source" id.subfunc = 1 id.callname = "func__source" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_SOURCE" regid clearid @@ -1010,6 +1114,7 @@ id.n = qb64prefix$ + "Dest" id.subfunc = 1 id.callname = "func__dest" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_DEST" regid clearid @@ -1017,6 +1122,7 @@ id.n = qb64prefix$ + "Display" id.subfunc = 1 id.callname = "func__display" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_DISPLAY" regid 'IMAGE SETTINGS @@ -1028,6 +1134,7 @@ id.callname = "sub__blend" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" +id.hr_syntax = "_BLEND [imageHandle&]" regid clearid @@ -1037,6 +1144,7 @@ id.callname = "sub__dontblend" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" +id.hr_syntax = "_DONTBLEND [imageHandle&]" regid clearid @@ -1046,6 +1154,7 @@ id.callname = "sub__clearcolor" id.args = 2 id.arg = MKL$(ULONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[{_None}][?][,?]" +id.hr_syntax = "_CLEARCOLOR {color&|_None}[,dest_handle&]" regid 'USING/CHANGING A SURFACE @@ -1057,6 +1166,7 @@ id.callname = "sub__putimage" id.args = 10 id.arg = MKL$(DOUBLETYPE - ISPOINTER) + MKL$(DOUBLETYPE - ISPOINTER) + MKL$(DOUBLETYPE - ISPOINTER) + MKL$(DOUBLETYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(DOUBLETYPE - ISPOINTER) + MKL$(DOUBLETYPE - ISPOINTER) + MKL$(DOUBLETYPE - ISPOINTER) + MKL$(DOUBLETYPE - ISPOINTER) id.specialformat = "[[{Step}](?,?)[-[{Step}](?,?)]][,[?][,[?][,[[{Step}](?,?)[-[{Step}](?,?)]][,{_Smooth}]]]]" +id.hr_syntax = "_PUTIMAGE [STEP] [(dx1, dy1)-[STEP][(dx2, dy2)]][, sourceHandle&][, destHandle&][, ][STEP][(sx1, sy1)[-STEP][(sx2, sy2)]][_SMOOTH]" regid clearid @@ -1066,6 +1176,7 @@ id.callname = "sub__maptriangle" id.args = 19 id.arg = MKL$(LONGTYPE - ISPOINTER)+MKL$(SINGLETYPE - ISPOINTER) + MKL$(SINGLETYPE - ISPOINTER) + MKL$(SINGLETYPE - ISPOINTER) + MKL$(SINGLETYPE - ISPOINTER) + MKL$(SINGLETYPE - ISPOINTER) + MKL$(SINGLETYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(SINGLETYPE - ISPOINTER) + MKL$(SINGLETYPE - ISPOINTER) + MKL$(SINGLETYPE - ISPOINTER) + MKL$(SINGLETYPE - ISPOINTER) + MKL$(SINGLETYPE - ISPOINTER) + MKL$(SINGLETYPE - ISPOINTER) + MKL$(SINGLETYPE - ISPOINTER) + MKL$(SINGLETYPE - ISPOINTER) + MKL$(SINGLETYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[{_Clockwise|_AntiClockwise}][{_Seamless}](?,?)-(?,?)-(?,?)[,?]{To}(?,?[,?])-(?,?[,?])-(?,?[,?])[,[?][,{_Smooth|_SmoothShrunk|_SmoothStretched}]]" +id.hr_syntax = "_MAPTRIANGLE [{_SEAMLESS}] (sx1, sy1)-(sx2, sy2)-(sx3, sy3), source& TO (dx1, dy1)-(dx2, dy2)-(dx3, dy3)[, destination&][{_SMOOTH|_SMOOTHSHRUNK|_SMOOTHSTRETCHED}]]" regid clearid @@ -1075,6 +1186,7 @@ id.callname = "sub__depthbuffer" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER)+MKL$(LONGTYPE - ISPOINTER) id.specialformat = "{On|Off|Lock|_Clear}[,?]" +id.hr_syntax = "_DEPTHBUFFER {On|Off|Lock|_Clear}[,handle&]" regid clearid @@ -1084,6 +1196,7 @@ id.callname = "sub__setalpha" id.args = 4 id.arg = MKL$(ULONGTYPE - ISPOINTER) + MKL$(ULONGTYPE - ISPOINTER) + MKL$(ULONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?[,[?[{To}?]][,?]]" +id.hr_syntax = "_SETALPHA alpha& or _SETALPHA color1& TO color2&[, imageHandle&]" regid 'IMAGE INFO @@ -1096,6 +1209,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_WIDTH(imageHandle&)" regid clearid @@ -1106,6 +1220,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_HEIGHT(imageHandle&)" regid clearid @@ -1116,6 +1231,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_PIXELSIZE[(imageHandle&)]" regid clearid @@ -1126,6 +1242,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_CLEARCOLOR[(sourceHandle&)]" regid clearid @@ -1136,6 +1253,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_BLEND[(imageHandle&)]" regid clearid @@ -1146,6 +1264,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" id.ret = ULONGTYPE - ISPOINTER +id.hr_syntax = "_DEFAULTCOLOR[(imageHandle&)]" regid clearid @@ -1156,6 +1275,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" id.ret = ULONGTYPE - ISPOINTER +id.hr_syntax = "_BACKGROUNDCOLOR(imageHandle&)]" regid '256 COLOR PALETTES @@ -1168,6 +1288,7 @@ id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?[,?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_PALETTECOLOR(attributeNumber%, imgHandle&)" regid clearid @@ -1177,6 +1298,7 @@ id.callname = "sub__palettecolor" id.args = 3 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(ULONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?,?[,?]" +id.hr_syntax = "_PALETTECOLOR attribute%, newColor&[, imgHandle&]" regid clearid @@ -1186,6 +1308,7 @@ id.callname = "sub__copypalette" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?][,?]" +id.hr_syntax = "_COPYPALETTE [sourceImageHandle&[, destinationImageHandle&]]" regid 'FONT SUPPORT @@ -1198,6 +1321,7 @@ id.args = 3 id.arg = MKL$(STRINGTYPE - ISPOINTER) + MKL$(DOUBLETYPE - ISPOINTER) + MKL$(STRINGTYPE - ISPOINTER) id.specialformat = "?,?[,?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_LOADFONT(fileName$, size%[, " + CHR$(34) + "{MONOSPACE|, BOLD|, ITALIC|, UNDERLINE|, UNICODE|, DONTBLEND}" + CHR$(34) + "])" regid clearid @@ -1207,6 +1331,7 @@ id.callname = "sub__font" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?[,?]" +id.hr_syntax = "_FONT fontHandle&[, imageHandle&]" regid clearid @@ -1217,6 +1342,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_FONTWIDTH or _FONTWIDTH(fontHandle&)" regid clearid @@ -1227,6 +1353,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_FONTHEIGHT or _FONTHEIGHT(fontHandle&)" regid clearid @@ -1237,6 +1364,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_FONT[(imageHandle&)]" regid clearid @@ -1246,6 +1374,7 @@ id.callname = "sub__printstring" id.args = 4 id.arg = MKL$(DOUBLETYPE - ISPOINTER) + MKL$(DOUBLETYPE - ISPOINTER) + MKL$(STRINGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[{Step}](?,?),?[,?]" +id.hr_syntax = "_PRINTSTRING(x, y), text$[, imageHandle&]" regid clearid @@ -1256,6 +1385,7 @@ id.args = 2 id.arg = MKL$(STRINGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?[,?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_PRINTWIDTH(textToPrint$[, destinationHandle&])" regid clearid @@ -1265,6 +1395,7 @@ id.callname = "sub__freefont" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?" +id.hr_syntax = "_FREEFONT fontHandle&" regid clearid @@ -1274,6 +1405,7 @@ id.callname = "sub__printmode" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "{_FillBackground|_KeepBackground|_OnlyBackground}[,?]" +id.hr_syntax = "_PRINTMODE {_FillBackground|_KeepBackground|_OnlyBackground}[, imageHandle&]" regid clearid @@ -1284,6 +1416,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_PRINTMODE[(imageHandle&)]" regid 'WORKING WITH COLORS @@ -1296,6 +1429,7 @@ id.args = 5 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?,?,?,?[,?]" id.ret = ULONGTYPE - ISPOINTER +id.hr_syntax = "_RGBA(red&, green&, blue&, alpha&[, imageHandle&])" regid clearid @@ -1306,6 +1440,7 @@ id.args = 4 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?,?,?[,?]" id.ret = ULONGTYPE - ISPOINTER +id.hr_syntax = "_RGB(red&, green&, blue&[, imageHandle&])" regid clearid @@ -1316,6 +1451,7 @@ id.args = 2 id.arg = MKL$(ULONGTYPE - ISPOINTER) + MKL$(ULONGTYPE - ISPOINTER) id.specialformat = "?[,?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_RED(rgbaColorIndex&[, imageHandle&])" regid clearid @@ -1326,6 +1462,7 @@ id.args = 2 id.arg = MKL$(ULONGTYPE - ISPOINTER) + MKL$(ULONGTYPE - ISPOINTER) id.specialformat = "?[,?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_GREEN(rgbaColorIndex&[, imageHandle&])" regid clearid @@ -1336,6 +1473,7 @@ id.args = 2 id.arg = MKL$(ULONGTYPE - ISPOINTER) + MKL$(ULONGTYPE - ISPOINTER) id.specialformat = "?[,?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_BLUE(rgbaColorIndex&[, imageHandle&])" regid clearid @@ -1346,6 +1484,7 @@ id.args = 2 id.arg = MKL$(ULONGTYPE - ISPOINTER) + MKL$(ULONGTYPE - ISPOINTER) id.specialformat = "?[,?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_ALPHA(color~&[, imageHandle&])" regid clearid @@ -1355,6 +1494,7 @@ id.callname = "func__rgba32" id.args = 4 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.ret = ULONGTYPE - ISPOINTER +id.hr_syntax = "_RGBA32(red&, green&, blue&, alpha&)" regid clearid @@ -1366,6 +1506,7 @@ id.minargs = 1 id.args = 4 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.ret = ULONGTYPE - ISPOINTER +id.hr_syntax = "_RGB32(red&, green&, blue&[, alpha&]) or _RGB32(intensity&[, alpha&])" regid clearid @@ -1375,6 +1516,7 @@ id.callname = "func__red32" id.args = 1 id.arg = MKL$(ULONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_RED32(rgbaColor&)" regid clearid @@ -1384,6 +1526,7 @@ id.callname = "func__green32" id.args = 1 id.arg = MKL$(ULONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_GREEN32(rgbaColor&)" regid clearid @@ -1393,6 +1536,7 @@ id.callname = "func__blue32" id.args = 1 id.arg = MKL$(ULONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_BLUE32(rgbaColor&)" regid clearid @@ -1402,6 +1546,7 @@ id.callname = "func__alpha32" id.args = 1 id.arg = MKL$(ULONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_ALPHA32(rgbaColor&)" regid @@ -1411,6 +1556,7 @@ id.subfunc = 2 id.callname = "sub_draw" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) +id.hr_syntax = "DRAW drawString$" regid clearid @@ -1419,6 +1565,7 @@ id.subfunc = 2 id.callname = "sub_play" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) +id.hr_syntax = "PLAY commandString$" regid clearid @@ -1428,6 +1575,7 @@ id.callname = "func_play" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "PLAY" regid 'QB64 MOUSE @@ -1438,12 +1586,14 @@ id.callname = "sub__mouseshow" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.specialformat = "[?]" +id.hr_syntax = "_MOUSESHOW [cursorShape$]" regid clearid id.n = qb64prefix$ + "MouseHide" id.subfunc = 2 id.callname = "sub__mousehide" +id.hr_syntax = "_MOUSEHIDE" regid clearid @@ -1454,6 +1604,7 @@ id.ret = LONGTYPE - ISPOINTER id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" +id.hr_syntax = "_MOUSEINPUT" regid clearid @@ -1464,6 +1615,7 @@ id.ret = SINGLETYPE - ISPOINTER id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" +id.hr_syntax = "_MOUSEX" regid clearid @@ -1474,6 +1626,7 @@ id.ret = SINGLETYPE - ISPOINTER id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" +id.hr_syntax = "_MOUSEY" regid clearid @@ -1484,6 +1637,7 @@ id.ret = SINGLETYPE - ISPOINTER id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" +id.hr_syntax = "_MOUSEMOVEMENTX" regid clearid @@ -1494,6 +1648,7 @@ id.ret = SINGLETYPE - ISPOINTER id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" +id.hr_syntax = "_MOUSEMOVEMENTY" regid clearid @@ -1504,6 +1659,7 @@ id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER)+MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER id.specialformat = "?[,?]" +id.hr_syntax = "_MOUSEBUTTON(buttonNumber)" regid clearid @@ -1514,6 +1670,7 @@ id.ret = LONGTYPE - ISPOINTER id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" +id.hr_syntax = "_MOUSEWHEEL" regid @@ -1522,6 +1679,7 @@ id.n = qb64prefix$ + "MousePipeOpen" id.subfunc = 1 id.callname = "func__mousepipeopen" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_MOUSEPIPEOPEN" regid clearid @@ -1530,6 +1688,7 @@ id.subfunc = 2 id.callname = "sub__mouseinputpipe" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) +id.hr_syntax = "_MOUSEINPUTPIPE(context)" regid clearid @@ -1538,6 +1697,7 @@ id.subfunc = 2 id.callname = "sub__mousepipeclose" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) +id.hr_syntax = "_MOUSEPIPECLOSE(context)" regid clearid @@ -1545,6 +1705,7 @@ id.n = "FreeFile" id.subfunc = 1 id.callname = "func_freefile" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_FREEFILE" regid clearid @@ -1554,6 +1715,7 @@ id.callname = "sub_name" id.args = 2 id.arg = MKL$(STRINGTYPE - ISPOINTER) + MKL$(STRINGTYPE - ISPOINTER) id.specialformat = "?{As}?" +id.hr_syntax = "NAME oldFileOrFolderName$ AS newFileOrFolderName$" regid clearid @@ -1562,6 +1724,7 @@ id.subfunc = 2 id.callname = "sub_kill" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) +id.hr_syntax = "KILL fileSpec$" regid clearid @@ -1570,6 +1733,7 @@ id.subfunc = 2 id.callname = "sub_chdir" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) +id.hr_syntax = "CHDIR path$" regid clearid @@ -1578,6 +1742,7 @@ id.subfunc = 2 id.callname = "sub_mkdir" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) +id.hr_syntax = "MKDIR pathSpec$" regid clearid @@ -1586,6 +1751,7 @@ id.subfunc = 2 id.callname = "sub_rmdir" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) +id.hr_syntax = "RMDIR path$" regid clearid @@ -1594,6 +1760,7 @@ id.subfunc = 2 id.callname = "sub_chain" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) +id.hr_syntax = "CHAIN moduleName$" regid clearid @@ -1604,6 +1771,7 @@ id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.specialformat = "[?]" 'id.secondargcantbe = "_HIDE" +id.hr_syntax = "SHELL [_DONTWAIT] [_HIDE] commandToRun$" regid clearid @@ -1614,6 +1782,7 @@ id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.specialformat = "{_Hide}[{_DontWait}][?]" id.secondargmustbe = "_Hide" +id.hr_syntax = "SHELL [_DONTWAIT] [_HIDE] commandToRun$" regid clearid @@ -1624,6 +1793,7 @@ id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.specialformat = "{_DontWait}[{_Hide}][?]" id.secondargmustbe = "_DontWait" +id.hr_syntax = "SHELL [_DONTWAIT] [_HIDE] commandToRun$" regid clearid @@ -1633,6 +1803,7 @@ id.callname = "func_shell" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = INTEGER64TYPE - ISPOINTER +id.hr_syntax = "SHELL(commandToRun$)" regid clearid @@ -1642,6 +1813,7 @@ id.callname = "func__shellhide" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = INTEGER64TYPE - ISPOINTER +id.hr_syntax = "_SHELLHIDE(commandToRun$)" regid clearid @@ -1653,6 +1825,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER id.specialformat = "[?]" +id.hr_syntax = "COMMAND$[(index%)]" regid clearid @@ -1660,6 +1833,7 @@ id.n = qb64prefix$ + "CommandCount" id.subfunc = 1 id.callname = "func__commandcount" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_COMMANDCOUNT" regid @@ -1670,6 +1844,7 @@ id.n = qb64prefix$ + "SndRate": id.Dependency = DEPENDENCY_AUDIO_OUT id.subfunc = 1 id.callname = "func__sndrate" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_SNDRATE" regid clearid @@ -1679,6 +1854,7 @@ id.callname = "sub__sndraw" id.args = 3 id.arg = MKL$(SINGLETYPE - ISPOINTER) + MKL$(SINGLETYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?[,[?][,?]]" +id.hr_syntax = "_SNDRAW leftSample[, rightSample][, pipeHandle&]" regid clearid @@ -1688,6 +1864,7 @@ id.callname = "sub__sndrawdone" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" +id.hr_syntax = "_SNDRAWDONE" regid clearid @@ -1695,6 +1872,7 @@ id.n = qb64prefix$ + "SndOpenRaw": id.Dependency = DEPENDENCY_AUDIO_OUT id.subfunc = 1 id.callname = "func__sndopenraw" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_SNDOPENRAW" regid clearid @@ -1705,6 +1883,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" id.ret = DOUBLETYPE - ISPOINTER +id.hr_syntax = "_SNDRAWLEN" regid clearid @@ -1714,6 +1893,7 @@ id.callname = "func__sndlen" id.args = 1 id.arg = MKL$(ULONGTYPE - ISPOINTER) id.ret = SINGLETYPE - ISPOINTER +id.hr_syntax = "_SNDLEN(handle&)" regid clearid @@ -1723,6 +1903,7 @@ id.callname = "func__sndpaused" id.args = 1 id.arg = MKL$(ULONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_SNDPAUSED(handle&)" regid clearid @@ -1732,6 +1913,7 @@ id.callname = "sub__sndplayfile" id.args = 3 id.arg = MKL$(STRINGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) id.specialformat = "?[,[?][,?]]" +id.hr_syntax = "_SNDPLAYFILE fileName$[, , volume!]" regid clearid @@ -1741,6 +1923,7 @@ id.callname = "sub__sndplaycopy" id.args = 2 id.arg = MKL$(ULONGTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) id.specialformat = "?[,?]" +id.hr_syntax = "_SNDPLAYCOPY handle&[, volume!]" regid clearid @@ -1749,6 +1932,7 @@ id.subfunc = 2 id.callname = "sub__sndstop" id.args = 1 id.arg = MKL$(ULONGTYPE - ISPOINTER) +id.hr_syntax = "_SNDSTOP handle&" regid clearid @@ -1757,6 +1941,7 @@ id.subfunc = 2 id.callname = "sub__sndloop" id.args = 1 id.arg = MKL$(ULONGTYPE - ISPOINTER) +id.hr_syntax = "_SNDLOOP handle&" regid clearid @@ -1765,6 +1950,7 @@ id.subfunc = 2 id.callname = "sub__sndlimit" id.args = 2 id.arg = MKL$(ULONGTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) +id.hr_syntax = "_SNDLIMIT handle&, numberOfSeconds!" regid clearid @@ -1775,6 +1961,7 @@ id.args = 2 id.arg = MKL$(STRINGTYPE - ISPOINTER) + MKL$(STRINGTYPE - ISPOINTER) id.specialformat = "?[,?]" id.ret = ULONGTYPE - ISPOINTER +id.hr_syntax = "_SNDOPEN(fileName$)" regid clearid @@ -1783,6 +1970,7 @@ id.subfunc = 2 id.callname = "sub__sndsetpos" id.args = 2 id.arg = MKL$(ULONGTYPE - ISPOINTER) + MKL$(DOUBLETYPE - ISPOINTER) +id.hr_syntax = "_SNDSETPOS handle&, position!" regid clearid @@ -1792,6 +1980,7 @@ id.callname = "func__sndgetpos" id.args = 1 id.arg = MKL$(ULONGTYPE - ISPOINTER) id.ret = SINGLETYPE - ISPOINTER +id.hr_syntax = "_SNDGETPOS(handle&)" regid clearid @@ -1801,6 +1990,7 @@ id.callname = "func__sndplaying" id.args = 1 id.arg = MKL$(ULONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_SNDPLAYING(handle&)" regid clearid @@ -1809,6 +1999,7 @@ id.subfunc = 2 id.callname = "sub__sndpause" id.args = 1 id.arg = MKL$(ULONGTYPE - ISPOINTER) +id.hr_syntax = "_SNDPAUSE handle&" regid clearid @@ -1818,6 +2009,7 @@ id.callname = "sub__sndbal" id.args = 5 id.arg = MKL$(ULONGTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(ULONGTYPE - ISPOINTER) id.specialformat = "?,[?][,[?][,[?][,[?]]]]" +id.hr_syntax = "_SNDBAL handle&[, x!][, y!][, z!][, channel&]]" regid @@ -1827,6 +2019,7 @@ id.subfunc = 2 id.callname = "sub__sndvol" id.args = 2 id.arg = MKL$(ULONGTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) +id.hr_syntax = "_SNDVOL handle&, volume!" regid clearid @@ -1835,6 +2028,7 @@ id.subfunc = 2 id.callname = "sub__sndplay" id.args = 1 id.arg = MKL$(ULONGTYPE - ISPOINTER) +id.hr_syntax = "_SNDPLAY handle&" regid clearid @@ -1844,6 +2038,7 @@ id.callname = "func__sndcopy" id.args = 1 id.arg = MKL$(ULONGTYPE - ISPOINTER) id.ret = ULONGTYPE - ISPOINTER +id.hr_syntax = "_SNDCOPY(handle&)" regid clearid @@ -1852,6 +2047,7 @@ id.subfunc = 2 id.callname = "sub__sndclose" id.args = 1 id.arg = MKL$(ULONGTYPE - ISPOINTER) +id.hr_syntax = "_SNDCLOSE handle&" regid clearid @@ -1863,6 +2059,7 @@ id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?[,?]" id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "INPUT$(numberOfBytes%[, fileOrPortNumber])" regid clearid @@ -1872,6 +2069,7 @@ id.callname = "sub_seek" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[#]?,?" +id.hr_syntax = "SEEK filenumber&, position" regid clearid @@ -1881,6 +2079,7 @@ id.callname = "func_seek" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "SEEK(filenumber&)" regid clearid @@ -1890,6 +2089,7 @@ id.callname = "func_loc" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "LOC(fileOrPortNumber%)" regid clearid @@ -1899,6 +2099,7 @@ id.callname = "func_eof" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "EOF(fileNumber&)" regid clearid @@ -1908,6 +2109,7 @@ id.callname = "func_lof" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "LOF(fileNumber&)" regid @@ -1919,6 +2121,7 @@ id.args = 3 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?,?[,?]" id.ret = ULONGTYPE - ISPOINTER +id.hr_syntax = "SCREEN(x, y[, colorflag%])" regid clearid @@ -1928,6 +2131,7 @@ id.callname = "func_pmap" id.args = 2 id.arg = MKL$(SINGLETYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.ret = SINGLETYPE - ISPOINTER +id.hr_syntax = "PMAP(coordinate, function_number%)" regid @@ -1939,6 +2143,7 @@ id.args = 2 id.arg = MKL$(SINGLETYPE - ISPOINTER) + MKL$(SINGLETYPE - ISPOINTER) id.specialformat = "?[,?]" id.ret = DOUBLETYPE - ISPOINTER +id.hr_syntax = "POINT(x, y) or POINT({0|1|2|3})" regid @@ -1949,6 +2154,7 @@ id.callname = "func_tab" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "TAB(column%)" regid clearid @@ -1958,6 +2164,7 @@ id.callname = "func_spc" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "SPC(count%)" regid @@ -1968,6 +2175,7 @@ id.callname = "sub_wait" id.args = 3 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?,?[,?]" +id.hr_syntax = "WAIT port%, andMask%[, xorMask%]" regid clearid @@ -1977,6 +2185,7 @@ id.callname = "func_inp" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "INP(address)" regid clearid @@ -1986,6 +2195,7 @@ id.callname = "func_pos" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "POS(0)" regid clearid @@ -1995,6 +2205,7 @@ id.callname = "func_sgn" id.args = 1 id.arg = MKL$(-1) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "SGN(value)" regid clearid @@ -2004,6 +2215,7 @@ id.args = 2 id.arg = MKL$(-1) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?,[?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "LBOUND(arrayName[, dimension%])" regid clearid @@ -2013,6 +2225,7 @@ id.args = 2 id.arg = MKL$(-1) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?,[?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "UBOUND(arrayName[, dimension%])" regid clearid @@ -2022,6 +2235,7 @@ id.subfunc = 1 id.args = 1 id.arg = MKL$(-1) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "OCT$(number)" regid clearid @@ -2031,6 +2245,7 @@ id.subfunc = 1 id.args = 1 id.arg = MKL$(-1) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "HEX$(decimalNumber)" regid clearid @@ -2040,6 +2255,7 @@ id.callname = "sub_sleep" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" +id.hr_syntax = "SLEEP seconds%" regid clearid @@ -2048,6 +2264,7 @@ id.subfunc = 1 id.args = 1 id.arg = MKL$(-1) id.ret = -1 +id.hr_syntax = "EXP(numericExpression)" regid clearid @@ -2056,6 +2273,7 @@ id.subfunc = 1 id.args = 1 id.arg = MKL$(-1) id.ret = -1 +id.hr_syntax = "FIX(expression)" regid clearid @@ -2064,6 +2282,7 @@ id.subfunc = 1 id.args = 1 id.arg = MKL$(-1) id.ret = -1 +id.hr_syntax = "INT(expression)" regid clearid @@ -2072,6 +2291,7 @@ id.subfunc = 1 id.args = 1 id.arg = MKL$(-1) id.ret = DOUBLETYPE - ISPOINTER +id.hr_syntax = "CDBL(expression)" regid clearid @@ -2080,6 +2300,7 @@ id.subfunc = 1 id.args = 1 id.arg = MKL$(-1) id.ret = SINGLETYPE - ISPOINTER +id.hr_syntax = "CSNG(expression)" regid clearid @@ -2088,6 +2309,7 @@ id.subfunc = 1 id.args = 1 id.arg = MKL$(-1) id.ret = INTEGER64TYPE - ISPOINTER +id.hr_syntax = "_ROUND(number)" regid clearid @@ -2096,6 +2318,7 @@ id.subfunc = 1 id.args = 1 id.arg = MKL$(-1) id.ret = INTEGERTYPE - ISPOINTER +id.hr_syntax = "CINT(expression)" regid clearid @@ -2104,6 +2327,7 @@ id.subfunc = 1 id.args = 1 id.arg = MKL$(-1) id.ret = INTEGERTYPE - ISPOINTER +id.hr_syntax = "CLNG(expression)" regid @@ -2116,6 +2340,7 @@ id.callname = "sub_time" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.specialformat = "=?" +id.hr_syntax = "TIME$ = timeToSet$" regid clearid @@ -2124,6 +2349,7 @@ id.musthave = "$" id.subfunc = 1 id.callname = "func_time" id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "TIME$" regid @@ -2136,6 +2362,7 @@ id.callname = "sub_date" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.specialformat = "=?" +id.hr_syntax = "DATE$ = dateToSet$" regid clearid @@ -2144,6 +2371,7 @@ id.musthave = "$" id.subfunc = 1 id.callname = "func_date" id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "DATE$" regid clearid @@ -2151,6 +2379,7 @@ id.n = "CsrLin" id.subfunc = 1 id.callname = "func_csrlin" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "CSRLIN" regid @@ -2162,6 +2391,7 @@ id.args = 5 id.arg = MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(ULONGTYPE - ISPOINTER) + MKL$(ULONGTYPE - ISPOINTER) + MKL$(STRINGTYPE - ISPOINTER) id.specialformat = "[{Step}](?,?)[,[?][,[?][,?]]]" 'PAINT [STEP] (x!,y!)[,[paint] [,[bordercolor&] [,background$]]] +id.hr_syntax = "PAINT [STEP] (x!, y!)[,[fillColor&] [,[bordercolor&] [,pattern$]]]" regid clearid @@ -2172,6 +2402,7 @@ id.args = 7 id.arg = MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(ULONGTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) id.specialformat = "[{Step}](?,?),?[,[?][,[?][,[?][,?]]]]" 'CIRCLE [STEP] (x!,y!),radius![,[color&] [,[start!] [,[end!] [,aspect!]]]] +id.hr_syntax = "CIRCLE [STEP] (x!, y!), radius![, [color&] [, [start!] [, [end!] [, aspect!]]]] regid clearid @@ -2181,6 +2412,7 @@ id.callname = "sub_bload" id.args = 2 id.arg = MKL$(STRINGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?[,?]" +id.hr_syntax = "BLOAD fileName$, VARPTR(imageArray%(index))" regid clearid @@ -2189,6 +2421,7 @@ id.subfunc = 2 id.callname = "sub_bsave" id.args = 3 id.arg = MKL$(STRINGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) +id.hr_syntax = "BSAVE saveFile$, VARPTR(array(index)), fileSize&" regid clearid @@ -2199,6 +2432,7 @@ id.args = 3 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(-4) 'id.specialformat = "[#]?,[?],?" 'non field complient definition id.specialformat = "[#]?[,[?][,?]]" 'field complient definition +id.hr_syntax = "GET #fileNumber&, [position][, targetVariable|targetArray()}]" regid clearid @@ -2209,6 +2443,7 @@ id.args = 3 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(-4) 'id.specialformat = "[#]?,[?],?" 'non field complient definition id.specialformat = "[#]?[,[?][,?]]" 'field complient definition +id.hr_syntax = "PUT #filenumber&, [position][, {holdingvariable|holdingarray()}]" regid 'double definition @@ -2220,6 +2455,7 @@ id.args = 6 id.arg = MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(-3) + MKL$(ULONGTYPE - ISPOINTER) id.specialformat = "[{Step}](?,?)-[{Step}](?,?),?[,?]" id.secondargmustbe = "Step" +id.hr_syntax = "GET [STEP] (column1, row1)-[STEP](column2, row2), array([index])[, offscreenColor]" regid clearid @@ -2230,6 +2466,7 @@ id.args = 6 id.arg = MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(-3) + MKL$(ULONGTYPE - ISPOINTER) id.specialformat = "[{Step}](?,?)-[{Step}](?,?),?[,?]" id.secondargmustbe = "(" +id.hr_syntax = "GET [STEP] (column1, row1)-[STEP](column2, row2), array([index])[, offscreenColor]" regid 'double definition @@ -2243,6 +2480,7 @@ id.specialformat = "[{Step}](?,?),?[,[{_Clip}][{PSet|PReset|And|Or|Xor}][,?]]" 'PUT [STEP] (x!,y!),arrayname# [(indexes%)] [,actionverb] 'PUT (10, 10), myimage, _CLIP, 0 id.secondargmustbe = "Step" +id.hr_syntax = "PUT [STEP](column, row), Array([index])[,] [_CLIP] [{PSET|PRESET|AND|OR|XOR}]][, omitcolor]" regid clearid id.n = "Put" @@ -2254,6 +2492,7 @@ id.specialformat = "[{Step}](?,?),?[,[{_Clip}][{PSet|PReset|And|Or|Xor}][,?]]" 'PUT [STEP] (x!,y!),arrayname# [(indexes%)] [,actionverb] 'PUT (10, 10), myimage, _CLIP, 0 id.secondargmustbe = "(" +id.hr_syntax = "PUT [STEP](column, row), Array([index])[,] [_CLIP] [{PSET|PRESET|AND|OR|XOR}]][, omitcolor]" regid clearid @@ -2263,6 +2502,7 @@ id.callname = "sub_open_gwbasic" id.args = 4 id.arg = MKL$(STRINGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(STRINGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?,[#]?,?[,?]" +id.hr_syntax = "OPEN modeLetter$, [#]fileNumber&, fileName$[, recordLength]" regid clearid id.n = "Open" @@ -2271,6 +2511,7 @@ id.callname = "sub_open" id.args = 6 id.arg = MKL$(STRINGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "?[{For Random|For Binary|For Input|For Output|For Append}][{Access Read Write|Access Read|Access Write}][{Shared|Lock Read Write|Lock Read|Lock Write}]{As}[#]?[{Len =}?]" +id.hr_syntax = "OPEN fileName$ [FOR mode] [ACCESS|LOCK|SHARED [{READ|WRITE}] AS [#]fileNumber& [LEN = recordLength]" regid clearid @@ -2280,6 +2521,7 @@ id.callname = "func_val" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "VAL(string_value$)" regid clearid @@ -2290,6 +2532,7 @@ id.callname = "func_mksmbf" id.args = 1 id.arg = MKL$(SINGLETYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "MKSMBF$(value!)" regid clearid id.n = "MKDMBF" @@ -2299,6 +2542,7 @@ id.callname = "func_mkdmbf" id.args = 1 id.arg = MKL$(DOUBLETYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "MKDMBF$(value#)" regid clearid @@ -2309,6 +2553,7 @@ id.callname = "" id.args = 1 id.arg = MKL$(INTEGERTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "MKI$(integerVariableOrLiteral%)" regid clearid id.n = "MKL" @@ -2318,6 +2563,7 @@ id.callname = "" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "MKL$(longVariableOrLiteral&)" regid clearid id.n = "MKS" @@ -2327,6 +2573,7 @@ id.callname = "" id.args = 1 id.arg = MKL$(SINGLETYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "MKS$(singlePrecisionVariableOrLiteral!)" regid clearid id.n = "MKD" @@ -2336,6 +2583,7 @@ id.callname = "" id.args = 1 id.arg = MKL$(DOUBLETYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "MKD$(doublePrecisionVariableOrLiteral#)" regid clearid id.n = qb64prefix$ + "MK" @@ -2345,6 +2593,7 @@ id.callname = "" id.args = 2 id.arg = MKL$(-1) + MKL$(-1) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "_MK$(numericalType, numericalValue)" regid clearid @@ -2354,6 +2603,7 @@ id.callname = "func_cvsmbf" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = SINGLETYPE - ISPOINTER +id.hr_syntax = "CVSMBF(stringData$)" regid clearid id.n = "CVDMBF" @@ -2362,6 +2612,7 @@ id.callname = "func_cvdmbf" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = DOUBLETYPE - ISPOINTER +id.hr_syntax = "CVDMBF(stringData$)" regid clearid @@ -2371,6 +2622,7 @@ id.callname = "" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = INTEGERTYPE - ISPOINTER +id.hr_syntax = "CVI(stringData$)" regid clearid id.n = "CVL" @@ -2379,6 +2631,7 @@ id.callname = "" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "CVL(stringData$)" regid clearid id.n = "CVS" @@ -2387,6 +2640,7 @@ id.callname = "" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = SINGLETYPE - ISPOINTER +id.hr_syntax = "CVS(stringData$)" regid clearid id.n = "CVD" @@ -2395,6 +2649,7 @@ id.callname = "" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = DOUBLETYPE - ISPOINTER +id.hr_syntax = "CVD(stringData$)" regid clearid id.n = qb64prefix$ + "CV" @@ -2403,6 +2658,7 @@ id.callname = "" id.args = 2 id.arg = MKL$(-1) + MKL$(STRINGTYPE - ISPOINTER) id.ret = -1 +id.hr_syntax = "_CV(numericalType, MKstringValue$)" regid clearid @@ -2413,6 +2669,7 @@ id.callname = "func_string" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "STRING$(count&, {character$ | ASCIIcode%})" regid clearid @@ -2423,6 +2680,7 @@ id.callname = "func_space" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "SPACE$(count&)" regid clearid @@ -2433,6 +2691,7 @@ id.args = 3 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(STRINGTYPE - ISPOINTER) + MKL$(STRINGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER id.specialformat = "[?],?,?" 'checked! +id.hr_syntax = "INSTR([start%,] baseString$, searchString$)" regid clearid @@ -2443,6 +2702,7 @@ id.args = 3 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(STRINGTYPE - ISPOINTER) + MKL$(STRINGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER id.specialformat = "[?],?,?" 'checked! +id.hr_syntax = "_INSTRREV([start%,] baseString$, searchString$)" regid clearid @@ -2454,6 +2714,7 @@ id.args = 3 id.arg = MKL$(STRINGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER id.specialformat = "?,?,[?]" 'checked! +id.hr_syntax = "MID$(stringValue$, startPosition%[, bytes%])" regid clearid @@ -2463,6 +2724,7 @@ id.callname = "" id.args = 1 id.arg = MKL$(-1) '!this value is ignored, the qb64 compiler handles this function id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "SADD(stringVariable$)" regid clearid @@ -2472,6 +2734,7 @@ id.callname = "sub_cls" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(ULONGTYPE - ISPOINTER) id.specialformat = "[?][,?]" +id.hr_syntax = "CLS [method%] [, bgColor&]" regid clearid @@ -2481,6 +2744,7 @@ id.callname = "func_sqr" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "SQR(value)" regid clearid @@ -2491,6 +2755,7 @@ id.callname = "func_chr" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "CHR$(code%)" regid clearid @@ -2501,6 +2766,7 @@ id.args = 1 id.arg = MKL$(-1) '!this value is ignored, the qb64 compiler handles this function id.ret = STRINGTYPE - ISPOINTER id.musthave = "$" +id.hr_syntax = "VARPTR(variable_name[(reference_index%)])" regid clearid @@ -2510,6 +2776,7 @@ id.callname = "" id.args = 1 id.arg = MKL$(-1) '!this value is ignored, the qb64 compiler handles this function id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "VARPTR(variable_name[(reference_index%)])" regid clearid @@ -2519,6 +2786,7 @@ id.callname = "" id.args = 1 id.arg = MKL$(-1) '!this value is ignored, the qb64 compiler handles this function id.ret = UOFFSETTYPE - ISPOINTER +id.hr_syntax = "_OFFSET(variable)" regid clearid @@ -2528,6 +2796,7 @@ id.callname = "" id.args = 1 id.arg = MKL$(-1) '!this value is ignored, the qb64 compiler handles this function id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "VARSEG(variable_name[(start_index)])" regid clearid @@ -2536,6 +2805,7 @@ id.subfunc = 2 id.callname = "sub_poke" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) +id.hr_syntax = "POKE segment_offset, offset_value" regid clearid @@ -2545,6 +2815,7 @@ id.callname = "func_peek" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "PEEK(segment_offset)" regid clearid @@ -2555,6 +2826,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "{Seg}[=?]" 'checked! id.secondargmustbe = "Seg" +id.hr_syntax = "DEF SEG [=][{segment|VARSEG(variable}]" regid clearid @@ -2564,6 +2836,7 @@ id.callname = "sin" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "SIN(radian_angle!)" regid clearid @@ -2573,6 +2846,7 @@ id.callname = "cos" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "COS(radian_angle!)" regid clearid @@ -2582,6 +2856,7 @@ id.callname = "tan" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "TAN(radian_angle!)" regid clearid @@ -2591,6 +2866,7 @@ id.callname = "atan" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "ATN(tangent!)" regid clearid @@ -2600,6 +2876,7 @@ id.callname = "func_log" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "LOG(value)" regid clearid @@ -2609,6 +2886,7 @@ id.callname = "func_abs" id.args = 1 id.arg = MKL$(-1) 'takes anything numerical id.ret = FLOATTYPE - ISPOINTER '***overridden by function evaluatefunc*** +id.hr_syntax = "ABS(numericalValue)" regid clearid @@ -2617,6 +2895,7 @@ id.subfunc = 1 id.callname = "get_error_erl" id.args = 0 id.ret = DOUBLETYPE - ISPOINTER +id.hr_syntax = "ERL" regid clearid @@ -2625,6 +2904,7 @@ id.subfunc = 1 id.callname = "get_error_err" id.args = 0 id.ret = ULONGTYPE - ISPOINTER +id.hr_syntax = "ERR" regid clearid @@ -2633,6 +2913,7 @@ id.subfunc = 2 id.callname = "error" id.args = 1 id.arg = MKL$(ULONGTYPE - ISPOINTER) +id.hr_syntax = "ERROR codeNumber%" regid clearid @@ -2642,6 +2923,7 @@ id.callname = "sub_line" id.args = 7 id.arg = MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[[{Step}](?,?)]-[{Step}](?,?)[,[?][,[{B|BF}][,?]]]" +id.hr_syntax = "LINE [STEP] [(column1, row1)]-[STEP] (column2, row2), color[, [{B|BF}], style%]" regid clearid @@ -2650,6 +2932,7 @@ id.subfunc = 2 id.callname = "sub_sound" id.args = 2 id.arg = MKL$(DOUBLETYPE - ISPOINTER) + MKL$(DOUBLETYPE - ISPOINTER) +id.hr_syntax = "SOUND frequency, duration" regid clearid @@ -2657,6 +2940,7 @@ id.n = "Beep": id.Dependency = DEPENDENCY_AUDIO_OUT id.subfunc = 2 id.callname = "sub_beep" id.args = 0 +id.hr_syntax = "BEEP" regid clearid @@ -2667,6 +2951,7 @@ id.args = 1 id.arg = MKL$(DOUBLETYPE - ISPOINTER) id.ret = SINGLETYPE - ISPOINTER id.specialformat = "[?]" +id.hr_syntax = "TIMER[(accuracy!)]" regid clearid @@ -2677,6 +2962,7 @@ id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = SINGLETYPE - ISPOINTER id.specialformat = "[?]" 'checked! +id.hr_syntax = "RND[(behavior)]" regid clearid @@ -2686,6 +2972,7 @@ id.callname = "sub_randomize" id.args = 1 id.arg = MKL$(DOUBLETYPE - ISPOINTER) id.specialformat = "[[{Using}]?]" 'checked! +id.hr_syntax = "RANDOMIZE [USING] {seednumber|TIMER}" regid clearid @@ -2694,6 +2981,7 @@ id.subfunc = 2 id.callname = "sub_out" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) +id.hr_syntax = "OUT registerAddress%, value%" regid clearid @@ -2702,6 +2990,7 @@ id.subfunc = 2 id.callname = "sub_pcopy" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) +id.hr_syntax = "PCOPY sourcePage%, destinationPage%" regid clearid @@ -2712,6 +3001,7 @@ id.args = 6 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[[{Screen}](?,?)-(?,?)[,[?][,?]]]" id.secondargcantbe = "Print" +id.hr_syntax = "VIEW [SCREEN] (column1, row1)-(column2, row2)[, color][, border]" regid clearid @@ -2722,6 +3012,7 @@ id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "{Print}[?{To}?]" 'new! id.secondargmustbe = "Print" +id.hr_syntax = "VIEW PRINT [topRow% TO bottomRow%]" regid clearid @@ -2731,6 +3022,7 @@ id.callname = "qbg_sub_window" id.args = 4 id.arg = MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) id.specialformat = "[[{Screen}](?,?)-(?,?)]" +id.hr_syntax = "WINDOW [[SCREEN] (x1!, y1!) - (x2!, y2!)]" regid clearid @@ -2740,6 +3032,7 @@ id.callname = "qbg_sub_locate" id.args = 5 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?][,[?][,[?][,[?][,?]]]]" +id.hr_syntax = "LOCATE [row%][, column%] [, cursor%][, cursorStart%, cursorStop%]" regid clearid @@ -2749,6 +3042,7 @@ id.callname = "qbg_sub_color" id.args = 3 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?][,[?][,?]]" +id.hr_syntax = "COLOR [foreground&][, background&]" regid clearid @@ -2758,6 +3052,7 @@ id.callname = "qbg_palette" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?,?]" +id.hr_syntax = "PALETTE [attribute%, red% + (green% * 256) + (blue% * 65536)] or PALETTE [existingAttribute%, newAttribute%]" regid clearid @@ -2768,6 +3063,7 @@ id.args = 5 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[{#|LPrint}][?][,[?][,[?][,[?]]]]" 'new! 'id.specialformat = "[{#|LPRINT}][?][,?]" 'new! +id.hr_syntax = "WIDTH [columns%][, rows%] or WIDTH {file_number|device}, columnwidth%" regid @@ -2781,6 +3077,7 @@ id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE 'id.specialformat = "[?][,[?][,[?][,[?][,{_MANUALDISPLAY}]]]]" 'breaks compilation! 'id.specialformat = "[?][,[?][,[?][,[?][,[{_MANUALDISPLAY}]]]]]" <-pre-bulletproofing id.specialformat = "[?][,[?][,[?][,[?][,[{_ManualDisplay}?]]]]]" 'a temp format for transition reasons" +id.hr_syntax = "SCREEN {mode%|imagehandle&} [, , active_page, visual_page]" regid clearid @@ -2790,6 +3087,7 @@ id.callname = "sub_pset" id.args = 3 id.arg = MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[{Step}](?,?)[,?]" +id.hr_syntax = "PSET [STEP](column%, row%)[, colorAttribute]" regid clearid @@ -2799,6 +3097,7 @@ id.callname = "sub_preset" id.args = 3 id.arg = MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[{Step}](?,?)[,?]" +id.hr_syntax = "PRESET [STEP](column%, row%)[, colorAttribute]" regid clearid @@ -2808,6 +3107,7 @@ id.callname = "qbs_asc" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "ASC(text$[, position%])" regid clearid @@ -2817,6 +3117,7 @@ id.callname = "" 'callname is not used id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) 'note: LEN is a special case, any input is actually accepted id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "LEN(literalTextOrVariable$)" regid clearid @@ -2825,6 +3126,7 @@ id.musthave = "$" id.subfunc = 1 id.callname = "qbs_inkey" id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "INKEY$" regid clearid @@ -2835,6 +3137,7 @@ id.callname = "qbs_str" id.args = 1 id.arg = MKL$(-1) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "STR$(number)" regid clearid @@ -2845,6 +3148,7 @@ id.callname = "qbs_ucase" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "UCASE$(text$)" regid clearid @@ -2855,6 +3159,7 @@ id.callname = "qbs_lcase" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "LCASE$(text$)" regid clearid @@ -2865,6 +3170,7 @@ id.callname = "qbs_left" id.args = 2 id.arg = MKL$(STRINGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "LEFT$(stringValue$, numberOfCharacters%)" regid clearid @@ -2875,6 +3181,7 @@ id.callname = "qbs_right" id.args = 2 id.arg = MKL$(STRINGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "RIGHT$(stringValue$, numberOfCharacters%)" regid clearid @@ -2885,6 +3192,7 @@ id.callname = "qbs_ltrim" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "LTRIM$(text$)" regid clearid @@ -2895,6 +3203,7 @@ id.callname = "qbs_rtrim" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "RTRIM$(text$)" regid clearid @@ -2905,6 +3214,7 @@ id.callname = "qbs__trim" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "_TRIM$(text$)" regid clearid @@ -2913,6 +3223,7 @@ id.subfunc = 2 id.callname = "qbs_print" 'not called directly id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) +id.hr_syntax = "PRINT [expression] [{;|,] [expression...]" regid clearid @@ -2921,6 +3232,7 @@ id.subfunc = 2 id.callname = "qbs_lprint" 'not called directly id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) +id.hr_syntax = "LPRINT [expression] [{;|,}]" regid clearid @@ -2930,6 +3242,7 @@ id.callname = "func_lpos" id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "LPOS(index%)" regid 'Get Current Working Directory @@ -2939,6 +3252,7 @@ id.musthave = "$" id.subfunc = 1 id.callname = "func__cwd" id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "_CWD$" regid 'Get the directory the program was started from (before the currenct directory is automatically changed to the executables directory) @@ -2948,6 +3262,7 @@ id.musthave = "$" id.subfunc = 1 id.callname = "func__startdir" id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "_STARTDIR$" regid 'Return a path that best represents the context provided e.g. _DIR$("DESKTOP") @@ -2959,6 +3274,7 @@ id.callname = "func__dir" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "_DIR$(" + CHR$(34) + "folderspecification" + CHR$(34) + ")" regid 'Return the name of the included file in which the last error occurred @@ -2968,6 +3284,7 @@ id.musthave = "$" id.subfunc = 1 id.callname = "func__inclerrorfile" id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "_INCLERRORFILE$" regid clearid @@ -2977,6 +3294,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" id.callname = "sub__keyclear" +id.hr_syntax = "_KEYCLEAR buffer&" regid clearid @@ -2986,6 +3304,7 @@ id.callname = "func_deg2rad" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_D2R(angleInDegrees!)" regid clearid @@ -2995,6 +3314,7 @@ id.callname = "func_deg2grad" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_D2G(angleInDegrees!)" regid clearid @@ -3004,6 +3324,7 @@ id.callname = "func_rad2deg" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_R2D(angleInRadians!)" regid clearid @@ -3013,6 +3334,7 @@ id.callname = "func_rad2grad" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_R2G(angleInRadians!)" regid clearid @@ -3022,6 +3344,7 @@ id.callname = "func_grad2deg" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_G2D(gradient!)" regid clearid @@ -3031,6 +3354,7 @@ id.callname = "func_grad2rad" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_G2R(gradient!)" regid clearid 'Clear the old id info so we set the slate for a new one @@ -3040,6 +3364,7 @@ id.callname = "atan2" 'The C name of the function id.args = 2 'It takes 2 parameters to work id.arg = MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) 'These simply add up to represent the 2 patameters from what I can tell id.ret = FLOATTYPE - ISPOINTER 'we want it to return to us a nice _FLOAT value +id.hr_syntax = "_ATAN2(y, x)" regid 'and we're finished with ID registration clearid 'Clear the old id info so we set the slate for a new one @@ -3049,6 +3374,7 @@ id.callname = "hypot" 'The C name of the function id.args = 2 'It takes 2 parameters to work id.arg = MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) 'These simply add up to represent the 2 patameters from what I can tell id.ret = FLOATTYPE - ISPOINTER 'we want it to return to us a nice _FLOAT value +id.hr_syntax = "_HYPOT(x, y)" regid 'and we're finished with ID registration clearid @@ -3058,6 +3384,7 @@ id.callname = "asin" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_ASIN(sine_value!)" regid clearid @@ -3067,6 +3394,7 @@ id.callname = "acos" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_ACOS(cosine_value!)" regid clearid @@ -3076,6 +3404,7 @@ id.callname = "sinh" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_SINH(value)" regid clearid @@ -3085,6 +3414,7 @@ id.callname = "cosh" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_COSH(value)" regid clearid @@ -3094,6 +3424,7 @@ id.callname = "tanh" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_TANH(value)" regid clearid @@ -3103,6 +3434,7 @@ id.callname = "asinh" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_ASINH(value)" regid clearid @@ -3112,6 +3444,7 @@ id.callname = "acosh" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_ACOSH(value)" regid clearid @@ -3121,6 +3454,7 @@ id.callname = "atanh" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_ATANH(value)" regid clearid @@ -3130,6 +3464,7 @@ id.callname = "ceil" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_CEIL(expression)" regid clearid @@ -3140,6 +3475,7 @@ id.args = 1 id.arg = MKL$(DOUBLETYPE - ISPOINTER) id.ret = DOUBLETYPE - ISPOINTER id.specialformat = "[?]" +id.hr_syntax = "_PI[(multiplier)]" regid clearid @@ -3148,6 +3484,7 @@ id.subfunc = 1 id.callname = "func_screenheight" id.args = 0 id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_DESKTOPHEIGHT" regid clearid @@ -3156,18 +3493,21 @@ id.subfunc = 1 id.callname = "func_screenwidth" id.args = 0 id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_DESKTOPWIDTH" regid clearid id.n = qb64prefix$ + "ScreenIcon" 'name change to from _ICONIFYWINDOW to _SCREENICON to match the screenshow and screenhide id.subfunc = 2 id.callname = "sub_screenicon" +id.hr_syntax = "_SCREENICON" regid clearid id.n = qb64prefix$ + "ScreenExists" id.subfunc = 1 id.callname = "func_windowexists" +id.hr_syntax = "_SCREENEXISTS" regid clearid @@ -3176,6 +3516,7 @@ id.subfunc = 1 id.callname = "func__controlchr" id.args = 0 id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_CONTROLCHR" regid clearid @@ -3185,6 +3526,7 @@ id.callname = "func__str_nc_compare" id.args = 2 id.arg = MKL$(STRINGTYPE - ISPOINTER) + MKL$(STRINGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_STRICMP(string1$, string2$)" regid clearid @@ -3194,6 +3536,7 @@ id.callname = "func__str_compare" id.args = 2 id.arg = MKL$(STRINGTYPE - ISPOINTER) + MKL$(STRINGTYPE - ISPOINTER) id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_STRCMP(string1$, string2$)" regid clearid @@ -3203,6 +3546,7 @@ id.callname = "func_arcsec" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_ARCSEC(value)" regid clearid @@ -3212,6 +3556,7 @@ id.callname = "func_arccsc" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_ARCCSC(value)" regid clearid @@ -3221,6 +3566,7 @@ id.callname = "func_arccot" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_ARCCOT(value)" regid clearid @@ -3230,6 +3576,7 @@ id.callname = "func_sech" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_SECH(value)" regid clearid @@ -3239,6 +3586,7 @@ id.callname = "func_csch" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_CSCH(value)" regid clearid @@ -3248,6 +3596,7 @@ id.callname = "func_coth" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_COTH(value)" regid clearid @@ -3257,6 +3606,7 @@ id.callname = "func_sec" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_SEC(value)" regid clearid @@ -3266,6 +3616,7 @@ id.callname = "func_csc" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_CSC(value)" regid clearid @@ -3275,6 +3626,7 @@ id.callname = "func_cot" id.args = 1 id.arg = MKL$(FLOATTYPE - ISPOINTER) id.ret = FLOATTYPE - ISPOINTER +id.hr_syntax = "_COT(value)" regid clearid @@ -3283,6 +3635,7 @@ id.subfunc = 1 id.callname = "func_screenicon" id.args = 0 id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_SCREENICON" regid clearid @@ -3291,6 +3644,7 @@ id.subfunc = 1 id.callname = "func__autodisplay" id.args = 0 id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_AUTODISPLAY" regid clearid @@ -3300,6 +3654,7 @@ id.callname = "func__shr" id.args = 2 id.arg = MKL$(UINTEGER64TYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.ret = UINTEGER64TYPE - ISPOINTER +id.hr_syntax = "_SHR(numericalVariable, numericalValue)" regid clearid @@ -3309,6 +3664,7 @@ id.callname = "func__shl" id.args = 2 id.arg = MKL$(UINTEGER64TYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.ret = UINTEGER64TYPE - ISPOINTER +id.hr_syntax = "_SHL(numericalVariable, numericalValue)" regid clearid @@ -3320,6 +3676,7 @@ id.callname = "func__deflate" id.args = 1 id.arg = MKL$(STRINGTYPE - ISPOINTER) id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "_DEFLATE$(stringToCompress$)" regid clearid @@ -3332,6 +3689,7 @@ id.args = 2 id.arg = MKL$(STRINGTYPE - ISPOINTER) + MKL$(INTEGER64TYPE - ISPOINTER) id.specialformat = "?[,?]" id.ret = STRINGTYPE - ISPOINTER +id.hr_syntax = "_INFLATE$(stringToDecompress$[, originalSize&])" regid clearid @@ -3342,6 +3700,7 @@ id.args = 1 id.arg = MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[?]" id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_CINP" regid clearid @@ -3350,6 +3709,7 @@ id.subfunc = 1 id.callname = "func__capslock" id.args = 0 id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_CAPSLOCK" regid clearid @@ -3358,6 +3718,7 @@ id.subfunc = 1 id.callname = "func__scrolllock" id.args = 0 id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_SCROLLLOCK" regid clearid @@ -3366,6 +3727,7 @@ id.subfunc = 1 id.callname = "func__numlock" id.args = 0 id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_NUMLOCK" regid clearid @@ -3375,6 +3737,7 @@ id.callname = "sub__capslock" id.arg = MKL$(LONGTYPE - ISPOINTER) id.args = 1 id.specialformat = "{On|Off|_Toggle}" +id.hr_syntax = "_CAPSLOCK {On|Off|_Toggle}" regid clearid @@ -3384,6 +3747,7 @@ id.callname = "sub__scrolllock" id.arg = MKL$(LONGTYPE - ISPOINTER) id.args = 1 id.specialformat = "{On|Off|_Toggle}" +id.hr_syntax = "_SCROLLLOCK {On|Off|_Toggle}" regid clearid @@ -3393,6 +3757,7 @@ id.callname = "sub__numlock" id.arg = MKL$(LONGTYPE - ISPOINTER) id.args = 1 id.specialformat = "{On|Off|_Toggle}" +id.hr_syntax = "_NUMLOCK {On|Off|_Toggle}" regid clearid @@ -3401,6 +3766,7 @@ id.subfunc = 2 id.callname = "sub__consolefont" id.args = 2 id.arg = MKL$(STRINGTYPE - ISPOINTER) + MKL$(INTEGERTYPE - ISPOINTER) +id.hr_syntax = "_CONSOLEFONT fontFile$" regid clearid @@ -3410,6 +3776,7 @@ id.callname = "sub__console_cursor" id.args = 2 id.arg = MKL$(LONGTYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.specialformat = "[{_Show|_Hide}][,?]" +id.hr_syntax = "_CONSOLECURSOR {_Show|_Hide}[, size%]" regid clearid @@ -3418,6 +3785,7 @@ id.subfunc = 1 id.callname = "func__getconsoleinput" id.args = 0 id.ret = LONGTYPE - ISPOINTER +id.hr_syntax = "_CONSOLEINPUT" regid clearid @@ -3427,6 +3795,7 @@ id.callname = "func__readbit" id.args = 2 id.arg = MKL$(UINTEGER64TYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.ret = INTEGER64TYPE - ISPOINTER +id.hr_syntax = "_READBIT(numericalVariable, numericalValue)" regid clearid @@ -3436,6 +3805,7 @@ id.callname = "func__setbit" id.args = 2 id.arg = MKL$(UINTEGER64TYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.ret = UINTEGER64TYPE - ISPOINTER +id.hr_syntax = "_SETBIT(numericalVariable, numericalValue)" regid clearid @@ -3445,6 +3815,7 @@ id.callname = "func__resetbit" id.args = 2 id.arg = MKL$(UINTEGER64TYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.ret = UINTEGER64TYPE - ISPOINTER +id.hr_syntax = "_RESETBIT(numericalVariable, numericalValue)" regid clearid @@ -3454,4 +3825,5 @@ id.callname = "func__togglebit" id.args = 2 id.arg = MKL$(UINTEGER64TYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) id.ret = UINTEGER64TYPE - ISPOINTER +id.hr_syntax = "_TOGGLEBIT(numericalVariable, numericalValue)" regid