mozers Реально крут!!!
сдам еще пару пустяковых скриптов )))
скрипт 1
--//============================================================================
--// трасировка выделенного текста в коды ASCII
--//============================================================================
local str = editor:GetSelText()
if string.len(str) > 0 then
print('>ASCII code')
for i = 1, string.len(str) do
local strS = string.sub(str,i,i)
local strB = string.byte(strS,1)
print('['..strS..'] '..strB)
end
end
скрипт 2 (работает по F5), ещет вхожения строки str0 или str1 и взависимости от них запускает бровзер
command.go.subsystem.$(file.patterns.web)=3
command.go.$(file.patterns.web)=dofile $(SciteDefaultHome)\lua\asp_browse.lua
--//============================================================================
--// запуск на исполнение страниц asp
--//============================================================================
local str0 = '\\адрес 1\\'
local str1 = '\\адрес 2\\'
local f = props['FilePath']
local s,e,path,file = string.find(f,str0..'(.*)')
local target = 'localhost'
if path == nil then
target = 'server'
s,e,path,file = string.find(f,str1..'(.*)')
end
if path ~= nil then
local target = ('http://'..target..'/'..path)
local browser = ('explorer ' .. target .. ' &')
os.execute(browser)
else
print('! Path template not found')
end
так же есть еще развернутая vbscript.api
Добавлено: + еще раз повторюсь (оригинал 16.12.2005)
Да тишина....
Сделал еще одну полезняшку, автозакрытие символов, как все оказалось просто
startup.lua
Цитата:
function SymbolAutoClose(charAdded,symS,symE,pos)
if charAdded == symS then
editor:InsertText(pos,symE)
end
return 0
end
function OnChar(charAdded)
local pos = editor.CurrentPos
SymbolAutoClose(charAdded,'(',')',pos)
SymbolAutoClose(charAdded,'"','"',pos)
SymbolAutoClose(charAdded,'[',']',pos)
SymbolAutoClose(charAdded,'{','}',pos)
SymbolAutoClose(charAdded,"'",string.char(39),pos)
end