lucky_Luk Цитата: Как это сделать - какой тип переменной нужен?...
массив, что бы понять что за числа "извлекаются назад", посмотри Help -> Дополнительная информация -> "Неотложная помощь" по Форту -> 4. Какие типы строк используются в SP-Forth?
Так же
очень полезным будет прочесть 6. А какие еще есть "продвинутые" средства работы со строками?
в том же разделе справки
Цитата: Как сравнить время двух файлов и понять что один новее второго - отнять одно число от другого и проверить не отрицательный ли результат - а как сделать проверку на "отрицательность"?
Все зависет от того в каком формате используется время файла. Смотри Help -> Ключевые слова nnCron -> Работа с датами и временем
а проверка на "отрицательность" - это же сравнение с нулем! Какие здесь могут быть сложности
или я чего-то не понял?
Цитата: ...слова в плагине files_pick вроде не поддерживают маски в именах папок...
заглянул я в
files_pick.spf там ко всем словам есть опция
RECURSIVE - она не то что тебе надо?
Цитата: У меня в задачах часто повторяются абсолютно одинаковые строки. Можно как-то строку один раз написать и сделать на нее ссылку в пределах одной задачи?
конечно, [more=вот пример ]
Код: #( birthdays
OnceADay
<(
: birthdays.txt S" birthdays.txt" ;
VARIABLE fb
CREATE bline 256 ALLOT
CREATE bname 64 ALLOT
VARIABLE bdate
VARIABLE byears
VARIABLE bdays
\ start reminding <pre-period> days before the birthday
5 CONSTANT pre-period
)>
Action:
birthdays.txt R/O OPEN-FILE-SHARED IF DROP ERR-MSG: "Can't open %birthdays.txt% file" EXIT THEN fb !
BEGIN bline 250 fb @ READ-LINE THROW WHILE
bline SWAP
<TIB
get-number Year@ get-number get-number YMD>DATE bdate !
Year@ SWAP - byears !
1 WORD COUNT 63 MIN bname PLACE
CUR-DATE bdate @ DATE- NEGATE DUP 0 > OVER pre-period < AND
IF bdays !
MSG: "Birthday reminder!!!%crlf%%bname COUNT%%crlf%Remining days: %bdays @%.%crlf%Aged: %byears @%.%crlf%Don't forget to send greeting card!"
\ do smth useful here - play a little melody, for example
ELSE DROP THEN
TIB>
REPEAT
DROP
fb @ CLOSE-FILE DROP
)#