Важная информация

User Tag List

Показано с 1 по 10 из 10

Тема: Глубоко задумался над процедурой...или обращение в Вселенскому Разуму

Комбинированный просмотр

Предыдущее сообщение Предыдущее сообщение   Следующее сообщение Следующее сообщение
  1. #1
    Banned Аватар для Orionsoft
    Регистрация
    04.04.2005
    Адрес
    Санкт-Петербург
    Сообщений
    975
    Спасибо Благодарностей отдано 
    0
    Спасибо Благодарностей получено 
    0
    Поблагодарили
    0 сообщений
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Post Глубоко задумался над процедурой...или обращение в Вселенскому Разуму

    которая бы делала следующее:
    на входе 35 байт (280 бит )
    младший бит находится в 7 разряде первого (из 35) байта

    необходимо процесс который :

    последовательно переберёт 280 битную последовательность
    если текущщий бит = 0 то записать номер (слово) этого бита в адрес выходных данных

    т.е. если в 280 битовой последовательности все биты в нуле то на выходе было б 280 слов от нулевого до 280-ого



  2. #1
    С любовью к вам, Yandex.Direct
    Размещение рекламы на форуме способствует его дальнейшему развитию

  3. #2
    Guru Аватар для SAM style
    Регистрация
    28.02.2005
    Адрес
    Великий Новгород
    Сообщений
    2,054
    Спасибо Благодарностей отдано 
    10
    Спасибо Благодарностей получено 
    217
    Поблагодарили
    91 сообщений
    Mentioned
    8 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    А что делать, когда бит=1
    Something like thizzz?
    Код:
         ld hl,OutPut
         ld de,0
         exx
         ld hl,Input
         ld b,35
    lab1 ld a,(hl)
         ld c,8
    lab2 rla
         exx
         jr c,lab3
         ld (hl),e
         inc hl
         ld (hl),d
         inc hl
    lab3 inc de
         exx
         dec c
         jr nz,lab2
         inc hl
         djnz lab1
         ret
    Все любят гипножабу

  4. #3
    Banned Аватар для Orionsoft
    Регистрация
    04.04.2005
    Адрес
    Санкт-Петербург
    Сообщений
    975
    Спасибо Благодарностей отдано 
    0
    Спасибо Благодарностей получено 
    0
    Поблагодарили
    0 сообщений
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от SAM style

    А что делать, когда бит=1
    Something like thizzz?
    если бит = 1 то ничего , а как пройдёт последовательность и все =1 записать AAFF например

  5. #4
    Banned Аватар для Orionsoft
    Регистрация
    04.04.2005
    Адрес
    Санкт-Петербург
    Сообщений
    975
    Спасибо Благодарностей отдано 
    0
    Спасибо Благодарностей получено 
    0
    Поблагодарили
    0 сообщений
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    да , нужна и процедура которая делает из результата всё наоборот

  6. #5
    Banned Аватар для Orionsoft
    Регистрация
    04.04.2005
    Адрес
    Санкт-Петербург
    Сообщений
    975
    Спасибо Благодарностей отдано 
    0
    Спасибо Благодарностей получено 
    0
    Поблагодарили
    0 сообщений
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    правильно я раскомментил ?

    Код:
         ld hl,OutPut
         ld de,0   ; счётчик бит ( 0-260 )
         exx
         ld hl,Input
         ld b,35   ; счётчик байт 
    lab1 ld a,(hl)
         ld c,8    ; счётчик бит в байте 
    lab2 rla       : 7 бит в Carry
         exx
         jr c,lab3 ; если Carry =0 ( установлен ) то 
         ld (hl),e ; иначе записывем текущий номер бита в результат 
         inc hl    ; +1 адрес результата 
         ld (hl),d
         inc hl     ; +1 адрес результата
      
    lab3 inc de    ; увеличиваем счётчик бит 
         exx          
         dec c     ; уменьшаем 8 битовый проход 
         jr nz,lab2 ; биты еще остались ?
    
         inc hl     ; перешли к следующему байту последовательности
         djnz lab1
    
         ret

  7. #6
    Guru Аватар для SAM style
    Регистрация
    28.02.2005
    Адрес
    Великий Новгород
    Сообщений
    2,054
    Спасибо Благодарностей отдано 
    10
    Спасибо Благодарностей получено 
    217
    Поблагодарили
    91 сообщений
    Mentioned
    8 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от Orionsoft
    правильно я раскомментил ?
    Всё почти так и есть.
    Только тут:
    Код:
         jr c,lab3 ; если Carry = 1 ( установлен ) то блок пропускается, иначе...
    Последний раз редактировалось SAM style; 12.02.2007 в 23:29.
    Все любят гипножабу

Информация о теме

Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)

Похожие темы

  1. Обращение к модераторам (публичное)
    от Addison в разделе Форум
    Ответов: 37
    Последнее: 03.10.2006, 10:24

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •