Sabtu, 20 November 2010

serunya membuat cubeecraft


cubeecraft. apakah anda sudah menghetahuinya? apa blm pernah mendengarnya sama sekali? nah ini dia bagi yang belum pernah mendengarnya. cubber craft merupakan sebuah mainan bisa di bilang juga si pajangan yang bisa kita buat sendiri, dan bahan dasarnya pun dari kertas, jadi untuk membuatnya tidaklah sulit, yang di kenal dengan download  - print - cut - fold .maksdunya .download cubber craft yang kita ingin kan lalu kitaa cetak, gunting mengikuti perintah yang di sarankan, lalu kita bentuk agar seperti yang kita inginkan, disini pun kita di latih untuk mengasa kreatifitas kita, karena memerlukan konsentrasi agar hasil yang kita kerjakan maksimal, tidak sedikit orang yang menyukai cubber craft, karena sangat cocok untuk anda yang banyak mempunyai waktu kosong, daripada terbuang percuma mendiing kita buat cubber craft, koleksi yang dapat kita buat pun sangat banyak dari kartun - kartun, binatang, sampai artis hollywod, bahkan peran- peran di film" pun banyak disini, kalian bisa download ajah di http://www.cubeecraft.com/, di jamin seru deh, ketagihan di jamin, apalagi buat pencinta hal" yang unik, ayooo kita buat cubber craft sebanyak bnyaknya, pajaang di kamar mu, semakin banyak, semakin seruuu

cara membuat program ramalan di QBASIC

QBasic adalah IDE dan juru bahasa untuk varian dari bahasa pemrograman BASIC yang didasarkan pada QuickBasic. Kode dimasukkan ke dalam IDE dikompilasi ke bentuk peralihan, dan ini bentuk peralihan segera ditafsirkan pada permintaan dalam IDE  Hal ini dapat berjalan di bawah hampir semua versi DOS dan Windows.

disini saya ingin sekedar berbagi tentang bagaimana kita dalam membuat program berbentuk kuis atau pertanyaan pada QBASIC, sebenarnya banyak cara yang dapat kita lakukan untuk mebuat program ini tergantung logika kita ajah,hhe, namun disini gw mau ngasih contoh ajah, salah satu bagaimana cara membuat program kuis ini, nah ini dia CLSnya,

cls
color 10
print "                                          ============"
print "                                          =       KUIS      ="
print "                                          ============"
print ""
print ""
print "'
print "                                          PRIMBON 2012"
print ""
print ""
input "tekan (Y) untuk memulai kuis :", jawab$
if jawab$ = "Y" or jawab$ = "y" then goto 10

10 print ""
cls
color 15
print "menemukan kriteriamu dan pasangan anda"
print ""
print "nama anda :", nama$
print "nama pasangan anda :", namap$
cls
print "apakah anda menyayangi pasangan anda ?"
print ""
print "1. ahh biasa ajah, soalnya pasangan gw ga romantis sih, pelit lagi"
print ""
print "2. yaa gimana yaa, di bilang sayaang ya sayaang, di bilang ga juga iaa,haha"
print ""
print "3. gw cinta mati sama pacar gw"
print ""
input "jawaban :", A
select case A
case 1
let A = 1
case 2
let A = 2
case 3
let A = 3
end select
cls
print "dimana biasanya anda berpacaran ?"
print ""
print "1. saya biasanya janjian di mall, terus kita nnton deh film yang bgs,klo ga ada yg bgs ya nnton ajah, yang penting bisa berduaan,hhe"
print ""
print "2. di rumah tetangga, soalnya kita backstreet dari orang tua"
print ""
print "3. di resto ternama, dengan lilin lilin yang membuat suasana romantis, sooo sweeeeet"
print ""
input "jawaban :", B
select case B
case 1
let B = 3
case 2
let B = 1
case 3
let B = 2
end select
cls
print "apa yaang kamu lakukan bila sedang kencan dengan pasangan anda ?"
print ""
print "1. klo lagi makan breng, gw suka suapin dia biar terlihat perhatian sama doi"
print ""
print "2. ngasih kejutan buat si doi, biar dia makin cinta sama kita"
print ""
print "3. beliin dia cokelat, soalnya dia suka banget sama cokelat"
print ""
input "jawaban :", C
select case C
case 1
let C = 2
case 2
let C = 3
case 3
let C = 1
end select
cls
let X = A + B + C
select case X
case is < 6
print "nama$ ; " dan pasangan anda "; namap$
print "kalian termasuk pasangan yang suka putus nyambung, mengapa ?karena kalian beruda mempunyai sifat bosenan, namun sebenernya anda dan pasangan anda saling mencintai, cuma anda atau pasangan anda terkadang merasa jenuh, mungkin hubungan anda hanya bertahan 1 bulan, atau mungkin hanya 3 hari"
case is < 8
print "nama$; " dan pasangan anda "; namap$
print "kalian berdua mempunyai keakuratan cinta 70%, karena kalian berdua saling menyayangi satu dengan yang lain, namun terkadang salah satu di anttara kalian suka egois, kurangilah kegoisan itu agar kalian bisa bersama selamanya"
case is < 10
print " nama$; " dan pasangan anda "; namap$
print "kalian adalah pasangan yang sempurna, kalian dapat saling menyayangi dan mencintai, saling menghargai kekurangan dan kelebihan pasangan anda, dan mungkin hubungan ini akan berlanjut kepernikahan"
end select
input "apakah anda mau ulang lagi (y/t)?", jawab$
if jawab$ = "Y" or jawab$ = "y" then goto 10
color 10
print ""
print ""
print ""
print "                                            ===================="
print "                                            =             thank you            ="
print "                                            ===================="





nahh gitu doang si, ga ribet kan? ini bisa di modifakasi tergantung kalian mau membuat soal dan pertanyaan seperti apa, di atas saya menggunakan select case untuk menginput pertanyaan dan memberikan nilai kepada variabel tersebut, agar kita mudah untuk membuat kesimpulanya, sebenernya program ramalan yang ada di komputer" tuh blm tentu tepat ramalanya, soalnya ini sih tergantung si pembuat programnya mau nulis apa,hahaha, makanya jgn deh percaya sama ramalan, thanx yaa klo udah ngintip, jgn lupa coment ya kawaan.oke,hahaha

Kamis, 11 November 2010

Trigonometri

Trigonometri adalah nilai perbandingan yang dapat didefinisikan pada koordinat Carteris atau pada segitiga siku-siku.
Sudut istimewa:

a
00
300
450
600
900
1200
1350
1500
1800
Sin a
0
½
½ √2
½ √3
1
½ √3
½ √2
½
0
cos a
1
½ √3
½ √2
½
0
-½ √2
-½ √3
-1
tan a
0
1/3 √3
1
√3
-√3
-1
-1/3 √3
0









a
2100
2250
2400
2700
3000
3150
3300
360
sin a
-½ √2
-½ √3
-1
-½ √3
-½ √2
0
cos a
-½ √3
-½ √2
0
½
½ √2
½ √3
1
tan a
1/3 √3
1
√3
-√3
-1
-1/3 √3
0











Rumus-rumus identitas Trigonometri

a. tan a = sin a

               cos a
b. sin2a + cos2a = 1
c. cot a = cos a
                sin a
d. sec a =   1  
                cosa
e. tan2 a + 1 = sec2a
f.  cot a + 1 = cosec2a
g. cosec a =   1  
                   sin a


Rumus Penjumlahan pada Trigonometri:

a. sin a  +  sin b  = 2 sin ½ (a + b) cos ½ (a - b)
b. sin a  -  sin b   = 2 cos ½ (a + b) sin ½ (a - b)
c. cos a + cos b   = 2 cos ½ (a + b) cos ½ (a - b)
d. cos a -  cos b   = -2 sin ½ (a + b) sin ½ (a - b)



a. 2 sin a cos b = sin (a + b) + sin (a - b)
b. 2 cos a sin b = sin (a + b) - sin (a - b)
c. 2 cos a cos b = cos (a + b) + cos (a - b)
d. -2 sin a cos b = cos (a + b) - cos (a - b)


contoh soal : 










Rabu, 10 November 2010

Midnight Mosque Song - THE S.I.G.I.T

I wished you were dead that night


Where a rotten rat corpse caught my sight

Cats would fought on things you laugh about

So I step of the curbs that were dirtier than I thought

Reff.

Clouds were bold and grey

So I stopped by a mosque and pray

But sky were cold and grey

So I stopped by a mosque and pray

I could feel the street

I’m not scare of things that once had shiver my feet

And lads would fought on things you’d laugh about

So I step of the curbs that were dirtier than I thought


===================================================================


Aku berharap kau sudah mati malam itu

Apabila suatu mayat tikus busuk tertangkap mata-Ku

Kucing akan berjuang pada hal-hal yang Anda tertawa tentang

Jadi saya langkah dari trotoar yang kotor daripada yang saya pikir

Reff.

Awan tebal dan abu-abu

Jadi aku berhenti oleh sebuah masjid dan berdoa

Tapi langit terasa dingin dan abu-abu

Jadi aku berhenti oleh sebuah masjid dan berdoa

Aku bisa merasakan jalan

Aku tidak takut hal-hal yang pernah saya menggigil kaki

Dan pemuda akan bertempur di hal-hal yang akan tertawa tentang

Jadi saya langkah dari trotoar yang kotor daripada yang saya pikir

Selasa, 09 November 2010

all the time

ini cuma sekedar berbagi ini transletan lagu THE S.I.G.I.T yang menurut gw arti dari lagu ini dalem bgt.



Aku ingin hidup selamanya

Apa kau tidak sadar

Selamanya berarti bersama

Saya harap Anda tahu

Bila Anda mengatakan tidak lebih dari

Untuk kali ketiga

Saya harap Anda tahu

Itu membuat saya ingin memberi Anda

Sesuatu yang lebih dan lebih


Aku ingin memberimu harapan

Semua waktu dan memakai jubah Anda

Hanya saja untuk hujan

Itu tidak pernah berakhir sepanjang waktu

(Hidup saya adalah hujan sepanjang waktu)


Aku ingin hidup selamanya

Aku pohon ek
 

selamanya menakut-nakuti orang asing

Saya ingin tumbuh rambut saya

Dan kuku seluruh hidup saya

Saya ingin Anda:

Apakah mengubah nama terakhir Anda

Dan seorang istri


 

Saya ingin berbagi paru-paru saya

Semua waktu dan wajah matahari

Hanya saja seperti rasa sakit terbakar

Bahwa aku sudah bersama sepanjang waktu

(Jantung saya membakar sepanjang waktu)