Rabu, 02 Februari 2011

PROGRAM STACK

NAMA: M Hasbi Sadam A
NIM : sir200922
BAHASA RAKITAN

tuliskan source berikut ke notepad:

.model small

.code

org 100h

mulai:

mov ax,15

mov bx,80


add ax,bx

mov bx,10

xor cx,cx


ulang:

xor dx,dx

div bx

push dx

inc cx

cmp ax,0

jne ulang


cetak:

pop dx

add dl,'0'

call cetak_k

loop cetak


int 20h

cetak_k proc near

mov ah,02

int 21h

ret

cetak_k endp

end mulai

maka akan menghasilkan output: 95


»»  READMORE... : both;'/>

Membuat Password

NAMA: M Hasbi Sadam A
NIM : sir200922
BAHASA RAKITAN

Untuk membuat password logikanya kita membandingkan password pada program dengan inputan dari keyboard.
Salah satu perintah yang akan digunakan adalah CMP(compare). CMP akan membandingkan operand1 dengan operand2 dengan cara mengurangkan operand1 dengan operand2. CMP tidak mempengaruhi nilai operand1 dan operand2, perintah CMP hanya akan flags register sebagai hasil perbandingan.

Ok langsung saja prakteknya. . .
Tuliskan Source ini ke notepad:

.model small
.code
org 100h
mulai:
jmp proses
vcal db 10, 'ENTER PASSWORD: $'
vcal1 db 10, 'INCORRECT$'
vcal2 db 10, 'ASSALAMUALAIKUM...$'

proses:
mov ah, 09h
lea dx, vcal
int 21h

mov ah, 07h
int 21h

cmp al, 'Y'
je ya1
jne tidak1

ya1:
mov ah, 02h
mov dl, 2Ah
int 21h

mov ah, 07h
int 21h

cmp al, 'O'
je ya2
jne tidak2

tidak1:
mov ah, 09h
lea dx, vcal1
int 21h
jmp proses

ya2:
mov ah, 02h
mov dl, 2Ah
int 21h

mov ah, 07h
int 21h

cmp al, 'U'
je ya3
jne tidak3

tidak2:
mov ah, 09h
lea dx, vcal1
int 21h
jmp proses

ya3:
mov ah, 02h
mov dl, 2Ah
int 21h

mov ah, 07h
int 21h

cmp al, 'R'
je ya4
jne tidak4

tidak3:
mov ah, 09h
lea dx, vcal1
int 21h
jmp proses

ya4:
mov ah, 02h
mov dl, 2Ah
int 21h
mov ah, 09h
lea dx, vcal2
int 21h
int 20h

tidak4:
mov ah, 09h
lea dx, vcal1
int 21h
jmp proses


end mulai

kalo udah dijalankan maka akan muncul "ENTER PASSWORD: ", kalau kita salah memasukan password maka akan muncul "INCORRECT"

passwornya "YOUR"


»»  READMORE... : both;'/>

Belajar mencetak kalimat berwarna

NAMA: M Hasbi Sadam A
NIM : sir200922
BAHASA RAKITAN

Setelah tadi kita belajar mencetak kalimat tanpa atribut, sekarang saya akan bahas tentang kalimat beratribut. Untuk mencetak kalimat beratribut kita menggunakan interupsi 10h. Ok langsung Praktek saja, kali ini saya akan coba membuat kalimat dengan foreground berwarna biru dan background berwana hijau.
tuliskan source berikut di notepad:


setelah dijalankan maka output'a:


(semoga bermanfaat)

»»  READMORE... : both;'/>

Belajar mencetak kalimat

NAMA: M Hasbi Sadam A

NIM : sir200922
BAHASA RAKITAN

Untuk mencetak kalimat dengan DOS kita menggunakan interupsi 21 dan fungsi 9.
Tuliskan Source dibawah ini pada notepad:

Output dari program diatas adalah
M Hasbi Sadam A
mahasiswa STMIK Widya Utama Purwokerto
lahir 10 Februari 1992

pada akhir dari setiap kalimat yang ingin dicetak harus kita tambahkan karakter"$". Karakter itu dipakai sebagai akhir kalimat.

(semoga bermanfaat)
»»  READMORE... : both;'/>