Proposal TA Perancangan Aplikasi POS Berbasis Android dari Agung Supe (Revisi)

Proposal TA Perancangan Aplikasi POS Berbasis Android dari Agung Supe

Download Injek Indosat 1 September

Update kembali Inject Indosat dan Telkomsel terbaru 31 Agustus 2015, New Inject Telkomsel 1 2 September 2015, Setelah sebelumnya saya telah mengupdate akun ssh 31 Agustus 2015, kali ini saya ingin memberikan update Inject buat 1 2 3 September dengan Provider Telkomsel dan Indosat. Inject ini bernama Raditya Injector yang di buat oleh mas raditya. ada macam-macam pilihan Host pada Inject ini yang nantinya bisa agan-agan sendiri yang lihat. Tentunya pilihan host itu berguna buat teman-teman sekalian. berikut di bawah ini akan saya tampilan screenshot yang saya ambil dari Inject terbaru Telkomsel dan Indosat 31 Agustus 2015, berikut di bawah ini :

Saat ini untuk penggunaan Inject sendiri yang stabil hanyalah Indosat dan Asjat, selain dari itu masih terkena limit. untuk tsel-sim biasa sendiri rata-rata masih terkena limit sampai pemakaian 130MB selain itu Speed akan turun di bawah 30kb/s. Maka saya saranin buat para teman-teman yang belum bisa menggunakan SSH bisa memilih Indosat atau Asjat. Untuk inject ini sendiri telah menyediakan Pilihannya yaitu Indosat dan As. Tampilan form inject ini bisa dibilang enak untuk dilihat karena menggunakan Skin Metal yang cocok untuk mata saya, tidak tau untuk teman-teman. Listen port nya sendiri adalah 6161. Untu Proxy menggunakan Proxy squid original, Jika teman-teman mempunyai proxy squid manual bisa mencoba menggunakan Inject Indosat Squid 1 2 3 September 2015 yang baru saya update. Jika teman-teman ingin mencoba menggunakan Inject diatas, langsung saja kita menuju ke link yang ada di bawah berikut ini :

Inject Telkomsel dan Indosat Raditya.rar

Listen Port : 6161

Selamat Menggunakan dan Jangan Lupa yah gan turuti peraturan yang agar update tetap bertahan :)

Oleh : Fachruddin Manoso ~ Free SSH 2015 & Inject Terbaru

TRIK INTERNET GRATIS THREE SUPE_SOFT

1.       Langkah awal buka download > buka borneo cyber tools. Ada 3 file

a.       Ocp.v2.4.txt = passwor

b.      Aplikasi borneo cyber tool

c.       Plugin = pelengkap

2.       Buka bcp2.txt

a.       isikan passwor borneo cyber tools

b.      Next dan install tunggu hingga penginstalan selesai

3.       Muncul tampilan seperti ini

a.       Hilangkan centangan seperti ada di gambar

b.      Clik finish

4.       Setelah itu instal juga Pluginnya

a.       Buka bcp2.txt untuk mendapatkan password

  

5.       Setelah selesai instal keduanya yaitu :

a.       Koneksikan modem anda

b.      Buka injeck part III

c.       Buka BORNEO CYBER TOOLS

  

6.       Tampilan INJEK dan BORNEO CYBER TOOL UNTUK LOGGIN

7.       Klik LOGIN TUNGGU HINGGA WARNANYA PUTIH

LINK UNTUK APLIKASINYA : INTERNET GRATIS INDOSAT XL TELKOMSEL

Program Pemesanan Tiket by agung supe

Buat aplikasi Pembelian Tiket Bioskop seperti tampak di bawah ini :




1. Tampilkan judul film pada LblJudulFilm saat user memilih salah satu studio pada OptStudio (buat control array untuk optstudio-nya). 

2. Tampilkan pula jam tayang pada pada cboJamTayang berdasarkan studio yang dipilih user. 

3. Isi LstHari (Senin s/d Minggu), LstRow (A s/d J), LstSeat (1-10). Pada LstRow dan LstSeat, ganti property Style = 1-CheckBox. User dapat membeli banyak tiket. 

4. Saat user meng-klik cmdBeli,

a. Tampilkan total harga pada txtTotHarga (total harga = jumlah tiket * harga tiket pada hari yang dipilih user) 

b. Pada FrmDetailTiket, tampilkan judul film pada LblJudulFilmPilih, tampilkan hari dan tanggal pada LblDate, tampilkan jam tayang yang dipilih user pada LblJamTayang, tampilkan harga tiket pada LblHarga berdasarkan harga pada hari yang dipilih user. 

5. Munculkan message box “Jumlah uang yang harus dibayar” Pembayaran ada 2 jenis :
a. Jika user memilih OptCash, maka jumlah uang yang harus dibayar = total harga. 

b. Jika user memilih OptCreditCard, maka berlaku buy 1 get 1 free tapi tidak berlaku kelipatan. Jumlah uang yang harus dibayar total harga = ( (jumlah tiket-1) * harga tiket). Misal, beli 2 tiket, hanya bayar 1 tiket. Beli 4 tiket, hanya bayar 3 tiket. 

6. Tombol cmdCancel digunakan untuk membatalkan transaksi (bersihkan form) dan tombol cmdExit digunakan untuk keluar dari program 

7. DESAIN FORM Anda 

Penyelesaian Menurut Saya:
1. Kita buat desain awalnya dulu, seperti ini:
Pada pertanyaan no 1, opt studio menggunakan array caranya, cukup pasangkan satu Option Button, kumudian klik kanan pada optionbutton cari coppy kemudian klik kanan paste-kan. maka akan ada peringakatan "do you alredy have a control name 'option1'.Do you wannt to create a control aray?". Klik Yes, maka anda akan mendapatkan option button aray lakukan sampai 3 kali.




2. Sekarang kita atur properties nya
label 1
caption: Studio:

label 2
caption:Judul Film :

label 3
caption: LblJudulFilm

label 4
caption:Jam Tayang :

label 5
caption:Hari :

label 6
caption: No Kursi :

label 7
caption:Total Harga : Rp

Frame2
Caption: Detail tiket

label 8
caption: Judul Film Pilihan

label 9
caption: Date :

label 10
caption: Kosongkan
Name:lblDate

label 11
caption: Time :

label 12
caption:kosongkan
name:lblTime

label 13
caption:Price : Rp.

label 14
caption:kosongkan
name:lblPrice

label 15
caption:Normat : Rp 20.000 (senin-kamis)

label 16
caption:Jumat : Rp 30.000

label 17
caption:HTM : Rp 45.000

option1(0) optionbutton
Name: OptStudio
Caption: Studio 1

option1(1) optionbutton
Name: OptStudio
Caption: Studio 2

option1(2) optionbutton
Name: OptStudio
Caption: Studio 3

option1(3) optionbutton
Name: OptStudio
Caption: Studio 4

Combo1
Name:cmbJamTayang

List1
Name: LstHari

List2
Name:LstRow
Style: 1-Checkbox

List3
Name:LstSeat
Style: 1-Checkbox

Command1
Name: cmdBeli
Caption: Beli

Frame1
Caption: Pembayaran

Option2
Name:OptPembayaran
Option: Cash

option3
Name:OptCredit
Caption:Credit

Command2
Name: cmdCancel
Caption: Cancel

Command3
Name: cmdExit
Caption: Exit

maka Hasilnya akan seperti ini:

Untuk masalah tulisan dan ukuran tulisan bisa di sesuaikan dengan keinginan anda sendiri.

3. Sekarang Kita mulai membuat coding
Tampilkan judul film pada LblJudulFilm saat user memilih salah satu studio pada OptStudio2.Tampilkan pula jam tayang pada pada cboJamTayang berdasarkan studio yang dipilih user.Isi LstHari (Senin s/d Minggu), LstRow (A s/d J), LstSeat (1-10). Pada LstRow dan LstSeat, ganti property Style = 1-CheckBox. User dapat membeli banyak tiket

Private Sub OptStudio_Click(Index As Integer)
If OptStudio(0).Value = True Then
LblJudulFilm.Caption = "IRON MAN 2"
cmbJamTayang.List(0) = "14:45"
cmbJamTayang.List(1) = "17:00"
cmbJamTayang.List(2) = "19:15"
cmbJamTayang.List(3) = "21:30"
LstHari.List(0) = "Senin"
LstHari.List(1) = "Selasa"
LstHari.List(2) = "Rabu"
LstHari.List(3) = "Kamis"
LstHari.List(4) = "Jumat"
LstHari.List(5) = "Sabtu"
LstHari.List(6) = "Minggu"
LstRow.List(0) = "A"
LstRow.List(1) = "B"
LstRow.List(2) = "C"
LstRow.List(3) = "D"
LstRow.List(4) = "E"
LstRow.List(5) = "F"
LstRow.List(6) = "G"
LstRow.List(7) = "H"
LstRow.List(8) = "I"
LstRow.List(9) = "J"
For s = 1 To 10
LstSeat.AddItem s
Next

ElseIf OptStudio(1).Value = True Then
LblJudulFilm.Caption = "The Book of Eli"
cmbJamTayang.List(0) = "14:55 "
cmbJamTayang.List(1) = "17:05"
cmbJamTayang.List(2) = "19:15"
cmbJamTayang.List(3) = "21:25"
LstHari.List(0) = "Senin"
LstHari.List(1) = "Selasa"
LstHari.List(2) = "Rabu"
LstHari.List(3) = "Kamis"
LstHari.List(4) = "Jumat"
LstHari.List(5) = "Sabtu"
LstHari.List(6) = "Minggu"
LstRow.List(0) = "A"
LstRow.List(1) = "B"
LstRow.List(2) = "C"
LstRow.List(3) = "D"
LstRow.List(4) = "E"
LstRow.List(5) = "F"
LstRow.List(6) = "G"
LstRow.List(7) = "H"
LstRow.List(8) = "I"
LstRow.List(9) = "J"
For s = 1 To 10
LstSeat.AddItem s
Next

ElseIf OptStudio(2).Value = True Then
LblJudulFilm.Caption = "GREEN ZONE"
cmbJamTayang.List(0) = "14:25 "
cmbJamTayang.List(1) = "16:50"
cmbJamTayang.List(2) = "19:15"
cmbJamTayang.List(3) = "21:40"
LstHari.List(0) = "Senin"
LstHari.List(1) = "Selasa"
LstHari.List(2) = "Rabu"
LstHari.List(3) = "Kamis"
LstHari.List(4) = "Jumat"
LstHari.List(5) = "Sabtu"
LstHari.List(6) = "Minggu"
LstRow.List(0) = "A"
LstRow.List(1) = "B"
LstRow.List(2) = "C"
LstRow.List(3) = "D"
LstRow.List(4) = "E"
LstRow.List(5) = "F"
LstRow.List(6) = "G"
LstRow.List(7) = "H"
LstRow.List(8) = "I"
LstRow.List(9) = "J"
For s = 1 To 10
LstSeat.AddItem s
Next

ElseIf OptStudio(3).Value = True Then
LblJudulFilm.Caption = "HURT LOCKER"
cmbJamTayang.List(0) = "14:25 "
cmbJamTayang.List(1) = "16:50"
cmbJamTayang.List(2) = "19:15"
cmbJamTayang.List(3) = "21:40"
LstHari.List(0) = "Senin"
LstHari.List(1) = "Selasa"
LstHari.List(2) = "Rabu"
LstHari.List(3) = "Kamis"
LstHari.List(4) = "Jumat"
LstHari.List(5) = "Sabtu"
LstHari.List(6) = "Minggu"
LstRow.List(0) = "A"
LstRow.List(1) = "B"
LstRow.List(2) = "C"
LstRow.List(3) = "D"
LstRow.List(4) = "E"
LstRow.List(5) = "F"
LstRow.List(6) = "G"
LstRow.List(7) = "H"
LstRow.List(8) = "I"
LstRow.List(9) = "J"
For s = 1 To 10
LstSeat.AddItem s
Next
End If
End Sub

Saat user meng-klik cmdBeli, Tampilkan total harga pada txtTotHarga (total harga = jumlah tiket * harga tiket pada hari yang dipilih user). Pada FrmDetailTiket, tampilkan judul film pada LblJudulFilmPilih, tampilkan hari dan tanggal pada LblDate, tampilkan jam tayang yang dipilih user pada LblJamTayang, tampilkan harga tiket pada LblHarga berdasarkan harga pada hari yang dipilih user.
Sebelum itu kita inilisiasikan nilainyam klik general:

Dim harga, total, credit As Currency
Dim jumlah As Integer

Kemudian, tuliskan code ini

Private Sub cmdBeli_Click()

lblTime.Caption = cmbJamTayang
lblDate.Caption = LstHari
LblJuduFilmlPilihan.Caption = LblJudulFilm

jumlah = LstSeat
Select Case LstHari.ListIndex
Case 0, 1, 2, 3
harga = 20000
total = jumlah * harga
txtTotalHarga.Text = total
lblPrice.Caption = total
credit = (jumlah - 1) * harga
Case 4
harga = 30000
total = jumlah * harga
txtTotalHarga.Text = total
lblPrice.Caption = total
credit = (jumlah - 1) * harga
Case 5, 6
harga = 45000
total = jumlah * harga
txtTotalHarga.Text = total
lblPrice.Caption = total
credit = (jumlah - 1) * harga
End Select
End Sub

Munculkan message box “Jumlah uang yang harus dibayar” Pembayaran ada 2 jenis :
a. Jika user memilih OptCash, maka jumlah uang yang harus dibayar = total harga.
b. Jika user memilih OptCreditCard, maka berlaku buy 1 get 1 free tapi tidak berlaku kelipatan. Jumlah uang yang harus dibayar = total harga – ( (jumlah tiket-1) * harga tiket). Misal, beli 2 tiket, hanya bayar 1 tiket. Beli 4 tiket, hanya bayar 3 tiket. 

Private Sub OptCredit_Click()
MsgBox "Total Harga Yang harus di bayarkan adalah " & vbNewLine & "Rp. " & credit, vbInformation, "Konfirmasi"
End Sub

Private Sub OptPembayaran_Click(Index As Integer)
MsgBox "Total Harga Yang harus di bayarkan adalah " & vbNewLine & "Rp. " & total, vbInformation, "Konfirmasi"
End Sub

Tombol cmdCancel digunakan untuk membatalkan transaksi (bersihkan form) dan tombol cmdExit digunakan untuk keluar dari program 

Private Sub cmdCencel_Click()
OptStudio(0).Value = False
OptStudio(1).Value = False
OptStudio(2).Value = False
OptStudio(3).Value = False
LblJudulFilm.Caption = "LblJudulFilm"
LblJuduFilmlPilihan.Caption = "LblJuduFilmlPilihan"
cmbJamTayang.Clear
OptCredit.Value = False
OptPembayaran(0).Value = False
txtTotalHarga.Text = ""
lblDate.Caption = ""
lblTime.Caption = ""
lblPrice.Caption = ""
LstHari.Clear
LstRow.Clear
LstSeat.Clear
End Sub

Private Sub cmdExit_Click()
End
End Sub

Youtube Tanpa Sofware Agung Supe

Anda Hobi download Film di youtube?

INi ane kasih panduannya

1. Pilih Video Anda Ingin Untuk Download.

2. Copy link pada address bar dari video yang ingin Anda download.

3. Tempatkan kotak di link atas ke dalam halaman ini.

4. Kemudian Klik Download Button.

5  Pilih Format Of Video Anda Ingin Download.

6. Terakhir, Otomatis Langsung Donwnload. 

Untuk Link nya : Klik Disini Aja Gan

BBM di Laptop / PC

 BBMan GRATIS

MAU BBM an tapi Gak Punya BB / Android, ini dia Solusinya, . . . . . . . . . 

           Setelah berbulan-bulan kita menunggu Aplikasi BBM for Android dan iOS muncul, akhirnya saat ini kita sebagai pengguna non Blackberry sudah bisa menikmatinya. Sudah secara resmi diluncurkan dan langsung menggeser aplikasi lain di jajaran Top Free App Store.

Nah, bila kalian ingin chating dengan BBM namun tidak memiliki perangkat Android atau Blackberry, cobalah tutorial/cara menginstal BBM for Android di PC/laptop kalian. Cara berikut bisa dibilang cukup mudah, karena kami sudah mencobanya dan langsung bisa digunakan untuk BBMan.

 

Sebelum kalian mengikuti tutorial ini, terlebih dahulu siapkan senjata yang diperlukan. Yang pertama Android SDK (File cukup besar sekitar 400MB), setelah itu kalian harus mengupdate Java, klik tautan ini.

Jika Android SDK sudah selesai didownload, langsung saja diekstrak, buka folder, lalu buka SDK Manager.

 

Setelah kalian membuka SDK manager, maka akan muncul tampilan seperti dibawah ini :

 

klik Tools pada Toolbar > Manage AVD(s)

Lalu isi settingan seperti gambar dibawah ini :

 

Jika sudah selesai, klik Start

 

Alhasil akan muncul tampilan seperti ini.

 

Langsung saja pergi ke browser yang ada di virtual device, dan ketik alamat ini http://goo.gl/WjymGW

 

Isi BlackBerry ID anda, dan sekarang anda sudah bisa BBMan dengan teman anda yang menggunakan BBM for Android, BBM for iPhone ataupun yang memakai ponsel BlackBerry.

 

Note :

           JIka ada masalah dengan BBM nya itu mungkin karena MEMORY RAM pada Virtual anda Kurang atau Kelebihan, silahkan Otak atik sendiri saja di VIRTUALBOXnya,...

Suksesss yaaaa, Ane Udah Coba dan Alhasilll Mantebbbb,..........................