Closed Example program in assembly language

RNA30 · Mar 31, 2017

Code:

.model small
.stack 100h
.data
   row db 12
   col db 40
.code
gintama:
   mov ax, @data
   mov ds, ax
   mov ax, 0003h
   int 10h
  
    call gotoxy
    mov al, '*'
    mov bl, 05h
    mov cx, 1
    int 10h
  
    mov ah,1
    int 21h
    
    cmp al, 077H   
    je Up
    cmp al,073H
    je Down1
    cmp al,061H
    je left
    cmp al,064H
    je Right
    cmp al, 01BH
    je EXIT1
    
    
left:
    mov ax, 0003h
    int 10h
    
    dec col
    cmp col, 0
    je  MCOL
    jmp gintama
    
    call gotoxy
    mov al, '*'
    mov bl, 01h
    mov cx, 1
    int 10h
    
MCOL:
    mov col, 80
    jmp gintama
    
Right:
    mov ax, 0003h
    int 10h
    
    inc col
    cmp col, 0
    je  MCOL1
    jmp gintama
    
    call gotoxy
    mov al, '*'
    mov bl, 01h
    mov cx, 1
    int 10h
    
MCOL1:
    mov col, 80
    jmp gintama
DOWN1:
jmp DOWN
EXIT1:
jmp exit   
Up:
    mov ax, 0003h
    int 10h
    
    dec row
    cmp row,0
    je MROW
    jmp gintama
    
    call gotoxy
    mov al, '*'
    mov bl, 01h
    mov cx, 1
    int 10h
    
MROW:
    mov row,24
    jmp gintama
    
Down:
    mov ax, 0003h
    int 10h
    
    inc row
    cmp row,24
    je MROW1
    jmp gintama
    
    call gotoxy
    mov al, '*'
    mov bl, 01h
    mov cx, 1
    int 10h
    
MROW1:
    mov row,0
    jmp gintama

EXIT:
   mov ah, 4ch
   int 21h
  
   gotoxy proc
   mov ah, 2
   mov bh, 0
   mov dh, row
   mov dl, col
   int 10h
 
   mov ah, 9
   mov bh, 0
ret
gotoxy endp

end

PHC Active Likers · Mar 31, 2017

Nice info

makie006 · Apr 4, 2017

Haha advance natoh sa nalalaman ko hayysss mga basic command lang talaga tinuro samin...

vortex78 · May 14, 2017

idol help naman po sana. pano po kaya ako gagawa ng pyramid shape using 0ch of int 10h.
salamat po sa makakatulong sakin.
final project po kasi naman hindi ko po magawa. ano po kaya mali sa code ko para maging pyramid?
mov ah, 00h
mov al, 12h
int 10h

mov cx, 300
mov dx, 150
mov ax, 0c02h

back:
int 10h
inc dx
cmp dx, 50h
loop back
jmp back2

back2:
int 10h
inc cx
cmp cx, 280h
jb back2
loop back2

mov ah, 08h
int 21h

mov ah,00h
mov al,3
int 10h

jgutx · May 15, 2017

what does it do?

RNA30 · May 16, 2017

vortex78 said:
idol help naman po sana. pano po kaya ako gagawa ng pyramid shape using 0ch of int 10h.
salamat po sa makakatulong sakin.
final project po kasi naman hindi ko po magawa. ano po kaya mali sa code ko para maging pyramid?
mov ah, 00h
mov al, 12h
int 10h

mov cx, 300
mov dx, 150
mov ax, 0c02h

back:
int 10h
inc dx
cmp dx, 50h
loop back
jmp back2

back2:
int 10h
inc cx
cmp cx, 280h
jb back2
loop back2

mov ah, 08h
int 21h

mov ah,00h
mov al,3
int 10h

Try this code as a guide. A long time ago, and I forgot some codes about Assembly Language.

Code:

jmp start

mess1 db 10,13, "Enter value for (n) [0-9 only]: $"
mess2 db 10,13, "There is nothing to display $"
mess3 db 10,13, "Do you want to continue (y/n): $"
lincar db 10,13, "$"
space db " $"
asterisk db "*$"
value db 0

start:

xor ax,ax
xor bx,bx
xor cx,cx

mov ax,3
int 10h

lea dx,mess1
mov ah,9
int 21h

mov ah,1
int 21h
sub al,30h

cmp al,0
je zero_bridge
cmp al,0
jl start
cmp al,9
jg start
jmp main

zero_bridge:
call zero
main:
mov value,al
mov bh,al
mov ch,bh
mov cl,al
again:

cmp bh,0
je secondhalf

lea dx,lincar
mov ah,9
int 21h

mov al,value
sub cl,al
back:

cmp cl,0
je display

lea dx,space
mov ah,9
int 21h

lea dx,space
mov ah,9
int 21h

inc cl

jmp back

display:

lea dx,asterisk
mov ah,9
int 21h

lea dx,space
mov ah,9
int 21h

inc cl

cmp cl,ch
jne display

dec bh
dec ch
dec cl

jmp again

;----------------------------socondhalf----------------------------

secondhalf:

mov al,value
sub al,1
mov bh,al
mov ch,2

again2:

cmp bh,0
je continue

lea dx,lincar
mov ah,9
int 21h

mov bl,value
mov al,ch

sub al,bl

mov cl,al

back2:

cmp cl,0
je display2

lea dx,space
mov ah,9
int 21h

lea dx,space
mov ah,9
int 21h

inc cl

jmp back2
display2:

lea dx,asterisk
mov ah,9
int 21h

lea dx,space
mov ah,9
int 21h

inc cl

cmp cl,ch
jne display2

dec bh
inc ch

jmp again2
zero:
lea dx,mess2
mov ah,9
int 21h
continue:
xor dx,dx

lea dx,mess3
mov ah,9
int 21h

mov ah,1
int 21h

cmp al,'y'
je start_bridge
cmp al,'n'
je exit

jmp continue

start_bridge:
call start
exit:
int 20h

xbreex · Aug 26, 2017

hi po pa help po please.. needed ko po kasi ng code that displays my full name... malaking tulong po sakin to.. salamat po

vortex78 · Aug 26, 2017

sige bigyan kita

vortex78 · Aug 26, 2017

title final
dosseg
.model small
.stack 64h
.data
a1 db "Account Name: PHC$"

a2 db "Pin Code: $"
mali db " W A R N I N G!!!$"
mali1 db "*** Access Denied! ***$"
a3 db "Name: Sample Name$"
a4 db "Section Code:$"
main db "MAIN MENU$"
isa db "[P]yramid Shape$"
dalawa db "E[x]it$"
tatlo db "Enter you choice: $"
err1 db "Wrong input! P and X only Allowed...$"
tapos db "THANK YOU PO Ma'am!

$"
name1 db "Sample Name$"
name2 db "BSIT$"

pass1 db ?
pass2 db ?
pass3 db ?
pass4 db ?
.code
mov ax, dAtA
mov ds, ax

mov ah, 6
mov al, 0
mov bh, 1Eh
mov ch, 0 ;upper row
mov cl, 0 ;upper col
mov dh, 24 ;lower row
mov dl, 79 ;lower col
int 10h

label_start:
mov ah, 2
mov bh, 0 ;page number =0
mov dh, 5 ;row
mov dl, 15 ;col
int 10h

mov ah, 09h
mov dx, offset a1
int 21h

mov ah, 2
mov bh, 0 ;page number =0
mov dh, 6 ;row
mov dl, 15 ;col
int 10h

mov ah, 09h
mov dx, offset a2
int 21h

mov ah, 07h
int 21h

mov pass1, al
mov ah, 02h
mov dl, "*"
int 21h

mov ah, 07h
int 21h

mov pass2, al
mov ah, 02h
mov dl, "*"
int 21h

mov ah, 07h
int 21h

mov pass3, al
mov ah, 02h
mov dl, "*"
int 21h

mov ah, 07h
int 21h

mov pass4, al
mov ah, 02h
mov dl, "*"
int 21h

cmp pass1, "1"
jne incorrect1

cmp pass2, "2"
jne incorrect1

cmp pass3, "3"
jne incorrect1

cmp pass4, "4"
jne incorrect1

jmp correct

incorrect1:

mov ah, 2
mov bh, 0 ;page number =0
mov dh, 8 ;row
mov dl, 23 ;col
int 10h

mov ah, 09h
mov dx, offset mali
int 21h

mov ah, 2
mov bh, 0 ;page number =0
mov dh, 9 ;row
mov dl, 20 ;col
int 10h

mov ah, 09h
mov dx, offset mali1
int 21h

jmp label_start

correct:

mov ah, 6
mov al, 0
mov bh, 70h
mov ch, 0 ;upper row
mov cl, 0 ;upper col
mov dh, 24 ;lower row
mov dl, 79 ;lower col
int 10h

mov ah, 2
mov bh, 0 ;page number =0
mov dh, 1 ;row
mov dl, 10 ;col
int 10h

mov ah, 09h
mov dx, offset a3
int 21h

mov ah, 2
mov bh, 0 ;page number =0
mov dh, 2 ;row
mov dl, 10 ;col
int 10h

mov ah, 09h
mov dx, offset a4
int 21h

mov ah, 2
mov bh, 0 ;page number =0
mov dh, 7 ;row
mov dl, 30 ;col
int 10h

mov ah, 09h
mov dx, offset main
int 21h

mov ah, 2
mov bh, 0 ;page number =0
mov dh, 9 ;row
mov dl, 30 ;col
int 10h

mov ah, 09h
mov dx, offset isa
int 21h

mov ah, 2
mov bh, 0 ;page number =0
mov dh, 10 ;row
mov dl, 30 ;col
int 10h

mov ah, 09h
mov dx, offset dalawa
int 21h

label_new:
mov ah, 2
mov bh, 0 ;page number =0
mov dh, 12 ;row
mov dl, 30 ;col
int 10h

mov ah, 09h
mov dx, offset tatlo
int 21h

mov ah, 01h
int 21h

cmp al, "P"
je huli

cmp al, "p"
je huli

cmp al, "X"
je label_tapos

cmp al, "x"
je label_tapos

label_error:
mov ah, 2
mov bh, 0 ;page number =0
mov dh, 13 ;row
mov dl, 30 ;col
int 10h

mov ah,09h
mov dx, offset err1
int 21h

jmp label_new

label_tapos:
mov ah, 6
mov al, 0
mov bh, 20h
mov ch, 0 ;upper row
mov cl, 0 ;upper col
mov dh, 24 ;lower row
mov dl, 79 ;lower col
int 10h

mov ah, 2
mov bh, 0 ;page number =0
mov dh, 10 ;row
mov dl, 30 ;col
int 10h

mov ah,09h
mov dx, offset tapos
int 21h

mov ah, 2
mov bh, 0 ;page number =0
mov dh, 13 ;row
mov dl, 60 ;col
int 10h

mov ah,09h
mov dx, offset name1
int 21h

mov ah, 2
mov bh, 0 ;page number =0
mov dh, 14 ;row
mov dl, 60 ;col
int 10h

mov ah,09h
mov dx, offset name2
int 21h

jmp exit
huli:
mov ah, 00h
mov al, 12h
int 10h

mov cx, 350
mov dx, 100
mov ax, 0c02h

kaliwa:
int 10h
inc dx
dec cx
cmp cx, 300
cmp dx, 250
jb kaliwa

baba:
int 10h
inc cx
cmp cx, 450
jb baba

kanan:
int 10h
dec dx
dec cx
cmp cx, 100
cmp dx, 280
jb kanan

mov ah, 08h
int 21h

mov ah,00h
mov al,3
int 10h

jmp exit

exit:
mov ah, 4ch
int 21h
end

vortex78 · Aug 26, 2017

full code yan. edit at arain mo nalang

Closed Example program in assembly language

Honorary Poster

Forum Veteran

Eternal Poster

Honorary Poster

Honorary Poster

Honorary Poster

Addict

Honorary Poster

Honorary Poster

Honorary Poster

Popular Tags

About this Thread

Online statistics