| CARVIEW |
Select Language
HTTP/2 200
date: Sat, 11 Oct 2025 06:15:16 GMT
content-type: text/html; charset=UTF-8
server: cloudflare
x-frame-options: DENY
x-content-type-options: nosniff
x-xss-protection: 1;mode=block
vary: accept-encoding
cf-cache-status: DYNAMIC
content-encoding: gzip
set-cookie: _csrf-frontend=640eb4567002ea0908be2fca6ca6ff1031aff60e9ec66ff05ad6fd173ff23810a%3A2%3A%7Bi%3A0%3Bs%3A14%3A%22_csrf-frontend%22%3Bi%3A1%3Bs%3A32%3A%22jYNzsCVRsAdViW0jgx6TXFTlxWlGQ18u%22%3B%7D; HttpOnly; Path=/
cf-ray: 98cc38d5ce8ab155-BLR
Дальний вызов. Регистры - Pastebin.com
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ; --- Дальний вызов. Передача параметров через регистры -------------------------------------------------------------------------------
- ; Exe-файл
- format MZ
- ; Точка старта
- entry Main:Start
- ; --- Сегмент данных ------------------------------------------------------------------------------------------------------------------
- segment DataSeg
- E dw 256
- F dw 16
- ; --- Сегмент с основным кодом программы ----------------------------------------------------------------------------------------------
- segment Main
- Start:
- ; Адрес сегмента данных
- push DataSeg
- pop DS
- ; Получаем парамеры для процедуры в регистры
- mov AX, [F]
- mov BX, [E]
- ; Подпрограмма подсчёта значений
- call far Library:Calculating
- ; Вывод значений
- call far Library:Output
- ; Ввод символа
- mov AX, $0C08
- int 21h
- test AL, AL
- jnz @F
- mov AH, $08
- int 21h
- @@:
- retf
- ; --- Сегмент, содержащий процедуры ---------------------------------------------------------------------------------------------------
- segment Library
- ; Вычисление формулы [E and F^2]
- Calculating:
- ; Возвести AX в квадрат
- mul AX
- ; Два старших байта 100% пустые
- xor DX, DX
- ; Побитовое умножение F^2 и E
- and AX, BX
- retf
- ; Вывод чисел
- Output:
- ; Делитель тут хранится
- mov BL, 10
- ; Параметры цикла: BP - кол-во цифр, CX - счётчик цикла
- mov CX, 0
- PushDigit:
- ; Частное в AL, остаток в AH
- div BL
- ; Поместили в стек (AH - нужное)
- push AX
- ; Количество цифр++
- inc CX
- ; Преобразовать частное в новое число
- xor AH, AH
- ; Если в АХ ноль, покинуть. Иначе продолжить
- cmp AX, 0
- jz PopDidit
- jmp PushDigit
- PopDidit:
- ; Выгрузить из стека в DL цифру
- pop AX
- mov DL, AH
- ; Вывести цифру из DL
- add DL, 48
- mov AH, $02
- int 21h
- loop PopDidit
- ; Вернуться к месту вызова процедуры
- retf
Advertisement
Add Comment
Please, Sign In to add comment
-
⭐✅ Trading Profit Method ✅ NEVER SEEN BEFORE...
JavaScript | 4 sec ago | 0.24 KB
-
⭐ Instant BTC Profit Method ✅ NEVER SEEN BEFO...
JavaScript | 13 sec ago | 0.24 KB
-
⭐✅ MAKE $2000 INSTANTLY ✅ NEVER SEEN BEFORE ⭐...
JavaScript | 23 sec ago | 0.24 KB
-
⭐ Free Crypto Method ✅ NEVER SEEN BEFORE ⭐⭐⭐
JavaScript | 34 sec ago | 0.24 KB
-
✅⭐ Make huge profits on trading ✅ NEVER SEEN...
JavaScript | 45 sec ago | 0.24 KB
-
⭐✅ Marketplace Glitch ✅ Working ✅ NEVER SEEN...
JavaScript | 54 sec ago | 0.24 KB
-
✅⭐ Make $2500 in 15 minutes ✅ NEVER SEEN BEFO...
JavaScript | 1 min ago | 0.24 KB
-
⭐ Instant BTC Profit Method ✅ NEVER SEEN BEFO...
JavaScript | 1 min ago | 0.24 KB
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
