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