TUGAS 10
Kelas : 1 Cb
NIM : 0614 3070 05147
Mata Kuliah : Bahasa Rakitan
Kali Ini Saya Akan Memposting Cara Membuat Program Rontok Ke-Atas Menggunakan Dos Box.
Proses Kerjanya sebagai berikut:
1. Jalankan DOSBox 0.74 dan ketik Mount E C:\TASM .
Setelah itu ketik E: , kemudian ketik edit dan enter
Setelah itu ketik E: , kemudian ketik edit dan enter
2. Kemudian ketikan perintah seperti perintah yang ada di gambar tersebut
3. Kemudian simpan program dengan extention (.asm) seperti yang ada pada contoh (rontokta.asm)
Kemudian jalankan program dengan cara berikut
Delay MACRO
PUSH CX
XOR CX,CX
Loop1:
LOOP Loop1
POP CX
ENDM
Geser MACRO PosY
PUSH AX
PUSH BX
PUSH CX
XOR CX,CX
MOV AL,45
SUB AL,PosY
MOV CL,AL
Loop2:
MOV AL,BYTE PTR ES:[BX]
MOV BYTE PTR ES:[BX-80],AL
Hilang:
MOV BYTE PTR ES:[BX],' '
Delay
SUB BX,80
LOOP Loop2
POP CX
POP BX
POP AX
ENDM
.MODEL SMALL
.CODE
ORG 100h
TData : JMP Proses
PosY DB ?
Proses:
MOV AX,0B800h
MOV ES,AX
MOV BX,3998
MOV CX,25
UlangY :
MOV PosY,CL
PUSH CX
MOV CX,80
UlangX :
CMP BYTE PTR ES:[BX],33
JB Tdk
Geser PosY
Tdk :
SUB BX,2
LOOP UlangX
POP CX
LOOP UlangY
EXIT:
INT 20h
END TData
Keterangan :
Apabila Mau Rontok Ke Bawah Pada Bagian [ MOV BYTE di ganti jadi + dan ADD pada Bagian Bawahnya],maka jadi seperti perintah dibawah ini:
MOV BYTE PTR ES:[BX+80],AL
Hilang:
MOV BYTE PTR ES:[BX],' '
Delay
ADD BX,80
Untuk Kiri -20 dan SUB.
Untuk Kanan +20 dan ADD
Selesai.
Untuk Kiri -20 dan SUB.
Untuk Kanan +20 dan ADD
Selesai.
0 Responses so far.
Posting Komentar