PSPad extension announcement

pspad:

mrmilk:

Format, clean-up, beautify and standardize your php code with a comprehensive set of 34 options. A single 50Kb file that will highly improve the quality of your code. 3 operation modes: web interface, command line and PSPad integration.

Thank you. I granted you access to PSPad extension page (PSPad web). You can upload your extension there.

I have already uploaded to the extensions section. Thank you for your continued support to the product.

Edited 1 time(s). Last edit at 2007-11-28 06:37 by mrmilk.

New extension JSpacker available at the usual location : www.pspad.com

Function
Javascript packer will packed your Javascript files to lower filesize. It supports two of the most popular packers at the moment: Yahoo packer and Dean Edwards PHP packer.

It will also gzip files for real world comparison and show a table in the Log window with filesizes.

Installation:
unpack into \PSPad\Script\JScript and edit header of script for proper path-settings.

Requirements:
Needs installation of Javacript packers:
- the Yahoo compressor: developer.yahoo.com;
Optionally:
- PHP Packer of Dean Edwards : joliclic.free.fr;
- PHP executable;
- 7-zip to compress gzip files www.7-zip.org;

Note:
It's interesting to see that gzipped Yahoo packed files are often smaller then PHP-packer packed files while with uncompressed packed files, it's the opposite.

Hi to all

I'd made a little script really usefull for me.
It put or remove the ' sign for commenting or decommenting block of line in a vbscript or visual basic files.

Hope it can be usefull.

'*******************************************************************************
' Filename : AddRemoveVbsComment.vbs
'
' Description : Put or Remove a Vbs's remark at the biginning
' of every selected lines
'
' Created : 26 October 2007
' Created by : LordMax aka Max Enrico from Italy
'
' Note : This extension detect only the first selected line of code.
' Be sure that's the one you want!
' P.S. I'm using CTRL+ALT+M for this function 'cause is good
' for me. You're free to change the combination like you want
'
' You may distribute this script freely, but please keep this header intact.
'*******************************************************************************
Option Explicit

Const MODULE_NAME = "AddRemoveVbsComment"
Const MODULE_VER = "0.1"
Const MODULE_TITLE = "Add or Remove Vbs comment mark"

Sub Init
addMenuItem MODULE_TITLE, "Utilities", MODULE_NAME, "CTRL+ALT+M"
End Sub

' Detect if remarks are present or not and call the right sub
Sub AddRemoveVbsComment()
Dim editor
Dim strInput

Set editor = newEditor()
editor.assignActiveEditor
strInput = editor.selText

if left(strInput, 1) = "'" then
call Removevbscomment
else
call Addvbscomment
end if

End sub

Sub Addvbscomment()
Dim editor
Dim strInput, strTemp
Dim intCount, intPos

Set editor = newEditor()
editor.assignActiveEditor
strInput = editor.selText

If Len(strInput) > 0 Then
strInput = "'" & strInput
intCount = Len(strInput)
intPos = instr(1, strInput, chr(10))
do until intPos=0
strTemp = left (strInput, intPos) & "'" & right (strInput, intCount - intPos)
strInput = strTemp
intCount = Len(strInput)
intPos = instr(intPos +1, strInput, chr(10))
loop
' used to verify if selection is at the biginning of the line or not
if instr(intCount-1, strInput, chr(10)) then
editor.selText (left (strInput, intCount-1)) ' 'cause it place another remark at the end of the line
else
editor.selText strInput
end if
Else
MsgBox "Please select some text... ", 48, MODULE_TITLE
End If
Set editor = Nothing
End Sub

Sub Removevbscomment()
Dim editor
Dim strInput, strTemp
Dim intCount, intPos

Set editor = newEditor()
editor.assignActiveEditor
strInput = editor.selText

If Len(strInput) > 0 Then
if instr(1, strInput, "'") = 1 then ' to remove first remark
strInput = right(strInput, Len(strInput)-1)
end if
intCount = Len(strInput)
intPos = instr(1, strInput, "'")
do until intPos=0
if intPos > 1 then
if mid (strInput, intPos-1, 1) = chr(10) then
strTemp = left (strInput, intPos-1) & right (strInput, intCount - (intPos))
strInput = strTemp
intCount = Len(strInput)
end if
end if
intPos = instr(intPos+1, strInput, "'")
loop
editor.selText strInput
Else
MsgBox "Please select some text... ", 48, MODULE_TITLE
End If
Set editor = Nothing
End Sub

lordmax, thank you for sharing your script to the community. However please note, this command is built in to PSPad. See gogogadgetscott.info > Add/Remove Comment (Shift+Ctrl+A)

lordmax:

I'd made a little script really usefull for me.
It put or remove the ' sign for commenting or decommenting block of line in a vbscript or visual basic files.

Duplicate selection or current line, if no selection

Duplicate.js
// JavaScript Document
//*******************************************************************************
// filename : duplicate.js
// description: Duplicate selection or current line, if no selection
// created : 13.12.2007
// author : Michael Vlasov
//
// You may distribute this script freely, but please keep this header intact.
//*******************************************************************************
var MODULE_NAME = "Duplicate";
var MODULE_VER = "1.0";
var MODULE_TITLE = "Duplicate selection or current line, if no selection";
function Init() {
menuName = "&" + MODULE_NAME;
addMenuItem(menuName, "", "main", "CTRL+D");
}

function main() {
var ed = newEditor();
ed.assignActiveEditor();
var selection = ed.selText();
if(selection != "") {
ed.selText(selection + selection);
}
else {
selection = ed.lineText();
var saveCaretX = ed.caretX();
ed.caretX(selection.length + 1);
ed.selText("\r\n" + selection);
ed.caretX(saveCaretX);
}
}


What is the difference to PSPad function Duplicate line?

gogogadgetscott:

lordmax, thank you for sharing your script to the community. However please note, this command is built in to PSPad. See gogogadgetscott.info > Add/Remove Comment (Shift+Ctrl+A)

lordmax:

I'd made a little script really usefull for me.
It put or remove the ' sign for commenting or decommenting block of line in a vbscript or visual basic files.

StraGulp.

I'd work for many hours to make that unuseful script.
Sigh
^___^

Well, good experience.

Thanks

pspad:

What is the difference to PSPad function Duplicate line?

Duplicate selection work same as duplicate line only if current selection is empty.
If current selection is not empty (for example one word or more than one line), then selected text is duplicated (not current line).

Edited 1 time(s). Last edit at 2007-12-17 05:31 by Michael Vlasov.

The script below closes current file with some additional behaviour: if closed file was last, script closes PSPad window too.
// JavaScript Document
//*******************************************************************************
// filename : SmartClose.js
// description: Smart file closing
// created : 13.12.2007
// author : Michael Vlasov
//
// You may distribute this script freely, but please keep this header intact.
//*******************************************************************************
var MODULE_NAME = "SmartClose";
var MODULE_VER = "1.0";
var MODULE_TITLE = "Close current file and PSPad if no files opened.";
function Init() {
menuName = "&" + MODULE_NAME;
addMenuItem(menuName, "", "main", "ESC");
}

function main() {
var count = editorsCount();
var ed = newEditor();
ed.assignActiveEditor();
if(ed.closeFile()) {
if(count <= 1) {
var shell = new ActiveXObject("WScript.Shell");
shell.SendKeys("%{F4}");
}
}
}

I work with SourceSafe on a daily basis and I've always wanted to be able to control all the files in a project directly from PSpad, but the lack of a "SourceSafe Tab" has hampered me. A little while ago grigri released a groundbreaking Recent Files Tab and since then I've been working on complete SourceSafe integration, and I think I'm just about there.

It supports check in & out, get latest, adding and deleting files from source safe, pinning and unpinning to/from old versions, showing the complete file version history, and pulling an old version (e.g. to compare changes or get an unbroken version if someone's been less than helpful). It even shows files that are out of sync between your local copy and the version in SourceSafe.

You can perform actions on a single file, a project folder (i.e. from the project tree, not a folder on the disk) or the entire project, as well as on the active file or all open files.

Feel free to try it. If you find a bug please post it on this thread... and try to include the information you'd want to see as a developer (no crash logs though if any are generated). I've been using it without any problems now for several months since the initial build.

Don't forget to register the DLL (details are in the read me file).

Download: PSPadSourceSafeTab_Deploy.zip