added new lexer configs auto-generated by scite2co.lua

 * these are still not all languages supported by Scintilla.
   scite2co.lua does not do a good job of generating styles when
   SciTE's property files use hardcoded colors/fonts.
   This commit only includes reasonably good conversion results.
   The remaining languages need some additional manual labor.
 * Even these lexers are not perfect and should be revised by comparing
   them with SciTE's properties.
 * So many lexers make the "lexer.auto" macro too slow.
   We need some optimization. E.g. the search-command optimization
   described in TODO, or an extended EN command for globbing manually
   specified file names.

1 files changed, 38 insertions, 0 deletions

diff --git a/lib/lexers/vb.tes b/lib/lexers/vb.tes
new file mode 100644
index 0000000..8d5d8ec
--- /dev/null
+++ b/lib/lexers/vb.tes
@@ -0,0 +1,38 @@
+! AUTO-GENERATED FROM SCITE PROPERTY SET !
+
+@[lexer.test.vb]{ [_
+  _.[vb,bas,frm,cls,ctl,pag,dsr,dob]M[lexer.checkname]
+]_ }
+
+@[lexer.set.vb]{
+  ESSETLEXER,SCLEX_VB
+  0ESSETKEYWORDS
+    addressof alias and as attribute base begin binary boolean byref byte byval
+    call case cdbl cint clng compare const csng cstr currency date decimal declare
+    defbool defbyte defcur defdate defdbl defdec defint deflng defobj defsng defstr
+    defvar dim do double each else elseif empty end enum eqv erase error event exit
+    explicit false for friend function get global gosub goto if imp implements in input
+    integer is len let lib like load lock long loop lset me mid midb mod new next not
+    nothing null object on option optional or paramarray preserve print private property
+    public raiseevent randomize redim rem resume return rset seek select set single
+    static step stop string sub text then time to true type typeof unload until variant
+    wend while with withevents xor addhandler andalso ansi assembly auto catch cbool
+    cbyte cchar cdate cdec char class cobj continue csbyte cshort ctype cuint culng
+    cushort custom default delegate directcast endif externalsource finally gettype
+    handles imports inherits interface isfalse isnot istrue module mustinherit
+    mustoverride my mybase myclass namespace narrowing notinheritable notoverridable of off
+    operator orelse overloads overridable overrides partial protected readonly region
+    removehandler sbyte shadows shared short strict structure synclock throw try trycast
+    uinteger ulong unicode ushort using when widening writeonly
+  1ESSETKEYWORDS
+    appactivate beep chdir chdrive close filecopy get input kill line unlock
+    mkdir name open print put reset rmdir savepicture savesetting seek sendkeys
+    setattr width write
+  :M[color.comment],1M[color.set]
+  :M[color.number],2M[color.set]
+  :M[color.keyword],3M[color.set]
+  :M[color.string],4M[color.set]
+  :M[color.preproc],5M[color.set]
+  :M[color.operator],6M[color.set]
+  :M[color.number],8M[color.set]
+}