Мы с Какосом основали группу Язык PL/M и старые компы на К580/i8080 для обсуждения этого направления разработки. Прошу желающих присоединяться.
Что нам удалось: собрать при помощи MinGW утилиты - компилятор PL/M 4.0, ассемблер, линкер. Планируем выложить эти наработки в репозиторий. Собрать им "Hello World" для Апогея БК-01.
Код:MY: DO; PUTCH: PROCEDURE(A) EXTERNAL; DECLARE A BYTE; END; DECLARE S ADDRESS; DECLARE (C BASED S) BYTE; S=.('HELLO PLM',0,0); DO WHILE C<>0; CALL PUTCH(C); S=S+1; END; DO WHILE 1=1; END; END; PUBLIC PUTCH CSEG PUTCH: JMP 0F809H END![]()




Ответить с цитированием
Размещение рекламы на форуме способствует его дальнейшему развитию 
