Program Rontok Pada DosBox

kali ini saya akan menjelaskan cara membuat prongram rontok, maksud saya disini adalah semua tulisan rontok seperti daun daun berjatuhan. kali ini saya memakai dosdox untuk membuat program dosbox

setelah itu ketikan penrintah berikut:

• mount e c:\tasm (enter)
• e: (enter)
• edit (enter)

setelah ketikan terakhir edit (enter) maka akan muncul tampilan seperti 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,26
        SUB AL,PosY
        MOV CL,AL
LOOP2:
        MOV AL,BYTE PTR ES:[BX]
        MOV BYTE PTR ES: [BX+160], AL

HILANG:
        MOV BYTE PTR ES:[BX],' '
        DELAY
        add BX,160
        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

atau anda bisa perhatikan gambar di bawah ini

jika telah selesai menbuat program nya simpan lah , kalau saya menyimpannya dengan nama rontok5.asm, setelah itu ketikan perintah berikut

• tasm nama file: tasm rontok5 (enter)
• tlink/t nama file: tlink/t rontok5 (enter)
• nama file: rontok5 (enter)

setelah itu semua tulisan pada dos seolah-olah rontok

sekian lah dari saya semoga postingan dari saya ini bisa di pahami anda bisa mengambil program yang saya buat ini silahkan klik link download di bawah ini