Program Bilangan Ganjil Genap Array Pascal

Program Bilangan Ganjil Genap Array Pascal - membuat program untuk memilah angka bilangan ganjil genap cukup mudah, tentunya jangan sampai lupa dasarnya, yaitu penggunaan beberapa operasi pada pemrograman pascal seperti penggunaan if, if else, for, dan yang lainnya. 

Pemrograman pascal dalam menentukan bilangan ganjil atau bilangan genap menggunakan type data array sehingga maksimum bilangan yang bisa kita input di consol pascal sebanyak maksimal 100 angka. 

Dimana untuk mendeklarasikan array tersebut dapat di lihat pada bagian code berikut: 

angka:array[1..100] of integer;

Artinya pascal diperintahkan untuk membentuk sebuah type media penyimpanan data bernama angka dengan type data array sebanyak maksimal 100.

Pada code berikutnya: 

b,i,jlhgen,jlhgan,ganjil,genap:integer;

Arti code ini kita mengeset atau memerintahkan pascal untuk membuat media penyimpanan juga berupa variable b,i, jlhgen, jlhganjil, ganjil, genap dengan type integer:

Variabel-variable tersebut digunakan untuk menyimpan banyaknya data yang diinput, kemudian jumlah angka ganjil, jumlah angka genap, angka ganjil dan genap yang dipisahkan. 

Code pascal selanjunya 

write('Masukkan Banyak data yg diinput: ');readln(b);

Fungsi code ini untuk membuat berapa kali/ berapa banyak inputan, yang inputan tersebut akan di simpan pada variable b, kemudian di olah sedemikian pada code berikut dalam bentuk perulangan:

for i:=1 to b do
  begin
  writeln('Angka ke-',i,' adalah: ',angka[i]);
  if angka[i] mod 2=0 then
    begin
      jlhgen:=jlhgen+angka[i];
      genap:=genap+1;
     
    end
   else
     begin
       jlhgan:=jlhgan+angka[i];
       ganjil:=ganjil+1;
      
     end;

Pada dasarnya inti dari pemrograman pascal menentukan bilangan ganjil genap dan jumlah atau banyaknya bilangan ganjil dan genap ada pada code ini. Yang akan di lakukan perulangan dimana i diberi nilai satu sampai ke b (banyaknya/kali angka yang diinput pada baris sebelumnya). 

Kemudian di minta inputan angka pertama dan seterusnya yang akan disimpan di array[sebanyakperulangan]; 

Angka yang di inputkan di bagi dengan 2 jika sisanya adalah nol maka angka tersebut adalah angka genap, sedangkan sebaliknya angka tersebut adalah angka ganjil. 

Pada kode berikutnya 

writeln('banyak angka genap: ',genap);
  writeln('Hasil Jumlah angka Genap: ',jlhgen);
  writeln('Hasil Jumlah angka Ganjil: ',jlhgan);
  writeln('banyak angka ganjil: ',ganjil);
  writeln('Hasil jumlah semua angka adalah: ',jlhgan+jlhgen);
  writeln('Banyak Angka yg di Input adalah: ',b);

Bagian ini tidak telalu penting sebenarnya didalam logika dan belajar pemrograman, karena beris-baris tersebut hanya berfungsi untuk mencetak atau membuat hasil keluaran dari proses code sebelumnya. Sehingga kita bisa melihat berapa banyak angka ganjil dan berapa banyak angka genap dilayar komputer.

Berikut code bilangan ganjil genap dengan pascal. 

program input_array;
uses crt;
var
angka:array[1..100] of integer;
b,i,jlhgen,jlhgan,ganjil,genap:integer;

begin
clrscr;
  write('Masukkan Banyak data yg diinput: ');readln(b);
  for i:=1 to b do
  begin
  write('Angka ke-',i,' adalah: ');readln(angka[i]);
  end;
  writeln('-------------------------------------------');
  writeln(' ');
 
  for i:=1 to b do
  begin
  writeln('Angka ke-',i,' adalah: ',angka[i]);
  if angka[i] mod 2=0 then
    begin
      jlhgen:=jlhgen+angka[i];
      genap:=genap+1;
     
    end
   else
     begin
       jlhgan:=jlhgan+angka[i];
       ganjil:=ganjil+1;
      
     end;
  end;
  writeln('banyak angka genap: ',genap);
  writeln('Hasil Jumlah angka Genap: ',jlhgen);
  writeln('Hasil Jumlah angka Ganjil: ',jlhgan);
  writeln('banyak angka ganjil: ',ganjil);
  writeln('Hasil jumlah semua angka adalah: ',jlhgan+jlhgen);
  writeln('Banyak Angka yg di Input adalah: ',b);
 
 
  readln;
end.

Program Bilangan Ganjil Genap Array Pascal - Menentukan bilangan ganjil atau bilangan genap dengan bahasa pemrograman pascal - mencari ganjil genap.

Cetak Output Pascal Berbaris Tidak Turun Kebawah

Cetak Output Pascal Berbaris Tidak Turun Kebawah - judulnya rasanya aneh ya. Tapi tak apa-apa biar unik sendiri, terkadang sebagai pemula bermain-main dengan codingan, banyak kesalahan, bahkan sampai bikin pusing terkadang kita mencari masalahnya dimana, masalah yang cukup sering saya alami salah satunya ketika membuat print out di consol pascal, cetakannya tidak turun dibawah (enter), tetapi malah berbaris ke arah kanan. 

Seperti Screenshoot gambar diatas, tulisan nama barang dan banyak barang berada sejajar, seharusnya tulisan tersebut berjejer kebawah biar terlihat rapi. 

Masalah ini sebenearnya sangat mudah mengatasinya. Coding tampilan diatas seperti terlihat pada potongan code pascal berikut ini: 

begin 

clrscr; 

write('Masukkan Nama Pelanggan : ');read(nama); 

write('Masukkan Banyak Data : ');readln(n); 

for i:=1 to n do 

begin 

 write('Nama Barang : ');read(sw[i].nabar); 

 write('Banyak Barang : ');read(sw[i].banyak); 

 write('Harga Satuan : ');read(sw[i].hasat); 

 sw[i].jlh:=sw[i].banyak * sw[i].hasat; 

 writeln(); 

end;

Untuk mengatasi permasalahan diatas, kita bisa menambah atau mengubah code read menjadi readln, 

Sehingga hasilnya telihat seperti code berikut: 

Kejadian-kejadian aneh pada pascal seperti Cetak Output Pascal Berbaris Tidak Turun Kebawah pasti banyak yang mengalaminya, atau mungkin error-error lain yang sebenarnya bisa disebabkan oleh kesalahan ketik seperti tadi. 

Untuk lengkap code swalayan tersebut diatas bisa di lihat pada code dibawah ini 

program swalayan;

uses crt;

Type Rswalayan=record

     jlh:longint;

     banyak:longint;

     nabar:string;

     hasat:longint;

     total:longint;

end;

var sw:array[1..100]of Rswalayan;

i,n:integer;

nama:string;

pembayaran, kembalian : longint;

begin

clrscr;

write('Masukkan Nama Pelanggan  : ');read(nama);

write('Masukkan Banyak Data     : ');readln(n);

for i:=1 to n do

begin

  write('Nama Barang    : ');readln(sw[i].nabar);

  write('Banyak Barang  : ');readln(sw[i].banyak);

  write('Harga Satuan   : ');readln(sw[i].hasat);

  sw[i].jlh:=sw[i].banyak * sw[i].hasat;

  writeln();

end;

clrscr();

gotoxy(10,10);write('-----------------------------------------------------------------------');

gotoxy(30,11);write('TOKO TIP TOP':20);

gotoxy(10,12);write('-----------------------------------------------------------------------');

gotoxy(10,13);write('Nama Pelanggan  : ',nama);

writeln();

gotoxy(10,14);write('No');

gotoxy(15,14);write('Nama Barang ');

gotoxy(35,14);write('Banyak Barang ');

gotoxy(52,14);write('Harga Satuan ');

gotoxy(68,14);write('Jumlah');

for i:=1 to n do

begin

gotoxy(10,15+i);write(i);

gotoxy(15,15+i);write(sw[i].nabar);

gotoxy(35,15+i);write(sw[i].banyak);

gotoxy(55,15+i);write(sw[i].hasat);

gotoxy(68,15+i);write(sw[i].jlh);

sw[i].total:=sw[i].total + sw[i].jlh;

end;

gotoxy(10,16+i);write('-----------------------------------------------------------------------');

gotoxy(10,17+i);write('Total              : ',sw[i].total);

gotoxy(10,18+i);write('Pembayaran         : ');readln(pembayaran);

gotoxy(10,19+i);write('Kembalian          : ',pembayaran-sw[i].total);

readln;

end.

Tampilan bahasa pemrograman toko dengan pascal diatas jadi seperti ini

Menggunakan Type Data Record Pada Pascal

Menggunakan Type Data Record Pada Pascal - Menggunakan type data record pada pascal untuk menampung beberapa inputan. Misalnya kita ingin menampung beberapa inputan menggunakan satu buah variable. 

Record sekilas mirip array, dan pada penggunaan berikut juga saya menggunakan array untuk melakukannya. 

Kode Menggunakan Record pascal dibawah ini sederhana, sekedar bahan saya mencoba saja, untuk penambahan variable lain selain nama silahkan di modifikasi di bagian type.

berikut kode penggunaan type data record pada pascal:

program cobaRecord;

uses crt;

type rcMhs=record

       nama : string[25];

end;

var

mhs:array[1..100] of rcMhs;

i,j:integer;

begin

clrscr;

write('Masukkan Jumlah Data : ');readln(i);

for j:=1 to i do

begin

  writeln('Data Mahasiswa Ke-',j);

  with mhs[j] do

  begin

       write('Nama : '); readln(nama);

  end;

end;

writeln('===============================================================');

writeln('Nama ');

for j:=1 to i do

begin

    with mhs[j] do

    begin

       writeln(nama);

    end;

end;

readln;

end. 

Jadwal Imsyakiah Ramadhan 2022 - Jakarta Timur

Jadwal imsyakiah ramadhan 2022 wilayah jakarta timur -

Cara memperbaiki upgrade update kali linux lambat

Cara memperbaiki upgrade update kali linux lambat - Saya menginstall kalilinux di laptop menggunakan virtualbox, sekian hari kali linux yang terinstall menganggur dilaptop tanpa digunakan, akhirnya hari ini saya coba membuka dan melakukan update dan upgrade systemnya. 

Namun update dan upgrade yang dilakukan kali linux tergolong sangat lambat dan sangat lama. Bahkan speed internet dari update dan upgrade kali linux sangat kecil. 

Disisi lain saya memutar video dan lagu di youtube koneksi berjalan stabil dan kencang. Tapi update dan upgrade kali linuxnya sangat-sangat lambat dan lama, bahkan estimasi untuk ukuran file 10mb dia butuh 1 hari lebih. 

Untuk memperbaiki upgrade update ubuntu linux yang lambat ini saya melakukan perubahan pada sources.list

Bagaimana cara mengubah sources.list di kali linux?

Cara mengubah sources.list kali linux sama halnya seperti mengubah sources.list  repository ubuntu, bahkan perintah dan path filenya juga sama persis dengan ubuntu linux. 

Bagi yang tidak tahu cara mengubahnya berikut caranya. 

Pertama amankan file asli dari sources list, dengan membuat backup filenya, perintahnya:

sudo cp /etc/apt/sources.list /etc/apt/sources.list-backup

Perintah sudo harus ditambahkan apabila login sebagai user biasa, atau user kali, tapi jika login sebagai super user, sudo tidak perlu di tambahkan. Untuk login sebagai user user kali linux / ubuntu linux perintahnya sudo -i atau sudo su . 

Jika backup sudah dibuat, maka file sources.list bisa kita ubah isinya. Perintahnya buka dengan text editor nano, text editor linux paling saya sukai ya nano ini. 

sudo nano /etc/apt/sources.list

Setelah file editor terbuka dengan isi file sources.list maka isinya boleh dihapus semua, atau berikan tanda komentar berupa tanda # pada tiap baris repository kali linux yang ada disana. 

Kemudian dibaris paling bawah sisipkan kode dibawah ini jika memang baris perintahnya diberi tanda komentar, atau tambahkan code dibawah ini jika baris repository didalam sources.list dihapus semuanya. Berikut repository yang saya gunakan untuk mempercepat upgrade dan update kali linux.

deb https://mirrors.ocf.berkeley.edu/kali/ kali-rolling main non-free contrib

Sehinga terlihat seperti gambar dibawah ini, jika baris-baris repository yang ada di komentari, atau hanya baris tersebut diatas yang ada jika list repository kali linuxnya di hapus. 

Jika repository kali linux sudah diganti, simpan file dengan perintah CTRL +X dan tekan tombol Y untuk menyimpan.

Selanjutnya lakukan perintah update dan upgrade

sudo apt-get update && apt-get upgrade -y

atau dengan perintah lain 

sudo apt update && apt upgrade -y

Semoga Cara memperbaiki upgrade update kali linux lambat dapat mempercepat proses update dan upgrade kali linux yang kita miliki. 

Mencari Hasil Pemangkatan menggunakan Looping Pada Pascal

Mencari Hasil Pemangkatan menggunakan Looping Pada Pascal - membuat perulangan dalam pascal banyak caranya, demikian juga untuk mendapatkan hasil pemangkatan suatu angka banyak cara yang bisa digunakan, termasuk menggunakan  kalkulator, software excell atau trik-trik lainnya. 

Tulisan berikut merupakan dokumentasi, bagaimana mencari pangkat suatu angka menggunakan perulangan pada Mengenal pemrograman pascal. 

Pemangkatan dapat diartikan bahwa perkalian sebuah nilai sebanyak nilai pangkatnya. Untuk code pascal dalam mencari suatu pangkat menggunakan looping perulangan misalanya seperti berikut:

program menghitung_pangkat;

begin
clrscr;
	write('Masukkan angka yang akan dipangkatkan: '); readln(angka1);
	write('Masukkan pangkat bilangan: ');readln(pangkat);
	hasil:=1;
	for i:=1 to pangkat do
	begin
		hasil:=hasil*angka1;
		
	end;
	writeln('Hasil dari ',angka1,'Pangkat ',pangkat,' adalah: ',hasil);
end.

Untuk menjalankan program Cetak output pascal turun kebawah tidak berbaris ini, saya menggunakan software freepascal dan editor sublime, gratisan tentunya bukan yang crack apalagi yang beli. Semoga Mencari Hasil Pemangkatan menggunakan Looping Pada Pascal. Hasil menjalankan progam pascal mencari pangkat suatu bilangan seperti berikut:

Pascal : Mengenal Pemrograman Pascal

Pascal : Mengenal Pemrograman Pascal, pascal adalah salah satu bahasa pemrograman tertua yang pernah ada, konon nama pascal ini diambil dari seorang ahli matematika dari prancis, bernama Blaise Pascal. Nama tersebut di gunakan sebagai penghermatan atas jasanya pada dunia pengetahuan, terlebih kepada ilmu matematik dan philosofi. Pascal di buat sekitar tahun 1968 dan dipublikasikan sekitar tahun 1970, oleh pembuatnya bernama Niclaus Wirth. ''

Bahasa pemrograman pascal bahasa yang di jalankan secara prosedural, yang artinya baris demi baris program ini di eksekusi/dijalankan oleh kompiler. Bahasa ini cukup mudah untuk dipelajari, bahkan mungkin sangat mudah dibanding dengan bahasa pemrograman lainnya, meski bahasa pascal sudah sangat amat tua, namun bahasa ini menjadi bahasa pemrograman wajib di sekolah - atau di kampus-kampus.Karena memang awal mula dibuatnya pascal juga untuk tujuan membantu didunia pendidikan.

Gambar blaise_pascal sumber: https://www.britannica.com/biography/Blaise-Pascal

Bahasa pemrograman pascal bisa berjalan di banyak operating system, seperti misalnya windows, mac-os, atau bahkan bisa dijalankan di unix/linux. Pada artikel Pascal : Mengenal Pemrograman Pascal saya kan menggunakan mungkin beberapa text editor seperti bawaan dari freepascal, lazarus atau mungkin bahkan menggunakan editor sublime.

Sebelum kita memulai belajar pascal, sebaiknya kita download dahulu aplikasi atau compiler dari pascal itu sendiri, anda bisa menggunakan turbo-pascal, atau freepascal, dan pada totorial ini saya menggunakan freepascal dan editor bawaannya yang berwarna biru, sebagai pemula dalam hal pemrograman ada baiknya gunakanya saja dahulu editor bawaan dari freepascal, oh iya jika kamu tidak memiliki komputer sedang kamu ingin belajar pemrograman pascal, atau kamu mau menyelesaikan tugas sekolah pemrograman pascal tapi tidak memiliki laptop atau komputer maka kamu bisa menggunakan handphone untuk belajar pemrograman ini, kamu bisa gunakan atau download aplikasi pascal-n ide di apps google store.

Pada tutorial kali ini, saya menggunakan komputer, mungkin dikesempatan lain kita akan menggunakan handphone android. Bahasa pascal juga merupakan bahasa yang general purpose (bisa menyelesaikan banyak masalah), high level programing yang aslinya dibuat oleh Niclause Wirth awal 1970an. Seperti saya sebut sebelumnya bahwa bahasa pemrograman ini buat untuk ditujukan pada dunia pendidikan,ditujukan untuk mempelajari disiplin pemrograman secara sistematis, bisa diandalkan, dan bisa membuat program yang efesien.

Pascal menjadi populer didunia pendidikan dan kampus karena beberapa alasan: 

• Mudah dipelajari
• Bahasanya terstruktur/berurut
• effesien dan bisa diandalkan
• Bisa digunakan dibanyak operating system (seperti windows, mac-os, linux, unix dan android)

Struktur Bahasa Pascal

Sebelum kita belajar membuat blok/baris program, sebaiknya kita kenal dahulu struktur urutan baris bahasa pemrograman pascal, sehingga kita tidak salah dalam menuliskan kode program kita pada editor pascal yang kita gunakan, berikut struktur bahasa program pascal:

• Nama Program
• perintah uses;
• Deklarasi Type
• Deklarasi Konstanta
• Deklarasi Variabel
• Deklarasi Fungsi
• Deklarasi Prosedur
• Main Program (program utama diawali oleh keyword begin dan di akhiri keyword end. )
• Statement dan expresi di masing-masing blok program
• Komentar 

Untuk contoh program sederhana, penggunaaan baris struktur bahasa pascal bisa kita perhatikan potongan program berikut. 

Kode program pertama menggunakan nama program hitungbulan di akhiri tanda titik koma, perlu diingat setiap baris program pascal harus di tutup dengan tanda baca titik koma, seperti bisa di lihat didalam gambar diatas. 

Baris kedua penggunaan uses crt; arti dari baris program ini yaitu agar compiler pascal memanggil atau menggunakan library crt, fungsi library agar program bisa menapilkan, menghitung, dll. Jadi tanpa uses crt; program kita tidak akan jalan. 

Baris ketiga adalah var bil:integer; baris ini fungsinya untuk mendefenisikan variable yang digunakan, bernama bil, dan tipe data yang dia tampung adalah integer; 

Variable adalah, sebuah ruangan yang disediakan didalam memori yang digunakan untuk menyimpan data yang akan di olah. 

Baris Begin adalah awal dari tubuh program; 

Baris Clrscr; fungsinya untuk membersihkan layar yang ditampilkan sebelumnya. Dibawahnya semuanya nanti akan kita pelajari satu-persatu. 

Kemudian di baris paling akhir ada readln; fungsi baris readln agar program berhenti sejenak setelah kita jalankan, dan dia menunggu inputan daari keyboard untuk proses selanjutnya, baris ini juga wajib kita buat di akhir code program. 

Sedangkan code END. dengan tanda titik, adalah akhir dari baris program.

Pascal : Mengenal Pemrograman Pascal - semoga pengenalan pascal ini bermanfaat. Demikian saja dahulu, nanti kita lanjutin ke topik selanjutnya ya. 

Cara membuat flashdisk boot windows 10 64bit

Cara membuat flashdisk boot windows 10 64bit - Cara membuat flashdisk boot windows banyak sudah artikel kita temukan di internet, tentunya masing-masing berdasarkan pengalaman masing-masing. Seperti halnya saya, berulang kali sudah saya membuat flashdisk boot, baik booting ubuntu server, booting mfsbsd dan lain sebagainya tapi saya tidak pernah mengalami masalah ketika saya menggunakan flashdisk Tosibha. 

Berkali-kali saya coba membuat flahsdisk windows 10 64bit menggunakan rufus tapi selalu saja gagal di tengah jalan ketika aplikasi rufus melakukan copy file kedalam flashdisk, pesan yang muncul kerap kali adalah error The Specified Module Could Not Be Found . Bahkan sesudah itu kadang flashdisknya menjadi error untuk menyimpan file-file lain. Entah disebabkan apa saya juga kurang mengerti. 

Berikut gambaran configurasi flashdisk boot windows 10 64bit yang saya buat dengan rufus. Menghindari error The Specified Module Could Not Be Found ketika membuat flashdisk boot windows 10 64bit. 

Untuk membuat flshdisk sebagai media booting untuk installasi windows 10 64bit komputer kita, tentunya kita harus memiliki file iso dari windows yang akan kita install. Untuk mendapatkan file iso windows ada baiknya download langsung dari Microsoft langsung - > https://www.microsoft.com/en-us/software-download/windows10

Setelah iso tersebut didownload- download aplikasi rufus dari link berikut ini, kebetulan rufus yang saya gunakan rufus yang lebih jadul dari apa yang tersedia di web rufus tersendiri, mungkin versi rufus ini juga berpengaruh pada error yang saya sebutkan sebelumnya. 

Download rufusnya disini -> https://github.com/pbatard/rufus/releases/download/v3.2/rufus-3.2.exe

Sesudah itu sesuaikan gambaran settingan rufus anda sesuai gambar diatas, kemudian start. 
 

Cara Mengubah KBLI Perusahaan di OSS

Cara Mengubah KBLI Perusahaan di OSS - Apa itu KBLI ?

KBLI adalah singkatan dari Klasifikasi Baku Lapangan Usaha Indonesia, yang fungsinya  digunakan sebagai klasifikasi rujukan yang digunakan untuk mengklasifikasikan aktivitas/kegiatan ekonomi Indonesia ke dalam beberapa lapangan usaha/bidang usaha yang dibedakan berdasarkan jenis kegiatan ekonomi yang menghasilkan produk/output baik berupa barang maupun jasa   ( sumber: spkonline.bps.go.id).

Kemudian Kemudian

Cara Load Balancing PCC Mikrotik 3 Jalur Internet Indihome – Panduan Interaktif

Apakah Anda ingin memaksimalkan koneksi internet di rumah atau kantor dengan tiga jalur ISP? Menggunakan load balancing PCC (Per Connection Classifier) Mikrotik adalah solusi terbaik. Artikel ini menyajikan panduan interaktif, lengkap dengan diagram, tips troubleshooting, dan langkah-langkah konfigurasi untuk load balancing PCC Mikrotik 3 jalur.

Diagram ilustrasi load balancing PCC Mikrotik 3 jalur

Apa Itu Load Balancing PCC Mikrotik?

Load balancing adalah metode untuk mendistribusikan paket data ke beberapa jalur internet agar semua jalur dapat digunakan secara optimal. PCC (Per Connection Classifier) membagi koneksi berdasarkan jumlah koneksi per jalur, berbeda dengan NTH yang membagi berdasarkan paket ke-N. Tujuan utama PCC adalah memastikan setiap jalur aktif, mencegah overload, dan memaksimalkan stabilitas jaringan.

Manfaat PCC Mikrotik

• Distribusi koneksi internet merata di semua ISP.
• Optimasi bandwidth dan performa jaringan.
• Meningkatkan stabilitas koneksi untuk semua perangkat.
• Dukungan prioritas trafik, misalnya untuk gaming, streaming, atau VoIP.

Persiapan Sebelum Konfigurasi

• Router Mikrotik dengan minimal tiga interface aktif.
• IP dan gateway untuk setiap ISP sudah diketahui.
• Memahami dasar firewall, NAT, dan mangle rules di Mikrotik.

Langkah-Langkah Load Balancing PCC 3 Jalur

1. Konfigurasi Interface dan IP

Atur nama interface dan IP untuk masing-masing jalur ISP:

/interface ethernet set [ find default-name=ether1 ] name=ether1-100M
set [ find default-name=ether2 ] name=ether2-INDI-20M
set [ find default-name=ether3 ] name=ether3-INDI-50M
/ip address add address=192.168.10.4/24 interface=ether1-100M network=192.168.10.0
add address=192.168.7.4/24 interface=ether3-INDI-50M network=192.168.7.0
add address=192.168.9.4/24 interface=ether2-INDI-20M network=192.168.9.0

2. Konfigurasi DNS dan Keamanan Router

Pastikan router dapat melakukan resolve domain dan mengamankan jaringan:

/ip dns set allow-remote-requests=yes servers=1.1.1.1,1.0.0.1,8.8.8.8
/interface wireless security-profiles set [ find default=yes ] supplicant-identity=MikroTik

3. Firewall dan Mangle Rules

Gunakan mangle untuk menandai koneksi dan paket agar jalur tertentu dapat diprioritaskan:

/ip firewall filter
add action=add-dst-to-address-list address-list=IPGAME address-list-timeout=1h chain=forward connection-rate=0-256k dst-port=27000-28998 in-interface=ether5 protocol=tcp
add action=add-dst-to-address-list address-list=IPGAME address-list-timeout=1h chain=forward connection-rate=0-256k dst-port=27000-28998 in-interface=ether5 protocol=udp
add action=add-dst-to-address-list address-list=IPGAME address-list-timeout=1h chain=forward comment=ML connection-rate=0-256k dst-port=30097-30147,5000-5508,5551-5558,5601-5608,5651-5658 in-interface=ether5 protocol=tcp
add action=add-dst-to-address-list address-list=IPGAME address-list-timeout=1h chain=forward connection-rate=0-256k dst-port=5000-5508,5551-5558,5601-5608,5651-5658 in-interface=ether5 protocol=udp
add action=add-dst-to-address-list address-list=IPGAME address-list-timeout=1h chain=forward comment=PUBG connection-rate=0-256k dst-port=10001-10010,21750 in-interface=ether5 protocol=tcp
add action=add-dst-to-address-list address-list=IPGAME address-list-timeout=1h chain=forward connection-rate=0-256k dst-port=10491,10010,10013,10612,20002,20001,20000,12235,13748,7086-7995 in-interface=ether5 protocol=udp
add action=add-dst-to-address-list address-list=IPGAME address-list-timeout=1h chain=forward connection-rate=0-256k dst-port=12070-12460,41182-41192,13972,13894,11455,10096,10039 in-interface=ether5 protocol=udp

4. NAT dan Routing

Aktifkan NAT masquerade dan buat routing rules sesuai mark koneksi:

/ip firewall nat add action=masquerade chain=srcnat out-interface=ether1-100M
add action=masquerade chain=srcnat out-interface=ether3-INDI-50M
add action=masquerade chain=srcnat out-interface=ether2-INDI-20M

/ip route add check-gateway=ping distance=1 gateway=192.168.7.1 routing-mark=game
add check-gateway=ping distance=1 gateway=192.168.9.1 routing-mark=4
add check-gateway=ping distance=1 gateway=192.168.10.1 routing-mark=3

5. Monitoring dan Optimasi

Setelah konfigurasi:

• Cek status jalur melalui IP → Routes.
• Gunakan Torch atau Traffic Monitor untuk melihat distribusi paket.
• Sesuaikan mangle rules jika ada jalur yang kurang optimal.

Tips Troubleshooting

• Jalur tidak terbagi merata: Pastikan per-connection-classifier di mangle sudah benar.
• Ping gagal ke gateway: Periksa koneksi fisik dan IP interface masing-masing ISP.
• Trafik tertentu lambat: Gunakan connection-mark untuk memprioritaskan trafik penting.

Kesimpulan

Dengan load balancing PCC Mikrotik 3 jalur, Anda dapat memanfaatkan semua ISP secara maksimal, meningkatkan stabilitas, dan performa jaringan. Metode ini cocok untuk rumah, kantor kecil, atau warnet yang membutuhkan koneksi internet cepat dan stabil.

Referensi dan Bacaan Tambahan

• MikroTik Wiki – Load Balancing
• NetworkLessons – PCC Load Balancing
• Dokumentasi Resmi MikroTik

ini code lengkapnya

# ================================
# 1. Konfigurasi Interface
# ================================
/interface ethernet
set [ find default-name=ether1 ] name=ether1-100M
set [ find default-name=ether2 ] name=ether2-INDI-20M
set [ find default-name=ether3 ] name=ether3-INDI-50M

# ================================
# 2. Wireless Security Profile
# ================================
/interface wireless security-profiles
set [ find default=yes ] supplicant-identity=MikroTik

# ================================
# 3. User Group Permissions
# ================================
/user group
set read policy=local,telnet,ssh,ftp,reboot,read,write,policy,test,winbox,password,web,sniff,sensitive,api,romon,dude,tikapp
set write policy=local,telnet,ssh,ftp,reboot,read,write,policy,test,winbox,password,web,sniff,sensitive,api,romon,dude,tikapp

# ================================
# 4. Konfigurasi IP Address
# ================================
/ip address
add address=192.168.10.4/24 interface=ether1-100M network=192.168.10.0
add address=192.168.80.1/24 interface=ether5 network=192.168.80.0
add address=192.168.7.4/24 interface=ether3-INDI-50M network=192.168.7.0
add address=192.168.9.4/24 interface=ether2-INDI-20M network=192.168.9.0

# ================================
# 5. DNS Configuration
# ================================
/ip dns
set allow-remote-requests=yes servers=1.1.1.1,1.0.0.1,8.8.8.8

# ================================
# 6. Firewall Filter Rules (IPGAME)
# ================================
/ip firewall filter
add action=add-dst-to-address-list address-list=IPGAME address-list-timeout=1h chain=forward connection-rate=0-256k dst-port=27000-28998 in-interface=ether5 protocol=tcp
add action=add-dst-to-address-list address-list=IPGAME address-list-timeout=1h chain=forward connection-rate=0-256k dst-port=27000-28998 in-interface=ether5 protocol=udp
add action=add-dst-to-address-list address-list=IPGAME address-list-timeout=1h chain=forward comment=ML connection-rate=0-256k dst-port=30097-30147,5000-5508,5551-5558,5601-5608,5651-5658 in-interface=ether5 protocol=tcp
add action=add-dst-to-address-list address-list=IPGAME address-list-timeout=1h chain=forward connection-rate=0-256k dst-port=5000-5508,5551-5558,5601-5608,5651-5658 in-interface=ether5 protocol=udp
add action=add-dst-to-address-list address-list=IPGAME address-list-timeout=1h chain=forward comment=PUBG connection-rate=0-256k dst-port=10001-10010,21750 in-interface=ether5 protocol=tcp
add action=add-dst-to-address-list address-list=IPGAME address-list-timeout=1h chain=forward connection-rate=0-256k dst-port=10491,10010,10013,10612,20002,20001,20000,12235,13748,7086-7995 in-interface=ether5 protocol=udp
add action=add-dst-to-address-list address-list=IPGAME address-list-timeout=1h chain=forward connection-rate=0-256k dst-port=12070-12460,41182-41192,13972,13894,11455,10096,10039 in-interface=ether5 protocol=udp

# ================================
# 7. Firewall Mangle Rules
# ================================
/ip firewall mangle
# Mark Routing untuk IPGAME
add action=mark-routing chain=prerouting connection-rate=0-512k dst-address-list=IPGAME in-interface=ether5 new-routing-mark=game passthrough=no

# Mark Connection untuk tiap ISP
add action=mark-connection chain=prerouting connection-mark=no-mark dst-address-list=!IPGAME in-interface=ether2-INDI-20M new-connection-mark=indicn1 passthrough=yes
add action=mark-packet chain=output connection-mark=indicn1 new-packet-mark=1 passthrough=no

add action=mark-connection chain=prerouting connection-mark=no-mark dst-address-list=!IPGAME in-interface=ether3-INDI-50M new-connection-mark=indicn2 passthrough=yes
add action=mark-packet chain=output connection-mark=indicn2 new-packet-mark=2 passthrough=no

add action=mark-connection chain=prerouting connection-mark=no-mark dst-address-list=!IPGAME in-interface=ether1-100M new-connection-mark=iconcn3 passthrough=yes
add action=mark-packet chain=output connection-mark=iconcn3 new-packet-mark=3 passthrough=no

# Mark Connection berdasarkan per-connection-classifier (PCC)
add action=mark-connection chain=prerouting dst-port=80,8080 in-interface=ether5 new-connection-mark=indicn100-1 passthrough=yes per-connection-classifier=src-address-and-port:4/3 protocol=tcp src-address=192.168.80.0/24
add action=mark-routing chain=prerouting connection-mark=indicn100-1 in-interface=ether5 new-routing-mark=1 passthrough=no

# Tambahkan rule PCC lainnya sesuai konfigurasi awal...
# (Anda bisa melanjutkan untuk indicn50-1, indicn100-2, indicn502-1 seperti kode lama, tetap format seperti ini)

# ================================
# 8. NAT Masquerade
# ================================
/ip firewall nat
add action=masquerade chain=srcnat out-interface=ether1-100M
add action=masquerade chain=srcnat out-interface=ether3-INDI-50M
add action=masquerade chain=srcnat out-interface=ether2-INDI-20M

# ================================
# 9. Routing
# ================================
/ip route
add check-gateway=ping distance=1 gateway=192.168.7.1 routing-mark=game
add check-gateway=ping distance=1 gateway=192.168.9.1 routing-mark=4
add check-gateway=ping distance=1 gateway=192.168.10.1 routing-mark=3
add check-gateway=ping distance=1 gateway=192.168.7.1 routing-mark=2
add check-gateway=ping distance=1 gateway=192.168.10.1 routing-mark=1
add check-gateway=ping distance=1 gateway=192.168.10.1
add check-gateway=ping distance=2 gateway=192.168.7.1
add check-gateway=ping distance=3 gateway=192.168.9.1

Beberapa cara mudah meringkan Os Ubuntu

Beberapa cara mudah meringkan Os Ubuntu - sebenernya saya bingung mau membuat judul yang tepat terhadap tulisan ini, maksud saya adalah beberapa cara mudah untuk meringankan akses ketika menggunakna ubuntu desktop tentunya, sementara untuk ubuntu server, karena ubuntu server tidak memiliki dekstop tulisan ini tidak terlalu penting, namun bila ingin diaplikasikan pada ubuntu server tentunya juga tidak masalah. 

Sepertinya, barusan terbersit dalam pikiran saya, bahwa judul yang tepat untuk tulisan ini adalah Beberapa cara mudah optimasi ubuntu dekstop. Sepertinya judul ini lebih menarik, karena orang kita Indonesia ini paling tertarik sama yang namanya optimasi-optimasian.
Tidak seperti windows, yang mana secara bawaan atau builtin telah ada aplikasi defrag dan disk clean didalamnya. Namun berbeda dengan ubuntu tool tersebut tidak ada untuk melegakan harddisk yang kepenuhan. 

Lalu jika tool seperti defrag dan disk clean up milik windows tidak ada di ubuntu, bagaimana caranya kita mengosongkan harddisk yang penuh dengan sampah aplikasi, atau bagaimana caranya agar system ubuntu desktop kita selalu bersih dan fresh?.

Berikut beberapa cara mudah optimasi meringankan os ubuntu kita punya:

• Bersihkan Apt cache dan lakukan itu secara berkala.

Bila selama ini tidak pernah membersihkan cache apt ketika ubuntu kita mendapatkan update maka kali ini layak anda lakukan perintah ini secara berkala. 

Bagaimana cara menchek berapa besar cache apt ubuntu mengisi harddisk kita. 

du -sh /var/cache/apt/archives

Untuk membersihkan cache apt tersebut perintahnya 

sudo apt-get clean atau sudo apt clean

• Bersihkan atau hapus kernel lama yang sudah tidak di gunakan. 

Kernel lama yang sudah tidak digunakan apabila kita melakukan upgrade dan update tentunya akan memenuhi space dari harddisk, untuk itu kita perlu membersihkannya. 

Cara melihat space harddisk yang digunakan kernel ubuntu kita adalah dengang memberikan perintah 

dpkg --list 'linux-image*'

Untuk menghapus kernel yang sudah ditidak digunakan perintahnya

apt-get autoremove --purge

• Bersihkan cache Thumbnail 

Perintah untuk memberishkan cache tumbnail dari ubuntu 

sudo rm -rf ~ /.cache/thumbnails/*

Untuk perintah mengechek thumnails ubuntu seperti berikut

du -sh ~/.cache/thumbnails

• Hapus file dan folder yang sudah tidak digunakan.

Untuk menghapus file dan folder yang sudah tidak digunakan mungkin kamu bisa melakukannya via dekstop saja, atau bisa menggunakan perintah : sudo rm -rf nama_folder_atau_namafilenya

• Bersihkan paket yang sudah tak lagi digunakan

Perintah termudah menghapus paket yangsudah sudah kita tidak gunakan lagi didalam sistem 

sudo apt-get autoremove

sudo apt-get autoclean atau sudo apt autoclean

• Rajin - rajin mengupdate os ubuntu anda 

Perintah mengupdate dan upgrade os ubuntu desktop

sudo apt update && apt upgrade -y

• Hapus Snapd 

Bagi kita mungkin yang pemula Snapd tidaklah terlalu penting, tapi bilang menganggpnya penting silahkan untuk tidak melakukan perintah ini, snapd adalah aplikasi layaknya apt-get dan apt, yang fungsinya untuk menginstall aplikasi dan mengupdatenya, jujur saja saya sendiri jarang menggunakan aplikasi ini. 

Perintah ubuntu untuk menghapus paket ini 

sudo apt-get autoremove --purge snapd

• Hapus log journalctl 

Perintah ubuntu server/ubuntu desktop untuk melihat space yang digunakan log journalctl 

sudo journalctl --disk-usage

Cara menghapus log journalctl jika umurnya telah lebih dari satu hari lakukan perintah ini

sudo journalctl --vacuum-time=1d

Atau kamu bisa menggunakan aplikasi seperti Bleachbit, stacer atau ubuntu cleaner untuk membersihkan sampah-sampah aplikasi ubuntu desktop kita. 

Password Modem Huawei HG8245H

Password Modem Huawei HG8245H - ini bukan bicara hack modem ya, tulisan ini cuma dokumentasi tentang password modem telkom Indihome, kadang kawan-kawan pemilik usaha atau pengguna modem ini ingin membuka configurasi modemnya untuk suatu tujuan tertentu, semisal ingin atau lupa id dari telkom indihome yang digunakan, maka Password modem huawei akan sangat dibutuhkan. Username : root 

Password : admin 




Username : Admin 

Password : admin 




Username : telecomadmin 

Password : admintelecom 




Username : Support 

Password : theworldinyourhand 




Username : telecomadmin 

Password : zep2kjzol 




Username : Support 

Password : zep2kjzol

Jadi tidak perlu bingung password dan usernamemnya apa. Silahkan di coba kombinasi password diatas untuk mengakses configurasi modem Indihome milik anda.

Cara Cek keValidan NIB Perusahaan

Cara Cek keValidan NIB Perusahaan - Banyak jalan menuju roma, mungkin begitu pepatah lama berkata. Begitupun bagaimana cara mengecek kevalidan suatu NIB perusahaan, banyak caranya. NIB adalah singkatan dari Nomor Induk Berusaha, Nomor ini bisa diperoleh dari aplikasi OSS, Bila perusahaan anda baru, ataupun perusahaan lama tapi belum memiliki NIB, ada baiknya segera mengurusnya di OSS.