Часть 3.
Примеры.
1. Запись чара в пклист.
function Addpklist(name,why)
{
var fso = new ActiveXObject("Scripting.FileSystemObject");
var file = fso.OpenTextFile("pklist.txt",8);
file.WriteLine(""+Date()+"" + name + " : " +why+".");
file.Close();
}
для этого в папке JMC должен быть создан фаил pklist.txt
для того чтобы вызвать функцию допустим создаем алиас
#al {+пкл} {#s Addpklist("%1";"%%2")}т.е вводим +пкл Вася убийца и в файл добавляеться запись
для просмотра пишем другой скрипт:
function Pklist(name)
{
var s='';
var fso = new ActiveXObject('Scripting.FileSystemObject');
var p = fso.OpenTextFile("pklist.txt");
while(!p.AtEndOfStream)
{
s = p.ReadLine();
if(s.match(name) != null)
jmc.Showme(s);
}
p.Close();
}
и пишем алиас
#al {мойпкл} {#s Pklist("%0")} теперь если мы просто введем мойпкл то нам выведеться весь фаил. а если введем допустим мойпк вас нам выведеться все строки где содержиться слово или часть слова "вас".
2. Проигрывание звуковых файлов.
Пришлось чуток помучаться дабы облегчить как-то себе жизнь и вот что получилось
1 скрипт это создание плейлиста
function Playlist() {
var o = new ActiveXObject("Scripting.FileSystemObject");
var d = o.getFolder("E:\\Музыка\\System of A Down\\"); --тут указы
var e = new Enumerator(d.Files); вается где
var WShell = new ActiveXObject("WScript.Shell"); лежат звук.файл
var i = 0,a = new Array();
while (!e.atEnd()) {
a[i] = e.item().name;
++i;
e.moveNext()
};
var puk = i;
jmc.showme("---====Плейлист====---");
for(i = 0; i < puk; i++) {
jmc.showme(""+i+":"+a[i], 15);
jmc.setvar("music"+i+"", a[i])
};}
создаем алиас который будет вызывать функцию
#al {плейлист} {#s Playlist()} теперь при вводе плейлист нам будет выводиться наш плейлис
И второй скрипт:
function play(numb){
var WShell = new ActiveXObject("WScript.Shell");
WShell.Run("MPLAY32 /play /close E:\\Музыка\\System of A Down\\"+numb+" ", 0);
}и пишем алиас
#al {плей} {#s function(%0)}
теперь при вводе допустим плей 1 он нам будет проигрывать файл из плейлиста стоящий под номером 1.
На этом пока хватит.
[COLOR="DarkOrangeПишите, что нужно, поможем чем сможем.
"][/color]