На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
! Перед отправкой сообщения внимательно прочтите правила раздела!!!
1. Запрещается обсуждать написание вирусов, троянов и других вредоносных программ!
2. Помните, что у нас есть FAQ раздела Assembler и Полезные ссылки. Посмотрите, возможно, там уже имеется решение вашего вопроса.

3. Настоятельно рекомендуем обратить особое внимание на правила форума, которые нарушаются чаще всего:
  3.1. Заголовок темы должен кратко отражать её суть. Темы с заголовками типа "Срочно помогите!" или "Ассемблер" будут отправляться в Корзину для мусора.
  3.2. Исходники программ обязательно выделяйте тегами [code]...[/code] (одиночные инструкции можно не выделять).
  3.3. Нежелательно поднимать старые темы (не обновлявшиеся более года) без веской на то причины.

Не забывайте также про главные Правила форума!

Добро пожаловать и приятного вам общения!!! ;)
 
Модераторы: Jin X, Qraizer
  
> MASM
    Здравствуйте уважаемые.Есть у меня пакет masm 6.14.8444.Командую ml /fl /zi prg_11 >p но исполняемый модуль не получается.В чем дело? :unsure:
      ошибки есть значит

      что выдается?
        Да я смотрю ты с ТАСМ на МАСМ прыгнул хорошо, не изучив даже того. И вобще напиши опшипку. И код того самого модуля, который собирается стать исполняемым тоже выложи.
          Никаких сообщений нет.А вот текст программы
          ExpandedWrap disabled
            .model  small       ; модель памяти
            .data               ; сегмент данных
            message db  0dh,0ah,'I am ready to receive your variant of signed decimal number (to finish press Enter): $'
            message_Invalid_Number  db  0dh,0ah,'Your input is bed, please input your number again or press Enter. $'
            good_luck_message   db  0dh,0ah,'Your number is: '
            input_string    db  10 dup (20h)    ;строка для ввода 9 цифр и знака
                db  0dh,0ah,'Thank you for use this program. I wish you good luck...$'
            .stack  256h        ; сегмент стека
            .code               ; сегмент кода
            GetNextChar proc
                mov ah,1    ;чтение символа из стандартного ввода
                int 21h ;символ в al
                ret
            GetNextChar endp
            main    proc        ; начало процедуры main
                mov ax,@data    ; заносим адрес сегмента данных в регистр ax
                mov ds,ax       ; ax в ds
                mov ah,9
                lea dx,message
                int 21h         ; вывод сообщения на экран
                xor si,si   ;подготовка индексного регистра si
                call        GetNextChar ;ввод первого символа в al
            .if (al=="+" || al=="-" || al>=30h && al<=39h)
                mov input_string[si],al
                inc si
            .else
                jmp bed_end
            .endif
            .while si<9
                call        GetNextChar ;ввод очередного символа в al
            .if (al>=30h && al<=39h)
                mov input_string[si],al
                inc si
            .continue
            .elseif al==0dh
            .break
            .else
                jmp bed_end
            .endif
            .endw
                mov ah,9
                lea dx,good_luck_message
                int 21h         ; вывод сообщения good luck_message на экран
                jmp exit_prog
            bed_end:
                mov ah,9
                lea dx,message_Invalid_Number
                int 21h         ; вывод сообщения message_Invalid_Number на экран
            exit_prog:
                call        GetNextChar ;задержка до ввода любого символа
                mov ax,4c00h    ; пересылка 4c00h в регистр ax
                int 21h         ; вызов прерывания с номером 21h
            main    endp        ; конец процедуры main
            end main                ; конец программы с точкой входа main

          :unsure:
          Сообщение отредактировано: Supervisor -
            Цитата Zorg @
            Командую ml /fl /zi prg_11 >p но исполняемый модуль не получается.В чем дело? :unsure:


            А ключи не чувствительны к регистру?
            ml /Fl /Zi prg_11.asm >p
              ПРИВЕТ ВСЕМ ! Подскажите кто знает как ветвь из регистра в фаил скопировать
              использую MASM .
                  Соломон, спасибо за отклик, но речь шла о том чтобы программа экспортировала
                  указанную ветвь реестра в отдельный файл .txt или .reg не важно.
                    Короче проблему я решл, если кому надо ниже код. Как говорится о
                    привилегиях без лишних слов :
                    advapi32.lib
                    .Data?
                    hoop DWord ?
                    .Data
                    FILE DB "key", 0
                    Path DB "SOFTWARE\\Microsoft\\Windows\\CurrentVersion", 0

                    Local handle:HANDLE
                    Local tp:TOKEN_PRIVILEGES

                    Invoke RegOpenKeyEx, HKEY_LOCAL_MACHINE, Addr Path, 0, KEY_ALL_ACCESS, Addr hoop
                    .If Eax == ERROR_SUCCESS
                    Invoke GetPlatform, NULL
                    .If Eax != ecWin95 && Eax != ecWin98
                    Text szSHN, "SeBackupPrivilege"
                    Invoke GetCurrentProcess
                    Mov Edx, Eax
                    Invoke OpenProcessToken, Edx, TOKEN_ADJUST_PRIVILEGES Or TOKEN_QUERY, Addr handle
                    Invoke LookupPrivilegeValue, NULL, Addr szSHN, Addr tp.Privileges.Luid
                    Mov tp.PrivilegeCount, 1
                    Mov tp.Privileges.Attributes, SE_PRIVILEGE_ENABLED
                    Invoke AdjustTokenPrivileges, handle, FALSE, Addr tp, SizeOf tp, NULL, NULL
                    Mov Eax, [hoop]
                    Invoke RegSaveKey, Eax, Addr FILE, 0
                    Invoke RegCloseKey, Addr hoop
                    Invoke Sleep, 500
                    Роботает на всех машинах только фаил создаётся в какомто странном формате
                    может с этим кто поможет !?
                    0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
                    0 пользователей:


                    Рейтинг@Mail.ru
                    [ Script execution time: 0.0801 ]   [ 15 queries used ]   [ Generated: 13.09.26, 23:30 GMT ]