12345

;========================= ;39H = ANGKA ;5AH = HURUF BESAR (A-Z) ;7AH = HURUF KECIL ;HANDARU PUDY ASTOWO ;E11.2008.00280 ;======================== CODE_SEG SEGMENT ASSUME CS:CODE_SEG ORG 100H START: JMP MULAI MSG DB 13,10,'INPUT TOMBOL=$' MSG1 DB 13,10,'INPUT=ANGKA$' MSG2 DB 13,10,'INPUT=HURUF KECIL$' MSG3 DB 13,10,'INPUT=HURUF BESAR$' MULAI: MOV AH,09H MOV DX,OFFSET MSG INT 21H MOV AH,01H INT 21H CMP AL,39H JB TAMPIL_ANGKA CMP AL,5AH JB TAMPIL_HURUF_BESAR CMP AL,7AH JB TAMPIL_HURUF_KECIL TAMPIL_ANGKA: MOV AH,09H MOV DX,OFFSET MSG1 INT 21H INT 20H TAMPIL_HURUF_BESAR: MOV AH,09H MOV DX,OFFSET MSG3 INT 21H INT 20H TAMPIL_HURUF_KECIL: MOV AH,09H MOV DX,OFFSET MSG2 INT 21H INT 20H CODE_SEG ENDS END START

;NAMA = AEROBI WIDYANTO ;NIM = E11.2008.00280 CODE_SEG SEGMENT ASSUME CS:CODE_SEG ORG 100H START:JMP MULAI TEXT_INPUT DB 'INPUT TOMBOL=$' TEXT_ANGKA DB 'INPUT=ANGKA$' TEXT_HURUF_KECIL DB 'INPUT=HURUF KECIL$' TEXT_HURUF_BESAR DB 'INPUT=HURUF BESAR$' MULAI:

MOV DX,OFFSET TEXT_INPUT MOV AH,09H INT 21H MOV AH,01H INT 21H CMP AL,3AH JB TAMPIL_ANGKA CMP AL,5BH JB TAMPIL_HURUF_BESAR CMP AL,7BH JB TAMPIL_HURUF_KECIL

TAMPIL_ANGKA: MOV DX,OFFSET TEXT_ANGKA MOV AH,09H INT 21H INT 20H TAMPIL_HURUF BESAR: MOV DX,OFFSET TEXT_HURUF_BESAR MOV AH,09H INT 21H INT 20H TAMPIL_HURUF_KECIL: MOV DX,OFFSET TEXT_HURUF_KECIL MOV AH,09H INT 21H INT 20H CODE_SEG ENDS END START