Membuat Program Rontok Kesamping

NAMA  : MERNA ERMI YANTI

NIM      :  061430700538
KELAS : T.KOMPUTER/ 1CB
Mata kuliah : BAHASA RAKITAN

Membuat Program Rontok Kesamping

   Pertama - tama,kita akan membuat program rontok kesamping yaitu langkah-langkahnya sebagai berikut ini ;
1. Pertama,buka program DOSBOX  dengan cara buka klik menu Windows > DOSBox 0.74 seperti pada Gambar 1, maka hasil yang akan muncul dilayar anda seperti pada Gambar 2  dibawah ini;
Gambar 1

Gambar 2

 

2. Kemudian anda ketik mount e c:\tasm lalu ketik E: dan yang terakhir ketik Edit seperti padaGambar 1 lalu tekan Enter,maka hasilnya akan menjadi seperti pada Gambar 2 dibawah ini ;
 Gambar1

Gambar 2

 

3. Lalu Hal yang harus anda lakukan selanjutnya adalah mengketik kata - kata seperti yang dibawah ini ;
DELAY   MACRO
                    PUSH CX ; Macro ini digunakan untuk
                    XOR CX,CX ; menunda program, dan
LOOP1:
            LOOP LOOP1 ; hanya melakukan looping
            POP CX
            ENDM

Geser MACRO PosY
              PUSH AX
              PUSH BX
              PUSH CX

              XOR CX,CX
              MOV AL,26
              SUB AL,PosY
              MOV CL,AL
LOOP2:
              MOV AL,BYTE PTR ES:[BX]
              MOV BYTE PTR ES:  [BX-20]AL

HILANG:
              MOV BYTE PTR ES:[BX],'  '
              DELAY
              SUB BX,20
              LOOP LOOP2
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

Hasilnya bisa dilihat dari gambar dibawah ini ;

 Kalau anda telah selesai mengikuti langkah - langkah diatas,hal yang harus anda lakukan selanjutnya adalah menyimpan hasil dari yang sudah anda buat tadi dengan cara klik menu File > Save  kemudian berilah nama file itu xxx.asm atau seperti contoh diatas rontok.asm.
 Setelah anda selesai menyimpannya,kemudian klik menu File > Exit lalu hal yang harus dilakukan selanjutnya adalah ketik tasm rontok(nama file.asm) lalu anda tekan Enter maka hasil yang akan tampil dilayar anda akan menjadi seperti pada gambar dibawah ini ;

 Setelah anda selesai melakukan langkah-langkah diatas,hal yang harus anda lakukan selanjutnya adalah ikuti langkah-langkah berikut ini ;

    ketik tlink rontok (nama file yang telah disimpan) lalu tekan Enter
    ketik tlink/t rontok (nama file yang telah disimpan) lalu tekan Enter
    ketik rontok (nama file yang telah disimpan) lalu tekan Enter

Maka hasil yang akan ditampilkan menjadi seperti pada gambar dibawah ini ;