Moderator: Shaos
Портировал на фасм и добавил внутрь русификацию.
совсем не нарошно... FORTH для "Специалиста" у меня оказался вот такой: А словарный запас у него следующий:Lavr wrote:...и неожиданно я обнаружилу себя на диске FORTH для "Специалиста".
Надеюсь, что описание FORTH для "РК-86" подойдёт...
Собственно говоря, вновь поковыряться с FORTH-ом меня сподвигла прочитанная где-то фраза, что ФОРТ со всем своим "блэкджеком и плюшками" может занимать ВСЕГО 1 КБайт.Н. ШИХОВ wrote:Предлагаемая читателям версия языка ФОРТ не единственная, адаптированная для «Радио 86РК». У автора имеется версия ФОРТ системы разработанная в НИИСЧЕТМАШ ЛГУ. Она выполнена в строгом соответствии со стандартом FORTH 83, имеет объем 14 Кбайт и словарь примерно из 500 слов. По мнению автора, владельцами «Радио 86РК» эта программа использоваться на практике не может. Ее словарь перегружен промежуточными словами, не используемыми в прикладных программах, есть слова с одинаковыми функциями. Достоинствами этой версии являются, ее соответствие стандарту, и наличие встроенного ФОРТ АССЕМБЛЕРа. Стандартный строчный редактор ничего кроме сожаления не вызывает.
Язык ФОРТ для Радио-86РК 
Кокой ти умный...Shaos wrote:Распознавалкой распознай
Кунеформ какой-нить, которым в 90х такое распознавалось на ура
Поскольку описания на этот FORTH нет, а автор утверждает, что фактически стандарт FORTH 83,
И у меня возник вопрос ко всем нашим Гуру FORTH-а, вопрос следующего характера...Дёмин wrote:Знаю, что С - это начало всех начал, и при правильном использовании можно писать очень близко по эффективности к ассемблеру. Но, все же есть еще системы, где компилятору С сложно развернуться. Например, захотел я подыскать компилятор С для Intel 8080, чтобы замутить небанальную программу для Радио-86РК. Из реально собираемого я нашел только пару наследников знаменитого Small-C – smallc-85 и smallc-scc3.
Увы, для простейшей программы типа:
main() {
static char a;
for (a = 1; a < 10; ++a) {
++a;
}
}
Генерируется адЪ...
Я, видимо, даже не "начинающий фортер"... но как раз по пути думал, что можно ведь сделать редакторЛуркоморье wrote:...в общем случае начинающий фортер думает также и о том, чтобы сделать в форте всё как у людей. Но через некоторое время начинает уже у людей всё делать как в форте .
Оказалось, что FORTH от г-на Н. ШИХОВа к искомому мной идеалу ВСЕГО 1 КБайт весьма близок!Lavr wrote:Собственно говоря, вновь поковыряться с FORTH-ом меня сподвигла прочитанная где-то фраза,
что ФОРТ со всем своим "блэкджеком и плюшками" может занимать ВСЕГО 1 КБайт.
Вижу что это не так: FORTH.RKS ~ 12 КБайт, FORTH.RKI ~ 16 КБайт, FORTH.RKR ~ 17 КБайт.
И лишь у г-на Н. ШИХОВа FORTH обструган до 4 КБайт, ...
Декомпильнул в черновом варианте, причесываю пока, чтобы правильно собрался.Lavr wrote:Надо, видимо, декомпильнуть этот FORTH сначала, чтобы не заниматься патчами.
Трудно сказать однозначно... идею он наверняка читал в книжках переводных от буржуинов.Shaos wrote:А он самописный или цельнотянутый у буржуинов?
Code: Select all
RAR
RST 7
Это некий аналог функции 0F818H co стоп-байтом 0FFH, который и декомпилируется как RST 7.Lavr wrote:По коду часто встречается что-то типа:Но это точно не оно, на RST 7 этот Форт точно не обращается...Code: Select all
RAR RST 7
Code: Select all
L0860:
POP H ;0860 E1
CALL L0A06 ;0861 CD 06 0A
DB 0AH ;0864 0A 'CR'
DB 25H ;0865 25 '%'
DB 0FFH ;0866 FF stop-byte
L0867:
LXI H,L107E ;0867 21 7E 10
POP PSW ;086A F1
CALL L0A06 ;086B CD 06 0A
DB 0AH ;086E 0A
DB 'stek' ;086F 73 s
;0870 74 t
;0871 65 e
;0872 6B k
DB 20H ;0873 20
DB 'pust' ;0874 70 p
;0875 75 u
;0876 73 s
;0877 74 t
DB 0FFH ;0878 FF stop-byte
JMP L0BEA ;0879 C3 EA 0BА знаешь, что интересно, может быть, он с "Сетуни-70" цельнотянутый ...Shaos wrote:А он самописный или цельнотянутый у буржуинов?
