Selasa, 12 Januari 2016

Download Visual Basic 6.0 Portable Gratis

Download aplikasi Visual Basic 6.0 Portable

VB 6.0 Portable

Download aplikasi vb 6.0 portable di link akhir postingan ini.

Cara penggunaan

  1. Ekstrak dahulu filenya
  2. Buka folder vb6portable => Standard OCX
  3. Pada Windows XP, double klik file @REG_OCX.bat. Namun pada Windows Vista dan Windows 7, klik kanan file @REG_OCX.bat => Run as administrator
  4. Tunggu beberapa detik sampai prosesnya selesai
  5. Untuk membuka Microsoft Visual Basic 6.0 Portable, buka folder vb6portable => Visual Basic 6.0 (Portable) => vbep.reg agar menjadi portable => VB6.EXE
Download Microsoft Visual Basic 6.0 Portable Untuk PC Free.

Selasa, 27 Oktober 2015

UltraISO Premium Edition 9.6.5.3237 Final

UltraISO Premium Edition 9.6.5.3237 Final Dari sebagian sobat mungkin sudah tahu kegunaan software yang satu ini, yup... Salah satu ke unggulan software ini adalah bisa ngeburning file ISO, atau pun ngeskstrack file ISO, nah.. kali ini saya akan bagikan softwarenya yakni UltraISO Premium Edition 9.6.5.3237 versi TERBARU.. ukurannya yang kecil dan mudah dalam penggunaanya, ..

UltraISO Premium Edition merupakan kategori rekomended software yang mudah di gunakan dalam hal urusan mounting , burning, buat bootable USB windows 7 ke atas, membuat file Iso.

Langkah instalasi

  • Jalankan setup.exe
  • Setelah Selesai, Silahkan Buka Program nya
  • Gunakan key yang disediakan di dalam file

Size : 4 Mb

Langsung saja download di bawah :

Download UltraISO Premium Edition 9.6.5.3237 Final

Kamis, 22 Oktober 2015

Download Game Maker 8.0 pro gratis

Kali ini saya akan posting tentang software untuk membuat game, untuk membuat game dengan software ini tidak perlu keahlian seperti programmer, pemula pun bisa membuat game. Bisa dibilang software ini dapat digunakan semua kalangan baik pemula maupun master. Software ini bernama Game Maker 8.0 didalam software ini sobat dapat membuat berbagai macam game seperti fighting, arcade, shooting, action, bahkan 3D sekalipun. Software ini gratis dan ukurannya tidak sampai 10 Mb hanya 8 Mb saja. Screenshot :

Langsung saja download di bawah : Download Game Maker 8.0 (Solidfiles | 8 MB)

Selasa, 02 Juni 2015

Membuat Actor/Karakter Bisa Melompat di Greenfoot

Kembali lagi dalam tutorial Greenfoot, kali ini saya ingin membagikan tutorial cara membuat acktor agar bisa melompat dan jatuh pada sebuah class world. Tutorial ini saya pelajari dari youtube dan saya hanya ingin membagikan tutorialnya dalam postingan di blog saya ini. Kalau begitu kita langsung saja pada proses pembuatannya di bawah ini.

Hal pertama yang harus di lakukan tentunyan membuat scenario baru dengan cara buka aplikasi Greenfoot klik scenario pilih new masukkan nama sesuai yang kalian inginkan. Buatlah class world baru dengan cara klik kanan world pilih new subclass, kemudian akan tampil kotak dialog dan isi nama class world sesuai kehendak kalian, pilih gambar yang akan di jadikan latar belakang, klik ok. Lihat gambar

klik 2X pada class world bg (nama class world) dan masukkan kode di bawah
import greenfoot.*;

/**
 * Write a description of class bg here.
 * 
 * @author Nunut <kurnia8998@gmail.com>
 * @version 1.0.0
 */
public class bg extends World
{

    /**
     * Constructor for objects of class bg.
     * 
     */
    public bg()
    {    
        super(700, 600, 1); 
    }
}
kemudian tekan Ctrl+K untuk compile kode di atas.

Klik 2X pada class bola dan masukkan kode di bawah.

import greenfoot.*;

/**
 * Write a description of class bola here.
 * 
 * @author Nunut <kurnia8998@gmail.com> 
 * @version 1.0.0
 */
public class bola extends Actor
{
    private boolean jatuh;
    private int y=3;
    private int yspeed=1;
    private int up=18;
    /**
     * Act - do whatever the bola wants to do. This method is called whenever
     * the 'Act' or 'Run' button gets pressed in the environment.
     */
    public void act() 
    {
        move();
        cek();
    }    
    
    public void move()
    {
        if(Greenfoot.isKeyDown("left"))
        {
            turn(-15);
            setLocation(getX()-8,getY());
        }
        if(Greenfoot.isKeyDown("right"))
        {
            turn(15);
            setLocation(getX()+8,getY());
        }
        if(Greenfoot.isKeyDown("space"))
        {
            loncat();
        }
    }
    
    public void loncat()
    {
        if(jatuh==false)
        {
            y=-up;
            bawah();
        }
    }
    
    public void bawah()
    {
        jatuh=true;
        setLocation(getX(),getY()+y);
        y=y+yspeed;
    }
    
    public boolean papan()
    {
        jatuh=false;
        Actor pijakan=getOneObjectAtOffset(0,getImage().getHeight()/2-1,papan.class);
        return pijakan!=null;
    }

    public boolean tanah()
    {
        jatuh=false;
        Actor tanah=getOneObjectAtOffset(0,getImage().getHeight()/2-20,tanah.class);
        return tanah!=null;
    }

    public void cek()
    {
        if(tanah())
        {
            y=0;
        }
        else if(papan())
        {
            y=0;
        }
        else
        {
            bawah();
        }
    }
}
Kemudian tekan Ctrl+K untuk compile, untuk menjalankannya kalian harus menempatkan class-class actor pada class world, agar kelihatan rapi lakukan drag actor tanah terlebih dahulu kemudian actor papan dan terakhir actor bola lihat gambar di bawah.

Download project-nya di sini.

Selasa, 26 Mei 2015

Membuat Game Pingpong Dengan Greenfoot

Membuat Game Pingpong Dengan Greenfoot

Tutorial Greenfoot kali ini saya akan membuat game pingpong, artikel sebelumnya saya juga membuat tutorial game pesawat jia kalian ingin membaca artikel tersebut kunjungi link ini. Langsung saja lihat tutorialnya di bawah.

  1. Buatlah project baru beri nama pingpong
  2. Buat class World baru dengan cara klik kanan>>new subclass>>masukkan nama class, begitu juga dengan class actor caranya sama. Tampilannya akan seperti di bawah.

  3. Masukkan kode di bawah pada class bg (nama subclass world)

    import greenfoot.*;
    
    /**
     * Write a description of class bg here.
     * 
     * @author Nunut <kurnia8998@gmail.com>  
     * @version 1.0.0
     */
    public class bg extends World
    {
        Counter counter = new Counter("Skor: ");
        /**
         * Constructor for objects of class bg.
         * 
         */
        public bg()
        {    
            // Create a new world with 600x400 cells with a cell size of 1x1 pixels.
            super(400, 600, 1); 
            addObject(counter,70,530);
        }
        public void tambah(){
            counter.add(5);
        }
    }
    

    Lalu compile kode tersebut
  4. Masukkan juga kode di bawah ini pada class bola agar bola dapat bergerak dan memantul pada dinding

    import greenfoot.*;
    
    /**
     * Write a description of class bola here.
     * 
     * @author Nunut <kurnia8998@gmail.com>
     * @version 1.0.0
     */
    public class bola extends Actor
    {
        int x=3;
        int y=3;
        /**
         * Act - do whatever the bola wants to do. This method is called whenever
         * the 'Act' or 'Run' button gets pressed in the environment.
         */
        public void act() 
        {
            // Add your action code here.
            gerak();
            kanan();
            kiri();
            atas();
            papankayu();
        }    
        public void gerak()
        {
            setLocation(getX()+x,getY()+y);
        }
        public void kanan()
        {
            if(getX()>=getWorld().getWidth()-getImage().getWidth()/2){
                x=x-1;
            }
        }
        public void kiri()
        {
            if(getX()<=getImage().getWidth()/2){
                x=x+1;
            }
        }
        public void atas()
        {
            Actor batamerah=getOneIntersectingObject(bata.class);
            if(getY()<=getImage().getHeight()/2){
                y=y+1;
            }
            if(batamerah !=null){
                ((bg)getWorld()).tambah();
                getWorld().removeObject(batamerah);
            }
        }
        public void papankayu()
        {
            Actor kayu=getOneIntersectingObject(papan.class);
            if(kayu !=null){
                y=y-1;
            }
            if(getY()>=getWorld().getHeight()-getImage().getHeight()/2){
                Greenfoot.stop();
            }
        }
    }
    
    dan kode di bawah ini masukkan pada class papan agar papan bisa kita gerakan ke kiri dan kanan
    import greenfoot.*;
    
    /**
     * Write a description of class papan here.
     * 
     * @author Nunut <kurnia8998@gmail.com>
     * @version 1.0.0
     */
    public class papan extends Actor
    {
        /**
         * Act - do whatever the papan wants to do. This method is called whenever
         * the 'Act' or 'Run' button gets pressed in the environment.
         */
        public void act() 
        {
            // Add your action code here.
            if(Greenfoot.isKeyDown("left")){
                move(-3);
            }
            if(Greenfoot.isKeyDown("right")){
                move(3);
            }
        }    
    }
    
    kode di bawah ini untuk memperkecil ukuran gambar asli bata menjadi sesuai yang kita butuhkan
    import greenfoot.*;
    
    /**
     * Write a description of class bata here.
     * 
     * @author Nunut <kurnia8998@gmail.com>
     * @version 1.0.0
     */
    public class bata extends Actor
    {
        /**
         * Act - do whatever the bata wants to do. This method is called whenever
         * the 'Act' or 'Run' button gets pressed in the environment.
         */
        public bata()
        {
            GreenfootImage img=getImage();
            img.scale(img.getWidth(),img.getHeight()-30);
            setImage(img);
        }
        public void act() 
        {
            // Add your action code here.
        }    
    }
    

  5. Langkah terakhir yaitu membuat papan sekor dengan menempatkan kode pada class counter
    import greenfoot.*;
    import java.awt.Font;
    /**
     * Write a description of class Counter here.
     * 
     * @author Nunut <kurnia8998@gmail.com>
     * @version 1.0.0
     */
    public class Counter extends Actor
    {
        /**
         * Act - do whatever the Counter wants to do. This method is called whenever
         * the 'Act' or 'Run' button gets pressed in the environment.
         */
        private int value = 0;
        private int target = 0;
        private String text;
        private int stringLength;
    
        public Counter()
        {
            this("");
        }
    
        public Counter(String prefix)
        {
            text = prefix;
            stringLength = (text.length() + 2) * 16;
    
            setImage(new GreenfootImage(stringLength, 24));
            GreenfootImage image = getImage();
            Font font = image.getFont();
            image.setFont(font.deriveFont(24.0F));  // use larger font
            
            updateImage();
        }
        
        public void act() {
            if(value < target) {
                value++;
                updateImage();
            }
            else if(value > target) {
                value--;
                updateImage();
            }
        }
    
        public void add(int score)
        {
            target += score;
        }
    
        public void subtract(int score)
        {
            target -= score;
        }
    
        public int getValue()
        {
            return value;
        }
    
        /**
         * Make the image
         */
        private void updateImage()
        {
            GreenfootImage image = getImage();
            image.clear();
            image.drawString(text + value, 1, 18);
        }
    }
    

setelah semuanya di compile sekarang kita tinggal menempatkan class actor pada world yaitu dengan cara klik kanan pada class actor>>new bata lihat gambar di bawah

kemudian drag class bata dan tempatkan pada world dan hasilnya akan seperti ini

Tutorial di atas sebenarnya saya mempelajarinya dari youtube Kalian juga bisa mendownload projectnya di sini

Minggu, 17 Mei 2015

Tutorial Membuat Shapes di Powerpoint menjadi Transparan dengan VBA

Tutorial Membuat Shapes di Powerpoint menjadi Transparan dengan VBA

Tutorial kali ini saya ingin membuat shapes/bentuk di powerpoint menjadi transparan, membuat shapes menjadi transparan itu tidaklah sulit hanya tinggal klik kanan pada shapes, kemudian format shape dan atur berapa persen transparan yang di kehendaki. Tapi jika kalian ingin mengetahui bagaimana membuat shapes menjadi transparan dengan menggunakan kode script kalian bisa ikuti tutorial di bawah. Sebenarnya banyak sekali manfaat dari Powerpoint salah satunya meningkatkan kreatifitas karena dalam menyajikan sebuah persentasi tidak hanya isi yang berkualitas tapi penampilan pun harus berkualitas. Kalau begitu langsung saja ikuti langkah-langkahnya.

Buatlah tampilan slide seperti gambar di bawah

Kemudian beri nama shapes seperti gambar di bawah

setelah itu tekan Alt+F11 untuk membuka VB for Aplication, buatlah modul baru dan masukan kode di bawah ini
Dim nilai As Integer
Dim x, y As Integer
Dim niliaix As Double

Sub tambah()
nilai = nilai + 1
y = nilai
With ActivePresentation.Slides(1)
.Shapes("kurang").Visible = msoTrue
If nilai = 100 Then
    .Shapes("tambah").Visible = msoFalse
    .Shapes("ukuran").TextFrame.TextRange.Text = "100%"
    .Shapes("merah").Fill.Transparency = 1
ElseIf (nilai > -1 And nilai < 10) Then
    x = (y - 1) + 1
    nilaix = 0.00999999
    .Shapes("ukuran").TextFrame.TextRange.Text = x & "%"
    .Shapes("merah").Fill.Transparency = nilaix * x
ElseIf (nilai > 9 And nilai < 100) Then
    .Shapes("ukuran").TextFrame.TextRange.Text = nilai & "%"
    .Shapes("merah").Fill.Transparency = "0." & nilai
Else
MsgBox "Nilai tidak sesuai"
End If
End With
End Sub

Sub kurang()
nilai = nilai - 1
y = nilai
With ActivePresentation.Slides(1)
.Shapes("tambah").Visible = msoTrue
If nilai = 0 Then
    .Shapes("kurang").Visible = msoFalse
    .Shapes("ukuran").TextFrame.TextRange.Text = "0%"
    .Shapes("merah").Fill.Transparency = 0
ElseIf (nilai > 9 And nilai < 101) Then
    .Shapes("ukuran").TextFrame.TextRange.Text = nilai & "%"
    .Shapes("merah").Fill.Transparency = "0." & nilai
ElseIf (nilai > 0 And nilai < 10) Then
    x = (y - 1) + 1
    nilaix = 0.00999999
    .Shapes("ukuran").TextFrame.TextRange.Text = x & "%"
    .Shapes("merah").Fill.Transparency = nilaix * x
Else
MsgBox "Nilai tidak sesuai"
End If
End With
End Sub
kembali ke slide powerpoint masuk menu Insert kemudian pilih action, lihat gambar

Buatlah visible shapes "kurang" menjadi false seperti gambar di bawah

lalu jalankan slide dengan menekan F5, hasilnya akan terlihat seperti ini

itulah Tutorial Membuat Shapes di Powerpoint menjadi Transparan dengan VBA. Jika ada yang kurang di mengerti silahkan berkomentar, dan untuk postingan selanjutnya mungkin akan membahas mengenai pembuatan animasi dengan VBA. Kalian bisa download hasil slide powerpoint yang telah di buat di sini.

Selasa, 12 Mei 2015

Cara Membuat Gambar atau Objek Menghilang Secara Acak Dengan VBA PowerPoint

Cara Membuat Gambar atau Objek Menghilang Secara Acak Dengan VBA PowerPoint

Untuk menghilangkan gambar atau objek dalam sebuah persentasi kita bisa mengunakan custom animation yang berada pada menu, tetapi kita juga bisa menghilangkan dan memunculkan suatu gambar dengan menggunakan macros atau vba. Pertama-tama kita akan membuat gambar atau objek yang akan di hilangkan atau di munculkan seperti gambar di bawah ini

Klik Shapes>>Oval kemudian buat dua buah oval seperti gambar di atas, buat juga shapes yang berbentuk rectangle seperti gambar di atas. Beri nama pada setiap shapes agar memudahkan dalam pengkodeannya karna kita akan menggunakan vba, klik shapes oval kemudian pilih Format>>Selection Pane seperti pada gambar di bawah

Beri nama shpes oval seperti gambar di atas, lalu kita akan membuat script untuk menghilangkan dan memunculkan shapes dengan cara Alt+F11. Kemudian akan tampil seperti di bawah ini

masukkan script di bawah ini
Sub muncul()
With ActivePresentation.Slides(1)
    .Shapes("bulat_" & Int(Rnd * 2) + 1).Visible = msoTrue
End With
End Sub

Sub hilang()
With ActivePresentation.Slides(1)
    .Shapes("bulat_" & Int(Rnd * 2) + 1).Visible = msoFalse
End With
End Sub
maka akan seperti gambar di bawah

Kembali lagi pada slide powerpoint klik shapes "muncul">>Insert>>Action>>Run Macro seperti pada gambar di bawah

Begitu juga dengan shapes "hilang". Lalu jalankan dengan menekan F5 kemudian klik shapes "hilangkan" maka shapes akan hilang secara acak seperti pada gambar di bawah

Klik shapes "muncul" untuk memunculkan shapes yang hilang

Download Project nya di sini

Itulah Cara Membuat Gambar atau Objek Menghilang Secara Acak Dengan VBA PowerPoint bila kurang di mengerti silahkan berkomentar.