Электроника-85 vs. DEC Pro-350 + их эмуляция

[Titus]

Так может просто выкладывать сюда по мере разборки листинг который на данный момент получился - может кто еще посмотрит

Он сумбурный, просто дизассемблированный дамп памяти размером 30 с лишним килобайт с некими пометками. К тому же, у меня свой дизассемблер, понятный мне, но не очень дружественный любителям PDP11, с 16-ричными числами и некими сокращениями и упрощениями.

Пример:

7558  17C1 0028       MOV   (#$0028),R1                     
755C  031D            BEQ   $7598                           
755E  1C42 0004       MOV   $4(R1),R2                       
7562  1089            MOV   R2,(R1)                         
7564  0A0A            CLR   (R2)                            
7566  1C43 0006       MOV   $6(R1),R3                       
756A  E083            SUB   R2,R3                           
756C  0A83            INC   R3                              
756E  10F2 0002       MOV   R3,$2(R2)                       
7572  15F1 8080 0044  MOV   #$8080,$44(R1)                  
7578  1042            MOV   R1,R2                           
757A  65C2 000C       ADD   #$000C,R2                       
*757E  10A6            PUSH  R2                              
*7580  15E6 023F       PUSH  #$023F  			; $GTSK (Get Task Parameters)                        
*7584  88FF            EMT   $FF                             
							; Получить 16-словный массив параметров таска по адресу $72F4

							; R2 - указатель на массив параметров
7586  8703            BCS   $758E             		; Если ошибка, то -> $758E              
7588  1CB1 000E 0044  MOV   $E(R2),$44(R1)     		; Параметр 7 (User Identification Code) -> ($72E8 + $44)
             
758E  15F1 FFFF 0028  MOV   #$FFFF,$28(R1)                  
7594  0A31 003E       CLR   $3E(R1)                         
7598  0087            RTS

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

Пока что уперся в сообщение: PASCAL -- Fatal initialization error

[form]

Он сумбурный, просто дизассемблированный дамп памяти размером 30 с лишним килобайт с некими пометками. К тому же, у меня свой дизассемблер, понятный мне, но не очень дружественный любителям PDP11, с 16-ричными числами и некими сокращениями и упрощениями.

Пример:

7558  17C1 0028       MOV   (#$0028),R1                     
755C  031D            BEQ   $7598                           
755E  1C42 0004       MOV   $4(R1),R2                       
7562  1089            MOV   R2,(R1)                         
7564  0A0A            CLR   (R2)                            
7566  1C43 0006       MOV   $6(R1),R3                       
756A  E083            SUB   R2,R3                           
756C  0A83            INC   R3                              
756E  10F2 0002       MOV   R3,$2(R2)                       
7572  15F1 8080 0044  MOV   #$8080,$44(R1)                  
7578  1042            MOV   R1,R2                           
757A  65C2 000C       ADD   #$000C,R2                       
*757E  10A6            PUSH  R2                              
*7580  15E6 023F       PUSH  #$023F  			; $GTSK (Get Task Parameters)                        
*7584  88FF            EMT   $FF                             
							; Получить 16-словный массив параметров таска по адресу $72F4

							; R2 - указатель на массив параметров
7586  8703            BCS   $758E             		; Если ошибка, то -> $758E              
7588  1CB1 000E 0044  MOV   $E(R2),$44(R1)     		; Параметр 7 (User Identification Code) -> ($72E8 + $44)
             
758E  15F1 FFFF 0028  MOV   #$FFFF,$28(R1)                  
7594  0A31 003E       CLR   $3E(R1)                         
7598  0087            RTS

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

Пока что уперся в сообщение: PASCAL -- Fatal initialization error

Очень неудобно смотреть - в шестнадцатеричном виде теряется наглядность и охрененно затрудняется запрос хелпа по директивам. Когда я пишу в интеле или просто на C (кроме кода, относящегося к PDP-11), я использую шестнадцатеричные числа для нагладности, но использовать их для потери таковой...

[Titus]

Очень неудобно смотреть - в шестнадцатеричном виде теряется наглядность и охрененно затрудняется запрос хелпа по директивам. Когда я пишу в интеле или просто на C (кроме кода, относящегося к PDP-11), я использую шестнадцатеричные числа для нагладности, но использовать их для потери таковой...

Для меня восмиричные числа - абсолютно нечитаемые. И логично, что для себя я сделал именно такой дизассемблер.

[form]

Для меня восмиричные числа - абсолютно нечитаемые. И логично, что для себя я сделал именно такой дизассемблер.

Я тоже работал с шестнадцатеричными числами во много раз больше чем с восьмеричными несмотря на солидный стаж PDP-11 (единственная архитектура где я применяю восьмеричку, а их было много), но тем не менее я от этого не пытаюсь переводить вообще все в шестнадцатеричную систему: это всего лишь приведет в данном случае к отсутствию наглядности (переводить код в инструкции и даже просто узнать код который ошибочно [не]дизассеблировался придется с вычислениями), а уж когда дело доходит до понимания что собственно делается - начинается полное счастье так как в справочниках и доках разумеется все в восьмеричном

Вот если бы речь шла о том, чтобы с этими числами вычисления проводить или разбирать на отдельные байты - тут был бы смысл

[anasana]

Есть задачка важная, может кто-то сможет помочь - очень нужно "починить" один файлик из набора автотеста, т.к. загрузка Э-85 затыкается на проверке КС одного модуля.
Разные цитаты:
;ПРОИЗВЕСТИ КОНТРОЛЬНОЕ СУММИРОВАНИЕ СОДЕРЖИМОГО ПЗУ МОДУЛЯ
;КОЛИЧЕСТВО СУММИРУЕМЫХ ЯЧЕЕК РАВНО СОДЕРЖИМОМУ БАЙТА 7 ПЗУ, УМНОЖЕННОМУ НА 200

В R0 - уже занесена емкость ПЗУ (из мл. и ст. байтов 6,7), это число известно заранее и прописано в этой же ПЗУ
Дописал, как, я понимаю, там проводится эта проверка:

BIS		#-1,1020 (либо MOV	#177777,1020) ; начальное значение в рабочей ячейке КС
1S: MOV		#200,R1	; Начинаем новый цикл по 200 байт
	2S: MOVB	174200,1022 ; каждое чтение по адресу слота 174200 даст следующий байт из содержимого ПЗУшки
		MOVB	174200,1023 ;                (там аппаратно увеличивается внутренний указатель на данные)
		MOV		1022,R2 ; таким образом считали 2 байта из ПЗУ
			; сама кухня КС:
			XOR	R2,1020 ; "Исключающее ИЛИ" считанных 16 бит (R2) и накопительным значением текущей КС (содержимым 1020)
			CLC 			; очистили флаг переноса
			ROL	1020		; сдвинули влево накопительное значение текущей КС (повышаем надёжность?)
			ADC	1020		; (зачем-то прибавили туда перенос)
		SOB	R1,2S	; R1-- 200 раз пока не == 0
	SOB	R0,1S		; R0--, достигли окончания данных в ПЗУ? (зависит от емкости ПЗУ)
	TST	1020		; КС=0? ДА - ОК, ЕСЛИ НЕТ - ОШИБКА КС СОДЕРЖИМОГО ПЗУ МОДУЛЯ

В общем как можно узнать _какое именно_ значение КС (т.е. два байта) _должно быть записано_ в конец ПЗУ что бы TST 1020 в итоге дал 0?..
В идеале переписать бы на С пример для универсального подсчета по массиву байтов .
В аттаче - корректные файлы ПЗУ для примеров, ну и описание полей...

[Titus]

			CLC 			; очистили флаг переноса
			ROL	1020		; сдвинули влево накопительное значение текущей КС (повышаем надёжность?)
			ADC	1020		; (зачем-то прибавили туда перенос)

Эта конструкция равносильна обычному циклическому сдвигу влево, но без бита переноса. А так как ROL через бит переноса, то идет пред и посткоррекция.
Т.е. весь алгоритм подсчета контрольной суммы - это:
1) a = a ^ b
2) a = a rol 1 (циклический сдвиг без бита переноса)

---------- Post added at 22:33 ---------- Previous post was at 22:29 ----------

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

---------- Post added at 22:35 ---------- Previous post was at 22:33 ----------

На Си, очевидно, алгоритм подсчета будет выглядеть так:

unsigned short a, b;

a = a ^ b;
a = (a << 1) | (a >> 15);

[Advertiser]

[anasana]

Давно хотел выложить маленькую антологию плат сопроцессора MS-DOS для Электроники 85:

плата БA-86M (на плате маркировка дат: 29.02.8_(последняя цифра непонятная то ли 8 то ли 9))


Описание в прошивке: 052291 "ЦНИИ ЦИКЛОН"; дата биоса: 22/05/91. (разогнанный вариант, 640К ОЗУ)

плата МС-1702 (на плате маркировка дат: 29.06.88):



платы МС-1702 (на платах маркировка дат: 9.10.90):


Описание в прошивках: 030387 "ЦНИИ ЦИКЛОН"; дата биоса: 17/11/88

[anasana]

Продолжу...
Следующий сет: Контроллер МОС-80 (БА-80), аналог PRO-CP/M (PC3XS-AA) Card ID: 000043
Плата 7.102.291 (на базе CPU Z80):



Характеристики:


Операционная система CP/M-80:




ОС МОС-80 (адаптация МЭП СССР, ИПИ АН СССР)

[Denkixot]

Сейчас позвоним...

[dk_spb]

Сейчас позвоним...

"Аллё! Это СССР? "