Algoritma Membuat Telur Dadar

1. Mulai
2. Beli telur auam
3. Nyalakan kompor
4. Masukkan minyak goreng dalam wajan
5. Letakkan wajan di atas kompor
6. Apakah minyak telah panas ?

• Bila belum tunggu sampai panas
• Bila sudah pergi ke langkah berikut

7. Pecah telur dan masukkan dalam mangkok
8. Kocok Telur
9. Apakah telur sudah tercampur

• Bila sudah pergi ke langkah berikutnya
• Bila belum kembali ke langkah 8

10. Masukkan telur dalam wajan
11. Apakah sudah matang ?

• Bila belum, tunggu
• Bila Sudah, ke langkah 12

12. Angkat Telur dari wajan
13. Matikan Kompor
14. Selesai

Have Your Excel a Ticking Timer

This is the way you have your Excel with macro can have timer and ticking

the code is

Dim ToStop As Variant

Sub ticking()

If ToStop <> "" Then GoTo ToExit

alertTime = Now + TimeValue("00:00:01")

Application.OnTime alertTime, "thisworkbook.ticking2"

Range("A1").Value = Now

ToExit:

End Sub

Sub ticking2()

If ToStop <> "" Then GoTo ToExit

alertTime = Now + TimeValue("00:00:01")

Application.OnTime alertTime, "thisworkbook.ticking"

Range("A1").Value = Now

ToExit:

End Sub

Sub StartTick()

ToStop = ""

ticking

End Sub

You can download the sample file