enrolment na… huhu… pero di pa rin ako satisfied sa sked ko… wahh…

unang una............

May class ako Saturday afternoon… Java pa… waaaaaahhhhhhhh

Pano na yan… di na ko makaka attend sa LLI every staurday… huhuhu…

Ngaun pa, waaaaaaahhhhhh… kaka lungkot nman!  Yun lng ung time para makilala ko ung mga youth ng lighthouse tapos… *sniff

May purpose naman cguro kung bakit ganun ung nangyari, anyway pinag pray ko naman yan...

Artist: Australia Hillsongs

Song: Magnificent

Who compares to You?

Who set the stars in their place?

You who calmed the raging seas

That came crashing over me.

VERSE 2:

Who compares to You?

You who bring the morning light,

The hope of all the earth

Is rest assured in Your great love.

CHORUS:

You are magnificent,

Eternally wonderful, glorious.

Jesus, no one ever will compare (last time to tags)

To You, Jesus.

VERSE 3:

Where the evening fades,

You call forth songs of joy.

As the morning wakes,

We Your children give You praise.

TAGS:

Jesus, no one ever will compare

To You, Jesus.

No one ever will compare

To You, Jesus.

Pasted from <http://www.stlyrics.com/songs/a/australiahillsongs8787/magnificent816023.html>

"Tough faith never grows in a comfortable mind." Letting ourselves experience confusion creates a thirst that only faith can satisfy. - L. Crabb

Out na grades namin and so happy to say na….. SCHOLAR KAMING TATLO! yehey!!! oi April, Divine libre! celebrate dapat tayo!!! Galing talaga ni Lord noh! Syempre all the glory para kay Lord yan. Kac cya ang nag work saming tatlo! Lord thank You po!! :D

Delight yourself in the Lord and He will give you the desires of your heart. Psalms 37:4

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Etong song na to lagi to nag p-play sa mind ko ng paulit ulit!

Refiners fire

Purify my heart,

Let me be as gold and precious silver

Purify my heart,

Let me be as gold, pure gold

Refrain:

Refiner's fire, my heart's one desire is to be holy

Set apart for You, Lord

I want to be holy.

Set apart for You, my Master

Ready to do Your will.

V2:

Purify my heart

Cleanse me from within and make me holy,

Purify my heart

Cleanse me from my sin deep within

(Repeat Refrain)

….ready to do Your will….ready to do Your will….

Pasted from <http://www.sfc-hongkong.org/lyrics/?id=104>

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

thank you Lord for all the joy You gave me today! grabe Lord the best ka talaga!!!

thank You for my new family at lighthouse, for my friends April and divine, for a very supportive ninang, and for a very loving family! thank you Lord for always being there at all times, All the glory Father it's Yours... :D

received this from a friend...

GOD AND THE SPIDER

Author Unknown

Sep 12, 2005

During World War II, a US Marine was separated from his unit on a

Pacific island. The fighting had been intense, and in the smoke and the

crossfire, he had lost touch with his comrades.

Alone in the jungle, he could hear enemy soldiers coming in his

direction. Scrambling for cover, he found his way up a high ridge to

several small caves in the rock. Quickly he crawled inside one of the

caves. Although safe for the moment, he realized that once the enemy

soldiers looking for him swept up the ridge, they would quickly search

all the caves and he would be killed.

As he waited, he prayed, "Lord, if it be your will, please protect me.

Whatever your will though, I love you and trust you. Amen." After

praying, he lay quietly listening to the enemy begin to draw close. He

thought, "Well, I guess the Lord isn't going to help me out of this

one." Then he saw a spider begin to build a web over the front of his

cave.

As he watched, listening to the enemy searching for him all the while,

the spider layered strand after strand of web across the opening of the

cave.

"Hah, he thought. "What I need is a brick wall and what the Lord has

sent me is a spider web. God does have a sense of humor."

As the enemy drew closer he watched from the darkness of his hideout

and could see them searching one cave after another. As they came to

his, he got ready to make his last stand. To his amazement, however,

after glancing in the direction of his cave, they moved on. Suddenly,

he realized that with the spider web over the entrance, his cave looked

as if no one had entered for quite a while. "Lord, forgive me," prayed

the young man. "I had forgotten that in you a spider's web is stronger

than a brick wall."

We all face times of great trouble. When we do, it is so easy to forget

the victories that God would work in our lives, sometimes in the most

surprising ways. As the great leader, Nehemiah, reminded the people of

Israel when they faced the task of rebuilding Jerusalem, "In God we

will have success!" [Nehemiah 2:20]

Remember: Whatever is happening in your life, with God, a mere spider's

web can become a brick wall of protection. Believe He is with you

always. Just speak His name through Jesus His son, and you will see His

great power and love for you.

O diba, God is really answering our prayers IN DIFFERENT WAYS! Minsan instantly, minsan naman matagal, at minsan naman nagawa na Nya pero di natin napapancn. Minsan kailangan lang natin maging sensitive sa paligid natin para mafeel natin na nag wo-work na cya. Always thank Him sagutin man ni Lord o hindi ang hinihingi natinsa kanya kac all things work together for good!!!

Dim bt(1 To 5) As Single, at(1 To 5) As Single, tart!, tbt!, temp, ftt, trt(1 To 5) As Single

Dim wt(1 To 5) As Single, tt(1 To 6) As Single, cpu!, tp!, pat(1 To 5), pbt(1 To 5) As Single

Dim temp1, temp2, temp3, ttat!, twt, nat, nbt, awt, atat, p(1 To 5) As Single

Private Sub Form_Load()

 cmdDisplay.Enabled = False

End Sub

Private Sub cmdCheck_Click()

at(1) = Val(txtA1.Text)

at(2) = Val(txtA2.Text)

at(3) = Val(txtA3.Text)

at(4) = Val(txtA4.Text)

at(5) = Val(txtA5.Text)

    For w = 1 To 4

        For q = 1 To 5 - w

            If at(q) = at(q + 1) Then

                cmdDisplay.Enabled = False

                MsgBox " You cannot have equal inputs for arrival time!!! ", , "Warning"

                cmdDisplay.Enabled = False

          Else

            cmdDisplay.Enabled = True

             End If

        Next q

    Next w

End Sub

Private Sub cmdDisplay_Click()

cmdDisplay.Enabled = False

    picStat.Cls

    picGantt.Cls

    picCU.Cls

    picTP.Cls

    picATRT.Cls

    picAWT.Cls

at(1) = Val(txtA1.Text)

at(2) = Val(txtA2.Text)

at(3) = Val(txtA3.Text)

at(4) = Val(txtA4.Text)

at(5) = Val(txtA5.Text)

bt(1) = Val(txtB1.Text)

bt(2) = Val(txtB2.Text)

bt(3) = Val(txtB3.Text)

bt(4) = Val(txtB4.Text)

bt(5) = Val(txtB5.Text)

p(1) = 1

p(2) = 2

p(3) = 3

p(4) = 4

p(5) = 5

'maintaining the value of arrival time

For w = 1 To 5

    pat(w) = at(w)

Next w

'maintaining the value of burst time

For k = 1 To 5

    pbt(k) = bt(k)

Next k

'sorting for arrival time

  For v = 1 To 4

    For i = 1 To 5 - v

      If at(i) > at(i + 1) Then

          'assign value for arrival time

          nat = at(i)

          at(i) = at(i + 1)

          at(i + 1) = nat

          'assign value for burst time

          nbt = bt(i)

          bt(i) = bt(i + 1)

          bt(i + 1) = nbt

          'assigning process name

          temp3 = p(i)

          p(i) = p(i + 1)

          p(i + 1) = temp3

      End If

    Next i

  Next v

'compute for terminating time

    temp1 = 0

For t = 1 To 5

    tt(t) = temp1 + bt(t)

    ftt = tt(t)

    temp1 = ftt

    'arrival

Next t

'compute for turnaround Time

For r = 1 To 5

    trt(r) = tt(r) - at(r)

Next r

'compute for waiting time

For l = 1 To 5

    wt(l) = trt(l) - bt(l)

Next l

'total arrival time

tart = at(1) + at(2) + at(3) + at(4) + at(5)

'total burst time

tbt = bt(1) + bt(2) + bt(3) + bt(4) + bt(5)

'cpu utilization

cpu = (tbt / ftt) * 100

'throughput

tp = (5 / ftt)

'total waiting time

twt = wt(1) + wt(2) + wt(3) + wt(4) + wt(5)

'total turnaround time

ttat = trt(1) + trt(2) + trt(3) + trt(4) + trt(5)

'average waiting time

awt = twt / 5

'average turn around time

atat = ttat / 5

Call Stat

End Sub

Public Sub Stat()

    'Display statistical table

picStat.Print

picStat.Print "   Process Name   " & "   Burst Time(ms)   " & " Arrival Time(ms)   " & "   Turn Around Time   " & "   Waiting Time   "

For a = 1 To 5

picStat.Print

picStat.Print "            P" & p(a), "                "; bt(a), , at(a); "                           "; trt(a), "               "; wt(a)

Next a

picStat.Print "                              __________             __________            __________            __________"

picStat.Print , "               "; tbt, , tart, "         "; ttat, "                  "; twt

picCU.Print cpu

picTP.Print FormatNumber(tp)

picAWT.Print awt

picATRT.Print atat

'Gantt chart

'with interval

maxNum = ftt

picGantt.Cls

picGantt.Scale (-10, 10)-(110, -10)

picGantt.Line (0, 0)-(100, 0)

Interval = 5.5 '100 / (ftt + 1)

    For i = 1 To ftt

        xPos = Interval * i

        picGantt.Line (xPos, -1)-(xPos, 1) '(xPos, -0.5)-(xPos, 0.5)

        ticLabel = FormatNumber(i, 0)

        picGantt.CurrentX = Interval * i - picGantt.TextWidth(ticLabel) / 2

        picGantt.CurrentY = -1

        picGantt.Print ticLabel;

    Next i

'codes for interval ends here

picGantt.Scale (-1.75, 10)-(20, -10) '(-1, 10)-(20, -7)

picGantt.Line (0, 7.5)-(tt(1), 7.5)

picGantt.Print "P" & p(1)

picGantt.Line (tt(1), 6)-(tt(2), 6)

picGantt.Print "P" & p(2)

picGantt.Line (tt(2), 4.5)-(tt(3), 4.5)

picGantt.Print "P" & p(3)

picGantt.Line (tt(3), 3)-(tt(4), 3)

picGantt.Print "P" & p(4)

picGantt.Line (tt(4), 1.5)-(ftt, 1.5)

picGantt.Print "P" & p(5)

picGantt.Line (0, 9)-(0, -3) ' y axis

picGantt.Line (-0.5, 0)-(ftt, 0) ' x axis

End Sub

ello there!! check my other online journal