ZXNet эхоконференция «code.zx»

Хаюшки, All! Вот "дока" на команды ББСи... ╔══════════════ начнём отсюдава ══════════╗ константы начинаются с символа "`" переменные начинаются с символа "@" метки начинаются с символа "_" коментарии начинаются с символа ";" команды начинаются с начала строки, параметры отделяются пробелом. в качестве параметров могут использоваться текст, константы и переменные ***************************************** команды: вывод строки в лог . строка вывод строки в линию < строка переход goto metka переход по счетчику если число больше чем кол-во меток - не переходить. переход на metka1 по #00 goto on #? metka1 metka2 metka3 .... вызов п/п call metka возврат из п/п ret запрос пароля, если пароль не найден, то переход на метку password err_metka окончание связи off_line ожидание клавиши в течении некоторого времени (в тиках). код клавиши пере- носиться в переменную chr wait time сравнения варианты условия '=' равно '!' не равно '>' больше сравнение '<' меньше / _кодов_ символов перход по условию if <операнд> <условие> <операнд> <метка> вызов п/п по условию ifcall <операнд> <условие> <операнд> <метка> перейти на другой диск disk D: вызов и запуск оверлея overlay D:12345678~9 подгрузка файла в рабочий буфер оверлеев и его выполнение. в переменную #? заноситься код: 0 - ок, 1 - нет файла, 2 - слишком длинный, 3 - ошибка insert D:12345678~9 #? загрузить файл в файловую страницу по адресу addr. в переменную #? заноситься код: 0 - ок, 1 - нет файла, 2 - слишком длинный, 3 - ошибка load D:12345678~9 addr #? вызвать п/п в машинных кодах в файловой странице по адресу usr addr удалить файлы с _текущего_ диска erase 12345678~9 сохранить лог save_log D:12345678~9 удалить переданые почтовые файлы era_mail удалить последний _закачаный_ файл в переменную заноситься код: 0 - ок, 1 - ошибка (нет файла) era_last #? переименовать файл исходный новый ren 12345678~9 12345678~9 оптимизировать диск move D: передать файлы по маске trans_file D:12345678~9 принимать файлы на диск и именовать как new_name D:12345678~9 передать мыло с диска trans_mail D: загрузить "заборный" файл load_fence D:12345678~9 вывести из "заборного" файла текущее письмо, если писем нет - переход pri_fence metka добавить текст в загруженный "заборный" файл и сохранить его. Если файл не загружен, то команда игнорируется. текстом может быть как строки символов, так и переменные new_fence "юзер:" @date @name 13 $3 выбор эхи номер #? echo #? перейти на след. эху echo+ перейти на предыд. эху echo- вывести за какие числа имеется эха pri_echo вывести за какие числа имеется фэха pri_fecho отметить/снять отметку с текущей эхи mark_echo вывод названий эх и наличие отметок pri_mark ввести текст с линии (строчный редактор) в переменную $? с ограничением на время tim (в тиках) и на размер строки siz (в символах). Окончание ввода - Enter в начале строки (два раза Enter) В числовую переменную #? заносится код: 0 - ок, 1 - время вышло, 2 - много символов, 3 - пустая строка inp_txt $? #? tim siz ввести число с линии 0...99. текущий символ должен быть цифрой, ее заноси в переменную (#?=@key-"0"). если следующий символ цифра - добавить ее (#?=#?*10+@key-"0"), если нет - вернуться inp_num #? очистить строку clr_str $? добавить в строку $? символы. в качестве <символов> может быть текст и переменные add_str $? <символы> записать число 0...255 в переменую num #i 123 увеличить переменную inc #i уменьшить переменную dec #i уменьшить, если не 0 - перейти djnz #i metka сбросить юзерский флаг 00...23 ures?? установить юзерский флаг 00...23 uset?? сбросить все рабочии флаги res_all сбросить рабочий флаг 00...31 res?? установить рабочий флаг 00...31 set?? запрет (#00) / разрешение (#01) команды приема файлов download ? запрет (#00) / разрешение (#01) команды передачи файлов upload ? запрет (#00) / разрешение (#01) команды передачи каталога диска transcat ? прием по одному файла (после приема - стоп) (#01) или оптом (#00) oneload ? прекратить (#00) / разрешить (#01) реагировать на звонки ring ? установить часовую программу по реальному времени: ищется clock_wait со временем равным или большим текущего clock_real ожидани наступления указаного времени (или совпадение, или реальное больше указаного) после чего выполнение продолжается !! 00:00 и т.д. больше чем 22:00 и т.д clock_wait ??:?? переход на новое число - соответствующая коррекция юзер-листа new_day добавить файл в файл лист. задается имя файла, его уровень доступа, статус (запрещенный/нет) и коментарий на файл add_file D:12345678~9 lev stat <коментарий> вовод коментариев на файл(ы) по маске: диск/имя/расшир/дата. можно успользовать "*" - любое. при поиске с датой проходит дата от указаной и выше pri_file D:12345678~9 ??-??-?? ***************************************** фиксированые метки: время истекло _end_time прием/передача: на этот файл не хватит времени _no_time вызывается перед передачей файлов, можно произвести контроль длины помеченых ф йлов, скорости передачи и т.п. _transmit обрыв связи - короткие гудки _no_carrier нет сигнала от юзера _no_answer п/п автосохранение лога _autosave_log обнаружен звонок, трубка снята _ring начало часовой программы _clock описатель имен эх _echo начало рабочей пограммы _main ***************************************** рабочие переменные, вместо них подставляется соотв. значения s строка текста c число / символ (код символа) n двухбайтное число @name s имя/фамилия @passw s пароль @addr s сетевой адрес @phone s телефон @level s уровень @ltime c лимит времени @ftime c оставшееся время @upld n сколько скачал @dwld n сколько закачал @ncall c сколько раз звонил @ldate s дата посл. звонка чч-мм-гг @ltime s время посл. звонка чч:мм @date s текущая дата чч-мм-гг @time s текущее время чч:мм @enum c номер текущей эхи @etxt s название текущей эхи @enew s имя файла для писем в тек. эху @fnew s имя файла для писем в тек. фэху @flag?? c пользовательский флаг 00...23 @nfile s имя закачаного файла @lfile c имеется/нет закачаный файл @key c нажатая клавиша @disk c текущий диск @mark c отмечено файлов @size n отмечено секторов @speed c текущая скорость (номер) @type c тип передачи: 0 - эха, 1 - фэха, 2 - файлы 3 - прямое чтение с диска #? n числовая переменная 0...9 $? s символьная переменная 0...9 @len? c длина текстовой строки ***************************************** флаги: 00 полные/краткие меню 01 автопередача почты 02 автопередача помеченых эх/фэх 03 запрет закачки на "забор" 04 запрет закачки в эхи 05 запрет закачки файлов 06 работа с командами 07 прямой доступ к дискам 08 доступ к диску E 09 передавать фэхи вместе с эхами ***************************************** пример описателя констант: `onln 010 ;задержка входа `delay 123 ;задержка отбоя ***************************************** описатель эх. вначале идет признак закачиваемой фэхи, т.е. если закачивается файл, не проходящий по маске, то он переименовывается в письмо в эху, если проходит по маске, то он переименовывается в письмо в фэху. Далее идет номер эхи (0...F), название эхи, имя файла с эхой/с фэхой. после идут имена файла закачаных писем в эху и в фэху. Для имен закачаный фаайлов можно использовать символы "?", вместо них будет подставляться номер файла. _echo ********~Z 0 SPBZXNET.GENERAL **-GEN~C ** _GEN~Z ??-gen~e ??_gen~z 1 2 3 E F ***************************************** ╚═════════════ на сегодня хватит ═════════╝ Hу вот и всё... С уважением, Aleksandr (*MAS*)