$regfile = "2313def.dat" $crystal = 4000000 Dim Count As Integer Count = 0 Do Cls Lcd "Hello! " ; Count Count = Count + 1 Wait 1 Loop End