Microcontroller Project Versi 7

Micro 7.0 adalah sebuah graphical IDE (Integrated Development Environment) untuk mikrokontroler keluarga MCS-51 yang menggunakan compiler ASEMW.EXE. Dengan demikian, sintak yang digunakan dalam Micro 7.0 adalah sintak ASEMW jika ditulis menggunakan bahasa assembly.

Selain menggunakan bahasa assembly, Micro 7.0 juga bisa menggunakan bahasa c untuk menulis programnya, yaitu menggunakan SDCC.

Micro 7.0 mengintergrasikan editor yang dilengkapi dengan code explorer, code hint, dan auto completion sehingga penulisan program menjadi lebih mudah. Dan dengan adanya simulator, Anda akan dimudahkan dalam memahami jalannya program dan pada saat melacak kesalahan logika program.

Micro 7.0 memberikan fitur-fitur tambahan dari versi sebelumnya yang akan menambah kemudahan Anda membuat proyek mikrokontroler. Fitur-fitur baru tersebut antara lain:

* Code Explorer

Jika kita membuat sebuah deklarasi variabel, maka secara otomatis variabel-variabel tersebut akan dibuat daftarnya dan akan muncul pada panel kiri dari setiap editor. Demikian juga dengan label yang telah kita buat, makro yang kita buat dan lain-lain.

Daftar yang dibuat di panel kiri diurutkan berdasarkan abjad, bukan posisi. Dengan klik ganda pada obyek yang dituju, kursor akan ditempatpan di posisi obyek tersebut dituliskan.
* Auto Completion

Dengan adanya auto completion, saat kita menulis program, kita akan disuguhi pilihan dengan obyek-boyek yang telah kita buat. Dengan demikian, penulisan program bisa menjadi lebih cepat dan tidak mudah terjadi salah tulis.

Code completion muncul secara otomatis atau bisa dipanggil dengan tombol Ctrl+Spasi

Code completion ini akan secara otomatis muncul jika kita membuat spasi dan saat itu merupakan bagian yang tepat untuk menambahkan kode. Sebagai contoh, saat kita membuat spasi setelah menuliskan acall, maka yang akan dimunculkan adalah semua label yang telah dibuat. Demikian juga jika kita menulis mov, maka setelah menambahkan spasi akan segera dimunculkan semua variabel yang telah kita buat.

Kita juga bisa memanggil agar code completion ini muncul dengan cara menekan tombol Ctrl+Spasi. Jika kita menulis program dalam bahasa C, maka code completion ini tidak akan muncul secara otomatis, kita harus memanggilnya untuk muncul dengan menekan tombol Ctrl+Spasi.
* Code Hint

Jika kita membuat makro atau fungsi pada penulisan program C, maka terkadang kita lupa akan parameter apa saja yang dimiliki oleh makro atau fungsi tersebut. Saat kita menulis sebuah pemanggilan makro atau fungsi, maka secara otomatis akan dimunculkan hint yang menunjukkan parameter yang dimiliki oleh makro atau fungsi tersebut.

Code Hint membantu menunjukkan parameter pada makro atau fungsi. Muncul secara otomatis atau bisa dipanggil dengan menekan tombol Ctrl+Shift+Spasi

Dan sama seperti code completion, jika code hint tidak muncul secara otomatis, maka kita bisa memanggilnya agar muncul dengan menekan tombol Ctrl+Shift+Spasi.

Hal yang paling menarik dari Microcontroller Project adalah integrasi dengan simulator yang bisa dilink ke berbagai program/simulator lain. Kemampuan simulator yang bisa dilink ke simulator lain ini menjadikan Microcontroller Project sangat memudahkan kita dalam merancang sistem berbasis mikrokontroler.

TeamViewer 8.0 SiLeNt InsTall

TeamViewer 8.0.16642 SiLeNt InsTall

Mirrors: Rapidshare | Sharebeast

FREE Download TeamViewer 8.0 Full Version - TeamViewer merupakan salah satu software Remote Desktop yang sudah sangat populer dan banyak digunakan karena kemudahannya serta mampu berjalan di berbagai sistem operasi, seperti Windows, Mac OX X, Linux, iOS dan juga Android. TeamViewer terdiri dari dua buah program utama, satu program dijalankan di komputer kita dan satu lagi di komputer yang akan kita akses melalui komputer kita (remote). Setelah keduanya terkoneksi maka kita bisa mengakses komputer secara remote dengan mudah karena tampilannya merupakan tampilan dekstop komputer remote (lengkap dengan start menu, icon2 dan program2 yang ada).

Screenshot

TeamViewer is a simple and fast solution for remote control, desktop sharing and file transfer that works behind any firewall and NAT proxy.To connect to another computer just run TeamViewer on both machines without the need of an installation procedure. With the first start automatic partner IDs are generated on both computers. Enter your partner’s ID into TeamViewer and the connection is established immediately.

With many thousand users worldwide TeamViewer is a standard tool to give support and assistance to people in remote locations. The software can also be used for presentations, where you can show your own desktop to a partner. TeamViewer also is VNC compatible and offers secure, encrypted data transfer with maximum security. TeamViewer establishes connections to any PC all around the world within just a few seconds. You can remote control your partner’s PC as if you were sitting in right front of it.TeamViewer is completely free for private use.

Features

• One solution for everything. While most competitors offer different packages for remote support, remote administration, training and sales (and also charge for them…) TeamViewer is the one-stop solution for everything you need: TeamViewer includes all modules in one simple and very affordable package.
• Remote administration of unattended servers. TeamViewer can also be used to control unattended computers and servers. Installation as a system service even allows remote reboot and reconnect. • File transfer. TeamViewer comes with integrated file transfer that allows you to copy files and folders from and to a remote partner – which also works behind firewalls
• Highest security standard. TeamViewer is a very secure solution. All versions feature completely secure data channels with key exchange and RC4 session encoding, the same security standard used by https/SSL.
• No installation required. To install TeamViewer no admin rights are required. Just run the software and off you go…
• High performance with international router network. Optimized for connections over LANs AND the Internet, TeamViewer features automatic bandwidth-based quality selection for optimized use on any connection. TeamViewer uses an extended international server network with server locations in many countries all over the world, so no matter where you are located we will make sure that a high-security, high-performance router near your home destination will ensure great performance.
• Remote support without installation. With TeamViewer you can remotely control any PC anywhere on the Internet. No installation is required, just run the application on both sides and connect – even through tight firewalls.
• Remote presentation of products, solutions and services. The second TeamViewer mode allows you to present your desktop to a partner. Show your demos, products and presentations over the Internet within seconds – live from your screen.
• Works behind firewalls. The major difficulties in using remote control software are firewalls and blocked ports, as well as NAT routing for local IP addresses. If you use TeamViewer you don’t have to worry about firewalls: TeamViewer will find a route to your partner.
• Flexible use for a variety of applications. TeamViewer lets you connect to your partners in many different ways: You can either view or control your partner’s desktop in order to do online-support; You can transmit your screen to your partners for presentation purposes – You may even change directions during a session for high fidelity teamwork!

Link download
Mirror via Rapidshare

• TeamViewer 8.0 SiLeNt InsTall - (13MB)

Mirror via Sharebeast

• TeamViewer 8.0 SiLeNt InsTall - (13MB)

Password: koskomputer

Installasi
1. Ekstrak rar
2. Run TeamViewer 8.msi
3. Enjoy

Cara Membuat Aplikasi WinRar di Delphi 7

Selamat siang agan-agan.Pada puasa gak !? Hehe.Untungnya siang ini cuaca agak mendung , jadinya tidak terlalu kehausan.Biarpun puasa , aktifitas coding , blogging dan learning tetep harus jalan.Pada postingan kali ini , saya akan memberikan tutorial Cara Membuat Aplikasi WinRar di Delphi 7.Udah tau dong WinRar itu apa !? Yups , aplikasi yang berfungsi untuk mengkompres beberapa file menjadi satu , dan tentu mendekompresnya lagi.Berguna banget kalau kita mau mengkopi file yang berjumlah banyak , agar lebih ringkas dan terlihat rapi.Lalu tunggu apa lagi !? Buka borland Delphi 7 anda dan mari kita berguling (maksudnya rolling !! haha)

Yang paling esensial dari program yang akan kita buat ini , adalah 2 buah procedure.Masing-masing untuk kompres dan dekompres file.Pertama , kita akan membuat procedure untuk kompres terlebih dahulu.Ketikan kode berikut setelah {$R *.dfm}

1. procedure kompresFile(Files : TStrings; const namaFile : String);  
2. var  
3.   fileMasuk, fileKeluar, tmpFile : TFileStream;  
4.   kompres : TCompressionStream;  
5.   i,l : Integer;  
6.   s : String;  
7.   
8. begin  
9.   if Files.Count > 0 then  
10.   begin  
11.     fileKeluar := TFileStream.Create(namaFile,fmCreate);  
12.     try  
13.       { jumlah file yang akan di kompres }  
14.       l := Files.Count;  
15.       fileKeluar.Write(l,SizeOf(l));  
16.       for i := 0 to Files.Count-1 do  
17.       begin  
18.         fileMasuk := TFileStream.Create(Files[i],fmOpenRead);  
19.         try  
20.           { nama asli file }  
21.           s := ExtractFilename(Files[i]);  
22.           l := Length(s);  
23.           fileKeluar.Write(l,SizeOf(l));  
24.           fileKeluar.Write(s[1],l);  
25.           { ukuran asli file }  
26.           l := fileMasuk.Size;  
27.           fileKeluar.Write(l,SizeOf(l));  
28.           { kompress dan simpan file temporari}  
29.           tmpFile := TFileStream.Create('tmp',fmCreate);  
30.           kompres := TCompressionStream.Create(clMax,tmpfile);  
31.           try  
32.             kompres.CopyFrom(fileMasuk,l);  
33.           finally  
34.             kompres.Free;  
35.             tmpFile.Free;  
36.           end;  
37.           { menambahkan file terkompresi ke file tujuan }  
38.           tmpFile := TFileStream.Create('tmp',fmOpenRead);  
39.           try  
40.             fileKeluar.CopyFrom(tmpFile,0);  
41.           finally  
42.             tmpFile.Free;  
43.           end;  
44.         finally  
45.           fileMasuk.Free;  
46.         end;  
47.       end;  
48.     finally  
49.       fileKeluar.Free;  
50.     end;  
51.     DeleteFile('tmp');  
52.   end;  
53. end;  

procedure kompresFile(Files : TStrings; const namaFile : String);
var
  fileMasuk, fileKeluar, tmpFile : TFileStream;
  kompres : TCompressionStream;
  i,l : Integer;
  s : String;

begin
  if Files.Count > 0 then
  begin
    fileKeluar := TFileStream.Create(namaFile,fmCreate);
    try
      { jumlah file yang akan di kompres }
      l := Files.Count;
      fileKeluar.Write(l,SizeOf(l));
      for i := 0 to Files.Count-1 do
      begin
        fileMasuk := TFileStream.Create(Files[i],fmOpenRead);
        try
          { nama asli file }
          s := ExtractFilename(Files[i]);
          l := Length(s);
          fileKeluar.Write(l,SizeOf(l));
          fileKeluar.Write(s[1],l);
          { ukuran asli file }
          l := fileMasuk.Size;
          fileKeluar.Write(l,SizeOf(l));
          { kompress dan simpan file temporari}
          tmpFile := TFileStream.Create('tmp',fmCreate);
          kompres := TCompressionStream.Create(clMax,tmpfile);
          try
            kompres.CopyFrom(fileMasuk,l);
          finally
            kompres.Free;
            tmpFile.Free;
          end;
          { menambahkan file terkompresi ke file tujuan }
          tmpFile := TFileStream.Create('tmp',fmOpenRead);
          try
            fileKeluar.CopyFrom(tmpFile,0);
          finally
            tmpFile.Free;
          end;
        finally
          fileMasuk.Free;
        end;
      end;
    finally
      fileKeluar.Free;
    end;
    DeleteFile('tmp');
  end;
end;

Perhatikan bahwa variabel files bertipe TString.Artinya , kita bisa menambahkan beberapa file sekaligus dan menjadikannya satu file terkompresi.Untuk memanggil procedure diatas misal dengan menekan tombol , gunakan kode berikut

1. procedure TForm1.button1Click(Sender: TObject);  
2. begin  
3.   kompresFile(namaBeberapaFileYangAkanDiKompres , namaOutputFileTerkompres);  
4. end;  

procedure TForm1.button1Click(Sender: TObject);
begin
  kompresFile(namaBeberapaFileYangAkanDiKompres , namaOutputFileTerkompres);
end;

Selanjutnya adalah , kita akan membuat procedure untuk dekompres file yang terkompres sebelumnya.Ketikan procedure di bawah ini setelah procedure kompresFile

1. procedure dekompresFile(const namaFile, folderTujuan : String);  
2. var  
3.   tujuan,s : String;  
4.   dekompres : TDecompressionStream;  
5.   fileMasuk, fileKeluar : TFilestream;  
6.   i,l,c : Integer;  
7. begin  
8.   
9.   tujuan := IncludeTrailingPathDelimiter(folderTujuan);  
10.   
11.   fileMasuk := TFileStream.Create(namaFile,fmOpenRead);  
12.   try  
13.     { number of files }  
14.     fileMasuk.Read(c,SizeOf(c));  
15.     for i := 1 to c do  
16.     begin  
17.       { membaca nama file }  
18.       fileMasuk.Read(l,SizeOf(l));  
19.       SetLength(s,l);  
20.       fileMasuk.Read(s[1],l);  
21.       { membaca ukuran file }  
22.       fileMasuk.Read(l,SizeOf(l));  
23.       { dekompres file dan menyimpannya }  
24.       s := tujuan+s; //memasukan tujuan pathnya  
25.       fileKeluar := TFileStream.Create(s,fmCreate);  
26.       dekompres := TDecompressionStream.Create(fileMasuk);  
27.       try  
28.         fileKeluar.CopyFrom(dekompres,l);  
29.       finally  
30.         fileKeluar.Free;  
31.         dekompres.Free;  
32.       end;  
33.     end;  
34.   finally  
35.     fileMasuk.Free;  
36.   end;  
37. end;  

procedure dekompresFile(const namaFile, folderTujuan : String);
var
  tujuan,s : String;
  dekompres : TDecompressionStream;
  fileMasuk, fileKeluar : TFilestream;
  i,l,c : Integer;
begin

  tujuan := IncludeTrailingPathDelimiter(folderTujuan);

  fileMasuk := TFileStream.Create(namaFile,fmOpenRead);
  try
    { number of files }
    fileMasuk.Read(c,SizeOf(c));
    for i := 1 to c do
    begin
      { membaca nama file }
      fileMasuk.Read(l,SizeOf(l));
      SetLength(s,l);
      fileMasuk.Read(s[1],l);
      { membaca ukuran file }
      fileMasuk.Read(l,SizeOf(l));
      { dekompres file dan menyimpannya }
      s := tujuan+s; //memasukan tujuan pathnya
      fileKeluar := TFileStream.Create(s,fmCreate);
      dekompres := TDecompressionStream.Create(fileMasuk);
      try
        fileKeluar.CopyFrom(dekompres,l);
      finally
        fileKeluar.Free;
        dekompres.Free;
      end;
    end;
  finally
    fileMasuk.Free;
  end;
end;

Dan untuk memanggil procedure diatas misal dengan menekan tombol , ketikan kode berikut

1. procedure TForm1.button1Click(Sender: TObject);  
2. begin  
3.   dekompresFile(fileYangAkanDiDekompres,folderTujuan);  
4. end;  

procedure TForm1.button1Click(Sender: TObject);
begin
  dekompresFile(fileYangAkanDiDekompres,folderTujuan);
end;

Teettooooott !! Beres deh.Apanya yang beres yu !? Dari tadi kan ente gak nyuruh masukin component apapun !! Emang sih , hehe .. Tapi tenang , saya sudah membuat contoh program berikut source codenya yang bisa agan-agan download DISINI.Silahkan agan modifikasi sesuka hati , yang terpenting dari program tersebut ya 2 procedure di atas tadi.Implementasinya dalam program , tergantung selera anda dong !? hehe..Sekian postingan kali ini , semoga bermanfaat.