AkelPad

Code: Select all

;======================
;Files to auto-complete
;======================
Extensions:
lss

;===============
;Word delimiters
;===============
Delimiters:
=
.
,
;
*

;===================================
;Set variables for "Words:" section.
;
;VAR "VALUE"
;===================================
Variables:
INDENT "	"


;======================================================================
;Words and blocks
;
; $~abbr   abbreviation.
; $[]      set caret to this position. Can be multiple (hot spots).
; $[text]  select text. Can be multiple (hot spots).
; $$       symbol $.
; $\]      escape symbol ]. Can be used in $[text] block: $[One [1$\]].
; ${VAR}   variable name that was set in "Variables:" section.
; $;       comment line.
; $#       comment line.
;======================================================================
Words:

$~If
If $[] Then

$~If-End_If
If $[] Then
${INDENT}$[]
End If

$~If-Else
If $[] Then
${INDENT}$[]
Else
${INDENT}$[]
End If

$~For
For i% = 0 To $[]
${INDENT}$[]
Next

$~For-Step
For i% = 0 To $[] Step
${INDENT}$[]
Next

$~Select
Select Case $[]
Case $[]:
${INDENT}$[]
Case Else
${INDENT}$[]
End Select

$~Sub
Sub $[subName]()
${INDENT}$[]
End Sub

$~Function
Function $[functionName]()
${INDENT}$[]
End Function

$~Class
Class $[className] As $[]
${INDENT}
${INDENT}Sub New()
${INDENT}${INDENT}$[]
${INDENT}End Sub
${INDENT}
End Class

$~GoSub
${INDENT}Exit Sub
${INDENT}
$[]:
${INDENT}
${INDENT}Return

$~On_Error
On Error GoTo ErrH
${INDENT}
${INDENT}
${INDENT}Exit Sub
${INDENT}
ErrH:
${INDENT}$[Print] Error$ & " (" & Err & "), in line " & Erl
${INDENT}Exit Sub

$~Messagebox
Messagebox "$[text]", 64, "$[Title]"

$~REM-END_REM
%REM
${INDENT}$[]
%END REM