Разработка ЭКВМ на MCS-48

[Mick]

Операций вычитания тут тоже нет.

Запамятовал значит. Помню что когда надо было сравнить два значения, приходилось производить арифметическую операцию, и судя по всему сложения

[dvarkin]

по сути чтоб чтото стоящее из нее слепить, надо обвязки добавить стоко же скоко и для i8080

Схема в draft.pdf - черновик только потому, что не протестирована, а так - обвязки, вроде, не так много, и большинство - узкие корпуса.
К тому же может прокатить идея с ЖКИ через интерфейс-шину РВВ.
Кстати, резисторы, что я поставил на эту шину ввиду квазидвунаправленности порта я не расчитывал, а значние пока выбрал интуитивно - не знаю, как их просчитать - может, вообще придётся ставить какой-нибудь ШФ.

- - - Добавлено - - -

Mick, да как числа сложением сравнить - непонимаю

[Sergei Frolov]

Вот, кстати, для желающих
https://www.avito.ru/sterlitamak/kol...a_mk_898060988

[Mick]

Mick, да как числа сложением сравнить - непонимаю

К числу прибавляешь константу и если результат равен 0, то числа равны

Надо покопаться у себя, должны были остаться мои потуги по этому поводу.

P.S. Мануал на серию MCS-48 - http://bitsavers.trailing-edge.com/c...nual_Jul78.pdf

[rw6hrm]

По интернету ходит прошивка ВЕ48-0000

по объёму не подходит. Это один кБ внутренней памяти, а в калькуляторе две м/с по 2 кБ, итого четыре. Скорее всего это или микроволновка, или клавиатура (что тоже неточно).

- - - Добавлено - - -

Вот, кстати, для желающих

Не, это не впечатляет, особенно индикатор. Только самопал, только хардкор.

- - - Добавлено - - -

до проверки на прерывание сигнал, скорее всего, не доживёт

Этим сигналом взводим ТМ2, а после прочтения контроллер её сбрасывает. Аналогично подключению D5.2 из схемы http://rw6hrm.qrz.ru/8bitdisp.htm

[dvarkin]

Mick, а может легче сделать такую подпрограмму:

MOV R0, #1001b

LOOP:
DJNZ R0, START
RET

START:
CLR F0
CLR F1

MOV A, R1
RRC A
MOV R1, A
JNC NEXTCOMPARE
CPL F0

NEXTCOMPARE:
MOV A, R2
RRC A
MOV R2, A
JNC FLAGSEQ?
CPL F1

FLAGSEQ?:
MOV A, #10b
JF0 NEXTEQ
DEC A
NEXTEQ:
JF1 ENDEQ
DEC A
ENDEQ:
JZ LOOP
ADD A, #10b
JZ LOOP

RET 

Если число в R1 было большим - F0 будет TRUE, Если большим было число в R2 - F1 будет TRUE, если были равны - и F0 и F1 - FALSE

- - - Добавлено - - -

rw6hrm, 74LS74 из Single Step части и есть ТМ2, в схеме переименовать забыл.

Я думал использовать второй триггер от Single Step части схемы, но это уже как-то перебор.

[Advertiser]

[Mick]

Mick, а может легче сделать такую подпрограмму:

может легче, может и нет - сейчас не скажу ибо опыты ставил очень давно.

[dvarkin]

P.S. Мануал на серию MCS-48 - http://bitsavers.trailing-edge.com/c...nual_Jul78.pdf

Так Боборыкин из первого сообщения же получше!)

[Sergei Frolov]

[rw6hrm]

По поводу моих ссылок, что давал на первой странице. В Ульяновском универе перешли на новый движок и основательно почистили контент, на письма по поводу "ввернуть всё в зад" пока не отвечают. Посему ссылка через вебархив 2007 года, http://web.archive.org/web/200710160...start_mk48.htm

- - - Добавлено - - -

Sergei Frolov, жду пзушки, всё равно их ковырять придётся, поскольку в наличии только ВЕ35/48, а в них ОЗУ поменьше. За схему ещё раз спасибо, уже разобрался, что можно выкинуть (это касается 517 серии, и принтер не нужен, и цена ныне зверская).