Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Последние темы форума

Показать новые сообщения »

Почтовая рассылка

Подписчиков: 11631
Последний выпуск: 19.06.2015

Модуль memory.asm

; Выделить сегмент памяти ####################################################
PROC            GetMemory
   IFDEF GlukOS   ;--- Для ГлюкОСы
                push     es di si cx ax
                mov      cx,0FFFFh
                mov      dx,01000h
                lea      di,[cs:MemoryTable]
                dec      di
gm1:            inc      cx
                inc      di
                add      dx,01000h
                cmp      cx,8
                je       gmerror
                mov      ah,[cs:di]
                or       ah,ah
                jne      gm1
                mov      ah,0FFh
                mov      [cs:di],ah
                pop      ax cx si di es
                ret
   ELSE           ;--- Для ДОСа
                mov      ah,048h
                mov      bx,4096
                int      21h
                jc       gmerror
                mov      dx,ax
                ret
   ENDIF          ;--- GlukOS
gmerror:        xor      dx,dx
                ret
ENDP            GetMemory
; Освободить память ##########################################################
PROC            FreeMemory
   IFDEF GlukOS   ;--- Для ГлюкОСы
                shr      dx,12
                sub      dx,2
                lea      di,[cs:MemoryTable]
                add      di,dx
                mov      [Byte Ptr cs:di],0
                ret
   ELSE           ;--- Для ДОСа
                mov      es,dx
                mov      ah,49h
                int      21h
                ret
   ENDIF          ;--- GlukOS
ENDP            FreeMemory

Оставить комментарий

Комментарий:
можно использовать BB-коды
Максимальная длина комментария - 4000 символов.
 
Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог