Code by Jellydn ASM LIB Support from 06Tonline Việc chuyển đổi qua lại giữa hệ số

Code by Jellydn ASM LIB Support from 06Tonline Việc chuyển đổi qua lại giữa hệ số thì chỉ cần 4 chương trình sau là đủ ( hex dec và bin oct) . Đọc qua code ,các bạn dễ dàng thấy được rằng : - Đoạn code in ra số bin,oct,dec là như nhau ( chỉ sửa từ 39H à37H hay à31H) - Thủ tục nhập số bin,oct là như nhau . - Nhập 16 và in 16 là có sự khác ( do có chữ ) nên trong tài liệu này đã có. - Phương pháp in ra...
Nội dung trích xuất từ tài liệu:
Code by Jellydn ASM LIB Support from 06Tonline Việc chuyển đổi qua lại giữa hệ số Code by Jellydn ASM LIB Support from 06TonlineViệc chuyển đổi qua lại giữa hệ số thì chỉ cần 4 chương trình sau là đủ (hex dec và bin oct) . Đọc qua code ,các bạn dễ dàng thấyđược rằng : - Đoạn code in ra số b in,oct,dec là như nhau ( chỉ sửa từ 39H à37H hay à31H) - Thủ tục nhập số bin,oct là như nhau . - Nhập 16 và in 16 là có sự khác ( do có chữ ) nên trong tài liệu này đã có. - Phương pháp in ra là như nhau ( đều lưu vào stack sao đó đọ c ra lại ) .Còn nhập số b in,oct,hex là như nhau . Chỉ có nhập số dec là khác.Do đó ,chỉ cần 4 code này . Các bạn có thể làm được chuyển qua lại củatất cả hệ ^^.Chú ý :-Chương trình chỉ làm việc với số từ 0à65535-Khi nhập số hex thì phải dùng chữ hoa (tức là ‘A’ ,ko phải là ‘a’).Hi vọng với tài liệu này sẽ giúp ích cho các b ạn trong đợt thi giữ a kì này . Ebook được làm bởi Jellydn.;; Chuong trinh chuyen nhap dec va in hex;; ENV : EMU8086;.MODEL SMALL.STACK 100H.DATA MSG1 DB MOI BAN NHAP 1 SO $ MSG2 DB 0AH,0DH,SO BAN DA NHAP $.CODEMAIN PROCMOV AX,@DATAMOV DS,AX; HIEN THONG BAO MSG1MOV AH,9LEA DX,MSG1INT 21H; NHAP SOCALL NHAP10; XUAT RA SO DA NHAP; HIEN THONG BAO MSG2MOV AH,9LEA DX,MSG2INT 21H; IN SO DA NHAP DUOI DANG HEXMOV AX,SIMOV BX,16 MOV CX,0 SAVE_STACK: MOV DX,0 DIV BX ; AX: THUONG VA DX: SO DU CUA PHEP CHIA [DX:AX] : BX PUSH DX INC CX CMP AX,0 JNE SAVE_STACK MOV AH,2 INKQ: POP DX CMP DL,9; >9 THI SANG XU LY CHU JG CHU OR DL,30H ;--> SANG SO JMP INRA CHU: ADD DL,37H INRA: INT 21H LOOP INKQ; THOAT VE DOSMOV AH,4CHINT 21HMAIN ENDPNHAP10 PROC ; DAU RA LA SI, LUU KET QUA VUA NHAPPUSH AXPUSH BXPUSH CXPUSH DX MOV SI,0 MOV DI,10 NHAP: MOV AH,1 INT 21H CMP AL,13 JE XUAT CMP AL,30H ; 9 JG ERR SUB AL,30H ; -> SO 0->9 MOV BL,AL ; LUU TAM AL SANG BL MOV AX,SI MUL DI ; AX=SI*10 ADD AX,BX MOV SI,AX JMP NHAP ERR: ;IN SANG DONG MOV AH,2 MOV DL,0AH INT 21H MOV DL,0DH INT 21H MOV AH,9 LEA DX,MSG1 INT 21H JMP NHAP XUAT: POP DX POP CX POP BX POP AX RET NHAP10 ENDP END MAIN;; Chuong trinh chuyen nhap hex va in dec;; ENV : EMU8086;.MODEL SMALL.STACK 100H.DATA MSG1 DB MOI BAN NHAP 1 SO HEX $MSG2 DB 0AH,0DH,SO BAN DA NHAP $.CODEMAIN PROCMOV AX,@DATAMOV DS,AX; HIEN THONG BAO MSG1MOV AH,9LEA DX,MSG1INT 21H; NHAP SOCALL NHAP16; XUAT RA SO DA NHAP; HIEN THONG BAO MSG2MOV AH,9LEA DX,MSG2INT 21H; IN SO DA NHAP DUOI DANG DECMOV AX,BXMOV BX,10 MOV CX,0 SAVE_STACK: MOV DX,0 DIV BX ; AX: THUONG VA DX: SO DU CUA PHEP CHIA [DX:AX] : BX PUSH DX INC CX CMP AX,0 JNE SAVE_STACK MOV AH,2 INKQ: POP DX OR DL,30H INT 21H LOOP INKQ; THOAT VE DOSMOV AH,4CHINT 21HMAIN ENDPNHAP16 PROC ; DAU RA LA BX, LUU KET QUA VUA NHAPPUSH AXPUSH CXPUSH DX XOR BX,BX MOV CL,4 MOV AH,1 NHAP: INT 21H CMP AL,13 ; NEU LA ENTER THI THOAT JE XUAT CMP AL,30H ; 9 JG HEX AND AL,0FH ;DOI RA SO NHI PHAN TIEP: SHL BX,CL OR BL,AL JMP NHAP ERR: ;IN SANG DONG MOV AH,2 MOV DL,0AH INT 21H MOV DL,0DH INT 21H MOV AH,9 LEA DX,MSG1 INT 21H MOV AH,1, JMP NHAP HEX: CMP AL,A ; < A JL ERR CMP AL,F ; > F JG ERR SUB AL,37H; JMP TIEP XUAT: POP DX POP CX POP AX RET NHAP16 ENDP END MAIN;; Chuong trinh chuyen nhap bin va in oct;; ENV : EMU8086;.MODEL SMALL.STACK 100H.DATA MSG1 DB MOI BAN NHAP 1 SO BIN $ MSG2 DB 0AH,0DH,SO BAN DA NHAP $.CODEMAIN PROCMOV AX,@DATAMOV DS,AX; HIEN THONG BAO MSG1MOV AH,9LEA DX,MSG1INT 21H; NHAP SOCALL NHAP2; XUAT RA SO DA NHAP; HIEN THONG BAO MSG2MOV AH,9LEA DX,MSG2INT 21H; IN SO DA NHAP DUOI DANG OCTMOV AX,BXMOV BX,8 MOV CX,0 SAVE_STACK: MOV DX,0 DIV BX ; AX: THUONG VA DX: SO DU CUA PHEP CHIA [DX:AX] : BX PUSH DX INC CX CMP AX,0 JNE SAVE_STACK MOV AH,2 INKQ: POP DX OR DL,30H ;--> SANG SO INT 21H LOOP INKQ; THOAT VE DOSMOV AH,4CHINT 21HMAIN ENDP NHAP2 PROC ; DAU RA LA BX, LUU KET QUA VUA NHAP PUSH AX PUSH CX PUSH DX XOR BX,BX MOV CL,1 MOV AH,1 NHAP: INT 21H CMP AL,13 ; NEU LA ENTER THI THOAT JE XUAT CMP AL,30H ; 1 JG ERR AND AL,0FH ;DOI RA SO NHI PHAN SHL BX,CL OR BL,AL JMP NHAP ERR: ;IN SANG DONG MOV AH,2 MOV DL,0AH INT 21H MOV DL,0DH INT 21H MOV AH,9 LEA DX,MSG1 INT 21H MOV AH,1, JMP NHAP XUAT: POP DX POP CX POP AX RET NHAP2 ENDP END MAIN;; Chuong trinh chuyen nhap oct va in bin;; ENV : EM ...