KEEP GOING

kayaknya ga sesuai judul... cuma bisa nampilin 16 warna .. baru segini ilmunya, mungkin nanti kalo berhasil ... insya allah akan saya posting lagi :P jam 12 malam nanti terakhir pengumpulan.. hmm, ya apa adanya aja...bukan ada apanya..hihi yaa setidaknya agak slim dikit programnya.. go macro x,y MOV AX,1300h    ; Servis 13h subfungsi 00 MOV BH,00   ; Halaman tampilan 0   MOV DL,x  ; Posisi X MOV DH,y   ; Posisi Y  endm .MODEL SMALL .CODE ORG 100h TData : JMP Proses Kal0 DB ' ' Proses: go 0,0 MOV BL,00000000b   ; warna hitam MOV CX,1    ; Banyaknya karakter dalam string LEA BP,Kal0 ; ES:BP alamat string INT 10h       ; Cetak kalimat ! go 1,0 MOV BL,00011001b   ;warna biru MOV CX,1    ; Banyaknya karakter dalam string  LEA BP,Kal0 ; ES:BP alamat string INT 10h       ; Cetak kalimat ! go 2,0 MO...

weekend penuh dengan tugas :) ya alhamdulillah karena ada tugas jadi bisa posting artikel lagi.. tugasnya kali ini: mencetak 256 warna. excited banget pengen nyelesain ni soal...tapi sampe sekarang belum berhasil...hehe yang penting prosesnya toh.. hasil sementara: nampaknya sederhana ya...tapi..... panjang bin lebar codenya....cekidot! .MODEL SMALL .CODE ORG 100h TData : JMP Proses Kal0 DB ' ' Proses: MOV AX,1300h    ; Servis 13h subfungsi 00 MOV BL,00000000b   ; warna hitam MOV BH,00   ; Halaman tampilan 0 MOV DL,00   ; Posisi X MOV DH,00   ; Posisi Y MOV CX,1    ; Banyaknya karakter dalam string LEA BP,Kal0 ; ES:BP alamat string INT 10h       ; Cetak kalimat ! MOV BL,00011001b   ;warna biru MOV BH,00   ; Halaman tampilan 0 MOV DL,01   ; Posisi X MOV DH,00   ; Posisi Y MOV CX,1    ; Banyaknya karakt...