The OpenNET Project / Index page

[ новости /+++ | форум | теги | ]



"Microsoft открыл код MS-DOS 1.25 и 2.0 под лицензией MIT"
Версия для распечатки Пред. тема | След. тема
Форум Разговоры, обсуждение новостей
Исходное сообщение [ Отслеживать ]
Присылайте удачные настройки в раздел примеров файлов конфигурации на WIKI.opennet.ru.
. "Microsoft открыл код MS-DOS 1.25 и 2.0 под лицензией MIT" +1 +/
Сообщение от Аноним84701 (ok), 29-Сен-18, 16:45 
> Такой вопрос, если ОС написана на асемблере, то зачем нужны исходники?

В нехелловордах именные костанты и лейблы, вместе с комментариями, очень упрощает поддержку (да и само написание).


virtual at bx
HASH_LIST.drive db ?
HASH_LIST.hash db(HASH_SIZE) dup(?)
HASH_LIST.hash_size = $-HASH_LIST.hash
HASH_LIST.size = $-HASH_LIST.drive
HASH_LIST.hash_pos = HASH_LIST.hash-HASH_LIST.drive
end virtual
...
macro cui_ini_func
{
  push VIDEO_MEM
  pop es
;clear screen
  xor di,di
  mov cx,VIDEO_MEM_PAGE_SIZE
  xor ax,ax
  rep stosw
;menubar
  mov ax,CUI_MENU_BAR_COLORS and 0ff00h ;set ah=color and al=0
  xor di,di
  mov cx,LINE_LEN

...
;*******************************
;get hash
;dl: hdd number
;return: bx=hash addr or bx=0 if not found
;*******************************
get_hash:
mov bx,HASH_LIST ;BX=virtual HASH_LIST struc
    mov cl,[HASH_COUNT]
;scan for drive:
.scan:
   test cl,cl
   jne @f
     xor bx,bx
     ret
   @@:
   cmp dl,[HASH_LIST.drive]
   jne @f
     add bx,HASH_LIST.hash_pos
   ret
   @@:
   add bx,HASH_LIST.size
   dec cl
   jmp .scan

;*******************************
;compare hashes
;SI=HDD_LIST
;RETURN: AL=TRUE=0 or FALSE!=0
;*******************************


Ответить | Правка | Наверх | Cообщить модератору

Оглавление
Microsoft открыл код MS-DOS 1.25 и 2.0 под лицензией MIT, opennews, 29-Сен-18, 09:00  [смотреть все]
Форумы | Темы | Пред. тема | След. тема



Партнёры:
PostgresPro
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

Закладки на сайте
Проследить за страницей
Created 1996-2024 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру