RSS

Program JWASM pembanding angka

Ini adalah sebuah program menggunakan JWASM yang menerima dua buah bilangan lalu menampilkan:
1 jika bilangan pertama > bilangan kedua
0 jika bilangan pertama = bilangan kedua
-1 jika bilangan pertama < bilangan kedua 
 
Inp MACRO ofst
mov dx,offset ofst
mov ah,0ah
int 21h
lea dx,u
mov ah,9
int 21h
ENDM
Cetak MACRO kar
lea dx,kar
mov ah,9
int 21h
ENDM
.MODEL SMALL
.CODE
ORG 100h
Tdata : JMP Proses
a dw 255,?,255 dup('$')
b dw 255,?,255 dup('$')
r db '0$'
s db '-1$'
t db '1$'
u db 13,10,'$'
proses :
Inp a
Inp b
 
mov ax,a[2]
mov bx,b[2]
cmp ax,bx
ja x
jb j
je z
x:
lea dx,t
mov ah,9
int 21h
jmp exit
j:
lea dx,s
mov ah,9
int 21h
jmp exit
z:
lea dx,r
mov ah,9
int 21h
jmp exit
exit :
int 20h
end Tdata
 

0 komentar:

Posting Komentar

© 2009 - Knowledge of YASHA | Design: Choen | Pagenav: Abu Farhan Top