img032

MOV BX,#0210	BB	10	02
FST	9B	DD	17
MOV BX,#0220	BB	20	02
FIST	9B	DB	17
MOV BX,#0230	BB	30	02
FIST	9B	DF	17
MOV BX,#0240	BB	40	02
F1STP	9B	DF	3F7
MOV BX,#0250	BB	50	02
FDECSTP	9B	D9	F6
FBSTP	9B	DF	37
MOV BX,#0260	BB	60	02
FDECSTP	9B	D9	F6
FSTP	9B	DB	3F

;przesłanie liczby n do pamięci w formacie long real ;przesłanie liczby n do pamięci w formacie short real ;przesłanie liczby n do pamięci w formacie word int ;przesłanie liczby n do pamięci w formacie long int ;dekrementacja ST’

;przesłanie liczby n do pamięci w formacie BCD ;przesłanie liczby jt do pamięci w formacie temporary real

Przykład 5

Program testujący rozkaz porównania (FCOM) . Umożliwia zaobserwowanie zmian wartości bitów warunkowych w słowie statusowym (C3,C0).

FINIT	9B	DB	E3
FLDI	9B	D9	E8
FCHS	9B	D9	E0
MOY BX,#0200	BB	00	02
FST	9B	D9	17
FABS	9B	D9	El
MOV BX,#0210	BB	10	02
FST	9B	D9	17
MOV BX,#0200	BB	00	02
FCOM	9B	D8	17
MOV BX,#0220	BB	20	02
FSTSW	9B	DD	3F

;reset programowy

;załadownie na stos 1.0

;zamiana znaku elementu z wierzchołka stosu

;wysłanie -1.0 do pamięci ;obłiczanie z ST

;wysłanie 1.0 do pamięci

;porównąnie ST-mem_op

;przesłanje słowa statusowego do pamięci