Member baru? Bingung? Perlu bantuan? Silakan baca panduan singkat untuk ikut berdiskusi.

Welcome to Forum Sains Indonesia. Please login or sign up.

Maret 02, 2024, 11:15:20 AM

Login with username, password and session length

Topik Baru

Artikel Sains

Anggota
Stats
  • Total Tulisan: 139,653
  • Total Topik: 10,405
  • Online today: 67
  • Online ever: 1,582
  • (Desember 22, 2022, 06:39:12 AM)
Pengguna Online
Users: 0
Guests: 24
Total: 24

Aku Cinta ForSa

ForSa on FB ForSa on Twitter

Tolongin Perhitungan Data dengan Assembler

Dimulai oleh freexs077, November 21, 2008, 04:55:09 PM

« sebelumnya - berikutnya »

0 Anggota dan 1 Pengunjung sedang melihat topik ini.

freexs077

Mohon bantuan-nya teman2 semua
Ndra ada masalah pada tugas akhir..??
ada perhitungan :

10 * (TL1/TH1) kemudian hasil keseluruhan dibagi dengan #58

pada perhitungan assemblernya gimana?
Ndra bingung dengan nilai sisa (DIV AB --> B),
karena kalau hasilnya ribuan berarti lebih dari 8 bit,
membagi datanya agar dapat ditampilkan pada seven segment 4 bh
Mohon bantuannya, Tolong balas ke Email.... ^-^
Terima kasih

[email protected]

ksatriabajuhitam

DIV AB
A: 8-bit
B: 8-bit
hasil pembagian disimpan di register A
sisa pembagian disimpan di register B

kalo ngeliat variable yang freexs077 pake, kayaknya pake micro-controller keluarga MCS-51 ya?
karena processor-nya 8-bit, ya kalo handle ribuan tetep aja dinyatakan dalam register 8-bit atau kombinasi beberapa register 8-bit

kalo untuk angka yang besar, ada "dua" solusi:
1. di-scale down, misalnya angka ribuan jadi ratusan: 167700 dianggap 167
2. buat routine untuk pembagian lebih dari 8-bit

untuk solusi ke-2 ini, perlu ditentukan dulu, range datanya mau segimana, misal 0 - 60000, maka bisa pakai 16-bit
untuk pembagian 16-bit, comot aja nih routine:

INPUT:
nilai yang dibagi disimpan di R1:R0, misal 179 --> R1=00000000 R0=10110011
nilai yang membagi disimpan di R3:R2, misal 8 --> R3=00000000 R2=00001000
OUTPUT:
hasil pembagian disimpan di R3:R2


div16_16:
  CLR C       ;Clear carry initially
  MOV R4,#00h ;Clear R4 working variable initially
  MOV R5,#00h ;CLear R5 working variable initially
  MOV B,#00h  ;Clear B since B will count the number of left-shifted bits
div1:
  INC B      ;Increment counter for each left shift
  MOV A,R2   ;Move the current divisor low byte into the accumulator
  RLC A      ;Shift low-byte left, rotate through carry to apply highest bit to high-byte
  MOV R2,A   ;Save the updated divisor low-byte
  MOV A,R3   ;Move the current divisor high byte into the accumulator
  RLC A      ;Shift high-byte left high, rotating in carry from low-byte
  MOV R3,A   ;Save the updated divisor high-byte
  JNC div1   ;Repeat until carry flag is set from high-byte
div2:        ;Shift right the divisor
  MOV A,R3   ;Move high-byte of divisor into accumulator
  RRC A      ;Rotate high-byte of divisor right and into carry
  MOV R3,A   ;Save updated value of high-byte of divisor
  MOV A,R2   ;Move low-byte of divisor into accumulator
  RRC A      ;Rotate low-byte of divisor right, with carry from high-byte
  MOV R2,A   ;Save updated value of low-byte of divisor
  CLR C      ;Clear carry, we don't need it anymore
  MOV 07h,R1 ;Make a safe copy of the dividend high-byte
  MOV 06h,R0 ;Make a safe copy of the dividend low-byte
  MOV A,R0   ;Move low-byte of dividend into accumulator
  SUBB A,R2  ;Dividend - shifted divisor = result bit (no factor, only 0 or 1)
  MOV R0,A   ;Save updated dividend
  MOV A,R1   ;Move high-byte of dividend into accumulator
  SUBB A,R3  ;Subtract high-byte of divisor (all together 16-bit substraction)
  MOV R1,A   ;Save updated high-byte back in high-byte of divisor
  JNC div3   ;If carry flag is NOT set, result is 1
  MOV R1,07h ;Otherwise result is 0, save copy of divisor to undo subtraction
  MOV R0,06h
div3:
  CPL C      ;Invert carry, so it can be directly copied into result
  MOV A,R4
  RLC A      ;Shift carry flag into temporary result
  MOV R4,A   
  MOV A,R5
  RLC A
  MOV R5,A
  DJNZ B,div2 ;Now count backwards and repeat until "B" is zero
  MOV R3,05h  ;Move result to R3/R2
  MOV R2,04h  ;Move result to R3/R2
  RET

copy-paste aja dari [pranala luar disembunyikan, sila masuk atau daftar.]

jadi cara manggilnya:

; siapkan bilangan dibagi
mov R1,<dibagi-1>
mov R0,<dibagi-0>
; siapkan bilangan pembagi
mov R3,<pembagi-1>
mov R2,<pembagi-0>
; panggil rutin pembagian 16-bit
acall div16_16
; ambil hasil pembagian
mov A,R3
mov B,R2



thanks to Jorg Rockstroh, yang udah bikin script div16_16 ini.
(pas kuliah diajarin sih, tapi males buka-buka :P  --duh duh koq males sih ?, dulu coba pake PIC yang ga punya assemby DIV sama sekali, mcs-51 masih mendingan)
not all the problems could be solved by the sword, but sword holder take control of problems.
ForSa versi mobile: http://www.forumsains.com/forum?wap2

insan sains

Keren... keren...

Bisa juga dong untuk bikin arithmatika 32 bit?

@ksatriabajuhitam
Makasih linknya ya...
Menuju Indonesia sebagai THE COUNTRY MASTER OF TECHNOLOGY, 2030