FasmWorldПрограммирование на ассемблере FASM для начинающих и не только

use16
org 100h

jmp start

;——————————
a db -55
b db -23

bolshe db ‘a>b$’
menshe db ‘a<b$'
ravno db 'a=b$'
;——————————
start:
mov ah,[a]
mov al,[b]

cmp ah,al
jg a_bolshe_b
jl a_menshe_b
jz a_ravno_b

a_bolshe_b:
mov ah,09
mov dx,bolshe
int 21h
jmp exit

a_menshe_b:
mov ah,09
mov dx,menshe
int 21h
jmp exit

a_ravno_b:
mov ah,09
mov dx,ravno
int 21h

exit:
mov ah,08h
int 21h

mov ax,4c00h
int 21h

А что делает
mov ah,08h
int 21h
что-то не помню такого.

И для обшего развития: что происходит, если не указывается конец строки. Я нечаянно перепутал ‘$’ и ‘S’…чуть не умер от неожиданности.

А где тут ошибка: cmp byte[bx+di],byte[si] ? Нельзя сравнивать когда операнды в памяти?

еще раз пробую больше не буду
use16 ;gen 16-bit cod
org 100h ;begin 100h
jmp start ;to start
;———————————————————-
hello db ‘Hello friend’,13,10
exitres db ‘Press key for exit!!!’,13,10

amoreb db ‘a > b’,13,10
bmorea db ‘a < b',13,10
aeqb db 'a = b',13,10

a dw -500
b dw -500
;———————————————————-
start:

mov ah,09h
mov dx,hello ;Hello out'
int 21h

mov ax, [a]
cmp ax, [b] ; a-b

jg rezmore
jl rezlitle
je rezzero

rezmore:
mov ah,09h
mov dx,amoreb
int 21h
jmp beforequit

rezlitle:
mov ah,09h
mov dx,bmorea
int 21h
jmp beforequit

rezzero:
mov ah,09h
mov dx,aeqb
int 21h

beforequit:
mov ah,09h
mov dx,exitres
int 21h
mov ah,01h
int 21h

exit:
mov ax,4C00h
int 21h ; End

    jg rezmore

use16
org 100h
jmp start
;———————————————————-
x db ‘rezyltat sravhehia a b’ ,13,10,’$’
a db ‘a<b $’
b db ‘a>b $’
c db ‘a=b $’
a1 db -5
b1 db -5

;———————————————————-
start:
mov ah,09h
mov dx,x
int 21h
mov bl,[a1]

cmp bl,[b1]
jl amb
cmp bl,[b1]
jg abob
mov dx,c ;a=b вы вести строку с
int 21h
jmp exit ;выход из програмы
abob:
mov dx,b
int 21h
jmp exit
amb:
mov dx,a
int 21h
jmp exit
exit:
mov ah,08h ;Функция DOS 08h — ввод символа без эха
int 21h ;Обращение к функции DOS
mov ax,4C00h
int 21h

    cmp bl,[b1]

Привет , подскажи какие операции могут изменять флаг S ?
Я пробовал не деление не умножение ,не сложение не вычитание его не трогают.

    xor ax,ax
    dec ax    ;ax = 0FFFFh, SF=1

use16
org 100h
jmp start

a db -65
b db -65
s1 db ‘a>b$’
s2 db ‘a<b$'
s3 db 'a=b$'
press db 0Dh, 0Ah, 'Press any key…$'

start:
mov al, [a]
cmp al, [b]
jg c1
jl c2

mov ah, 09h
mov dx, s3
int 21h
jmp exit
c1:
mov ah, 09h
mov dx, s1
int 21h
jmp exit

c2:
mov ah, 09h
mov dx, s2
int 21h
jmp exit

exit:
mov ah, 09h
mov dx, press
int 21h

mov ah, 08h
int 21h

mov ax, 4C00h
int 21h

    jmp exit
exit:

    ...
    cmp al, [b]
    mov ah,09h ;Команда не изменяет флаги
    jg c1
    jl c2   
    mov dx,s3
    jmp exit
c1:
    mov dx,s1
    jmp exit
c2:
    mov dx,s2
exit:
    int 21h
    ...

Привет!
;——————————
use16
org 0x100

jmp start
;——————————
x db -4
y db 4
a db ‘x>y’,13,10,’$’
b db ‘x=y’,13,10,’$’
c db ‘x<y',13,10,'$'
exit db 'Press any key…$'
;——————————
start:
mov ah,0x09
mov bh,[x]
mov bl,[y]
cmp bh,bl
jl xmy
jg xby

mov dx,b
int 0x21
jmp exit1

xmy:
mov dx,c
int 0x21
jmp exit1

xby:
mov dx,a
int 0x21
jmp exit1

exit1:
mov dx,exit
int 0x21
mov ah,0x08
int 0x21
mov ax, 0x4c00
int 0x21

    mov bl,[y]
    cmp bh,bl

    cmp bh,[y]

use16
org 100h
jmp start
;————-
i_a db 13,10,’Enter A:$’
i_b db 13,10,’Enter B:$’
abb db 13,10,’a > b$’
arb db 13,10,’a = b$’
amb db 13,10,’a < b$'
a db ?
b db ?
;————-
start:
mov dx,i_a
mov ah,09h
int 21h
get_a:
mov ah,01h
int 21h
cmp al,13
je get_b_t
add [a],al
jmp get_a
get_b_t:
mov dx,i_b
mov ah,09h
int 21h
get_b:
mov ah,01h
int 21h
cmp al,13
je analiz
add [b],al
jmp get_b
analiz:
mov bh,[a]
mov bl,[b]
cmp bh,bl

je ravno
jl menshe
jmp bolshe
ravno:
mov dx,arb
mov ah,09h
int 21h
jmp endd
menshe:
mov dx,amb
mov ah,09h
int 21h
jmp endd
bolshe:
mov dx,abb
mov ah,09h
int 21h

endd:
mov ah,08h
int 21h
mov ax,4C00h
int 21h

    mov ah,09h
    int 21h

пытался организовать ввод чисел с клавиатуры, но оказалось что функция DOS 01h позволяет ввести лишь один символ, всё получилось но только с одним символом (цифра). Видел в следующих уроках есть ввод строки но не стал заморачиваться, всему своё время, успею ещё…
Поэтому сделал по-другому:

use16 ;Генерировать 16-битный код
org 100h ;Программа начинается с адреса 100h
jmp start ;Безусловный переход на метку start
;———————————————————-
a dw -128
b dw 127
a_more_b db 13,10,’a>b’,13,10,’$’
b_more_a db 13,10,’a<b’,13,10,’$’
a_equal_b db 13,10,’a=b’,13,10,’$’
err_msg db ‘Error: overflow detected.’,13,10,’$’
pak db ‘Press any key…$’
;———————————————————-
start:

cmp [a], -128 ;поскольку число со знаком, то в AL мин число -128(-128..127)
jl error ;переход к обработке ошибки если переполнение
cmp [a], 127 ;поскольку число со знаком, то в AL макс число 127(-128..127)
jg error ;переход к обработке ошибки если переполнение
mov al, byte[a]

cmp [b], -128 ;поскольку число со знаком, то в AL мин число -128(-128..127)
jl error ;переход к обработке ошибки если переполнение
cmp [b], 127 ;поскольку число со знаком, то в AL макс число 127(-128..127)
jg error ;переход к обработке ошибки если переполнение

cmp al, byte[b] ;сравнение а и b
jg lb1 ;Переход, a>b
jl lb2 ;Переход, a<b
mov ah, 09h
mov dx, a_equal_b ;Вывод строки ‘a=b’
int 21h ;/

exit:
mov ah, 09h ;\
mov dx, pak ;; > Вывод строки ‘Press any key…’
int 21h

mov ah, 08h ;\
int 21h ;/ Ввод символа

mov ax, 4c00h ;\
int 21h ;/ Завершение программы
error:
mov ah, 09h ;\
mov dx, err_msg ; > Вывод сообщения об ошибке
int 21h ;/
jmp exit ;Переход на метку exit
lb1:
mov ah,09h ;\
mov dx,a_more_b ; > Вывод строки ‘a>b’
int 21h ;/
jmp exit ;Безусловный переход
lb2:
mov ah,09h ;\
mov dx,b_more_a ; > Вывод строки ‘a<b’;
int 21h ;/
jmp exit ;Безусловный переход

Можно ещё как-то улучшить эту программу?

    ...
    cmp al,byte[b]
    jg lb1
    jl lb2
    mov dx,a_equal_b
    jmp out_str
lb1:
    mov dx,a_more_b
    jmp out_str
lb2:
    mov dx,b_more_a
out_str:
    mov ah,09h
    int 21h     ; Вывод нужной строки
exit:
    ...

Привет у меня вопрос возник по поводу флага OF.
Решил потестеть , и совсем запутался ,)
Вот пример
mov al,192
mov ah,192
; cF,sF=1 ; перенос , отрицательный результат

add al,ah ; al = 384 1 1000 0000

;А если

mov al,191
mov ah,192
; cF,оF=1 ; перенос , переполнение

add al,ah ; al = 383 1 0111 1111

Старший байт , в одном случие 0 , а в другом 1 , )
Это в принципе поясняет почему флак sF то равен 1 то нет .
Но понять почему оF , то равен то нет я не как не могу.
То есть если число 1 1— —- , то флак оF = 0 а sF=1
И наоборот
1 0— —- , то флак оF = 1 а sF=0
Проста флак оF , какойта хитрый оказался.
Или я чегота не допонял.

use16
org 100h

jmp start ;безусловный переход на начало

lowe db ‘ab$’,13,10
equal db ‘a=b$’,13,10
press db 13,10,’Press any key…$’
a dw 230 ;описание переменных
b dw 230

mov ah,09h ;вывод сообщения press
mov dx,press
int 21h
mov ah,08h ;ввод символа
int 21h
mov ax,4c00h ;завершение программы
int 21h

use16
org 0x100

mov ah, [a]
mov al, [b]
cmp ah, al
jl cp1
jg cp2
je cp3

cp1:
mov ah, 09
mov dx, less
jmp exit

cp2:
mov ah, 09
mov dx, more
jmp exit

cp3:
mov ah, 09
mov dx, rav
jmp exit

exit:
int 0x21
mov ah, 0x08
int 0x21
mov ax, 0x4C00
int 0x21

a db -5
b db -5
less db «a b$»
rav db «a = b$»

Ребят помогите с условными переходами 3,4,8
умр метка умр адрес безусловный переход
sub…
CMP ПР.,ИСТЗ ЗНАКА РАВНО ПР-ИСТ =НЕ РАВНО ПР.=ПР-ИСТ
JZ если не 0 пр.=ист
JNZ если не 0 прист
JC есть перенос пр=ист
JS есть знак пр=0

use16
org 100h
jmp start
a db 15
b db 15
rav db ‘a=b$’
bol db ‘a>b$’
men db ‘a<b$'
start:
mov al,[a]
sub al,[b]
jz nol
jnz ne_nol

nol:
mov ah,09h
mov dx, rav
int 21h

jmp exit
ne_nol:
ja bolshe
jna menshe
bolshe:
mov ah,09h
mov dx,bol
int 21h
jmp exit
menshe:
mov ah,09h
mov dx,men
int 21h
jmp exit
exit:
mov ah,08h
int 21h

mov ax,4c00h
int 21h

use16
;;——————-
Label Python style
;;——————-
org 100h

jmp __init__ ; go start label
;——————————-
a dw -1
b dw 10

eq_str db «a=b», ‘$’
lt_str db «ab», ‘$’
;——————————-
__init__:;programm start here
xor bx,bx
mov bx,[a]
cmp bx,[b]

__del__:; exit programm
mov ax,0x4c00
int 0x21

Кроме команды СMP есть конструкция ветвления, вот я не понимаю как ее использовать, она находится в include\macro\if.inc. кроме конструкции ветвления есть команды until и repeat. Вот пытаюсь ее использовать, а пока пользуюсь cmp

Такой вопрос, нужно чтобы выводило месяц по счету,когда вводишь цифру от 1 до 9
но почему-то он всегда выдает «сентябрь». что не так с моим кодом?

data segment
mes1 db 10, 13, ‘Jan$’
mes2 db 10, 13, ‘Fed$’
mes3 db 10, 13, ‘Mar$’
mes4 db 10, 13, ‘Apr$’
mes5 db 10, 13, ‘May$’
mes6 db 10, 13, ‘Jun$’
mes7 db 10, 13, ‘Jul$’
mes8 db 10, 13, ‘aug$’
mes9 db 10, 13, ‘sep$’
data ends

code segment
start:
assume cs:code, ds: data
mov ax, data
mov ds, ax
mov ah, 01
int 21h
cmp al, ‘1’
je .ibone
.ibone:
lea dx,mes1

cmp al, ‘2’
je .ibtwo
.ibtwo:
lea dx, mes2

cmp al, ‘3’
je .ibthree
.ibthree:
lea dx, mes3

cmp al, ‘4’
je .ibfour
.ibfour:
lea dx, mes4

cmp al, ‘5’
je .ibfive
.ibfive:
lea dx, mes5

cmp al, ‘6’
je .ibsix
.ibsix:
lea dx, mes6

cmp al, ‘7’
je .ibseven
.ibseven:
lea dx, mes7

cmp al, ‘8’
je .ibeight
.ibeight:
lea dx, mes8

cmp al, ‘9’
je .ibnine
.ibnine:
lea dx, mes9
jmp vivod

vivod:
mov ah, 09
int 21h

mov ax, 4c00h
int 21h
code ends
end start

Кто может составить блок схему ??

Добрый день, хотелось бы обратиться к вам со следующим вопросом. При написании программы довольно странно работает cmp. При сравнении выводит весь последующий текст начиная с указанной метки не беря во внимание конец строки. Решила для интереса воспользоваться кодом предложенным в примере для вывода строк, но тоже самое. Подскажите, пожалуйста, в чем может быть причина?

use16
org 100h
jmp start
;——————-
a dw 2h
b dw -2h
menshe db ‘a b$’
ravno db ‘a = b$’
;——————-
start:
mov ax, [a]
mov bx, [b]
cmp ax, bx
jg bo
jl me
jz ra
bo:
mov dx, bolshe
jmp s
me:
mov dx, menshe
jmp s
ra:
mov dx, ravno
jmp s
s:
mov ax, 0900h
int 21h
mov ax, 0800h
int 21h
jmp exit
exit:
mov ax, 4C00h
int 21h

как вернуться на место откуда был совершен переход

Можно ли как-нибудь оптимизировать программу?

use16
org 100h
jmp start
;—————————————————————————
info db 13,10,’Range: -9999:9999′,’$’
in_a db 13,10,’Enter a: $’
in_b db 13,10,’Enter b: $’
out_1 db 13,10,’a = b’,’$’
out_2 db 13,10,’a b’,’$’
;—————————————————————————
start:
mov ah,09h ;\
mov dx,info ;> Вывод строки »
int 21h ;/
clear:
xor si,si ;\
xor di,di ; > Очистка регистров
xor dx,dx ;/
echo_a:
mov ah,09h ;\
mov dx,in_a ; > Вывод строки »
int 21h ;/
get_a:
mov ah,01h ;Функция DOS 01h — ввод символа.
int 21h ;Введённый символ сохраняется в регистр AL.

mov ax,4C00h ;\
int 21h ;- Завершение программы.

Ой, разметка сломалась.
Тут лучше видно: pastebin . com / ZdTpWPg7
(Если это вообще кто-нибудь прочитает).

use16
org 100h

start:
mov al,[var1]
mov bl,[var2]
mov ah,09h
cmp al,bl
jl alb
jg agb
mov dx,rese
jmp exit
alb:
mov dx,resl
jmp exit
agb:
mov dx,resg
exit:
int 21h
mov ax,4c00h
int 21h

var1 db -50
var2 db 44
resl db ‘a b’,0ah,0dh,’$’
rese db ‘a = b’,0ah,0dh,’$’

У меня вопрос:

» db 13,10,’Hello!’,13,10,13,10,’$’ »

Зачем нужны цифры около строки?