mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-07-01 12:40:36 +00:00
Indentation work (.bas files). No actual code changes.
This commit is contained in:
parent
37986c978b
commit
024f27a5b5
|
@ -2780,7 +2780,7 @@ FUNCTION ide2 (ignore)
|
||||||
idemouseselect = 1
|
idemouseselect = 1
|
||||||
wholeword.select = 0
|
wholeword.select = 0
|
||||||
END IF
|
END IF
|
||||||
ELSEIF mX > 1 AND mx =< 1 + maxLineNumberLength AND mY > 2 AND mY < (idewy - 5) AND ShowLineNumbers THEN
|
ELSEIF mX > 1 AND mX <= 1 + maxLineNumberLength AND mY > 2 AND mY < (idewy - 5) AND ShowLineNumbers THEN
|
||||||
'line numbers are visible and been clicked
|
'line numbers are visible and been clicked
|
||||||
ideselect = 1
|
ideselect = 1
|
||||||
idecy = mY - 2 + idesy - 1
|
idecy = mY - 2 + idesy - 1
|
||||||
|
@ -8719,7 +8719,7 @@ SUB ideshowtext
|
||||||
'Restore BG color in case a matching bracket was printed with different BG
|
'Restore BG color in case a matching bracket was printed with different BG
|
||||||
IF l = idecy THEN COLOR , 6
|
IF l = idecy THEN COLOR , 6
|
||||||
IF isKeyword > 0 THEN isKeyword = isKeyword - 1
|
IF isKeyword > 0 THEN isKeyword = isKeyword - 1
|
||||||
if isKeyword = 0 THEN checkKeyword$ = "": metacommand = 0: is_Number = 0: isCustomKeyword = 0
|
IF isKeyword = 0 THEN checkKeyword$ = "": metacommand = 0: is_Number = 0: isCustomKeyword = 0
|
||||||
NEXT m
|
NEXT m
|
||||||
|
|
||||||
'apply selection color change if necessary
|
'apply selection color change if necessary
|
||||||
|
@ -12159,7 +12159,7 @@ FUNCTION idechoosecolorsbox
|
||||||
|
|
||||||
'Build scheme string
|
'Build scheme string
|
||||||
SchemeString$ = SchemeString$ + "|"
|
SchemeString$ = SchemeString$ + "|"
|
||||||
FOR j = 1 to 9
|
FOR j = 1 TO 9
|
||||||
SELECT CASE j
|
SELECT CASE j
|
||||||
CASE 1: CurrentColor~& = IDETextColor
|
CASE 1: CurrentColor~& = IDETextColor
|
||||||
CASE 2: CurrentColor~& = IDEKeywordColor
|
CASE 2: CurrentColor~& = IDEKeywordColor
|
||||||
|
@ -12197,7 +12197,7 @@ FUNCTION idechoosecolorsbox
|
||||||
SchemeString$ = SchemeString$ + "|"
|
SchemeString$ = SchemeString$ + "|"
|
||||||
|
|
||||||
'Build scheme string
|
'Build scheme string
|
||||||
FOR j = 1 to 9
|
FOR j = 1 TO 9
|
||||||
SELECT CASE j
|
SELECT CASE j
|
||||||
CASE 1: CurrentColor~& = IDETextColor
|
CASE 1: CurrentColor~& = IDETextColor
|
||||||
CASE 2: CurrentColor~& = IDEKeywordColor
|
CASE 2: CurrentColor~& = IDEKeywordColor
|
||||||
|
@ -12372,7 +12372,7 @@ FUNCTION idechoosecolorsbox
|
||||||
i = i + 1: l$ = l$ + sep + SelectionIndicator$(i) + "Keywords"
|
i = i + 1: l$ = l$ + sep + SelectionIndicator$(i) + "Keywords"
|
||||||
i = i + 1: l$ = l$ + sep + SelectionIndicator$(i) + "Numbers"
|
i = i + 1: l$ = l$ + sep + SelectionIndicator$(i) + "Numbers"
|
||||||
i = i + 1: l$ = l$ + sep + SelectionIndicator$(i) + "Strings"
|
i = i + 1: l$ = l$ + sep + SelectionIndicator$(i) + "Strings"
|
||||||
i = i + 1: l$ = l$ + sep + SelectionIndicator$(i) + "Metacommand/custom keywords
|
i = i + 1: l$ = l$ + sep + SelectionIndicator$(i) + "Metacommand/custom keywords"
|
||||||
i = i + 1: l$ = l$ + sep + SelectionIndicator$(i) + "Comments"
|
i = i + 1: l$ = l$ + sep + SelectionIndicator$(i) + "Comments"
|
||||||
i = i + 1: l$ = l$ + sep + SelectionIndicator$(i) + "Background"
|
i = i + 1: l$ = l$ + sep + SelectionIndicator$(i) + "Background"
|
||||||
i = i + 1: l$ = l$ + sep + SelectionIndicator$(i) + "Current line background"
|
i = i + 1: l$ = l$ + sep + SelectionIndicator$(i) + "Current line background"
|
||||||
|
|
Loading…
Reference in a new issue