_kix.py
4.57 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
###############################################################################
# Name: kix.py #
# Purpose: Syntax configuration module for KIXtart scripts #
# Author: Cody Precord <cprecord@editra.org> #
# Copyright: (c) 2007 Cody Precord <staff@editra.org> #
# License: wxWindows License #
###############################################################################
"""
FILE: kix.py
AUTHOR: Cody Precord
@summary: Lexer configuration module for KIXtart scripts
"""
__author__ = "Cody Precord <cprecord@editra.org>"
__svnid__ = "$Id: _kix.py 68798 2011-08-20 17:17:05Z CJP $"
__revision__ = "$Revision: 68798 $"
#-----------------------------------------------------------------------------#
# Imports
import wx.stc as stc
# Imports
import synglob
import syndata
#-----------------------------------------------------------------------------#
#---- Keyword Definitions ----#
COMMANDS = (0, "? and beep big break call cd cls color cookie1 copy debug del "
"dim display do until exit flushkb for each next function "
"endfunction get gets global go gosub goto if else endif md or "
"password play quit rd redim return run select case endselect "
"set setl setm settime shell sleep small use while loop")
FUNCTIONS = (1, "abs addkey addprinterconnection addprogramgroup "
"addprogramitem asc ascan at backupeventlog box cdbl chr cint "
"cleareventlog close comparefiletimes createobject cstr "
"dectohex delkey delprinterconnection delprogramgroup "
"delprogramitem deltree delvalue dir enumgroup enumipinfo "
"enumkey enumlocalgroup enumvalue execute exist existkey "
"expandenvironmentvars fix formatnumber freefilehandle "
"getdiskspace getfileattr getfilesize getfiletime "
"getfileversion getobject iif ingroup instr instrrev int "
"isdeclared join kbhit keyexist lcase left len loadhive "
"loadkey logevent logoff ltrim memorysize messagebox open "
"readline readprofilestring readtype readvalue redirectoutput "
"right rnd round rtrim savekey sendkeys sendmessage setascii "
"setconsole setdefaultprinter setfileattr setfocus setoption "
"setsystemstate settitle setwallpaper showprogramgroup "
"shutdown sidtoname split srnd substr trim ubound ucase "
"unloadhive val vartype vartypename writeline "
"writeprofilestring writevalue")
MACROS = (2, "address build color comment cpu crlf csd curdir date day domain "
"dos error fullname homedir homedrive homeshr hostname inwin "
"ipaddress0 ipaddress1 ipaddress2 ipaddress3 kix lanroot ldomain "
"ldrive lm logonmode longhomedir lserver maxpwage mdayno mhz "
"monthno month msecs pid primarygroup priv productsuite "
"producttype pwage ras result rserver scriptdir scriptexe "
"scriptname serror sid site startdir syslang ticks time userid "
"userlang wdayno wksta wuserid ydayno year")
#---- End Keyword Definitions ----#
#---- Syntax Style Specs ----#
SYNTAX_ITEMS = [(stc.STC_KIX_COMMENT, 'comment_style'),
(stc.STC_KIX_DEFAULT, 'default_style'),
(stc.STC_KIX_FUNCTIONS, 'funct_style'),
(stc.STC_KIX_IDENTIFIER, 'default_style'),
(stc.STC_KIX_KEYWORD, 'keyword_style'),
(stc.STC_KIX_MACRO, 'pre_style'),
(stc.STC_KIX_NUMBER, 'number_style'),
(stc.STC_KIX_OPERATOR, 'operator_style'),
(stc.STC_KIX_STRING1, 'char_style'),
(stc.STC_KIX_STRING2, 'string_style'),
(stc.STC_KIX_VAR, 'scalar_style')]
#-----------------------------------------------------------------------------#
class SyntaxData(syndata.SyntaxDataBase):
"""SyntaxData object for Kix"""
def __init__(self, langid):
super(SyntaxData, self).__init__(langid)
# Setup
self.SetLexer(stc.STC_LEX_KIX)
def GetKeywords(self):
"""Returns Specified Keywords List """
return [COMMANDS, FUNCTIONS, MACROS]
def GetSyntaxSpec(self):
"""Syntax Specifications """
return SYNTAX_ITEMS
def GetCommentPattern(self):
"""Returns a list of characters used to comment a block of code """
return [u';']