WASM.DOS/BIOS/Vesa/ports Для любителей ретро, студентов и ОСе писателей Wed, 20 May 2026 12:44:14 +0000 Wed, 20 May 2026 12:44:14 +0000 WASM https://wasm.in/forums/wasm-dos-bios-vesa-ports.58/ Чем отличаются текстовые режимы 2 и 3 в ДОС? Sun, 30 Mar 2025 00:48:14 +0000 https://wasm.in/threads/chem-otlichajutsja-tekstovye-rezhimy-2-i-3-v-dos.35322/ https://wasm.in/threads/chem-otlichajutsja-tekstovye-rezhimy-2-i-3-v-dos.35322/ invalid@example.com (Intro) Intro Включаются так:
Код (ASM):
  1. mov  ax, 3 ;режим 25х80
  2. int  10h
Вопрос, а чем они отличаются, 0 от 1 или 2 от 3? У Фролова написано так что отличий нет, наверное есть какие-то нюансы.]]> 30 Эффект пламени Fri, 19 Jun 2020 22:04:09 +0000 https://wasm.in/threads/ehffekt-plameni.31839/ https://wasm.in/threads/ehffekt-plameni.31839/ invalid@example.com (_edge) _edge
Древнючий мой исходник лета 2000-го, код без комментариев. Но так даже полезней-интересней, т.к. все стандартно и описано в интернетах, так что придется немного погуглить.

Компилировать:

tasm /m2 phire.asm
tlink /t phire.obj

Код (ASM):
  1. model tiny
  2. codeseg
  3. org 0100h
  4. @strt:
  5. ; vmode
  6. mov ax,0013h
  7. int 10h
  8. mov ax,0a000h
  9. mov ds,ax
  10. mov cx,0040h
  11. ; pal
  12. @lc00:
  13. dec cx
  14. mov dx,03c8h
  15. mov al,cl
  16. out dx,al
  17. inc dx
  18. mov al,00h
  19. out dx,al
  20. out dx,al
  21. mov al,cl
  22. out dx,al...
Эффект пламени]]> 2 HypnoICE.com Гипнодемка из 90-х. Mon, 15 Jun 2020 07:10:01 +0000 https://wasm.in/threads/hypnoice-com-gipnodemka-iz-90-x.33775/ https://wasm.in/threads/hypnoice-com-gipnodemka-iz-90-x.33775/ invalid@example.com (Intro) Intro Пытался разобраться тогда, но ничего не вышло, совершенно ничего не понимал, как это вообще работает. Да же когда начал понимать ассемблер 8086.
Сейчас я смог разобрать её более или менее, когда понял как работают порты I/O.
Разбор программы. Код написан на ассемблере UASM. Код высокоуровненный. Так же переделал в TurboC.
Далее надо...

HypnoICE.com Гипнодемка из 90-х.]]> 1 Космос.exe dos Sun, 03 May 2020 15:39:27 +0000 https://wasm.in/threads/kosmos-exe-dos.33730/ https://wasm.in/threads/kosmos-exe-dos.33730/ invalid@example.com (SDK) SDK Плазма Sun, 03 May 2020 14:37:02 +0000 https://wasm.in/threads/plazma.33729/ https://wasm.in/threads/plazma.33729/ invalid@example.com (SDK) SDK Сброс бита регистра IRR контроллера прерываний 8259A Sun, 09 Sep 2018 09:09:36 +0000 https://wasm.in/threads/sbros-bita-registra-irr-kontrollera-preryvanij-8259a.32896/ https://wasm.in/threads/sbros-bita-registra-irr-kontrollera-preryvanij-8259a.32896/ invalid@example.com (Jin X) Jin X
При появлении запроса на прерывание (IRQ) в регистре запросов прерывания IRR контроллера 8259A устанавливается бит, соответствующий этому прерыванию. Если бит регистра обслуживаемых запросов ISR того же прерывания (и всех более приоритетных) сброшен и прерывание незамаскировано (в IMR или через cli), процессор подтверждает прерывание и соответствующий бит в IRR сбрасывается, а в ISR устанавливается. После отправки команды EOI сбрасывается и бит регистра ISR, разрешая...

Сброс бита регистра IRR контроллера прерываний 8259A]]> 8 Номер текущей строки CRT-луча Thu, 06 Sep 2018 18:29:20 +0000 https://wasm.in/threads/nomer-tekuschej-stroki-crt-lucha.32891/ https://wasm.in/threads/nomer-tekuschej-stroki-crt-lucha.32891/ invalid@example.com (Jin X) Jin X
Кто-нибудь знает, возможно ли прочитать из портов графического адаптера (VGA в частности) номер текущей строки (линии), на которой находится луч?
Задача такая: вешаю обработчик на таймер (IRQ 0) и настраиваю частоту таймера как мне надо (чтобы он вызывался ≈ на каждой строке, на которой находится луч, либо раз в 5 строк). Процедура таймера совершает разные манипуляции (как банальный пример, рисует градиентную полосу с помощью настройки палитры). Зачем таймер?...

Номер текущей строки CRT-луча]]> 5 Рисуем эллипс Thu, 16 Nov 2017 12:53:59 +0000 https://wasm.in/threads/risuem-ehllips.30591/ https://wasm.in/threads/risuem-ehllips.30591/ invalid@example.com (Mikl___) Mikl___ топиком
Для начала строим эллипс инкрементируя [math]Х[/math] от [math]–b[/math] до 0, а для получения [math]Y[/math] используем уравнение эллипса [math]\left (\frac{X}{A}\right )^{2}+\left (\frac{Y}{B}\right )^{2}=1[/math] откуда [math]Y=B\cdot\sqrt{1–\left (\frac{X}{A}\right )^{2}}[/math], для скорости и используя симметрию выводим на экран через Set4Pixels сразу по четыре точки, все лишнее из...

Рисуем эллипс]]> 9 Вывод спирали на экран в DOS Tue, 14 Mar 2017 14:17:27 +0000 https://wasm.in/threads/vyvod-spirali-na-ehkran-v-dos.31994/ https://wasm.in/threads/vyvod-spirali-na-ehkran-v-dos.31994/ invalid@example.com (Mikl___) Mikl___ Вывод спирали на экран в DOS

Теория


Архимедова спираль — спираль, плоская кривая, траектория точки [math]M[/math], которая равномерно движется вдоль луча [math]OV[/math] с началом в [math]O[/math], в то время как сам луч [math]OV[/math] равномерно вращается вокруг [math]O[/math]. Другими словами, расстояние [math]\rho=OM[/math] пропорционально углу поворота [math]\varphi[/math] луча [math]OV[/math]. Повороту луча [math]OV[/math] на один и тот же угол [math]\varphi[/math]...

Вывод спирали на экран в DOS]]> Плавно бегущая строка в текстмоде Thu, 29 Dec 2016 09:46:01 +0000 https://wasm.in/threads/plavno-beguschaja-stroka-v-tekstmode.31862/ https://wasm.in/threads/plavno-beguschaja-stroka-v-tekstmode.31862/ invalid@example.com (_edge) _edge Использованы куски из моей XVGA, писаные ещё в 1992, так что не обессудьте.
В качестве мана пользовал Richard Wilton, "Programmer's Guide to PC and PS/2 Video Programming."

- Charles Cludge

Код (ASM):
  1.     ;FASM - сохранять в cp866
  2.         org 100h
  3.         push    0B800h      ; VRAM seg
  4.         pop es
  5.         call    CopyFont    ; копируем шрифт из знакогенератора в память
  6.         call    TurnCursor  ; выключаем курсор
  7.         call    WidthTo9    ; 9 пикселей на символ, иначе будет...
Плавно бегущая строка в текстмоде]]> Фрактал лист папортника Tue, 27 Dec 2016 07:30:56 +0000 https://wasm.in/threads/fraktal-list-paportnika.31861/ https://wasm.in/threads/fraktal-list-paportnika.31861/ invalid@example.com (Mikl___) Mikl___
Исходный код и сом-файл здесь
Код (ASM):
  1.  
  2. ; masm dos com #
  3. .286
  4. .model tiny
  5. .code
  6.   ClipX2    EQU  640
  7.   ClipY2    EQU  480
  8. org 100h
  9. start:
  10. ;Semilla---------------------------------------------------------
  11. mov ah, 0           ; CLOCK - GET TIME OF DAY
  12. int 1Ah ; Return: CX:DX =...
Фрактал лист папортника]]> Рисование окружности Sun, 25 Dec 2016 16:19:16 +0000 https://wasm.in/threads/risovanie-okruzhnosti.31846/ https://wasm.in/threads/risovanie-okruzhnosti.31846/ invalid@example.com (Mikl___) Mikl___ Рисование окружностиПостроить окружность несложно. У окружности координаты любой точки относительно ее центра вычисляются из соотношения [math]R^{2}=X^{2}+Y^{2}[/math], где [math]R[/math] радиус окружности. С точки зрения программирования достаточно нарисовать [math]\frac{1}{8}[/math] часть окружности, а симметрия закончит дело. В языках программирования высокого уровня существует специальная функция CIRCLE, которая строит окружность либо, вычисляя синус, либо, двигаясь...

Рисование окружности]]> 5 эффект "линза" + сталкивающиеся шары Sat, 24 Dec 2016 07:52:43 +0000 https://wasm.in/threads/ehffekt-linza-stalkivajuschiesja-shary.31856/ https://wasm.in/threads/ehffekt-linza-stalkivajuschiesja-shary.31856/ invalid@example.com (Mikl___) Mikl___ эффект "линза" + сталкивающиеся шары
Если линза на экране - окружность [math](x_{0},y_{0},r_{0})[/math], то в точках [math](x,y)[/math], для которых [math](x-x_{0})^{2}+(y-y_{0})^{2}\leqslant r_{0}^{2}[/math], рисуется точка, которая, если бы линзы не было, изображалась бы в точке [math](x_{0}+(x-x_{0})\cdot k[/math], [math]y_{0}+(y-y_{0})\cdot k)[/math], где [math]k=\frac{const_{1}}{\sqrt{(x-x_{2})^{2}+(y-y_{0})^{2}}+const_{2}}[/math]. Можно заранее рассчитать таблицу смещений...

эффект "линза" + сталкивающиеся шары]]> 1 Эффект дождь Sat, 24 Dec 2016 07:23:16 +0000 https://wasm.in/threads/ehffekt-dozhd.31855/ https://wasm.in/threads/ehffekt-dozhd.31855/ invalid@example.com (Mikl___) Mikl___ Эффект дождь[​IMG]
Размер COM-файла 701 байт. Во вложении исходный текст, картинка в формате PCX и COM-файл
Код (ASM):
  1. ; masm dos com #
  2. .model tiny
  3. .code
  4. .686
  5. org 100h
  6. PALSIZE     equ 256*3
  7. WIDTH_SCREEN    equ 320
  8. HEIGHT_SCREEN   equ 200
  9. SIZESCREEN  equ WIDTH_SCREEN*HEIGHT_SCREEN...
Эффект дождь]]> 1 след от водомерки на поверхности воды Sat, 24 Dec 2016 06:58:12 +0000 https://wasm.in/threads/sled-ot-vodomerki-na-poverxnosti-vody.31854/ https://wasm.in/threads/sled-ot-vodomerki-na-poverxnosti-vody.31854/ invalid@example.com (Mikl___) Mikl___ След от водомерки на поверхности воды

Этап первый

Код (ASM):
  1. ; masm dos com #
  2. .model tiny
  3. .code
  4. .386
  5. org 100h
  6. PALSIZE equ 300h
  7. WIDTH_SCREEN    equ 320
  8. HEIGHT_SCREEN   equ 200
  9. SCREENSIZE  equ WIDTH_SCREEN*HEIGHT_SCREEN
  10. IMPUT_STATUS_0  equ 3DAh    ;регистр статуса ввода 0
  11. VGA_SEGMENT equ 0A000h
  12.  
  13. start:          mov ax, 13h;установили необходимый режим 320х200х256
  14.         int 10h
  15.         mov ax, 4309h;создать палитру
  16.         mov dx, 3D4h
  17.         out dx, ax
  18.  
  19.         xor bx, bx...
след от водомерки на поверхности воды]]> 2 Светлячки Sat, 24 Dec 2016 04:12:43 +0000 https://wasm.in/threads/svetljachki.31853/ https://wasm.in/threads/svetljachki.31853/ invalid@example.com (Mikl___) Mikl___ [​IMG]
На самом деле этот эффект называется blow ("раздувание").
Установим палитру так: 0 [math]\to[/math] 63 от черного цвета к зеленому оттенку.
Наши светлячки - обыкновенные спрайты, точнее, один спрайт размером 256x256. Назовем массив, в котором будет храниться этот спрайт, blow.
Формула по которой мы будем рисовать...

Светлячки]]> Anis-эффект Sat, 24 Dec 2016 03:44:46 +0000 https://wasm.in/threads/anis-ehffekt.31852/ https://wasm.in/threads/anis-ehffekt.31852/ invalid@example.com (Mikl___) Mikl___ Anis-эффект
Как скролить (вправо-влево, вверх-вниз), надеюсь, вы знаете. Что такое полярные координаты, наверно то же. Так вот этот эффект основан на скролинге, но в полярных координатах.
Соответственно скролинг вдоль координаты [math]r[/math] - выглядит как втягивание-вытягивание, а изменение угла [math]\alpha[/math] - как повороты по часовой стрелке или против. Вот и вся теория. Теперь начнется практика.
Пусть центр нашего anis`a находиться в центре экрана. Тектуру, которую мы...

Anis-эффект]]> Блюр-эффект Sat, 24 Dec 2016 03:19:18 +0000 https://wasm.in/threads/bljur-ehffekt.31851/ https://wasm.in/threads/bljur-ehffekt.31851/ invalid@example.com (Mikl___) Mikl___ Блюр-эффектДовольно простой эффект, как раз для начинающих. К тому же, этот эффект лежит в основе целого семейства эффектов, и знать его необходимо!
Blur, в переводе с английского: неясные очертания, размытое пятно.
Допустим, у нас есть некое изображение размером 320x200x8bit, в буфере экрана screen. Создаем дополнительный буфер экрана, buffer.
Цвет точки с координатами X,Y в массиве buffer будет рассчитываться по формуле: цвет_точки = среднее арифметическое от значений цвета точек,...

Блюр-эффект]]> Эффект кипящей лавы Sat, 24 Dec 2016 02:56:59 +0000 https://wasm.in/threads/ehffekt-kipjaschej-lavy.31850/ https://wasm.in/threads/ehffekt-kipjaschej-lavy.31850/ invalid@example.com (Mikl___) Mikl___ Эффект кипящей лавы[​IMG]
Взято здесь, текст программы немного переделан, в результате СОМ-файл уменьшился с 369 байт до 234 байт
Код (ASM):
  1. ; masm dos com #
  2. .model tiny
  3. .686
  4. .code
  5. org 100h
  6. WIDTH_SCREEN    equ 320
  7. HEIGHT_SCREEN   equ 200
  8. SCREENSIZE  equ WIDTH_SCREEN*HEIGHT_SCREEN
  9. MEMBLOCKSIZE    equ SCREENSIZE/16
  10. IMPUT_STATUS_0  equ...
Эффект кипящей лавы]]> Эффект RADIAL BLUR Sat, 24 Dec 2016 01:54:11 +0000 https://wasm.in/threads/ehffekt-radial-blur.31849/ https://wasm.in/threads/ehffekt-radial-blur.31849/ invalid@example.com (Mikl___) Mikl___ Эффект RADIAL BLUR[​IMG]
Если вы захотите подставить какую-нибудь другую картинку, то проделайте следующую последовательность действий:
  1. нарисуйте или считайте другую двух-цветную картинку в PaintBrush
  2. сохраните ее как монохромную картинку
  3. потом как 256-цветную
  4. и вот эту 256 цветную картинку можно подставлять вместо intel.bmp.
Размер картинки естественно должен...

Эффект RADIAL BLUR]]> 1