Uploaded a new version of the SciTE4AutoIt3.exe v21.316.1639.1

[mLipok]

Using your's testing script.

 

OLD version

NEW version

[mLipok]

3 hours ago, mLipok said:

But also would like to have this behavior:

 

for :

#Au3Stripper_Ignore_Funcs=

#Au3Stripper_Ignore_Errors_in_Funcs=

#Au3Stripper_Ignore_Variables=

also for:

#Au3Stripper_Ignore_Funcs=_Example, _Example_1, _Example_2, _Example_3
#Au3Stripper_Ignore_Errors_in_Funcs=_Example, _Example_1, _Example_2, _Example_3
#Au3Stripper_Ignore_Variables=$SOMEVALUE, $SOMEVALUE2
#ignorefunc _Example, _Example_1, _Example_2, _Example_3
#forcedef $SOMEVALUE, $SOMEVALUE2
#forceref $sTest, $SOMEVALUE, $SOMEVALUE

 

[mLipok]

I would also ask about such feature:

#TODO TASK 1 ; Description
#TODO TASK 2 ; Description
#REMARK ; any remark

#TODO TASK 1 ; Description
#TODO TASK 2 ; Description
#REMARK ; any remark
 

currently it looks like:

REMARK:
I use foreground color (because it is easy to show the concept) but for green color I was thinking about background color.

Something like:

 

Edited March 16, 2022 by mLipok

[mLipok]

I also combine all scripts into one full/combined testing script:

expandcollapse popup

Global $Variable

; Comment block
#cs Level1
If 1 = 2 Then ;test
    ConsoleWrite("Yea right") ;test
EndIf
;~  #cs Level2
;~  ; multilevel directive is shown as comment
;~  #ce Level2
#ce Level1
#comments-start Level1
    ; comments
#comments-end   Level1

; Special
#AutoIt3Wrapper_Run_Au3Check=n
#Au3Stripper_AlwaysStrip_Off=1
#AutoIt3Wrapper_UseX64=N
#AutoIt3Wrapper_Run_AU3Check=Y
#AutoIt3Wrapper_AU3Check_Stop_OnWarning=y
#AutoIt3Wrapper_AU3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6 -w 7
#AutoIt3Wrapper_Run_Au3Stripper=y
#Au3Stripper_Parameters=/MO /RSLN /DEBUG /TL /SCI=9
#Au3Stripper_Off
#Au3Stripper_On
#Au3Stripper_AlwaysStrip_Off
#Au3Stripper_AlwaysStrip_On
#Au3Stripper_Ignore_Funcs=_Example, _Example_1, _Example_2, _Example_3
#Au3Stripper_Ignore_Errors_in_Funcs=_Example, _Example_1, _Example_2, _Example_3
#Au3Stripper_Ignore_Variables=$SOMEVALUE, $SOMEVALUE2
#Tidy_ILC_Pos=120
#Tidy_Parameters=/sort_funcs /reel
#Tidy_Off
#Tidy_On
#ignorefunc _Example, _Example_1, _Example_2, _Example_3

#Region - User's functions
#EndRegion - User's functions

; preprocessor
#RequireAdminaaa  #cs #ce ; This script requires full Administrative rights
#RequireAdmin ; This script requires full Administrative rights
#RequireAdminxxthe rest is considered a comment
#RequireAdmin  the rest is considered a comment
#include-once  the rest is considered a comment
#include <Array.au3>
#NoTrayIcon  the rest is considered a comment
#OnAutoItStartRegister "Example"
; Any Unknown preprocessor
#whatever directive you use
; Lexing bug
#RequireAdmin #cs  Admin #ce ; <=====  Causing the rest of the code to be wrongly colored
If 1 = 2 Then ;test
    ConsoleWrite("Yea right") ;test
EndIf

#ce ; redundant #ce

#comments-start
#comments-end

#comments-start

#comments-end

#cs
#ce

#cs documentation
#CE documentation
#CS documentation
some text
some text
#CE documentation


#TODO TASK 1 ; Description
#TODO TASK 2 ; Description
#REMARK ; any remark

_Example()
Func _Example($sTest = '(Empty string :)')
    #forcedef $SOMEVALUE, $SOMEVALUE2
    #forceref $sTest, $SOMEVALUE, $SOMEVALUE
    $sTest = "SOME TEST"
    Return SetError(@error, @extended, ($sTest))

EndFunc

_Example_1()
_Example_2()
_Example_3()

Func _Example_1(ByRef $sTest)

EndFunc

Func _Example_2($sTest = "(Empty string :)")
EndFunc

Func _Example_3()
    For $i = 1 To UBound() -1
        While 1
            ConsoleWrite("! " & @CRLF)
            #cs
            ; test
            #ce
        WEnd

    Next
EndFunc

 

Edited March 16, 2022 by mLipok

[Jos]

29 minutes ago, mLipok said:

Using your's testing script.

Showing me an image in dark mode of something I already have without any definition of it being right/wrong and details doesn't tell me anything!  

So what about you stop posting all these details for a moment and we take it one step at the time ( as discussed before) ....  

I have found the issue with #region and have that fixed....  and am now looking at the CommentBlock folding which clearly is due to me changing the Color for the initial statement, so need to think about how that all was working again as it has been a long time ago i last touched that part of the code.   

9 minutes ago, mLipok said:

I also combine all scripts into one full/combined testing script:

Fine ....but again don't see any comments in there where things go wrong in your mind.... but as stated, let me first tackle the #region and Commentblock folding and then we test again and tackle any remaining issue.

[mLipok]

37 minutes ago, Jos said:

So what about you stop posting all these details for a moment and we take it one step at the time ( as discussed before) .

I already stoped as I posted all what I had to post

 

38 minutes ago, Jos said:

Fine ....but again don't see any comments in there where things go wrong in your mind

All comments was in posts. Script is only a combination of all testing script to have possibility to check all issues/feature request, at once.

38 minutes ago, Jos said:

Let me first tackle the #region and Commentblock folding and then we test again and tackle any remaining issue.

Perfectly fine, as for me.

[Jos]

Please try the current Beta with the following changes:

• #Region & #EndRegion will have the LineComment color for everything behind the directive (style.au3.1)
• #Comment block folding fix (i hope)
• #SPECIALS will have the LineComment color for everything behind the directive (so style.au3.1 in stead of style.au3.12)

This should be the first 3 items in the list.  

 

[Jos]

 

 

1 hour ago, mLipok said:

#TODO TASK 1 ; Description
#TODO TASK 2 ; Description
#REMARK ; any remark

Uploaded new Beta which will change the color from Pre-Processor style.au3.11  to Line Comment style.au3.1 when an ";" is encountered.

Edited March 16, 2022 by Jos

[Jos]

Next Beta available... the testcode now look like this:

Quote

Global $Variable

; Comment block
#cs Level1
    If 1 = 2 Then ;test
        ConsoleWrite("Yea right") ;test
    EndIf
    #cs Level2
    ; multilevel directive is shown as comment
    #ce Level2
#ce Level1
#comments-start Level1
    ; comments
#comments-end   Level1

; Special
#AutoIt3Wrapper_Run_Au3Check=n
#Au3Stripper_AlwaysStrip_Off=1
#AutoIt3Wrapper_UseX64=N
#AutoIt3Wrapper_Run_AU3Check=Y
#AutoIt3Wrapper_AU3Check_Stop_OnWarning=y
#AutoIt3Wrapper_AU3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6 -w 7
#AutoIt3Wrapper_Run_Au3Stripper=y
#Au3Stripper_Parameters=/MO /RSLN /DEBUG /TL /SCI=9
#Au3Stripper_Off
#Au3Stripper_On
#Au3Stripper_AlwaysStrip_Off
#Au3Stripper_AlwaysStrip_On
#Au3Stripper_Ignore_Funcs=_Example, _Example_1, _Example_2, _Example_3
#Au3Stripper_Ignore_Errors_in_Funcs=_Example, _Example_1, _Example_2, _Example_3
#Au3Stripper_Ignore_Errors_in_Func=_Example, _Example_1, _Example_2, _Example_3
#Au3Stripper_Ignore_Variables=$SOMEVALUE, $SOMEVALUE2
#Tidy_ILC_Pos=120
#Tidy_Parameters=/sort_funcs /reel
#Tidy_Off
#Tidy_On
#ignorefunc _Example, _Example_1, _Example_2, _Example_3

#Region - User's functions
#EndRegion - User's functions

; preprocessor
#RequireAdminaaa  #cs #ce ; This script requires full Administrative rights
#RequireAdmin ; This script requires full Administrative rights
#RequireAdminxxthe rest is considered a comment
#RequireAdmin  the rest is considered a comment
#include-once  the rest is considered a comment
#include <Array.au3>
#NoTrayIcon  the rest is considered a comment
#OnAutoItStartRegister "Example"
; Any Unknown preprocessor
#whatever directive you use
; Lexing bug
#RequireAdmin #cs  Admin #ce ;
If 1 = 2 Then ;test
    ConsoleWrite("Yea right") ;test
EndIf

;#ce ; redundant #ce

#comments-start
#comments-end

#comments-start

#comments-end

#cs
#ce

#cs documentation
#CE documentation
#CS documentation
some text
some text
#CE documentation


#TODO TASK 1 ; Description
#TODO TASK 2 ; Description
#REMARK; any remark
#REMARK=any remark  ( you can use either ; or = to change the lexer color to commentline.)

_Example()
Func _Example($sTest = '(Empty string :)')
    #forcedef $SOMEVALUE, $SOMEVALUE2
    #forceref $sTest, $SOMEVALUE, $SOMEVALUE
    $sTest = "SOME TEST"
    Return SetError(@error, @extended, ($sTest))

EndFunc

_Example_1()
_Example_2()
_Example_3()

Func _Example_1(ByRef $sTest)

EndFunc

Func _Example_2($sTest = "(Empty string :)")
EndFunc

Func _Example_3()
    For $i = 1 To UBound() -1
        While 1
            ConsoleWrite("! " & @CRLF)
            #cs
            ; test
            #ce
        WEnd

    Next
EndFunc

 

Edited March 16, 2022 by Jos

[mLipok]

Highlighiting is awesome, almost perfectly.

I notice issue is related to red color of #Au3Stripper_Ignore_Errors_in_Funcs

And I have one feature request for the following:

#Au3Stripper_Ignore_Funcs=_Example, _Example_1, _Example_2, _Example_3
#Au3Stripper_Ignore_Errors_in_Funcs=_Example, _Example_1, _Example_2, _Example_3
#Au3Stripper_Ignore_Variables=$SOMEVALUE, $SOMEVALUE2
#ignorefunc _Example, _Example_1, _Example_2, _Example_3

Could they have similar way fo highlighting like:

#OnAutoItStartRegister "_Example"
#OnAutoItStartRegister _Example

This following screenshot shows how it would look like (showing concept)

 

EDIT:
The same:

 

Edited March 17, 2022 by mLipok

[Jos]

9 minutes ago, mLipok said:

I notice issue is related to red color of #Au3Stripper_Ignore_Errors_in_Funcs

That highlights fine as directive as that in NOT an au3Stripper directive hence the different color. The correct directive is:

#Au3Stripper_Ignore_Errors_in_Func

Edited March 17, 2022 by Jos

[mLipok]

And main issue folding lines are broken

 

for #cs.....#ce

 

and for Func...EndFunc

 

Edited March 17, 2022 by mLipok

[mLipok]

1 minute ago, Jos said:

That highlights fine as directive as that in NOT an au3Stripper directive hence the different color. The correct directive is:

#Au3Stripper_Ignore_Errors_in_Func

It was copied from SciTE4AutoIt3.chm there is wrong name used.

[Jos]

The commentblock folding work fine for me , so post example source. This will happen when there is un issue before these statements.

I don't understand the second and third one...  what is wrong there? ...  (and post the source to test with.)

10 minutes ago, mLipok said:

It was copied from SciTE4AutoIt3.chm there is wrong name used.

Will change it for the next version.  

Edited March 17, 2022 by Jos

[mLipok]

1 minute ago, Jos said:

The commentblock folding work fine for me , so post example source.

This is my current testing script:

expandcollapse popup

; TESTING: GLOBALS
Global $Variable
Global Enum _
        $enum1, _
        $enum2
Global Const $const




; TESTING: COMMENT BLOCK
#cs Level1
If 1 = 2 Then ;test
    ConsoleWrite("Yea right") ;test
EndIf
;~  #cs Level2
;~  ; multilevel directive is shown as comment
;~  #ce Level2
#ce Level1
#comments-start Level1
    ; comments
#comments-end   Level1

#ce

#comments-start
#comments-end

#comments-start

#comments-end

#cs
#ce

#cs documentation
#CE documentation
#CS documentation
some text
some text
#CE documentation





; TESTING: COMMENTS
;~ few
;~ lines
;~ of
;~ comments





; TESTING: SPECIAL 1
#AutoIt3Wrapper_Run_Au3Check=n
#Au3Stripper_AlwaysStrip_Off=1
#AutoIt3Wrapper_UseX64=N
#AutoIt3Wrapper_Run_AU3Check=Y
#AutoIt3Wrapper_AU3Check_Stop_OnWarning=y
#AutoIt3Wrapper_AU3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6 -w 7
#AutoIt3Wrapper_Run_Au3Stripper=y
#Au3Stripper_Parameters=/MO /RSLN /DEBUG /TL /SCI=9
#Au3Stripper_Off
#Au3Stripper_On
#Au3Stripper_AlwaysStrip_Off
#Au3Stripper_AlwaysStrip_On
#Tidy_ILC_Pos=50
#Tidy_Parameters=/sort_funcs
#Tidy_Off
#Tidy_On




; TESTING: SPECIAL 2
#Au3Stripper_Ignore_Funcs=_Example, _Example_1, _Example_2, _Example_3
#Au3Stripper_Ignore_Errors_in_Func=_Example, _Example_1, _Example_2, _Example_3
#Au3Stripper_Ignore_Variables=$SOMEVALUE, $SOMEVALUE2
#ignorefunc _Example, _Example_1, _Example_2, _Example_3
#OnAutoItStartRegister "_Example"
#OnAutoItStartRegister _Example




; TESTING: REGIONS
#Region - User's functions
#EndRegion - User's functions

#Region - User's functions
Func _Test()
    ; some test
EndFunc   ;==>_Test
#EndRegion - User's functions




; TESTING: PREPROCESSOR
#RequireAdminaaa  #cs #ce                        ; ILC This script requires full Administrative rights
#RequireAdmin                                    ; ILC This script requires full Administrative rights
#RequireAdminxxthe rest is considered a comment
#RequireAdmin  the rest is considered a comment
#include-once  the rest is considered a comment
#include <Array.au3>
#NoTrayIcon  the rest is considered a comment




; TESTING: ANY UNKNOWN PREPROCESSOR
#whatever directive you use
#TODO TASK 1 ; Description
#TODO TASK 2 ; Description
#REMARK ; any remark





; TESTING: LEXING BUG
#RequireAdmin #cs  Admin #ce                     ; ILC <=====  Causing the rest of the code to be wrongly colored





; TESTING: CODE AND FUNCTIONS
If 1 = 2 Then                                    ;ILC test
    ConsoleWrite("Yea right")                    ;ILC test
EndIf

_Example()
Func _Example($sTest = '(Empty string :)')
    #forcedef $SOMEVALUE, $SOMEVALUE2
    #forceref $sTest, $SOMEVALUE, $SOMEVALUE
    $sTest = "SOME TEST"
    Return SetError(@error, @extended, ($sTest))

EndFunc   ;==>_Example

_Example_1()
_Example_2()
_Example_3()

Func _Example_1(ByRef $sTest)

EndFunc   ;==>_Example_1

Func _Example_2($sTest = "(Empty string :)")
    Local Enum _
            $enum1, _
            $enum2
    Local Static $static
    Local Const $const
EndFunc   ;==>_Example_2

Func _Example_3()
    For $i = 1 To UBound() -1
        While 1
            ConsoleWrite("! " & @CRLF)
            #cs
            ; test
            #ce
        WEnd

    Next
EndFunc   ;==>_Example_3

 

[Jos]

8 minutes ago, Jos said:

The commentblock folding work fine for me , so post example source. This will happen when there is un issue before these statements.

I don't understand the second and third one...  what is wrong there? ...  (and post the source to test with.)

Will change it for the next version.  

I actually made the change in au3stripper as that is more consistent the the directive can contain multiple func names. API  and properties are also updated in Beta. 

[Jos]

9 minutes ago, mLipok said:

This is my current testing script:

There is a #ce too many in there causing the folding to break the folding after that.

"D:\Development\AutoIt3\programs\test\test.au3"(24) : ### Tidy Error: "#ce" is likely missing it's opening statement. next line creates a negative tablevel.

 

Edited March 17, 2022 by Jos

[mLipok]

4 minutes ago, Jos said:

I don't understand the second and third one...  what is wrong there? ...  (and post the source to test with.)

This is how it looks now:

I propose to change highlighting in this way:

 

It will be very handy for reading code but alos for using "Search only in this style" feature:

 

[mLipok]

11 minutes ago, Jos said:

There is a #ce too many in there causing the folding to break the folding after that.

Yeah. There is redundant #ce I put them there intentionally to check what happens, and it seams that he is the reason of issue with folding lines in relation to #cs....#ce blocks.

But even if I comment them the issue is persistent.

Check current testing script:
 

expandcollapse popup

; TESTING: GLOBALS
Global $Variable
Global Enum _
        $enum1, _
        $enum2
Global Const $const




; TESTING: COMMENT BLOCK
#cs Level1
If 1 = 2 Then ;test
    ConsoleWrite("Yea right") ;test
EndIf
;~  #cs Level2
;~  ; multilevel directive is shown as comment
;~  #ce Level2
#ce Level1
#comments-start Level1
    ; comments
#comments-end   Level1

; redundant #ce
;~ #ce

#comments-start
#comments-end

#comments-start

#comments-end

#cs
#ce

#cs documentation
#CE documentation
#CS documentation
some text
some text
#CE documentation





; TESTING: COMMENTS
;~ few
;~ lines
;~ of
;~ comments





; TESTING: SPECIAL 1
#AutoIt3Wrapper_Run_Au3Check=n
#Au3Stripper_AlwaysStrip_Off=1
#AutoIt3Wrapper_UseX64=N
#AutoIt3Wrapper_Run_AU3Check=Y
#AutoIt3Wrapper_AU3Check_Stop_OnWarning=y
#AutoIt3Wrapper_AU3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6 -w 7
#AutoIt3Wrapper_Run_Au3Stripper=y
#Au3Stripper_Parameters=/MO /RSLN /DEBUG /TL /SCI=9
#Au3Stripper_Off
#Au3Stripper_On
#Au3Stripper_AlwaysStrip_Off
#Au3Stripper_AlwaysStrip_On
#Tidy_ILC_Pos=50
#Tidy_Parameters=/sort_funcs
#Tidy_Off
#Tidy_On




; TESTING: SPECIAL 2
#Au3Stripper_Ignore_Variables=$SOMEVALUE, $SOMEVALUE2
#Au3Stripper_Ignore_Funcs=_Example, _Example_1, _Example_2, _Example_3
#Au3Stripper_Ignore_Errors_in_Func=_Example, _Example_1, _Example_2, _Example_3
#ignorefunc _Example, _Example_1, _Example_2, _Example_3
#OnAutoItStartRegister _Example, _Example_1, _Example_2, _Example_3
#OnAutoItStartRegister "_Example"

; TESTING: SPECIAL 2
#Au3Stripper_Ignore_Variables=$SOMEVALUE, $SOMEVALUE2
#Au3Stripper_Ignore_Funcs=                _Example, _Example_1, _Example_2, _Example_3
#Au3Stripper_Ignore_Errors_in_Func=        _Example, _Example_1, _Example_2, _Example_3
#ignorefunc                                _Example, _Example_1, _Example_2, _Example_3
#OnAutoItStartRegister                     _Example, _Example_1, _Example_2, _Example_3
#OnAutoItStartRegister "_Example"




; TESTING: REGIONS
#Region - User's functions
#EndRegion - User's functions

#Region - User's functions
Func _Test()
    ; some test
EndFunc   ;==>_Test
#EndRegion - User's functions




; TESTING: PREPROCESSOR
#RequireAdminaaa  #cs #ce                        ; ILC This script requires full Administrative rights
#RequireAdmin                                    ; ILC This script requires full Administrative rights
#RequireAdminxxthe rest is considered a comment
#RequireAdmin  the rest is considered a comment
#include-once  the rest is considered a comment
#include <Array.au3>
#NoTrayIcon  the rest is considered a comment




; TESTING: ANY UNKNOWN PREPROCESSOR
#whatever directive you use
#TODO TASK 1 ; Description
#TODO TASK 2 ; Description
#REMARK ; any remark





; TESTING: LEXING BUG
#RequireAdmin #cs  Admin #ce                     ; ILC <=====  Causing the rest of the code to be wrongly colored





; TESTING: CODE AND FUNCTIONS
If 1 = 2 Then                                    ;ILC test
    ConsoleWrite("Yea right")                    ;ILC test
EndIf

_Example()
Func _Example($sTest = '(Empty string :)')
    #forcedef $SOMEVALUE, $SOMEVALUE2
    #forceref $sTest, $SOMEVALUE, $SOMEVALUE
    $sTest = "SOME TEST"
    Return SetError(@error, @extended, ($sTest))

EndFunc   ;==>_Example

_Example_1()
_Example_2()
_Example_3()

Func _Example_1(ByRef $sTest)

EndFunc   ;==>_Example_1

Func _Example_2($sTest = "(Empty string :)")
    Local Enum _
            $enum1, _
            $enum2
    Local Static $static
    Local Const $const
EndFunc   ;==>_Example_2

Func _Example_3()
    For $i = 1 To UBound() -1
        While 1
            ConsoleWrite("! " & @CRLF)
            #cs
            ; test
            #ce
        WEnd

    Next
EndFunc   ;==>_Example_3

 

Edited March 17, 2022 by mLipok

[Jos]

10 minutes ago, mLipok said:

I propose to change highlighting in this way:

Understand, but that would require all kinds of hardcoding in the lexer. The lexer basically finds and known "Special Keyword" defined in the properties file and everything behind the keyword is considered a line comment. 

 

5 minutes ago, mLipok said:

But even if I comment them the issue is persistent.

Not for me...  it work right away when I add a ; to the start of the line.
EDIT: But i do see something strange happening ...so let me check!!

Edited March 17, 2022 by Jos