Const module_name = "someName" 'this name must be unique !!!
Const module_ver = "0.001a" 'version of your script
'==============================================================
' name "Init" is required, its called automatically
' during initialization to create menu items
Sub Init
'addMenuItem "Menu item", "Sub menu if wanted", "Name of Function to Call"
addMenuItem "Click me to start the script", "Sub menu 1", "DoIt"
End Sub
'==================================================
Sub DoIt
Set editor = newEditor() 'new editor object
editor.assignActiveEditor() 'work with active document
vText = editor.selText() 'put selected text in variable vText
' here do something with this selected text
' e.g. splitt selected text into lines
vArrayLines = Split(vText, vbCrlf)
' or ask something the user
vUserInput = InputBox("Input the value...", "My Title","1")
MsgBox "You entered: " & vUserInput,16,"Hello"
' collect all lines together
For i = 0 To UBound(vArrayLines)
If Not i = UBound(vArrayLines) Then
vStringList = vStringList & vArrayLines(i) & vbCrLf
Else
vStringList = vStringList & vArrayLines(i)
End If
Next
'put the text back to the active document
editor.selText vStringList
Set editor = Nothing
End Sub 'DoIt
'====================================================
'<EOF>================================================
Just search the forum for scripts and learn from it.
Script Language Reference ==> http://gogogadgetscott.info/pspad/functions.htm
Macro commands ==> http://gogogadgetscott.info/pspad/macroprikaz.htm
PSPad Scripts ==> http://www.pspad.com/de/pspad-extensions.php
--
<http://forum.pspad.com/read.php?2,42293,42298>
PSPad freeware editor http://www.pspad.com
