16 lines
186 B
Text
16 lines
186 B
Text
|
Disp "TIME:"
|
||
|
|
input→A
|
||
|
|
0→T
|
||
|
|
length(A)→L
|
||
|
|
For(I,1,L)
|
||
|
|
If {A}<'0' or {A}>'9'
|
||
|
|
Disp "NOT A NUMBER",i
|
||
|
|
Return
|
||
|
|
End
|
||
|
|
T*10+{A}-'0'→T
|
||
|
|
A++
|
||
|
|
End
|
||
|
|
Disp "SLEEPING...",i
|
||
|
|
Pause T
|
||
|
|
Disp "AWAKE",i
|