Tuesday, January 22, 2019

English Translation Of Mon Petit Pays By Fréros Delavega



Fréros Delavega - My Tiny Country

One more year that i'm so cold
I'm dying of cold
One more year and I'm going away
yeah,
I' dreaming about you
the nights hundred times without you,
I was hoping
the nights without you, without faith,
going back on my step

Yeah life tear us apart but i see you
yes, every times closer to me
hours, days, months
I don't know, so far from me
You are still there
Yeah life tear us apart but i see you
yes, every times closer to me
hours, days, months
I don't know, so far from me
You are still there

One more year and despite myself
I stay far from you
One more years using my fingers
yeah only, only for you
the nights hundred times without you,
I was hoping
the nights without you, without faith,
going back on my step

(...)

Far from you, you're still there

Every hours, looking for you
head down closing my eyes
graved on my skin forever
Every hours, looking for you
head down closing my eyes
graved on my skin forever
as time passes as i fell
in myself, all that things we don't tell to each other, yeah
the more i move on, the more i fell in myself
what is like to be far from home

(...)



Saturday, May 19, 2018

VB. Net - Coding Membuat Latihan Operator Matematika


PublicClass FrmPert2

PrivateSub bttmod_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bttmod.Click
        TextBox3.Text = Val(TextBox1.Text) Mod Val(TextBox2.Text)
EndSub

PrivateSub lblhasil_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lblhasil.Click
EndSub

PrivateSub btttambah_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btttambah.Click
        TextBox3.Text = Val(TextBox1.Text) + Val(TextBox2.Text)
EndSub

PrivateSub bttkurang_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bttkurang.Click
        TextBox3.Text = Val(TextBox1.Text) - Val(TextBox2.Text)
EndSub

PrivateSub bttkali_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bttkali.Click
        TextBox3.Text = Val(TextBox1.Text) * Val(TextBox2.Text)
EndSub

PrivateSub bttbagi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bttbagi.Click
        TextBox3.Text = Val(TextBox1.Text) / Val(TextBox2.Text)
EndSub

PrivateSub keluar1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles keluar1.Click
End
EndSub

PrivateSub bttkurangdari_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bttkurangdari.Click
If TextBox3.Text < TextBox1.Text Then
            TextBox3.Text = "Benar"
Else
            TextBox3.Text = "Salah"
EndIf
EndSub

PrivateSub bttsd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bttsd.Click
If TextBox3.Text = TextBox1.Text Then
            TextBox3.Text = "Benar"
Else
            TextBox3.Text = "Salah"
EndIf
EndSub

PrivateSub bttlebih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bttlebih.Click
If TextBox3.Text > TextBox1.Text Then
            TextBox3.Text = "Benar"
Else
            TextBox3.Text = "Salah"
EndIf
EndSub

PrivateSub kurangsd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles kurangsd.Click
If TextBox3.Text <= TextBox1.Text Then
            TextBox3.Text = "Benar"
Else
            TextBox3.Text = "Salah"
EndIf
EndSub

PrivateSub kuranglebih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles kuranglebih.Click
If TextBox3.Text <> TextBox1.Text Then
            TextBox3.Text = "Benar"
Else
            TextBox3.Text = "Salah"
EndIf
EndSub

PrivateSub bttlebihsd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bttlebihsd.Click
If TextBox3.Text >= TextBox1.Text Then
            TextBox3.Text = "Benar"
Else
            TextBox3.Text = "Salah"
EndIf
EndSub

PrivateSub bersih1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bersih1.Click
        TextBox1.Text = " "
        TextBox2.Text = " "
        TextBox3.Text = " "
EndSub

PrivateSub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged

EndSub

PrivateSub TextBox1_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
If e.KeyChar = Chr(13) Then
            TextBox2.Focus()
EndIf
EndSub
EndClass

Hasil Program
Contoh:
5 < 7 = Benar

Saturday, August 19, 2017

Basis Data Terapan - Coding Database Perpustakaan pada SQL Server


create database PERPUSTAKAAN
use PERPUSTAKAAN

create table TbPINJAM (
nomor int primary key,
nama varchar(26),
jurusan varchar(4),
BukuPinjam varchar(30)
)
insert into TbPINJAM values(1,'Chyntia','TI1A','Strukdat')
insert into TbPINJAM values(2,'Chyntia2','SI2B','Oracle')
insert into TbPINJAM values(3,'Chyntia3','MI23','Statistik')
insert into TbPINJAM values(4,'Chyntia4','SA4A','Aljabar')
insert into TbPINJAM values(5,'Chyntia5','TK21','Bisnis')
insert into TbPINJAM values(6,'Chyntia6','SA31','Management')
insert into TbPINJAM values(7,'Chyntia7','KA42','Sistem Komputerisasi Akuntansi')
select * from TbPINJAM

--mencari dan menampilkan buku pinjaman berawalan S
select * from TbPINJAM where BukuPinjam like 'S%'
--mencari dan menampilkan buku pinjaman berakhiran T
select * from TbPINJAM where BukuPinjam like '%t'
--mencari dan menampilkan jurusan yang terdapat huruf i
select * from TbPINJAM where jurusan  like '&i%'
--mencari dan menampilkan jurusan berawalan S dan berakhiran angka 1
select * from TbPINJAM where jurusan  like 'S%1'
--menampilkan nama peminjam dan jurusan yang namanya berakhiran 2 dan 4
select nama as [Nama Peminjam], jurusan  from TbPINJAM where nama like '%2' or nama like '%4'
--tampilkan nama peminjam yang jurusannya berawalan T dan yang meminjam buku berawalan B
select nama as [Nama Peminjam] from TbPINJAM where jurusan  like 'T%' or BukuPinjam  like 'B%'

--fumgsi-fungsi agregat
select AVG (nomor) as "Nilai Rata-rata" from TbPINJAM
select MAX (nomor) as "Nilai Tertinggi" from TbPINJAM
select MIN (nomor) as "Nilai Terendah" from TbPINJAM
select SUM (nomor) as "Nilai Total" from TbPINJAM
select COUNT (nomor) as "Banyak Data" from TbPINJAM

insert into TbPINJAM values(8,'Chyntia8','SA4A','B.Inggris')
insert into TbPINJAM values(9,'Chyntia9','MI23','B.Indonesia')

--menampilkan banyak data sesuai kelompok (Group, contoh: jurusan)
select jurusan, COUNT(jurusan) as kelas from TbPINJAM group by jurusan
--compute - membuat subtotal berdasarkan jurusan dan diurutkan secara descending
select nomor,nama , jurusan from TbPINJAM order by jurusan desc compute count(jurusan) by jurusan
--ascending
select nomor,nama , jurusan from TbPINJAM order by jurusan compute count(jurusan) by jurusan

alter table TbPINJAM add lama int
update TbPINJAM set lama =SUBSTRING (jurusan,3,1)
select * from TbPINJAM
--Having - menentukan batasan kondisi hasil proses
--mencari lama pinjam yang lebih dari 2 hari
select jurusan, SUM (lama) as [Lama Pinjam] from TbPINJAM group by jurusan having SUM (lama) > 2
--tampilkan rata lama peminjam buku
select AVG (lama) As [Rata Lama Pinjam] from TbPINJAM

Wednesday, August 9, 2017

Basis Data Terapan - Coding Stored Procedure pada SQL Server


create database ContohProsedur
use ContohProsedur

create table TblPaket(
Kode char(12) primary key,
Paket char(15),
Biaya BigInt
)
insert into TblPaket values('01','Mic. SQL Server', 100000)
insert into TblPaket values('02','Mic. Visual.Net', 250000)
insert into TblPaket values('03','Perc. Web', 375000)

--contoh pembuatan procedure untuk lihat data
--tanpa parameter

create procedure LihatTabel
as
select * from TblPaket

--menjalankan procedure LihatTabel
LihatTabel

--membuat procedure dengan 1 parameter input
create procedure CariTabel @kode varchar(2)
as
select * from TblPaket
where Kode = @kode

--menjalankan procedure
CariTabel'01'

--pembuatan procedure untuk proses tambah record
create procedure TambahData @Kode char(2),
@Paket char(15),@Biaya BigInt
as
insert into TblPaket values(@Kode,@Paket,@Biaya)

--menjalankan procedure TambahData
TambahData '04','WEB Programming',350000
TambahData '05','PBO1',350000
LihatTabel

--Hapus procedure TambahData
drop procedure Tambahdata

/* 1. Buatkan procedure untuk menghapus Record berdasarkan Kode Paket yang diinginkan
   2. Buatkan procedure untuk memperbaiki Record berdasarkan
      Kode 04 dengan Paket Multimedia dan biaya 300000 */
 
create procedure HapusData @Kode char(2)
as delete from TblPaket where Kode=@Kode

--Jalankan procedure HapusData
HapusData '02'
LihatTabel

--------------------------------------------------------------------------------
create procedure PerbaikiData @Kode char(2), @paket char(15), @Biaya bigInt
as update TblPaket set Paket = @paket, Biaya = @Biaya where Kode = @Kode

PerbaikiData '04','Multimedia',350000
LihatTabel
--------------------------------------------------------------------------------
create table TblBagian(
KodeBag char(2) primary key,
bagian char(15)
)

create table tblpegawai (
nip char(5)  primary key,
nama char(25),
jabatan char(15),
gaji int,
KodeBag char(2) references TblBagian(KodeBag)
)


insert into TblBagian values('KU','Keuangan')
insert into TblBagian values('AM','Administ')
insert into TblBagian values('SM','Personalia')

select * from TblBagian

insert into tblpegawai values ('09101','Budi','Direktur',5000000,'KU')
insert into tblpegawai values ('09102','Iwan','Kabag',3000000,'AM')
insert into tblpegawai values ('09103','Dian','Staff',1000000,'KS')
insert into tblpegawai values ('09104','Waty','Staff',1000000,'SM')
select * from tblpegawai

insert into TblBagian values ('KS','Bendahara')

Saturday, October 17, 2015

Song Lyrics Why Not Me - Enrique Iglesias


Escaping nights without you with shadows on the wall
My mind is running wild trying hard not to fall
You told me that you love me but say I'm just a friend
My heart is broken up into pieces

'Cause I know I'll never free my soul
It's trapped in between true love and being alone
When my eyes are closed the greatest story told
I woke and my dreams are shattered here on the floor

Why oh why tell me why not me?
Why oh why we were meant to be
Baby, I know I could be all you need
Why oh why oh why?
I wanna love you
If you only knew how much I love you
So why not me?

The day after tomorrow I'll still be around
To catch you when you fall and never let you down
You say that we're forever our love will never end
I've tried to come up but it's drowning me to know

You'll never feel my soul
It's trapped in between true love and being alone
When my eyes are closed the greatest story told
I woke and my dreams are shattered here on the floor

Tell me, baby, why oh why tell me why not me?
Why oh why we were meant to be?
Baby, I know I could be all you need
Why oh why oh why?
I wanna love you
If you only knew how much I love you
So why not me?

You won't ever know
How far we can go
You won't ever know
How far we can go
(Go)

Why oh why tell me why not me?
Why oh why we were meant to be?
Baby, I know I could be all you need
Why oh why oh why?

Why oh why tell me why not me?
Why oh why we were meant to be?
Baby, I know I could be all you need
Why oh why oh why oh why?
I wanna love you
If you only knew how much I love you
So why not me?
(Why not me, why not me?)


English Translation of Je t'aime By Lara Fabian



Lara Fabian – I Love You

In fact, there were other ways to break up
Maybe, some shards of glass could have helped
Being in this bitter silence, I decided to forgive
the mistakes that one can do when he loves too much

In fact, the little girl in me often called on you
And almost like a mother
You surrounded me and protected me
From you, I stole the blood that I should have never shared
In the end of the words, of the dreams, I will cry out

I love you, I love you
Like a fool, like a soldier
Like a movie star
I love you, I love you
Like a wolf, like a king
Like a man that I am not
Just see, I love you like this

In fact, I trusted you with all the smiles of mine,
All my secrets
Even those ones that only a brother is the unconfessable gardian
In this house of stone,
Satan saw us dancing
How I wish the war of our bodies, that together made the peace

I love you, I love you
Like a fool, like a soldier
Like a movie star
I love you, I love you
Like a wolf, like a king
Like a man that I am not
Just see, I love you like this


English Translation of Je Suis Malade By Lara Fabian


Lara Fabian - I am Sick

I don't dream anymore I don't smoke anymore
I don't even have a history anymore
I am dirty without you
I am ugly without you
I am like an orphan in a dormitory

I don't have the will anymore to live my life
My life ceases when you leave
I don't have a life anymore and even my bed
Transforms itself in a dock station
When you go away

I am sick
Completely sick
As when my mother left at the evening
And that she left me alone with my despair

I am sick perfectly sick
You arrive we never know when
You go out again we never know where
And soon it will be two years
That you don't care

Like to a rock
Like to a sin
I am locked at you
I am tired I am exhausted
Of making a happy face when they are there

I drink every night
But all the whiskeys
For me, have the same taste
And all the boats carry your flag
I don't know anymore where to go you are everywhere

I am sick
Completely sick
I pour my blood into your body
And I am like a dead bird when you sleep

I am sick
Perfectly sick
You deprived me of all my songs
You emptied me of all my words
So I, I had talent before your skin (your touch)

This love kills me
If that continues I will burst alone with me
Close to my radio like a silly child
Listening to my own voice that will sing

I am sick
Completely sick
As when my mother left at the evening
And that she left me alone with my despair

I am sick
This is it! I am sick
You deprived me of all my songs
You emptied me of all my words
And I have the heart completely sick
Encircled by barricades
Do you hear? I am sick

Monday, October 12, 2015

Song Lyrics Your Call - Secondhand Serenade



Waiting for your,
Call I'm sick,
Call I'm angry,
Call I'm desperate for your voice
Listening to the song we used to sing
In the car, do you remember
Butterfly, Early Summer
It's playing on repeat, Just like when we would meet
Like when we would meet

Reff...
I was born to tell you I love you
And I am torn to do what I have to,
To make you mine
Stay with me tonight

Stripped and polished, I am new, I am fresh
I am feeling so ambitious, you and me, flesh to flesh
Cause every breath that you will take
When you are sitting next to me
Will bring life into my deepest hopes,
What's your fantasy?
(What's your, what's your...)

Repeat Reff...

And I'm tired of being all alone,
And this solitary moment makes me want to come back home
[4x]

I was born to tell you I love you
And I am torn to do what I have to
I was born to tell you I love you
And I am torn to do what I have to

To make you mine
Stay with me tonight

Saturday, October 3, 2015

Song Lyrics What If - Kate Winslet



Here I stand alone, with this weight upon my heart,
And it will not go away
In my head I keep on looking back, right back to the start
wondering what it was that made you change.
well I tried but I had to draw the line...
and still this question keeps on spinning in my mind:

Reff...
What if I had never let you go?
Would you be the man I used to know?
If I'd stayed, if you tried,
if we could only turn back time,
But I guess we'll never know.

Many roads to take, some to joy some to heartache,
Anyone can lose their way
And if I said that we could turn it back, right back to the start,
Would you take the chance and make the change?
Do you think how it would have been sometimes?
Do you pray that I'd never left your side?

What if I had never let you go?
Would you be the man I used to know?
If we stayed, if we tried,
if we could only turn back time,
But I guess we'll never know.

If only we could turn the hands of time.
If I could take it back would you still be mine?
'Cause I tried but I had to draw the line,
and still this question keeps on spinning in my mind:

Repeat Reff...
(softly) We'll never know

Friday, October 2, 2015

English Translation of Ich lieb Dich Immer Noch So Sehr By Kate Feat Ben

Kate Feat Ben - I Still Love You So Much

You enclose yourself in my heart,
You always creep yourself deeper in,
I don’t know more what I want,
You determine my feeling,
You've allied with me,
You promised me never to go,
You’ve burned me,
Now you let me stand up in the flames.

Reff...
I still love you so much,
I still love you far more,
Your looks tempt me,
Our souls touch each other,
I still love you so much,
Melancholic tears, my head is empty,
Because there is no more sense, where you are not.

I run a hundred thousand miles,
In the circle rotated around you,
The pain we don’t share hurts twice,
I look for you in all ways,
You’ll always be in me,
You are the large rain,
You are that, what I’m crying.

Repeat Reff...

You are the large rain,
That, what I’m crying.

Repeat Reff...

Every tiny particle of me,
Loves every tiny particle of you,
It’s so difficult for you to replace me!

Source: http://sibesabz1.blogspot.co.id/2010/09/ich-lieb-dich-immer-noch-so-sehr-kate.html

Sunday, November 23, 2014

English Translation of Te Voy A Amar By Axel Fernando


Axel Fernando - I Will Love You

Is little to say you are my light, my sky, my other half
Is little to say I would give my life for your love and even more

The words don't do for me (are not enough for me), no
To explain you what I feel
And all that you cause inside me

The white and black become colors
And everything is sweet when it is said by you
And if it is from you.

Reff...
I will love you and make you feel
That every day I will chose you
Because you give me your love without measurement
I want to live my whole life with you

Is little to say that I am the one who takes care of you like a guardian angel
Is little to say that in a kiss of yours I always find my peace

The words don't do for me (are not enough for me), no
To explain you what I feel
And all that you cause inside me

The white and black become colors
And everything is sweet when it is said by you
And if it is from you.

Repeat Reff (2x)...
I will love you and make you feel
That every day I will chose you
Because you give me your love without measurement
I want to live my whole life with you

Living no, living my whole life next to you
Because you give your love without measurement
I want to live my whole life next to you.

Is little to say
That in a kiss of yours

I always find my peace

Wednesday, July 9, 2014

Song Lyrics Vanilla Twilight - Owl City


The stars lean down to kiss you
And I lie awake I miss you
Pour me a heavy dose of atmosphere
Cause I’ll doze off safe and soundly
But I’ll miss your arms around me
I’ll send a postcard to you dear
Cause I wish you were here

I watch the night turn light blue
But it’s not the same without you
Because it takes two to whisper quietly
The silence isn’t so bad
Till I look at my hands and feel sad
Cause the spaces between my fingers
Are right where yours fit perfectly

I’ll find repose in new ways
Though I haven’t slept in two days
Cause cold nostalgia chills me to the bone
But drenched in Vanilla twilight
I’ll sit on the front porch all night
Waist deep in thought because when I think of you
I don’t feel so alone
I don’t feel so alone
I don’t feel so alone

As many times as I blink I’ll think of you… tonight
I’ll think of you tonight

When violet eyes get brighter
And heavy wings grow lighter
I’ll taste the sky and feel alive again
And I’ll forget the world that I knew
But I swear I won’t forget you
Oh if my voice could reach back through the past
I’d whisper in your ear
Oh darling I wish you were here

Friday, May 17, 2013

Song Lyrics Because Of You - Kelly Clarkson


I will not make the same mistakes that you did
I will not let myself
Cause my heart so much misery
I will not break the way you did,
You fell so hard
I've learned the hard way
To never let it get that far

Reff...
Because of you
I never stray too far from the sidewalk
Because of you I learned to play on the safe side so
I don't get hurt Because of you
I find it hard to trust not only me, but everyone around me
Because of you I am afraid

I lose my way
And it's not too long before you point it out
I cannot cry Because I know that's weakness in your eyes
I'm forced to fake A smile, a laugh everyday of my life
My heart can't possibly break
When it wasn't even whole to start with

Repeat Reff...

I watched you die I heard you cry every night in your sleep
I was so young You should have known better than to lean on me
You never thought of anyone else
You just saw your pain
And now I cry in the middle of the night
For the same damn thing

Because of you I never stray too far from the sidewalk
Because of you I learned to play on the safe side so
I don't get hurt Because of you
I try my hardest just to forget everything
Because of you I don't know how to let anyone else in
Because of you I'm ashamed of my life because it's empty
Because of you I am afraid
Because of you

Tuesday, August 14, 2012

Life Is A Challenge

As you know, Life is a challenge where we must be able to endure in the middle difficult compatition that’s regard.
Life is only 3 days that are:
Yesterday, Today, and Tomorrow.
For Yesterday was History, Today is Fact, and Tomorrow is Future ‘cause we can’t guess What are we still Life or Die? 

All of you need to know that life will empty if there isn’t experience and bitter-sweet of story about daily life.
Also with Problem, maybe all of you often hear from the song of Lenka with the tittle 
“Trouble Is A Friend“. 

Yeah……Trouble Is A Friend is a popular song and had meant that’s true and it can present of our life.
 ‘cause without Problem in our life there isn’t story and Impossible our life always Happy in the world.
It means, Problem is a word that familiar we hear and afraid if problem will come in our life. 

But, Problem also can be Positive Impact if we’re meditate.
Without there isn’t Problem, our life will not have experience story and learns of our Problem had been wishdom. 

And Negative Impact can make the human be weak, down, complaint, and moreover could be desperate.
But, to avoid from it you must pray to God and patient that you can give up was regard of the problem.
At the last, you have to have spirit to journey this life and life need the struggle.

Trust me, God always inside us!

Super Kawaii Cute Cat Kaoani