[PDP11] Программисты, желающие подумать, нужна ваша помощь...

Нужно решить задачу с помощью утилиты PDP11 .
Задача: Записать в регистр R1 число нулевых элементов массива X.

Посмотрим кто достоин звания программиста на РБ...

 

@Миднайтко

 

Я здесь причем? Я не пишу на низкоуровневых языках. Судя по всему, это эмулятор DEC'а И, думаю, что там ассемблер.

 

@HoShiMin

 

Эта штука 16-битная, на своей восьмёрке не могу запустить, а виртуалку ставить долго. Что хоть внутри там? Если действительно асм, могу накидать асмовый шелл-код, а ты его подгонишь под свой PDP.
Допустим, у тебя уже есть указатель на начало массива, все элементы в нём имеют один размер (2 байта, стандарт для х16, что в переводе на человеческий - тип Word). И также ты знаешь количество элементов в массиве.

Код:

ArraySize dw ? ; Здесь количество элементов
ArrayPtr dw ? ; Указатель на первый элемент массива

; Поехали!
start:
  xor R1, R1 ; Обнуляем регистр R1
  mov si, [ArrayPtr]
  xor cx, cx

@Loop:
  ; Сравниваем элемент с нулём:
  mov ax, [si + cx * 2]
  test ax, ax
  jz @IncCounter

  jmp @Continue

; Если ноль - увеличиваем счётчик:
@IncCounter:
  inc R1
  jmp @Continue

@Continue:
  ; Дошли ли до конца массива:
  inc cx
  cmp cx, [ArraySize]
  je @Exit
  jmp @Loop


@Exit:
  ; Массив закончился, в R1 - количество нулевых элементов
  ret

Хз, есть ли в PDP x86-регистры, если нет, то "ax", "si" замени на нужные (какие-нибудь R2, R3 и т.д.)

 

Вот что это:

 

Вот на кой хрен на мехмате учат никому не нужный PDP вместо настоящего, полезного в быту асма? Голову только забивают всякой бесполезной чепухой.

 

К сожалению только 32бит системы. Самому пришлось у друга на ноуте запускать...

 

А сам язык - ассемблер? Или тоже какой-то свой алгоритмический псевдокод? Если асм, то просто в моём коде поменяй названия регистров на R2, R3 и готово. Метки и прочие базовые вещи он должен понимать.

 

Да он самый... Спасибо за скрипт... может быть поможет...
Спасибо, @HoShiMin, я разобрался, благодаря твоему скрипту.

 

Значит теперь я достоин звания программиста на РБ Требую плашку "Uber coder"
P.S.: скрипт на асме...

 

Ubersoldier

 

Ubersoliter.