Monday, November 17, 2014

Arsip Elektronika Digital

(Untuk mempercepat waktu load di laman Digital)

Digital in Delphi

Berikut adalah kode counter normal 3 bit. (Kode terbaru untuk counter dengan procedure rekursif dan jumlah bit yang fleksibel dapat dilihat di sini



unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, Buttons, Grids;

type
  TForm1 = class(TForm)
    StringGrid1: TStringGrid;BitBtn1: TBitBtn;
    procedure proses;
    function desimal(var q0,q1,q2:boolean):integer;
    procedure BitBtn1Click(Sender: TObject);procedure FormCreate(Sender: TObject);
  private{ Private declarations }public{ Public declarations }
  end;
var
  Form1: TForm1;
  Q,nQ:array[0..2]of boolean;clock:integer=0;jalan:boolean=false;n:integer=2;
implementation{$R *.dfm}
procedure tform1.proses;var i:integer; begin
   clock:=clock+1;if clock>=2 then          clock:=0;
   if clock=0 then begin                    Q[0]:=not Q[0];
     if Q[0]=false then begin               Q[1]:=not Q[1];
       if Q[1]=false then begin             Q[2]:= not Q[2];
     end;end;
     {letak perintah skip dari 111 langsung ke 001}
     stringgrid1.Cells[5,1]:=inttostr(desimal(Q[0],Q[1],Q[2]));
     for i:=0 to 2 do stringgrid1.Cells[    i+2,1]:=inttostr(-1*strtoint(booltostr(Q[i])));
     for i:=0 to 2 do stringgrid1.Cells[    i+2,n]:=inttostr(-1*strtoint(booltostr(Q[i])));
     {letak perintah modif output dari 5 menjadi 2}
     stringgrid1.RowCount:=stringgrid1.     RowCount+1;n:=n+1;
   end;
   stringgrid1.Cells[1,1]:=inttostr(        clock);
end;
procedure TForm1.BitBtn1Click(Sender:       TObject);begin
  jalan := not jalan;
  if jalan=true then bitbtn1.Caption:=      'stop' else bitbtn1.Caption:='jalan';
  while jalan=true do begin
    proses;
    application.ProcessMessages;            sleep(500);
  end;
end;
procedure TForm1.FormCreate(Sender: TObject);var i:integer;begin
  for i:=0 to 2 do begin
    Q[i]:=false;                            nQ[i]:= not Q[i];
    stringgrid1.Cells[i+2,1]:=inttostr(     -1*strtoint(booltostr(Q[i])));
  end;
  stringgrid1.Cells[0,0]:='No';             stringgrid1.Cells[1,0]:='clock';
  stringgrid1.Cells[2,0]:='Q0';             stringgrid1.Cells[3,0]:='Q1';
  stringgrid1.Cells[4,0]:='Q2';             stringgrid1.Cells[5,0]:='Denary';
  stringgrid1.Cells[1,1]:=inttostr(clock);  bitbtn1.Caption:='jalan';
  stringgrid1.FixedRows:=2;                 stringgrid1.ColCount:=6;
end;
function tform1.desimal(var q0,q1,q2:boolean):integer;
begin
  desimal:=1;{sesuaikan :) }
end;
end.

Ubah kode di atas sehingga outputnya menjadi menjadi 12342671234267123... . Isi pula kolom denary.  

 Program dikumpulkan dalam bentuk file zip (dengan file .exe yang sudah dihapus). Kirim ke nugnux@gmail.com atau aravir@me.com sebelum masuk kelas hari Jumat 14 November 2014


**********************************************************

Tugas 3 November 2014

Buat counter (bisa asynchronous atau synchronous) yang menghasilkan hitungan



1, 2, 3, 4, 2, 6, 7, 1, 2, 3, 4, 2, 6, 7, 1, 2,...

Yang perlu diperhatikan
Counter dimulai dari 1, bukan 0

Setiap output bernilai 5 maka diganti dengan nilai 2 dan berlanjut ke 6, 7 dst

Anda dapat menggunakan model asynchronous atau synchronous

Anda dapat menggunakan berbagai gerbang logika atau flip-flop (RS maupun JK) atau register  untuk memodifikasi output

Tips: agar mudah gunakan CLR dan PRE di tiap bistable

Ingat: output sebuah gate tidak boleh digabung dengan output rangkaian lain

Input dapat digabung dengan input lain sebanyak mungkin

Output sebuah rangkaian dapat menjadi input rangkaian lain

Tugas diemail ke nugnux@gmail.com atau aravir@me.com sebelum 7 november 2014


Register




Synchronous Counter



dapat didownload via dropbox

Asynchronous Counter



donwnload via DropBox



Flip-Flop



download di DropBox



@@@@@@@

Tugas Elektronika Digital 29 September 2014


  1. Tulis nama anda (contoh: Nugroho Adi Pramono)
  2. Tulis NIM anda (contoh: 301322413195)
  3. Tulis 5 digit terakhir NIM anda (contoh 13195)
  4. Tulis fungsi f1 berdasarkan nim anda (contoh: f1(w,x,y,z)=∑(1,3,1,9,5))
  5. Gambar K-Map untuk f1 anda
  6. Sederhanakan f1 berdasarkan K-map hingga memiliki literal sesedikit mungkin
  7. lakukan operasi mod 8 untuk tiap digit pada lima digit terakhir NIM anda (contoh: jika NIM = 13195 maka akan menjadi 1 mod 8, 3 mod 8, 1 mod 8, 9 mod 8, 5 mod 8 )
  8. Tuliskan lima digit hasil operasi nomor 7, (contoh 13115)
  9. Tulis fungsi f2 berdasarkan nomor 8 (contoh f2(x,y,z)=∑(1,3,1,1,5))
  10. Gambar K-Map untuk f2 anda
  11. Sederhanakan f2 berdasarkan K-map hingga memiliki literal sesedikit mungkin
  12. Tulis fungsi f3 berdasarkan nomor 8 (contoh f3(w,x,y,z)=∑(1,3,1,1,5)
  13. Gambar K-Map untuk f3 anda
  14. Sederhanakan f3 berdasarkan K-map hingga memiliki literal sesedikit mungkin
  15. Tuliskan kembali NIM anda (contoh: 301322413195)
  16. Lakukan operasi mod 3 pada tiap digit NIM anda (contoh : 3 mod 3, 0 mod 3, 1 mod 3, ....)
  17. Tuliskan hasil operasi pada nomor 16 (contoh :0010    2211    0102 )
  18. Susun hasil no 17 dengan mengganti angka dengan variabel wxyz, jika digit bernilai nol maka variabel diberi tanda aksen, jika digit bernilai dua maka variabel diganti tanda bintang (contoh: w'x'yz'    **yz     w'xy'* ). 
  19. Susun jawaban no 18 menjadi f4 (contoh: f4(w,x,y,z)=w'x'yz'+yz+w'xy')
  20. Gambar f4 dalam K-map
  21. Sederhanakan f4 hingga memiliki literal sesedikit mungkin 
  22. Tuliskan hasil operasi pada nomor 16 (contoh :001    022    110    102 )
  23. Susun hasil no 22 dengan mengganti angka dengan variabel xyz, jika digit bernilai nol maka variabel diberi tanda aksen, jika digit bernilai dua maka variabel diganti tanda bintang (contoh:  x'y'z    x'    xyz'     xy'). 
  24. Susun jawaban no 23 menjadi f5 (contoh: f5(x,y,z)=x'y'z + x '+ xyz'+ xy')
  25. Gambar f5 dalam K-map
  26. Sederhanakan f5 hingga memiliki literal sesedikit mungkin 
Jawaban dikirim ke nugnux@gmail.com atau aravir@me.com paling lambat  6 Oktober pukul 9.00



Gate level Minimization
bisa download langsung di sini (bukan slideshare)


Operasi Logika




@@@@@@@@@@



* September 2014

Sebuah fungsi

F = A + B

memiliki tabel kebenaran sebagai berikut

A
B
F
0
0
0
0
1
1
1
0
1
1
1
1

fungsi

F = A+B.C

memiliki tabel kebenaran sebagai berikut
A
B
C
BC
F
0
0
0
0
0
0
0
1
0
0
0
1
0
0
0
0
1
1
1
1
1
0
0
0
1
1
0
1
0
1
1
1
0
0
1
1
1
1
1
1

Fungsi 

F = AB + B
memiliki tabel kebenaran sebagai berikut

A
B
AB
F
0
0
0
0
0
1
0
0
1
0
0
1
1
1
1
1

Tugas 2 Elektronika digital

Tulis tabel kebenaran untuk
  1. F = A + B + C
  2. F = ABC
  3. F = B' + C
  4. F = A + AC
  5. F = AB + AC
  6. F = AA' + A
  7. F = A + A'
  8. F = A + A'B



Jawaban dapat diketik atau ditulis tangan kemudian difoto atau di-scan. Kirim jawaban ke nugnux@gmail.com atau aravir@me.com dengan subyek "tugas 2 elektronika digital" paling lambat pukul 23.59 tanggal 11 September 2014. 
(Sertakan jawaban tugas gerbang logika sebelumnya dengan cara yang sama)







klik di sini untuk mengakses update dari slide di atas

{end of 8 sept 2014}
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@

Tugas 1 untuk Elektronika Digital


  1. Tuliskan nama anda 
  2. Tuliskan NIM anda (mis: 301322413195)
  3. Tulis NIM anda dalam kelompok 4 digit (3013 2241 3195)
  4. Masukkan empat digit pertama sebagai A berikutnya B dan C (A: 3013; B: 2241; C: 3195)
  5. Lakukan operasi berikut A:= A+C (dan untuk soal selanjutnya, gunakan nilai A yang baru)
  6. Lakukan operasi berikut B:= B+C (dan untuk soal selanjutnya, gunakan nilai B yang baru)
  7. (bukan soal) A, B , C merupakan bilangan desimal
  8. Tuliskan A, B C dalam biner (beserta cara penghitungannya) 
  9. Tuliskan A,B,C dalam oktal (beserta cara penghitungannya)
  10. Tuliskan A,B,C dalam heksadesimal (beserta cara penghitungannya)
  11. (bukan soal) A,B,C merupakan bilangan heksadesimal
  12. Jika NIM dalam heksadesimal, berapa nilai NIM anda jika dijadikan desimal?
  13. Tulis nama lengkap anda (mis NugrohoAdiPramono)
  14. Hapus huruf selain ABCDEF di nama anda (mis: ADA)
  15. (bukan soal) jawaban soal no 14 merupakan bilangan heksadesimal
  16. Ubah bilangan heksadesimal nama anda ke biner, oktal dan desimal (beserta cara penghitungan)
  17. (materi pada soal berikutnya sebagian belum dibahas di kelas)
  18. (bukan soal) kembali ke petunjuk nomor 7
  19. Hitung hasil dari C-A (tulis langkahnya)
  20. Hitung hasil dari C-B (tulis langkahnya)
  21. Berdasarkan soal no 8, hitung hasil dari C-A (tulis langkahnya)
  22. Berdasarkan soal no 8, hitung hasil dari C-B (tulis langkahnya)
  23. Berdasarkan soal no 9, hitung hasil dari C-A (tulis langkahnya)
  24. Berdasarkan soal no 9, hitung hasil dari C-B (tulis langkahnya)
  25. Berdasarkan soal no 10, hitung hasil dari C-A (tulis langkahnya)
  26. Berdasarkan soal no 10, hitung hasil dari C-B (tulis langkahnya)
Jawaban dapat diketik atau ditulis tangan kemudian difoto atau di-scan. Kirim jawaban ke nugnux@gmail.com atau aravir@me.com dengan subyek "tugas 1 elektronika digital" paling lambat pukul 23.59 tanggal 29 Agustus 2014

(boleh kerjasama)