21 lines
286 B
Plaintext
21 lines
286 B
Plaintext
mn=10 mx=90 stp=10 if:sld then goto2end if:sli then goto3end goto1
|
|
a=(:sleep-stp)<mn :sleep=(:sleep-stp)*(1-a)+mn*a goto1
|
|
a=(:sleep+stp)>mx :sleep=(:sleep+stp)*(1-a)+mx*a goto1
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
// :sleep = Sleep Timer
|
|
// :sli = Sleep Increase Button
|
|
// :sld = Sleep Height Decrease Button
|